source: mypx/library/test_lib.c

/*
 *  TOPPERS Software
 *      Toyohashi Open Platform for Embedded Real-Time Systems
 * 
 *  Copyright (C) 2005-2013 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$
 */

/* 
 *              ¥Æ¥¹¥È¥×¥í¥°¥é¥àÍѥ饀¥Ö¥é¥ê
 */

#include <kernel.h>
#include <sil.h>
#include <t_syslog.h>
#include <t_stdlib.h>
#include <log_output.h>
#include "syssvc/syslog.h"
#include "target_syssvc.h"
#include <test_lib.h>

/*
 *      ¥Á¥§¥Ã¥¯¥Ý¥€¥ó¥È
 */
static uint_t   check_count = 0u;

/*
 *      Œ«žÊ¿ÇÃÇŽØ¿ô
 */
static BIT_FUNC check_bit_func = NULL;

/*
 *      Œ«žÊ¿ÇÃÇŽØ¿ô€ÎÀßÄê
 */
void
set_bit_func(BIT_FUNC bit_func)
{
        check_bit_func = bit_func;
}

/*
 *  ¥Æ¥¹¥È¥×¥í¥°¥é¥à€Î³«»Ï
 */
void
test_start(char *progname)
{
        syslog_1(LOG_NOTICE, "Test program: %s", progname);
}

/*
 *  ¥·¥¹¥Æ¥à¥í¥°€ÎœÐÎÏœèÍý
 */
void
syslog_flush(void)
{
        SYSLOG  logbuf;
        ER_UINT rercd;

        /*
         *  ¥í¥°¥Ð¥Ã¥Õ¥¡€Ëµ­Ï¿€µ€ì€¿¥í¥°ŸðÊó€ò¡€Äã¥ì¥Ù¥ëœÐÎϵ¡Çœ€òÍÑ€€€ÆœÐ
         *  ÎÏ€¹€ë¡¥
         */
        while ((rercd = syslog_rea_log(&logbuf)) >= 0) {
                if (rercd > 0) {
                        syslog_lostmsg((uint_t) rercd, target_fput_log);
                }
                if (logbuf.logtype >= LOG_TYPE_COMMENT) {
                        syslog_print(&logbuf, target_fput_log);
                        target_fput_log('\n');
                }
        }
}

/*
 *      ¥Æ¥¹¥È¥×¥í¥°¥é¥à€ÎœªÎ»
 */
void
test_finish(void)
{
        SIL_PRE_LOC;

        SIL_LOC_INT();
        syslog_flush();
        (void) ext_ker();

        /* €³€³€ØÍè€ë€³€È€Ï€Ê€€€Ï€º */
        SIL_UNL_INT();
}

/*
 *      ¥Á¥§¥Ã¥¯¥Ý¥€¥ó¥È
 */
void
check_point(uint_t count)
{
        bool_t  errorflag = false;
        ER              rercd;
        SIL_PRE_LOC;

        /*
         *  ³ä¹þ€ß¥í¥Ã¥¯ŸõÂÖ€Ë
         */
        SIL_LOC_INT();

        /*
         *  ¥·¡Œ¥±¥ó¥¹¥Á¥§¥Ã¥¯
         */
        if (++check_count == count) {
                syslog_1(LOG_NOTICE, "Check point %d passed.", count);
        }
        else {
                syslog_1(LOG_ERROR, "## Unexpected check point %d.", count);
                errorflag = true;
        }

        /*
         *  ¥«¡Œ¥Í¥ë€ÎÆâÉôŸõÂրΞ¡ºº
         */
        if (check_bit_func != NULL) {
                rercd = (*check_bit_func)();
                if (rercd < 0) {
                        syslog_2(LOG_ERROR, "## Internal inconsistency detected (%s, %d).",
                                                                itron_strerror(rercd), SERCD(rercd));
                        errorflag = true;
                }
        }

        /*
         *  ¥š¥é¡Œ€¬ž¡œÐ€µ€ì€¿Ÿì¹ç€Ï¡€¥Æ¥¹¥È¥×¥í¥°¥é¥à€òœªÎ»€¹€ë¡¥
         */
        if (errorflag) {
                test_finish();
        }

        /*
         *  ³ä¹þ€ß¥í¥Ã¥¯ŸõÂÖ€ò²òœü
         */
        SIL_UNL_INT();
}

/*
 *      Ž°Î»¥Á¥§¥Ã¥¯¥Ý¥€¥ó¥È
 */
void
check_finish(uint_t count)
{
        check_point(count);
        syslog_0(LOG_NOTICE, "All check points passed.");
        test_finish();
}

/*
 *      Ÿò·ï¥Á¥§¥Ã¥¯€Î¥š¥é¡ŒœèÍý
 */
void
_check_assert(const char *expr, const char *file, int_t line)
{
        syslog_3(LOG_ERROR, "## Assertion `%s' failed at %s:%u.",
                                                                expr, file, line);
        test_finish();
}

/*
 *      ¥š¥é¡Œ¥³¡Œ¥É¥Á¥§¥Ã¥¯€Î¥š¥é¡ŒœèÍý
 */
void
_check_ercd(ER ercd, const char *file, int_t line)
{
        syslog_3(LOG_ERROR, "## Unexpected error %s detected at %s:%u.",
                                                                itron_strerror(ercd), file, line);
        test_finish();
}