1 /* Copyright (C) 1993-1995,1997,2000,2004,2005,2009,2011
2 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
31 #include <sys/syslog.h>
33 #include <not-cancel.h>
35 #ifdef FATAL_PREPARE_INCLUDE
36 #include FATAL_PREPARE_INCLUDE
43 struct str_list
*next
;
47 /* Abort with an error message. */
49 __libc_message (int do_abort
, const char *fmt
, ...)
56 va_copy (ap_copy
, ap
);
62 /* Open a descriptor for /dev/tty unless the user explicitly
63 requests errors on standard error. */
64 const char *on_2
= __secure_getenv ("LIBC_FATAL_STDERR_");
65 if (on_2
== NULL
|| *on_2
== '\0')
66 fd
= open_not_cancel_2 (_PATH_TTY
, O_RDWR
| O_NOCTTY
| O_NDELAY
);
71 struct str_list
*list
= NULL
;
77 /* Find the next "%s" or the end of the string. */
78 const char *next
= cp
;
79 while (next
[0] != '%' || next
[1] != 's')
81 next
= __strchrnul (next
+ 1, '%');
87 /* Determine what to print. */
90 if (cp
[0] == '%' && cp
[1] == 's')
92 str
= va_arg (ap
, const char *);
103 struct str_list
*newp
= alloca (sizeof (struct str_list
));
111 bool written
= false;
114 struct iovec
*iov
= alloca (nlist
* sizeof (struct iovec
));
117 for (int cnt
= nlist
- 1; cnt
>= 0; --cnt
)
119 iov
[cnt
].iov_base
= (char *) list
->str
;
120 iov
[cnt
].iov_len
= list
->len
;
125 if (TEMP_FAILURE_RETRY (__writev (fd
, iov
, nlist
)) == total
)
130 total
= ((total
+ 1 + GLRO(dl_pagesize
) - 1)
131 & ~(GLRO(dl_pagesize
) - 1));
132 struct abort_msg_s
*buf
= __mmap (NULL
, total
,
133 PROT_READ
| PROT_WRITE
,
134 MAP_ANON
| MAP_PRIVATE
, -1, 0);
135 if (buf
!= MAP_FAILED
)
139 for (int cnt
= 0; cnt
< nlist
; ++cnt
)
140 wp
= mempcpy (wp
, iov
[cnt
].iov_base
, iov
[cnt
].iov_len
);
143 /* We have to free the old buffer since the application might
144 catch the SIGABRT signal. */
145 struct abort_msg_s
*old
= atomic_exchange_acq (&__abort_msg
,
148 __munmap (old
, old
->size
);
155 /* If we had no success writing the message, use syslog. */
157 vsyslog (LOG_ERR
, fmt
, ap_copy
);
162 /* Kill the application. */
168 __libc_fatal (message
)
171 /* The loop is added only to keep gcc happy. */
173 __libc_message (1, "%s", message
);
175 libc_hidden_def (__libc_fatal
)