source: asp3_tinet_ecnl_arm/trunk/musl-1.1.18/src/misc/fmtmsg.c@ 352

/* Public domain fmtmsg()
 * Written by Isaac Dunham, 2014
 */
#include <fmtmsg.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <pthread.h>

/*
 * If lstr is the first part of bstr, check that the next char in bstr
 * is either \0 or :
 */
static int _strcolcmp(const char *lstr, const char *bstr)
{
        size_t i = 0;
        while (lstr[i] && bstr[i] && (bstr[i] == lstr[i])) i++;
        if ( lstr[i] || (bstr[i] && bstr[i] != ':')) return 1;
        return 0;
}

int fmtmsg(long classification, const char *label, int severity,
           const char *text, const char *action, const char *tag)
{
        int ret = 0, i, consolefd, verb = 0;
        char *errstring = MM_NULLSEV, *cmsg = getenv("MSGVERB");
        char *const msgs[] = {
                "label", "severity", "text", "action", "tag", NULL
        };
        int cs;

        pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &cs);

        if (severity == MM_HALT) errstring = "HALT: ";
        else if (severity == MM_ERROR) errstring = "ERROR: ";
        else if (severity == MM_WARNING) errstring = "WARNING: ";
        else if (severity == MM_INFO) errstring = "INFO: ";

        if (classification & MM_CONSOLE) {
                consolefd = open("/dev/console", O_WRONLY);
                if (consolefd < 0) {
                        ret = MM_NOCON;
                } else {
                        if (dprintf(consolefd, "%s%s%s%s%s%s%s%s\n",
                                    label?label:"", label?": ":"",
                                    severity?errstring:"", text?text:"",
                                    action?"\nTO FIX: ":"",
                                    action?action:"", action?" ":"",
                                    tag?tag:"" )<1)
                                ret = MM_NOCON;
                        close(consolefd);
                }
        }

        if (classification & MM_PRINT) {
                while (cmsg && cmsg[0]) {
                        for(i=0; msgs[i]; i++) {
                                if (!_strcolcmp(msgs[i], cmsg)) break;
                        }
                        if (msgs[i] == NULL) {
                                //ignore MSGVERB-unrecognized component
                                verb = 0xFF;
                                break;
                        } else {
                                verb |= (1 << i);
                                cmsg = strchr(cmsg, ':');
                                if (cmsg) cmsg++;
                        }
                }
                if (!verb) verb = 0xFF;
                if (dprintf(2, "%s%s%s%s%s%s%s%s\n",
                            (verb&1 && label) ? label : "",
                            (verb&1 && label) ? ": " : "",
                            (verb&2 && severity) ? errstring : "",
                            (verb&4 && text) ? text : "",
                            (verb&8 && action) ? "\nTO FIX: " : "",
                            (verb&8 && action) ? action : "",
                            (verb&8 && action) ? " " : "",
                            (verb&16 && tag) ? tag : "" ) < 1)
                        ret |= MM_NOMSG;
        }
        if ((ret & (MM_NOCON|MM_NOMSG)) == (MM_NOCON|MM_NOMSG))
                ret = MM_NOTOK;

        pthread_setcancelstate(cs, 0);

        return ret;
}