source: asp3_wo_tecs/trunk/library/log_output.c@ 302

/*
 *  TOPPERS Software
 *      Toyohashi Open Platform for Embedded Real-Time Systems
 * 
 *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 *  Copyright (C) 2004-2014 by Embedded and Real-Time Systems Laboratory
 *              Graduate School of Information Science, Nagoya Univ., JAPAN
 * 
 *  上記著作権者
は，以下の(1)〜(4)ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
 *  ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
 *  変・再é…
å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
 *  (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œ
 *      権表示，この利用条件および下記の無保証規定が，そのままの形でソー
 *      スコード中に含まれていること．
 *  (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
 *      用できる形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
 *      者
マニュアルなど）に，上記の著作権表示，この利用条件および下記
 *      の無保証規定を掲載すること．
 *  (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
 *      用できない形で再é…
å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
 *      と．
 *    (a) 再é…
å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
マニュアルなど）に，上記の著
 *        作権表示，この利用条件および下記の無保証規定を掲載すること．
 *    (b) 再é…
å¸ƒã®å½¢æ…
‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
 *        å ±å‘Šã™ã‚‹ã“ã¨ï¼Ž
 *  (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
 *      害からも，上記著作権者
およびTOPPERSプロジェクトをå…
è²¬ã™ã‚‹ã“と．
 *      また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
 *      由に基づく請求からも，上記著作権者
およびTOPPERSプロジェクトを
 *      å…
è²¬ã™ã‚‹ã“と．
 * 
 *  本ソフトウェアは，無保証で提供されているものである．上記著作権者
お
 *  よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
 *  に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
 *  アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
 *  ã®è²¬ä»»ã‚’è² ã‚ãªã„ï¼Ž
 * 
 *  $Id: log_output.c 127 2014-05-17 12:20:22Z ertl-hiro $
 */

/*
 *              システムログのフォーマット出力
 */

#include <t_stddef.h>
#include <t_syslog.h>
#include <log_output.h>

/*
 *  数値を文字列に変換
 */
#define CONVERT_BUFLEN  ((sizeof(ULOGPAR) * CHAR_BIT + 2) / 3)
                                                                                /* ULOGPAR型の数値の最大文字数 */
static void
convert(ULOGPAR val, uint_t radix, const char *radchar,
                        uint_t width, bool_t minus, bool_t padzero, void (*putc)(char))
{
        char    buf[CONVERT_BUFLEN];
        uint_t  i, j;

        i = 0U;
        do {
                buf[i++] = radchar[val % radix];
                val /= radix;
        } while (i < CONVERT_BUFLEN && val != 0);

        if (minus && width > 0) {
                width -= 1;
        }
        if (minus && padzero) {
                (*putc)('-');
        }
        for (j = i; j < width; j++) {
                (*putc)(padzero ? '0' : ' ');
        }
        if (minus && !padzero) {
                (*putc)('-');
        }
        while (i > 0U) {
                (*putc)(buf[--i]);
        }
}

/*
 *  文字列整形出力
 */
static const char raddec[] = "0123456789";
static const char radhex[] = "0123456789abcdef";
static const char radHEX[] = "0123456789ABCDEF";

void
syslog_printf(const char *format, const LOGPAR *p_args, void (*putc)(char))
{
        char            c;
        uint_t          width;
        bool_t          padzero;
        LOGPAR  val;
        const char      *str;

        while ((c = *format++) != '\0') {
                if (c != '%') {
                        (*putc)(c);
                        continue;
                }

                width = 0U;
                padzero = false;
                if ((c = *format++) == '0') {
                        padzero = true;
                        c = *format++;
                }
                while ('0' <= c && c <= '9') {
                        width = width * 10U + c - '0';
                        c = *format++;
                }
                if (c == 'l' || c == 't' || c == 'T') {
                        c = *format++;
                }
                switch (c) {
                case 'd':
                        val = (LOGPAR)(*p_args++);
                        if (val >= 0) {
                                convert((ULOGPAR) val, 10U, raddec,
                                                                                        width, false, padzero, putc);
                        }
                        else {
                                convert((ULOGPAR)(-val), 10U, raddec,
                                                                                        width, true, padzero, putc);
                        }
                        break;
                case 'u':
                        val = (LOGPAR)(*p_args++);
                        convert((ULOGPAR) val, 10U, raddec, width, false, padzero, putc);
                        break;
                case 'x':
                case 'p':
                        val = (LOGPAR)(*p_args++);
                        convert((ULOGPAR) val, 16U, radhex, width, false, padzero, putc);
                        break;
                case 'X':
                        val = (LOGPAR)(*p_args++);
                        convert((ULOGPAR) val, 16U, radHEX, width, false, padzero, putc);
                        break;
                case 'c':
                        (*putc)((char)(LOGPAR)(*p_args++));
                        break;
                case 's':
                        str = (const char *)(*p_args++);
                        while ((c = *str++) != '\0') {
                                (*putc)(c);
                        }
                        break;
                case '%':
                        (*putc)('%');
                        break;
                case '\0':
                        format--;
                        break;
                default:
                        break;
                }
        }
}

/*
 *  ログ情
å ±ã®å‡ºåŠ›
 */
void
syslog_print(const SYSLOG *p_syslog, void (*putc)(char))
{
        switch (p_syslog->logtype) {
        case LOG_TYPE_COMMENT:
                syslog_printf((const char *)(p_syslog->logpar[0]),
                                                                &(p_syslog->logpar[1]), putc);
                break;
        case LOG_TYPE_ASSERT:
                syslog_printf("%s:%u: Assertion `%s' failed.",
                                                                &(p_syslog->logpar[0]), putc);
                break;
        default:
                /*
                 *  他の種別のログ情
å ±ã«ã¯å¯¾å¿œã—ã¦ã„ãªã„ï¼Ž
                 */
                break;
        }
}

/*
 *  ログ情
å ±å–ªå¤±ãƒ¡ãƒƒã‚»ãƒ¼ã‚¸ã®å‡ºåŠ›
 */
void
syslog_lostmsg(uint_t lostlog, void (*putc)(char))
{
        LOGPAR  lostinfo[1];

        lostinfo[0] = (LOGPAR) lostlog;
        syslog_printf("%d messages are lost.", lostinfo, putc);
        (*putc)('\n');
}