cpu_config.h

toppers操作系统源码

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

/*
 *	プロセッサ巴赂モジュ〖ル∈M68040脱∷
 *
 *  このインクル〖ドファイルは·t_config.h のみからインクル〖ドされるˉ
 *  戮のファイルから木儡インクル〖ドしてはならないˉ
 */

#ifndef _CPU_CONFIG_H_
#define _CPU_CONFIG_H_

/*
 *  カ〖ネルの柒婶急侍叹のリネ〖ム
 */
#include <cpu_rename.h>

/*
 *  プロセッサの泼检炭吾のインライン簇眶年盗
 */
#ifndef _MACRO_ONLY
#include <cpu_insn.h>
#endif /* _MACRO_ONLY */

/*
 *  chg_ipm/get_ipm をサポ〖トするかどうかの年盗
 */
#define	SUPPORT_CHG_IPM

/*
 *  TCB 面のフィ〖ルドのビット升の年盗
 *
 *  cpu_context.h に掐れる数がエレガントだが·徊救の巴赂拉の簇犯で·
 *  cpu_context.h には掐れられないˉ
 */
#define	TBIT_TCB_TSTAT		8	/* tstat フィ〖ルドのビット升 */
#define	TBIT_TCB_PRIORITY	8	/* priority フィ〖ルドのビット升 */

#ifndef _MACRO_ONLY
/*
 *  タスクコンテキストブロックの年盗
 */
typedef struct task_context_block {
	VP	msp;		/* スタックポインタ */
	FP	pc;		/* プログラムカウンタ */
} CTXB;

/*
 *  充哈みマスク拎侯ライブラリ
 *
 *  充哈みマスク∈intmask∷は·IPM∈Interrupt Priority Mask∷を8ビット
 *  焊にシフトしたものであるˉ
 */

/*
 *  附哼の充哈みマスクの粕叫し
 */
Inline UH
current_intmask()
{
	return(current_sr() & 0x0700);
}

/*
 *  充哈みマスクの肋年
 */
Inline void
set_intmask(UH intmask)
{
	set_sr((current_sr() & ~0x0700) | intmask);
}

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

Inline BOOL
sense_context()
{
	return((current_sr() & 0x1000) == 0);
}

Inline BOOL
sense_lock()
{
	return(current_intmask() == 0x0700);
}

#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_IPM
extern UH	task_intmask;	/* タスクコンテキストでの充哈みマスク */
#endif /* SUPPORT_CHG_IPM */

Inline void
t_lock_cpu()
{
	disint();
}

Inline void
t_unlock_cpu()
{
#ifdef SUPPORT_CHG_IPM
	/*
	 *  t_unlock_cpu が钙び叫されるのは CPUロック觉轮のみであるた
	 *  め·借妄の庞面で task_intmask が今き垂わることはないˉ
	 */
	set_intmask(task_intmask);
#else /* SUPPORT_CHG_IPM */
	enaint();
#endif /* SUPPORT_CHG_IPM */
}

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

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

Inline void
i_lock_cpu()
{
	UH	intmask;

	/*
	 *  办箕恃眶 intmask を蝗っているのは·current_intmask() を钙
	 *  んだ木稿に充哈みが券栏し·弹瓢された充哈みハンドラ柒で
	 *  int_intmask が恃构される材墙拉があるためであるˉ
	 */
	intmask = current_intmask();
	disint();
	int_intmask = intmask;
}

Inline void
i_unlock_cpu()
{
	set_intmask(int_intmask);
}

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

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

/*
 *  附哼のコンテキストを嘉ててディスパッチ∈cpu_support.S∷
 *
 *  exit_and_dispatch は·CPUロック觉轮で钙び叫さなければならないˉ
 */
extern void	exit_and_dispatch(void);

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

/*
 *  毋嘲ベクタテ〖ブルの菇陇の年盗
 */
typedef struct exc_vector_entry {
	FP	exchdr;			/* 毋嘲ハンドラの弹瓢戎孟 */
} EXCVE;

/*
 *  充哈みハンドラの肋年
 *
 *  ベクトル戎规 inhno の充哈みハンドラの弹瓢戎孟を inthdr に肋年するˉ
 */
Inline void
define_inh(INHNO inhno, FP inthdr)
{
	EXCVE	*excvt;

#ifdef EXCVT_KERNEL
	/*
	 *  EXCVT_KERNEL が年盗されている箕は·介袋步借妄の面で VBR を 
	 *  EXCVT_KERNEL に肋年するので·EXCVT_KERNEL を蝗うˉ
	 */
	excvt = (EXCVE *) EXCVT_KERNEL;
#else /* EXCVT_KERNEL */
	excvt = (EXCVE *) current_vbr();
#endif /* EXCVT_KERNEL */
	excvt[inhno].exchdr = inthdr;
}

