source: asp3_wo_tecs/trunk/syssvc/test_svc.c@ 302

/*
 *  TOPPERS/ASP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Advanced Standard Profile Kernel
 * 
 *  Copyright (C) 2005-2015 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: test_svc.c 391 2015-08-01 04:22:59Z ertl-hiro $
 */

/* 
 *              テストプログラム用サービス
 */

#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_svc.h"

/*
 *      チェックポイント
 */
static uint_t   check_count;

/*
 *      自己診断関数
 */
static BIT_FUNC check_bit_func;

/*
 *  テストプログラムの開始
 */
void
test_start(char *progname)
{
        syslog_1(LOG_NOTICE, "Test program: %s", progname);
        check_count = 0U;
        check_bit_func = NULL;
}

/*
 *      自己診断関数の設定
 */
void
set_bit_func(BIT_FUNC bit_func)
{
        check_bit_func = bit_func;
}

/*
 *      テストプログラムの終了
 */
static void
test_finish(void)
{
        SIL_PRE_LOC;

        SIL_LOC_INT();
        (void) syslog_fls_log();
        (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)
{
        if (count > 0U) {
                check_point(count);
                syslog_0(LOG_NOTICE, "All check points passed.");
        }
        test_finish();
}

/*
 *      条件チェックのエラー処理
 */
void
check_assert_error(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_error(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();
}