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.  */
43char *
44xasprintf (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.  */
60void
61multiline_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.  */
113void
114multiline_error (char *prefix, char *message)
115{
116  if (prefix != NULL)
117    ++error_message_count;
118  multiline_warning (prefix, message);
119}
120