lib/fatal.c

   1 /* Fatal exits for noninteractive utilities
   2
   3    Copyright (C) 2001, 2003 Free Software Foundation, Inc.
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 2, or (at your option)
   8    any later version.
   9
  10    This program 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
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License along
  16    with this program; if not, write to the Free Software Foundation,
  17    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 # include <config.h>
  21 #endif
  22
  23 #include "fatal.h"
  24
  25 #include "exit.h"
  26 #include <stdarg.h>
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30
  31 #ifdef _LIBC
  32 # define program_name program_invocation_name
  33 #else /* not _LIBC */
  34 /* The calling program should define program_name and set it to the
  35    name of the executing program.  */
  36 extern char *program_name;
  37 #endif
  38
  39 #include "unlocked-io.h"
  40
  41 /* Like error, but always exit with EXIT_FAILURE.  */
  42
  43 void
  44 fatal (int errnum, const char *message, ...)
  45 {
  46   va_list args;
  47
  48   if (error_print_progname)
  49     (*error_print_progname) ();
  50   else
  51     {
  52       fflush (stdout);
  53       fprintf (stderr, "%s: ", program_name);
  54     }
  55
  56   va_start (args, message);
  57   error (EXIT_FAILURE, errnum, message, args);
  58
  59   /* The following code isn't reachable, but pacifies some compilers.  */
  60   va_end (args);
  61   abort ();
  62 }