version 1.1.1.2, 2012/05/29 09:29:43
|
version 1.1.1.3, 2021/03/17 13:38:46
|
Line 1
|
Line 1
|
/* Error handler for noninteractive utilities |
/* Error handler for noninteractive utilities |
Copyright (C) 1990-1998, 2000-2007, 2009-2011 Free Software Foundation, Inc. | Copyright (C) 1990-1998, 2000-2007, 2009-2019 Free Software Foundation, Inc. |
This file is part of the GNU C Library. |
This file is part of the GNU C Library. |
|
|
This program is free software: you can redistribute it and/or modify |
This program is free software: you can redistribute it and/or modify |
Line 13
|
Line 13
|
GNU General Public License for more details. |
GNU General Public License for more details. |
|
|
You should have received a copy of the GNU General Public License |
You should have received a copy of the GNU General Public License |
along with this program. If not, see <http://www.gnu.org/licenses/>. */ | along with this program. If not, see <https://www.gnu.org/licenses/>. */ |
|
|
/* Written by David MacKenzie <djm@gnu.ai.mit.edu>. */ |
/* Written by David MacKenzie <djm@gnu.ai.mit.edu>. */ |
|
|
Line 39
|
Line 39
|
# include <stdint.h> |
# include <stdint.h> |
# include <wchar.h> |
# include <wchar.h> |
# define mbsrtowcs __mbsrtowcs |
# define mbsrtowcs __mbsrtowcs |
|
# define USE_UNLOCKED_IO 0 |
|
# define _GL_ATTRIBUTE_FORMAT_PRINTF(a, b) |
|
# define _GL_ARG_NONNULL(a) |
|
#else |
|
# include "getprogname.h" |
#endif |
#endif |
|
|
#if USE_UNLOCKED_IO |
#if USE_UNLOCKED_IO |
Line 54
|
Line 59
|
function without parameters instead. */ |
function without parameters instead. */ |
void (*error_print_progname) (void); |
void (*error_print_progname) (void); |
|
|
/* This variable is incremented each time `error' is called. */ | /* This variable is incremented each time 'error' is called. */ |
unsigned int error_message_count; |
unsigned int error_message_count; |
|
|
#ifdef _LIBC |
#ifdef _LIBC |
Line 65 unsigned int error_message_count;
|
Line 70 unsigned int error_message_count;
|
# include <limits.h> |
# include <limits.h> |
# include <libio/libioP.h> |
# include <libio/libioP.h> |
|
|
/* In GNU libc we want do not want to use the common name `error' directly. | /* In GNU libc we want do not want to use the common name 'error' directly. |
Instead make it a weak alias. */ |
Instead make it a weak alias. */ |
extern void __error (int status, int errnum, const char *message, ...) |
extern void __error (int status, int errnum, const char *message, ...) |
__attribute__ ((__format__ (__printf__, 3, 4))); |
__attribute__ ((__format__ (__printf__, 3, 4))); |
extern void __error_at_line (int status, int errnum, const char *file_name, |
extern void __error_at_line (int status, int errnum, const char *file_name, |
unsigned int line_number, const char *message, |
unsigned int line_number, const char *message, |
...) |
...) |
__attribute__ ((__format__ (__printf__, 5, 6)));; | __attribute__ ((__format__ (__printf__, 5, 6))); |
# define error __error |
# define error __error |
# define error_at_line __error_at_line |
# define error_at_line __error_at_line |
|
|
# include <libio/iolibio.h> |
# include <libio/iolibio.h> |
# define fflush(s) INTUSE(_IO_fflush) (s) | # define fflush(s) _IO_fflush (s) |
# undef putc |
# undef putc |
# define putc(c, fp) INTUSE(_IO_putc) (c, fp) | # define putc(c, fp) _IO_putc (c, fp) |
|
|
# include <bits/libc-lock.h> |
# include <bits/libc-lock.h> |
|
|
Line 88 extern void __error_at_line (int status, int errnum, c
|
Line 93 extern void __error_at_line (int status, int errnum, c
|
# include <fcntl.h> |
# include <fcntl.h> |
# include <unistd.h> |
# include <unistd.h> |
|
|
# if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__ | # if defined _WIN32 && ! defined __CYGWIN__ |
/* Get declarations of the Win32 API functions. */ | /* Get declarations of the native Windows API functions. */ |
# define WIN32_LEAN_AND_MEAN |
# define WIN32_LEAN_AND_MEAN |
# include <windows.h> |
# include <windows.h> |
|
/* Get _get_osfhandle. */ |
|
# if GNULIB_MSVC_NOTHROW |
|
# include "msvc-nothrow.h" |
|
# else |
|
# include <io.h> |
|
# endif |
# endif |
# endif |
|
|
/* The gnulib override of fcntl is not needed in this file. */ |
/* The gnulib override of fcntl is not needed in this file. */ |
# undef fcntl |
# undef fcntl |
|
|
# if !HAVE_DECL_STRERROR_R | # if !(GNULIB_STRERROR_R_POSIX || HAVE_DECL_STRERROR_R) |
# ifndef HAVE_DECL_STRERROR_R |
# ifndef HAVE_DECL_STRERROR_R |
"this configure-time declaration test was not run" |
"this configure-time declaration test was not run" |
# endif |
# endif |
# if STRERROR_R_CHAR_P |
# if STRERROR_R_CHAR_P |
char *strerror_r (); | char *strerror_r (int errnum, char *buf, size_t buflen); |
# else |
# else |
int strerror_r (); | int strerror_r (int errnum, char *buf, size_t buflen); |
# endif |
# endif |
# endif |
# endif |
|
|
/* The calling program should define program_name and set it to the | #define program_name getprogname () |
name of the executing program. */ | |
extern char *program_name; | |
|
|
# if HAVE_STRERROR_R || defined strerror_r | # if GNULIB_STRERROR_R_POSIX || HAVE_STRERROR_R || defined strerror_r |
# define __strerror_r strerror_r |
# define __strerror_r strerror_r |
# endif /* HAVE_STRERROR_R || defined strerror_r */ | # endif /* GNULIB_STRERROR_R_POSIX || HAVE_STRERROR_R || defined strerror_r */ |
#endif /* not _LIBC */ |
#endif /* not _LIBC */ |
|
|
#if !_LIBC |
#if !_LIBC |
/* Return non-zero if FD is open. */ |
/* Return non-zero if FD is open. */ |
static inline int | static int |
is_open (int fd) |
is_open (int fd) |
{ |
{ |
# if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__ | # if defined _WIN32 && ! defined __CYGWIN__ |
/* On Win32: The initial state of unassigned standard file descriptors is | /* On native Windows: The initial state of unassigned standard file |
that they are open but point to an INVALID_HANDLE_VALUE. There is no | descriptors is that they are open but point to an INVALID_HANDLE_VALUE. |
fcntl, and the gnulib replacement fcntl does not support F_GETFL. */ | There is no fcntl, and the gnulib replacement fcntl does not support |
| F_GETFL. */ |
return (HANDLE) _get_osfhandle (fd) != INVALID_HANDLE_VALUE; |
return (HANDLE) _get_osfhandle (fd) != INVALID_HANDLE_VALUE; |
# else |
# else |
# ifndef F_GETFL |
# ifndef F_GETFL |
Line 136 is_open (int fd)
|
Line 146 is_open (int fd)
|
} |
} |
#endif |
#endif |
|
|
static inline void | static void |
flush_stdout (void) |
flush_stdout (void) |
{ |
{ |
#if !_LIBC |
#if !_LIBC |
Line 166 print_errno_message (int errnum)
|
Line 176 print_errno_message (int errnum)
|
{ |
{ |
char const *s; |
char const *s; |
|
|
#if defined HAVE_STRERROR_R || _LIBC | #if _LIBC || GNULIB_STRERROR_R_POSIX || defined HAVE_STRERROR_R |
char errbuf[1024]; |
char errbuf[1024]; |
# if STRERROR_R_CHAR_P || _LIBC | # if _LIBC || (!GNULIB_STRERROR_R_POSIX && STRERROR_R_CHAR_P) |
s = __strerror_r (errnum, errbuf, sizeof errbuf); |
s = __strerror_r (errnum, errbuf, sizeof errbuf); |
# else |
# else |
if (__strerror_r (errnum, errbuf, sizeof errbuf) == 0) |
if (__strerror_r (errnum, errbuf, sizeof errbuf) == 0) |
Line 192 print_errno_message (int errnum)
|
Line 202 print_errno_message (int errnum)
|
#endif |
#endif |
} |
} |
|
|
static void | static void _GL_ATTRIBUTE_FORMAT_PRINTF (3, 0) _GL_ARG_NONNULL ((3)) |
error_tail (int status, int errnum, const char *message, va_list args) |
error_tail (int status, int errnum, const char *message, va_list args) |
{ |
{ |
#if _LIBC |
#if _LIBC |
if (_IO_fwide (stderr, 0) > 0) |
if (_IO_fwide (stderr, 0) > 0) |
{ |
{ |
# define ALLOCA_LIMIT 2000 |
|
size_t len = strlen (message) + 1; |
size_t len = strlen (message) + 1; |
wchar_t *wmessage = NULL; |
wchar_t *wmessage = NULL; |
mbstate_t st; |
mbstate_t st; |
Line 234 error_tail (int status, int errnum, const char *messag
|
Line 243 error_tail (int status, int errnum, const char *messag
|
if (res != len) |
if (res != len) |
break; |
break; |
|
|
if (__builtin_expect (len >= SIZE_MAX / 2, 0)) | if (__builtin_expect (len >= SIZE_MAX / sizeof (wchar_t) / 2, 0)) |
{ |
{ |
/* This really should not happen if everything is fine. */ |
/* This really should not happen if everything is fine. */ |
res = (size_t) -1; |
res = (size_t) -1; |
Line 263 error_tail (int status, int errnum, const char *messag
|
Line 272 error_tail (int status, int errnum, const char *messag
|
else |
else |
#endif |
#endif |
vfprintf (stderr, message, args); |
vfprintf (stderr, message, args); |
va_end (args); |
|
|
|
++error_message_count; |
++error_message_count; |
if (errnum) |
if (errnum) |
Line 313 error (int status, int errnum, const char *message, ..
|
Line 321 error (int status, int errnum, const char *message, ..
|
|
|
va_start (args, message); |
va_start (args, message); |
error_tail (status, errnum, message, args); |
error_tail (status, errnum, message, args); |
|
va_end (args); |
|
|
#ifdef _LIBC |
#ifdef _LIBC |
_IO_funlockfile (stderr); |
_IO_funlockfile (stderr); |
Line 339 error_at_line (int status, int errnum, const char *fil
|
Line 348 error_at_line (int status, int errnum, const char *fil
|
|
|
if (old_line_number == line_number |
if (old_line_number == line_number |
&& (file_name == old_file_name |
&& (file_name == old_file_name |
|| strcmp (old_file_name, file_name) == 0)) | || (old_file_name != NULL |
| && file_name != NULL |
| && strcmp (old_file_name, file_name) == 0))) |
| |
/* Simply return and print nothing. */ |
/* Simply return and print nothing. */ |
return; |
return; |
|
|
Line 371 error_at_line (int status, int errnum, const char *fil
|
Line 383 error_at_line (int status, int errnum, const char *fil
|
} |
} |
|
|
#if _LIBC |
#if _LIBC |
__fxprintf (NULL, file_name != NULL ? "%s:%d: " : " ", | __fxprintf (NULL, file_name != NULL ? "%s:%u: " : " ", |
file_name, line_number); |
file_name, line_number); |
#else |
#else |
fprintf (stderr, file_name != NULL ? "%s:%d: " : " ", | fprintf (stderr, file_name != NULL ? "%s:%u: " : " ", |
file_name, line_number); |
file_name, line_number); |
#endif |
#endif |
|
|
va_start (args, message); |
va_start (args, message); |
error_tail (status, errnum, message, args); |
error_tail (status, errnum, message, args); |
|
va_end (args); |
|
|
#ifdef _LIBC |
#ifdef _LIBC |
_IO_funlockfile (stderr); |
_IO_funlockfile (stderr); |