File: error.c

package info (click to toggle)
mmh 0.4-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye
  • size: 4,976 kB
  • sloc: ansic: 26,132; sh: 6,871; makefile: 680; awk: 74
file content (95 lines) | stat: -rw-r--r-- 1,819 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
/*
** error.c -- main error handling routines
**
** This code is Copyright (c) 2002, by the authors of nmh.  See the
** COPYRIGHT file in the root directory of the nmh distribution for
** complete copyright information.
*/

#include <h/mh.h>
#include <errno.h>
#include <stdarg.h>


/*
** print out error message
*/
void
advise(char *what, char *fmt, ...)
{
	va_list ap;

	va_start(ap, fmt);
	advertise(what, NULL, fmt, ap);
	va_end(ap);
}


/*
** print out error message and exit
*/
void
adios(int status, char *what, char *fmt, ...)
{
	va_list ap;

	va_start(ap, fmt);
	advertise(what, NULL, fmt, ap);
	va_end(ap);
	exit(status);
}


/*
** admonish the user
*/
void
admonish(char *what, char *fmt, ...)
{
	va_list ap;

	va_start(ap, fmt);
	advertise(what, "continuing...", fmt, ap);
	va_end(ap);
}


/*
** main routine for printing error messages.
**
** Until 2011-11-01, this routine used writev(). In order to remove
** ``sexy'' syscalls, in favor for mainstream programming, I removed
** it. But I want to preserve the following comment:
**
**     Use writev() if available, for slightly better performance.
**     Why?  Well, there are a couple of reasons.  Primarily, it
**     gives a smoother output...  More importantly though, it's a
**     sexy syscall()...
**
** advertise() does *not* use writev() anymore, and that's good so.
** -- meillo@marmaro.de
*/
void
advertise(char *what, char *tail, char *fmt, va_list ap)
{
	int  eindex = errno;

	fflush(stdout);
	if (invo_name && *invo_name)
		fprintf(stderr, "%s: ", invo_name);
	vfprintf(stderr, fmt, ap);

	if (what) {
		char *s;

		if (*what)
			fprintf(stderr, " %s: ", what);
		if ((s = strerror(eindex)))
			fprintf(stderr, "%s", s);
		else
			fprintf(stderr, "Error %d", eindex);
	}
	if (tail)
		fprintf(stderr, ", %s", tail);
	fputc('\n', stderr);
}