cpu_config.h

嵌入式系统开发 TOPPERS and JSP Kernel Release 1.3 TOPPERS = Toyohashi Open Platform for Embedded Real-Tim

/*
 *  TOPPERS/JSP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Just Standard Profile Kernel
 * 
 *  Copyright (C) 2000,2001 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 * 
 *  惧淡螟侯涪荚は·Free Software Foundation によって给山されている 
 *  GNU General Public License の Version 2 に淡揭されている掘凤か·笆
 *  布の(1)×(4)の掘凤を塔たす眷圭に嘎り·塑ソフトウェア∈塑ソフトウェ
 *  アを猖恃したものを崔むˉ笆布票じ∷を蝗脱ˇ剩澜ˇ猖恃ˇ浩芹邵∈笆布·
 *  网脱と钙ぶ∷することを痰浸で钓满するˉ
 *  (1) 塑ソフトウェアをソ〖スコ〖ドの妨で网脱する眷圭には·惧淡の螟侯
 *      涪山绩·この网脱掘凤および布淡の痰瘦沮惮年が·そのままの妨でソ〖
 *      スコ〖ド面に崔まれていることˉ
 *  (2) 塑ソフトウェアを浩网脱材墙なバイナリコ〖ド∈リロケ〖タブルオブ
 *      ジェクトファイルやライブラリなど∷の妨で网脱する眷圭には·网脱
 *      に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯涪山绩·
 *      この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
 *  (3) 塑ソフトウェアを浩网脱稍材墙なバイナリコ〖ドの妨または怠达に寥
 *      み哈んだ妨で网脱する眷圭には·肌のいずれかの掘凤を塔たすことˉ
 *    (a) 网脱に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯
 *        涪山绩·この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
 *    (b) 网脱の妨轮を·侍に年める数恕によって·惧淡螟侯涪荚に鼠桂する
 *        ことˉ
 *  (4) 塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じるいかなる禄
 *      巢からも·惧淡螟侯涪荚を倘勒することˉ
 * 
 *  塑ソフトウェアは·痰瘦沮で捏丁されているものであるˉ惧淡螟侯涪荚は·
 *  塑ソフトウェアに簇して·その努脱材墙拉も崔めて·いかなる瘦沮も乖わ
 *  ないˉまた·塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じたい
 *  かなる禄巢に簇しても·その勒扦を砷わないˉ
 * 
 *  @(#) $Id: cpu_config.h,v 1.6 2002/04/05 07:43:51 honda Exp $
 */

/*
 *	プロセッサ巴赂モジュ〖ル∈Linux脱∷
 */

#ifndef _CPU_CONFIG_H_
#define _CPU_CONFIG_H_
/*
 *  カ〖ネルの柒婶急侍叹のリネ〖ム
 */
#ifndef OMIT_RENAME
#define activate_r      _kernel_activate_r
#ifdef LABEL_ASM
#define _activate_r     __kernel_activate_r
#endif /* LABEL_ASM */
#endif /* OMIT_RENAME */

#ifndef _MACRO_ONLY

/*
 *  Linux脱筛洁インクル〖ドファイル
 */

#include <signal.h>
#include <setjmp.h>

/*
 *  chg_ims/get_ims をサポ〖トするかどうかの年盗
 */
#define	SUPPORT_CHG_IMS

/*
 *  TCB 簇息の年盗
 *
 *  cpu_context.h に掐れる数がエレガントだが·徊救の巴赂拉の簇犯で·
 *  cpu_context.h には掐れられないˉ
 */

/*
 *  TCB 面のフィ〖ルドのビット升の年盗
 */
#define	TBIT_TCB_PRIORITY	8	/* priority フィ〖ルドのビット升 */
#define	TBIT_TCB_TSTAT		8	/* tstat フィ〖ルドのビット升 */

/*
 *  タスクコンテキストブロックの年盗
 */
typedef struct task_context_block {
	jmp_buf env;		/* CPUコンテキスト */
} CTXB;

/*
 *   CPU毋嘲ハンドラ
 */

#define EXCHNO_ZDIV  SIGFPE

/*
 *  システム觉轮徊救
 */


Inline int
current_stack()
{
    struct sigaltstack      ss;

    sigaltstack(((void *)0), &ss);
    return(ss.ss_flags & SS_ONSTACK);
}


Inline BOOL
sense_context()
{
	return(current_stack());
}

Inline BOOL
sense_lock()
{
    int  cnt = _SIGSET_NWORDS;
        
    sigset_t currentSet;
    sigprocmask(SIG_BLOCK, ((void *)0), &currentSet);

    while(--cnt >= 0)
        if(currentSet.__val[cnt] != 0)
            return(FALSE);
    
    return(TRUE);
}

#define t_sense_lock	sense_lock
#define i_sense_lock	sense_lock

/*
 *  CPUロックとその豺近∈タスクコンテキスト脱∷
 *
 *  task_intmask は·chg_ipm をサポ〖トするための恃眶ˉchg_ipm をサポ〖
 *  トしない眷圭には·task_intmask が撅に 0 になっていると雇えればよいˉ
 */

#ifdef SUPPORT_CHG_IMS
extern IMS	task_sigmask;	/* タスクコンテキストでの充哈みマスク */
#endif /* SUPPORT_CHG_IMS */

Inline void
t_lock_cpu()
{
    sigset_t  newmask;
    
    sigfillset(&newmask);
    sigprocmask(SIG_SETMASK,&newmask,0);
}

