1/* Public domain fmtmsg()
2 * Written by Isaac Dunham, 2014
3 */
4#include <fmtmsg.h>
5#include <fcntl.h>
6#include <unistd.h>
7#include <stdio.h>
8#include <string.h>
9#include <stdlib.h>
10#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
11#include <pthread.h>
12#endif
13
14/*
15 * If lstr is the first part of bstr, check that the next char in bstr
16 * is either \0 or :
17 */
18static int _strcolcmp(const char *lstr, const char *bstr)
19{
20 size_t i = 0;
21 while (lstr[i] && bstr[i] && (bstr[i] == lstr[i])) i++;
22 if ( lstr[i] || (bstr[i] && bstr[i] != ':')) return 1;
23 return 0;
24}
25
26int fmtmsg(long classification, const char *label, int severity,
27 const char *text, const char *action, const char *tag)
28{
29 int ret = 0, i, consolefd, verb = 0;
30 char *errstring = MM_NULLSEV, *cmsg = getenv("MSGVERB");
31 char *const msgs[] = {
32 "label", "severity", "text", "action", "tag", NULL
33 };
34 int cs;
35
36#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
37 pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &cs);
38#endif
39
40 if (severity == MM_HALT) errstring = "HALT: ";
41 else if (severity == MM_ERROR) errstring = "ERROR: ";
42 else if (severity == MM_WARNING) errstring = "WARNING: ";
43 else if (severity == MM_INFO) errstring = "INFO: ";
44
45 if (classification & MM_CONSOLE) {
46 consolefd = open("/dev/console", O_WRONLY);
47 if (consolefd < 0) {
48 ret = MM_NOCON;
49 } else {
50 if (dprintf(consolefd, "%s%s%s%s%s%s%s%s\n",
51 label?label:"", label?": ":"",
52 severity?errstring:"", text?text:"",
53 action?"\nTO FIX: ":"",
54 action?action:"", action?" ":"",
55 tag?tag:"" )<1)
56 ret = MM_NOCON;
57 close(consolefd);
58 }
59 }
60
61 if (classification & MM_PRINT) {
62 while (cmsg && cmsg[0]) {
63 for(i=0; msgs[i]; i++) {
64 if (!_strcolcmp(msgs[i], cmsg)) break;
65 }
66 if (msgs[i] == NULL) {
67 //ignore MSGVERB-unrecognized component
68 verb = 0xFF;
69 break;
70 } else {
71 verb |= (1 << i);
72 cmsg = strchr(cmsg, ':');
73 if (cmsg) cmsg++;
74 }
75 }
76 if (!verb) verb = 0xFF;
77 if (dprintf(2, "%s%s%s%s%s%s%s%s\n",
78 (verb&1 && label) ? label : "",
79 (verb&1 && label) ? ": " : "",
80 (verb&2 && severity) ? errstring : "",
81 (verb&4 && text) ? text : "",
82 (verb&8 && action) ? "\nTO FIX: " : "",
83 (verb&8 && action) ? action : "",
84 (verb&8 && action) ? " " : "",
85 (verb&16 && tag) ? tag : "" ) < 1)
86 ret |= MM_NOMSG;
87 }
88 if ((ret & (MM_NOCON|MM_NOMSG)) == (MM_NOCON|MM_NOMSG))
89 ret = MM_NOTOK;
90
91#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
92 pthread_setcancelstate(cs, 0);
93#endif
94
95 return ret;
96}