2 * Copyright (c) 2002 Mike Barcroft <mike@FreeBSD.org>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
35 /* Default value for MSGVERB. */
36 #define DFLT_MSGVERB "label:severity:text:action:tag"
38 /* Maximum valid size for a MSGVERB. */
39 #define MAX_MSGVERB sizeof(DFLT_MSGVERB)
41 static char *printfmt(char *, long, const char *, int, const char *,
42 const char *, const char *);
43 static char *nextcomp(const char *);
46 static int validmsgverb(const char *);
49 fmtmsg(long class, const char *label, int sev, const char *text,
50 const char *action, const char *tag)
53 char *env, *msgverb, *output;
55 if (class & MM_PRINT) {
56 if ((env = getenv("MSGVERB")) != NULL && *env != '\0' &&
57 strlen(env) <= strlen(DFLT_MSGVERB)) {
58 if ((msgverb = strdup(env)) == NULL)
60 else if (validmsgverb(msgverb) == 0) {
66 if ((msgverb = strdup(DFLT_MSGVERB)) == NULL)
69 output = printfmt(msgverb, class, label, sev, text, action,
76 fprintf(stderr, "%s", output);
80 if (class & MM_CONSOLE) {
81 output = printfmt(DFLT_MSGVERB, class, label, sev, text,
85 if (*output != '\0') {
86 if ((fp = fopen("/dev/console", "ae")) == NULL) {
90 fprintf(fp, "%s", output);
98 #define INSERT_COLON \
99 if (*output != '\0') \
100 strlcat(output, ": ", size)
101 #define INSERT_NEWLINE \
102 if (*output != '\0') \
103 strlcat(output, "\n", size)
104 #define INSERT_SPACE \
105 if (*output != '\0') \
106 strlcat(output, " ", size)
109 * Returns NULL on memory allocation failure, otherwise returns a pointer to
110 * a newly malloc()'d output buffer.
113 printfmt(char *msgverb, long class, const char *label, int sev,
114 const char *text, const char *act, const char *tag)
121 if (label != MM_NULLLBL)
122 size += strlen(label);
123 if ((sevname = sevinfo(sev)) != NULL)
124 size += strlen(sevname);
125 if (text != MM_NULLTXT)
126 size += strlen(text);
127 if (act != MM_NULLACT)
129 if (tag != MM_NULLTAG)
132 if ((output = malloc(size)) == NULL)
135 while ((comp = nextcomp(msgverb)) != NULL) {
136 if (strcmp(comp, "label") == 0 && label != MM_NULLLBL) {
138 strlcat(output, label, size);
139 } else if (strcmp(comp, "severity") == 0 && sevname != NULL) {
141 strlcat(output, sevinfo(sev), size);
142 } else if (strcmp(comp, "text") == 0 && text != MM_NULLTXT) {
144 strlcat(output, text, size);
145 } else if (strcmp(comp, "action") == 0 && act != MM_NULLACT) {
147 strlcat(output, "TO FIX: ", size);
148 strlcat(output, act, size);
149 } else if (strcmp(comp, "tag") == 0 && tag != MM_NULLTAG) {
151 strlcat(output, tag, size);
159 * Returns a component of a colon delimited string. NULL is returned to
160 * indicate that there are no remaining components. This function must be
161 * called until it returns NULL in order for the local state to be cleared.
164 nextcomp(const char *msgverb)
166 static char lmsgverb[MAX_MSGVERB], *state;
169 if (*lmsgverb == '\0') {
170 strlcpy(lmsgverb, msgverb, sizeof(lmsgverb));
171 retval = strtok_r(lmsgverb, ":", &state);
173 retval = strtok_r(NULL, ":", &state);
199 * Returns 1 if the msgverb list is valid, otherwise 0.
202 validmsgverb(const char *msgverb)
204 const char *validlist = "label\0severity\0text\0action\0tag\0";
211 while ((msgcomp = nextcomp(msgverb)) != NULL) {
213 len1 = strlen(msgcomp);
214 for (p = validlist; (len2 = strlen(p)) != 0; p += len2 + 1) {
215 if (len1 == len2 && memcmp(msgcomp, p, len1) == 0)