1: /* Copyright (C) 1994-1998,2001,2002,2005 Free Software Foundation, Inc.
    2:    This file is part of the GNU C Library.
    3: 
    4:    The GNU C Library is free software; you can redistribute it and/or
    5:    modify it under the terms of the GNU Lesser General Public
    6:    License as published by the Free Software Foundation; either
    7:    version 2.1 of the License, or (at your option) any later version.
    8: 
    9:    The GNU C Library is distributed in the hope that it will be useful,
   10:    but WITHOUT ANY WARRANTY; without even the implied warranty of
   11:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   12:    Lesser General Public License for more details.
   13: 
   14:    You should have received a copy of the GNU Lesser General Public
   15:    License along with the GNU C Library; if not, write to the Free
   16:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   17:    02111-1307 USA.  */
   18: 
   19: #include <assert.h>
   20: #include <libintl.h>
   21: #include <stdio.h>
   22: #include <stdlib.h>
   23: #include <string.h>
   24: #include <sysdep.h>
   25: #include <unistd.h>
   26: 
   27: 
   28: extern const char *__progname;
   29: 
   30: #ifdef USE_IN_LIBIO
   31: # include <wchar.h>
   32: # include <libio/iolibio.h>
   33: # define fflush(s) INTUSE(_IO_fflush) (s)
   34: #endif
   35: 
   36: /* This function, when passed an error number, a filename, and a line
   37:    number, prints a message on the standard error stream of the form:
   38:         a.c:10: foobar: Unexpected error: Computer bought the farm
   39:    It then aborts program execution via a call to `abort'.  */
   40: 
   41: #ifdef FATAL_PREPARE_INCLUDE
   42: # include FATAL_PREPARE_INCLUDE
   43: #endif
   44: 
   45: void
   46: __assert_perror_fail (int errnum,
   47:                       const char *file, unsigned int line,
   48:                       const char *function)
   49: {
   50:   char errbuf[1024];
   51:   char *buf;
   52: 
   53: #ifdef FATAL_PREPARE
   54:   FATAL_PREPARE;
   55: #endif
   56: 
   57:   if (__asprintf (&buf, _("%s%s%s:%u: %s%sUnexpected error: %s.\n"),
   58:                   __progname, __progname[0] ? ": " : "",
   59:                   file, line,
   60:                   function ? function : "", function ? ": " : "",
   61:                   __strerror_r (errnum, errbuf, sizeof errbuf)) >= 0)
   62:     {
   63:       /* Print the message.  */
   64:       (void) __fxprintf (NULL, "%s", buf);
   65:       (void) fflush (stderr);
   66: 
   67:       /* We have to free the buffer since the appplication might catch the
   68:          SIGABRT.  */
   69:       free (buf);
   70:     }
   71:   else
   72:     {
   73:       /* At least print a minimal message.  */
   74:       static const char errstr[] = "Unexpected error.\n";
   75:       __libc_write (STDERR_FILENO, errstr, sizeof (errstr) - 1);
   76:     }
   77: 
   78:   abort ();
   79: }
   80: libc_hidden_def (__assert_perror_fail)