gnu/dist/gettext/gettext-tools/lib/xerror.c

   1 /* Multiline error-reporting functions.
   2    Copyright (C) 2001-2003 Free Software Foundation, Inc.
   3    Written by Bruno Haible <haible@clisp.cons.org>, 2001.
   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
  16    along 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
  20 #ifdef HAVE_CONFIG_H
  21 # include "config.h"
  22 #endif
  23
  24 /* Specification.  */
  25 #include "xerror.h"
  26
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <stdarg.h>
  31
  32 #include "error.h"
  33 #include "progname.h"
  34 #include "error-progname.h"
  35 #include "exit.h"
  36 #include "mbswidth.h"
  37 #include "vasprintf.h"
  38 #include "gettext.h"
  39
  40 #define _(str) gettext (str)
  41
  42 /* Format a message and return the freshly allocated resulting string.  */
  43 char *
  44 xasprintf (const char *format, ...)
  45 {
  46   va_list args;
  47   char *result;
  48
  49   va_start (args, format);
  50   if (vasprintf (&result, format, args) < 0)
  51     error (EXIT_FAILURE, 0, _("memory exhausted"));
  52   va_end (args);
  53   return result;
  54 }
  55
  56 /* Emit a multiline warning to stderr, consisting of MESSAGE, with the
  57    first line prefixed with PREFIX and the remaining lines prefixed with
  58    the same amount of spaces.  Reuse the spaces of the previous call if
  59    PREFIX is NULL.  Free the PREFIX and MESSAGE when done.  */
  60 void
  61 multiline_warning (char *prefix, char *message)
  62 {
  63   static int width;
  64   const char *cp;
  65   int i;
  66
  67   fflush (stdout);
  68
  69   cp = message;
  70
  71   if (prefix != NULL)
  72     {
  73       width = 0;
  74       if (error_with_progname)
  75         {
  76           fprintf (stderr, "%s: ", program_name);
  77           width += mbswidth (program_name, 0) + 2;
  78         }
  79       fputs (prefix, stderr);
  80       width += mbswidth (prefix, 0);
  81       free (prefix);
  82       goto after_indent;
  83     }
  84
  85   for (;;)
  86     {
  87       const char *np;
  88
  89       for (i = width; i > 0; i--)
  90         putc (' ', stderr);
  91
  92     after_indent:
  93       np = strchr (cp, '\n');
  94
  95       if (np == NULL || np[1] == '\0')
  96         {
  97           fputs (cp, stderr);
  98           break;
  99         }
 100
 101       np++;
 102       fwrite (cp, 1, np - cp, stderr);
 103       cp = np;
 104     }
 105
 106   free (message);
 107 }
 108
 109 /* Emit a multiline error to stderr, consisting of MESSAGE, with the
 110    first line prefixed with PREFIX and the remaining lines prefixed with
 111    the same amount of spaces.  Reuse the spaces of the previous call if
 112    PREFIX is NULL.  Free the PREFIX and MESSAGE when done.  */
 113 void
 114 multiline_error (char *prefix, char *message)
 115 {
 116   if (prefix != NULL)
 117     ++error_message_count;
 118   multiline_warning (prefix, message);
 119 }