misc.c revision 1.1 1 1.1 alm /*-
2 1.1 alm * Copyright (c) 1992 Diomidis Spinellis.
3 1.1 alm * Copyright (c) 1992 The Regents of the University of California.
4 1.1 alm * All rights reserved.
5 1.1 alm *
6 1.1 alm * This code is derived from software contributed to Berkeley by
7 1.1 alm * Diomidis Spinellis of Imperial College, University of London.
8 1.1 alm *
9 1.1 alm * Redistribution and use in source and binary forms, with or without
10 1.1 alm * modification, are permitted provided that the following conditions
11 1.1 alm * are met:
12 1.1 alm * 1. Redistributions of source code must retain the above copyright
13 1.1 alm * notice, this list of conditions and the following disclaimer.
14 1.1 alm * 2. Redistributions in binary form must reproduce the above copyright
15 1.1 alm * notice, this list of conditions and the following disclaimer in the
16 1.1 alm * documentation and/or other materials provided with the distribution.
17 1.1 alm * 3. All advertising materials mentioning features or use of this software
18 1.1 alm * must display the following acknowledgement:
19 1.1 alm * This product includes software developed by the University of
20 1.1 alm * California, Berkeley and its contributors.
21 1.1 alm * 4. Neither the name of the University nor the names of its contributors
22 1.1 alm * may be used to endorse or promote products derived from this software
23 1.1 alm * without specific prior written permission.
24 1.1 alm *
25 1.1 alm * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 1.1 alm * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 1.1 alm * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 1.1 alm * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 1.1 alm * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 1.1 alm * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 1.1 alm * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 1.1 alm * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 1.1 alm * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 1.1 alm * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 1.1 alm * SUCH DAMAGE.
36 1.1 alm */
37 1.1 alm
38 1.1 alm #ifndef lint
39 1.1 alm static char sccsid[] = "@(#)misc.c 5.3 (Berkeley) 8/26/92";
40 1.1 alm #endif /* not lint */
41 1.1 alm
42 1.1 alm #include <sys/types.h>
43 1.1 alm
44 1.1 alm #include <errno.h>
45 1.1 alm #include <regex.h>
46 1.1 alm #include <stdio.h>
47 1.1 alm #include <stdlib.h>
48 1.1 alm #include <string.h>
49 1.1 alm
50 1.1 alm #include "defs.h"
51 1.1 alm #include "extern.h"
52 1.1 alm
53 1.1 alm /*
54 1.1 alm * malloc with result test
55 1.1 alm */
56 1.1 alm void *
57 1.1 alm xmalloc(size)
58 1.1 alm u_int size;
59 1.1 alm {
60 1.1 alm void *p;
61 1.1 alm
62 1.1 alm if ((p = malloc(size)) == NULL)
63 1.1 alm err(FATAL, "%s", strerror(errno));
64 1.1 alm return (p);
65 1.1 alm }
66 1.1 alm
67 1.1 alm /*
68 1.1 alm * realloc with result test
69 1.1 alm */
70 1.1 alm void *
71 1.1 alm xrealloc(p, size)
72 1.1 alm void *p;
73 1.1 alm u_int size;
74 1.1 alm {
75 1.1 alm if (p == NULL) /* Compatibility hack. */
76 1.1 alm return (xmalloc(size));
77 1.1 alm
78 1.1 alm if ((p = realloc(p, size)) == NULL)
79 1.1 alm err(FATAL, "%s", strerror(errno));
80 1.1 alm return (p);
81 1.1 alm }
82 1.1 alm
83 1.1 alm /*
84 1.1 alm * Return a string for a regular expression error passed. This is a overkill,
85 1.1 alm * because of the silly semantics of regerror (we can never know the size of
86 1.1 alm * the buffer).
87 1.1 alm */
88 1.1 alm char *
89 1.1 alm strregerror(errcode, preg)
90 1.1 alm int errcode;
91 1.1 alm regex_t *preg;
92 1.1 alm {
93 1.1 alm static char *oe;
94 1.1 alm size_t s;
95 1.1 alm
96 1.1 alm if (oe != NULL)
97 1.1 alm free(oe);
98 1.1 alm s = regerror(errcode, preg, "", 0);
99 1.1 alm oe = xmalloc(s);
100 1.1 alm (void)regerror(errcode, preg, oe, s);
101 1.1 alm return (oe);
102 1.1 alm }
103 1.1 alm
104 1.1 alm #if __STDC__
105 1.1 alm #include <stdarg.h>
106 1.1 alm #else
107 1.1 alm #include <varargs.h>
108 1.1 alm #endif
109 1.1 alm /*
110 1.1 alm * Error reporting function
111 1.1 alm */
112 1.1 alm void
113 1.1 alm #if __STDC__
114 1.1 alm err(int severity, const char *fmt, ...)
115 1.1 alm #else
116 1.1 alm err(severity, fmt, va_alist)
117 1.1 alm int severity;
118 1.1 alm char *fmt;
119 1.1 alm va_dcl
120 1.1 alm #endif
121 1.1 alm {
122 1.1 alm va_list ap;
123 1.1 alm #if __STDC__
124 1.1 alm va_start(ap, fmt);
125 1.1 alm #else
126 1.1 alm va_start(ap);
127 1.1 alm #endif
128 1.1 alm (void)fprintf(stderr, "sed: ");
129 1.1 alm switch (severity) {
130 1.1 alm case WARNING:
131 1.1 alm case COMPILE:
132 1.1 alm (void)fprintf(stderr, "%lu: %s: ", linenum, fname);
133 1.1 alm }
134 1.1 alm (void)vfprintf(stderr, fmt, ap);
135 1.1 alm va_end(ap);
136 1.1 alm (void)fprintf(stderr, "\n");
137 1.1 alm if (severity == WARNING)
138 1.1 alm return;
139 1.1 alm exit(1);
140 1.1 alm /* NOTREACHED */
141 1.1 alm }
142