libc-top-half/musl/src/misc/fmtmsg.c

   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  */
  18 static 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
  26 int 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 }