source: asp_wo_cfg/trunk/kernel/exception.c@ 49

/*
 *  TOPPERS/ASP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Advanced Standard Profile Kernel
 * 
 *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 *  Copyright (C) 2005-2011 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: exception.c 49 2012-09-06 04:41:53Z ertl-hiro $
 */

/*
 *              CPU例外管理機能
 */

#include "kernel_impl.h"
#include "check.h"
#include "task.h"
#include "exception.h"

/*
 *  トレースログマクロのデフォルト定義
 */
#ifndef LOG_DEF_EXC_ENTER
#define LOG_DEF_EXC_ENTER(excno, pk_dexc)
#endif /* LOG_DEF_EXC_ENTER */

#ifndef LOG_DEF_EXC_LEAVE
#define LOG_DEF_EXC_LEAVE(ercd)
#endif /* LOG_DEF_EXC_LEAVE */

#ifndef LOG_XSNS_DPN_ENTER
#define LOG_XSNS_DPN_ENTER(p_excinf)
#endif /* LOG_XSNS_DPN_ENTER */

#ifndef LOG_XSNS_DPN_LEAVE
#define LOG_XSNS_DPN_LEAVE(state)
#endif /* LOG_XSNS_DPN_LEAVE */

#ifndef LOG_XSNS_XPN_ENTER
#define LOG_XSNS_XPN_ENTER(p_excinf)
#endif /* LOG_XSNS_XPN_ENTER */

#ifndef LOG_XSNS_XPN_LEAVE
#define LOG_XSNS_XPN_LEAVE(state)
#endif /* LOG_XSNS_XPN_LEAVE */

#ifdef TOPPERS_excini

/*
 *  CPU例外ハンドラ初期化ブロックのエリア
 */
EXCINIB excinib_table[TNUM_EXCNO];

/* 
 *  CPU例外ハンドラ管理機能の初期化
 */
void
initialize_exception(void)
{
        uint_t  i;

        for (i = 0; i < TNUM_EXCNO; i++) {
                excinib_table[i].excatr = TA_NOEXS;
        }
}

#endif /* TOPPERS_excini */

/*
 *  CPU例外ハンドラの定義
 */
#ifdef TOPPERS_def_exc

ER
def_exc(EXCNO excno, const T_DEXC *pk_dexc)
{
        EXCINIB *p_excinib;
        ER              ercd;

        LOG_DEF_EXC_ENTER(excno, pk_dexc);
        CHECK_INIRTN();
        CHECK_PAR(VALID_EXCNO_DEFEXC(excno));
        CHECK_RSATR(pk_dexc->excatr, TARGET_EXCATR);
        CHECK_NOSPT(pk_dexc->exchdr != NULL);
        CHECK_ALIGN_FUNC(pk_dexc->exchdr);
        CHECK_NONNULL_FUNC(pk_dexc->exchdr);
        p_excinib = get_excinib(excno);

        if (p_excinib->excatr != TA_NOEXS) {
                ercd = E_OBJ;
        }
        else {
                p_excinib->excatr = pk_dexc->excatr;
                p_excinib->exchdr = pk_dexc->exchdr;
                ercd = E_OK;
        }

  error_exit:
        LOG_DEF_EXC_LEAVE(ercd);
        return(ercd);
}

#endif /* TOPPERS_def_exc */

/*
 *  CPU例外の発生したコンテキストの参照
 */

/*
 *  CPU例外発生時のディスパッチ保留状態の参照
 *
 *  CPU例外ハンドラ中でdisdspが変化することはないため，CPU例外が発生し
 *  た時のdisdspを保存しておく必要はない．
 */
#ifdef TOPPERS_xsns_dpn

bool_t
xsns_dpn(void *p_excinf)
{
        bool_t  state;

        LOG_XSNS_DPN_ENTER(p_excinf);
        state = (exc_sense_intmask(p_excinf) && !disdsp) ? false : true;
        LOG_XSNS_DPN_LEAVE(state);
        return(state);
}

#endif /* TOPPERS_xsns_dpn */

/*
 *  CPU例外発生時のタスク例外処理保留状態の参照
 *
 *  CPU例外ハンドラ中でp_runtskとp_runtsk->enatexが変化することはない
 *  ため，CPU例外が発生した時のp_runtsk->enatexを保存しておく必要はな
 *  い．
 */
#ifdef TOPPERS_xsns_xpn

bool_t
xsns_xpn(void *p_excinf)
{
        bool_t  state;

        LOG_XSNS_XPN_ENTER(p_excinf);
        state = (exc_sense_intmask(p_excinf) && p_runtsk->enatex) ? false : true;
        LOG_XSNS_XPN_LEAVE(state);
        return(state);
}

#endif /* TOPPERS_xsns_xpn */