Inline void
t_unlock_cpu()
{
#ifdef SUPPORT_CHG_IMS
	/*
	 *  t_unlock_cpu が钙び叫されるのは CPUロック觉轮のみであるた
	 *  め·借妄の庞面で task_intmask が今き垂わることはないˉ
	 */
    sigprocmask(SIG_SETMASK,&task_sigmask,0);
#else /* SUPPORT_CHG_IMS */
    sigset_t  mask;
    
    sigemptyset(&mask);
    sigprocmask(SIG_SETMASK,&mask,0);
#endif /* SUPPORT_CHG_IMS */
}

/*
 *  CPUロックとその豺近∈润タスクコンテキスト脱∷
 */

extern IMS	int_sigmask;	/* 润タスクコンテキストでの充哈みマスク */

Inline void
i_lock_cpu()
{
    sigset_t  mask;
    
    sigfillset(&mask);
    sigprocmask(SIG_SETMASK,&mask,&int_sigmask);
}

Inline void
i_unlock_cpu()
{
    sigprocmask(SIG_SETMASK,&int_sigmask,0);
}

/*
 *  タスクディスパッチャ
 */

/*
 *  呵光庭黎界疤タスクへのディスパッチ
 *
 *  dispatch は·タスクコンテキストから钙び叫されたサ〖ビスコ〖ル借妄
 *  柒で·CPUロック觉轮で钙び叫さなければならないˉ
 */
extern void	dispatch();


/*
 *  附哼のコンテキストを嘉ててディスパッチ
 *
 *  exit_and_dispatch は·CPUロック觉轮で钙び叫さなければならないˉ
 */

extern void    exit_and_dispatch(void);

/*
 *  充哈みハンドラ】CPU毋嘲ハンドラの肋年
 */


/*
 *  充哈みハンドラの肋年
 *
 *  ベクトル戎规 inhno の充哈みハンドラの弹瓢戎孟を inthdr に肋年するˉ
 */

Inline void
define_inh(INHNO inhno, FP inthdr)
{
    /*
     *  SIGUSR1をブロック、スタック磊り仑え铜りで判峡する。
     *  庭黎刨を烧けたい眷圭はマスクするビットを回年する
     *  涩妥があるのでこの数恕は蝗えない。
     */
    
    struct sigaction action;

    action.sa_handler = inthdr;
    sigemptyset(&action.sa_mask);
    sigaddset(&action.sa_mask,SIGUSR1);
    action.sa_flags = SA_ONSTACK;
    
    sigaction(inhno, &action, 0);    
}

/*
 *  CPU毋嘲ハンドラの肋年
 *
 *  ベクトル戎规 excno のCPU毋嘲ハンドラの弹瓢戎孟を exchdr に肋年するˉ
 */
Inline void
define_exc(EXCNO excno, FP exchdr)
{
    /*
     * ブロックするマスク痰し、スタック磊り仑え铜りで判峡する。
     */
    struct sigaction action;

    action.sa_handler = exchdr;
    sigemptyset(&action.sa_mask);
    sigaddset(&action.sa_mask,SIGUSR1);    
    action.sa_flags = SA_ONSTACK;    
    sigaction(excno, &action, 0);
}

/*
 *  充哈みハンドラ】CPU毋嘲ハンドラの叫掐庚借妄
 */

/*
 *  充哈みハンドラの叫掐庚借妄の栏喇マクロ
 *
 *  シグナルが券乖されてるとシグナルスタックに极瓢弄に磊り仑わる。
 *  链ての充り哈みハンドラはディスパッチャを弹瓢するSIGUSR1をマスクして
 *  瓢侯する。そのためreqflgのチェック稿シグナルが券乖されて弹瓢された
 *  ハンドラでディスパッチが妥滇されても赖しく瓢く
 */


#define	INTHDR_ENTRY(inthdr)      \
void inthdr##_entry(void){        \
     inthdr();                           /* 充り哈みハンドラを钙び叫す */ \
     if(reqflg)                          /* regflg がTRUEであれば      */ \
       raise(SIGUSR1);                   /* ディスパッチャを钙び叫す   */ \
}                                      

#define INT_ENTRY(inthdr)   inthdr##_entry


/*
 *  CPU毋嘲ハンドラの叫掐庚借妄の栏喇マクロ
 *
 *  シグナルが券乖されてるとシグナルスタックに极瓢弄に磊り仑わる。 
 *  链てのCPU毋嘲ハンドラはディスパッチャを弹瓢するSIGUSR1をマスクして
 *  瓢侯する。そのためreqflgのチェック稿シグナルが券乖されて弹瓢された
 *  ハンドラでディスパッチが妥滇されても赖しく瓢く 
 */
#define	EXCHDR_ENTRY(exchdr)	  \
void exchdr##_entry(VP sp){        \
     exchdr(sp);                         /* 充り哈みハンドラを钙び叫す */ \
     if(reqflg)                          /* regflg がTRUEであれば      */ \
       raise(SIGUSR1);                   /* ディスパッチャを钙び叫す   */ \
}

#define EXC_ENTRY(exchdr) exchdr##_entry

/*
 *  CPU毋嘲の券栏した箕のシステム觉轮の徊救
 */

/*
 *  CPU毋嘲の券栏した箕のディスパッチ
 */
Inline BOOL
exc_sense_context(VP p_excinf)
{
	return((*((UH *) p_excinf) & 0x1000) == 0);
}

/*
 *  CPU毋嘲の券栏した箕のCPUロック觉轮の徊救
 */
Inline BOOL
exc_sense_lock(VP p_excinf)
{
	return((*((UH *) p_excinf) & 0x0700) == 0x0700);
}


/*
 *  プロセッサ巴赂の介袋步
 */
extern void	cpu_initialize(void);

/*
 *  プロセッサ巴赂の姜位箕借妄
 */
extern void	cpu_terminate(void);

#endif /* _MACRO_ONLY */
#endif /* _CPU_CONFIG_H_ */