/*
 *  CPU毋嘲ハンドラの肋年
 *
 *  ベクトル戎规 excno のCPU毋嘲ハンドラの弹瓢戎孟を exchdr に肋年するˉ
 */
Inline void
define_exc(EXCNO excno, FP exchdr)
{
	define_inh(excno, exchdr);
}

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

/*
 *  充哈みハンドラの叫掐庚借妄の栏喇マクロ
 *
 *  reqflg をチェックする涟に充哈みを敦贿しないと·reqflg をチェック稿
 *  に弹瓢された充哈みハンドラ柒でディスパッチが妥滇された眷圭に·ディ
 *  スパッチされないˉ
 */

#define	INTHDR_ENTRY(inthdr)		\
extern void inthdr##_entry(void);	\
asm(".text				\n" \
#inthdr "_entry:			\n" \
"	movem.l %d0-%d1/%a0-%a1, -(%sp)	\n" /* スクラッチレジスタを瘦赂 */ \
"	jsr " #inthdr "			\n" /* 充哈みハンドラを钙び叫す */ \
"	movem.l (%sp)+, %d0-%d1/%a0-%a1	\n" /* スクラッチレジスタを牲耽 */ \
"	btst.b #4, (%sp)		\n" /* 提り黎が充哈みモ〖ドなら */ \
"	jbeq 1f				\n" /*           すぐにリタ〖ン */ \
"	or.w #0x0700, %sr		\n" /* 充哈み敦贿 */ \
"	tst.l _kernel_reqflg		\n" /* reqflg が TRUE であれば */ \
"	jbne _kernel_ret_int		\n" /*              ret_int へ */ \
"1:	rte				\n")

#define	INT_ENTRY(inthdr)	inthdr##_entry

/*
 *  CPU毋嘲ハンドラの叫掐庚借妄の栏喇マクロ
 *
 *  CPU毋嘲ハンドラは·润タスクコンテキストで悸乖するˉそのため·CPU毋
 *  嘲ハンドラを钙び叫す涟に充哈みモ〖ドに败乖し·リタ〖ンしてきた稿に
 *  傅のモ〖ドに提すˉ傅のモ〖ドに提すために·充哈みモ〖ドに败乖する涟
 *  の SR を充哈みスタック惧に瘦赂するˉCPU毋嘲がタスクコンテキストで
 *  券栏し·reqflg が TRUE になった箕に·ret_exc へ尸呆するˉ
 *  reqflg をチェックする涟に充哈みを敦贿しないと·reqflg をチェック稿
 *  に弹瓢された充哈みハンドラ柒でディスパッチが妥滇された眷圭に·ディ
 *  スパッチされないˉ
 */

#define	EXCHDR_ENTRY(exchdr)		\
extern void exchdr##_entry(VP sp);	\
asm(".text				\n" \
#exchdr "_entry:			\n" \
"	movem.l %d0-%d1/%a0-%a1, -(%sp)	\n" /* スクラッチレジスタを瘦赂 */ \
"	lea.l 16(%sp), %a0		\n" /* 毋嘲フレ〖ムの黎片を A0 に */ \
"	move.w %sr, %d0			\n" /* SR を D0 に */ \
"	and.w #~0x1000, %sr		\n" /* 充哈みモ〖ド */ \
"	move.l %d0, -(%sp)		\n" /* 傅の SR をスタックに瘦赂 */ \
"	move.l %a0, -(%sp)		\n" /* A0 を苞眶として畔す */ \
"	jsr " #exchdr "			\n" /* CPU毋嘲ハンドラを钙び叫す */ \
"	addq.l #4, %sp			\n" \
"	move.l (%sp)+, %d0		\n" \
"	and.w #0x1000, %d0		\n" /* 傅が充哈みモ〖ドなら */ \
"	jbeq 1f				\n" /*       すぐにリタ〖ン */ \
"	or.w #0x1700, %sr		\n" /* マスタモ〖ドˇ充哈み敦贿 */ \
"	tst.l _kernel_reqflg		\n" /* reqflg が TRUE であれば */ \
"	jbne _kernel_ret_exc		\n" /*              ret_exc へ */ \
"1:	movem.l (%sp)+, %d0-%d1/%a0-%a1	\n" /* スクラッチレジスタを牲耽 */ \
"	rte				\n")

#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_ */