start.a30

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
;*  Copyright (C) 2001 by OAKS16KIT support
;*  Copyright (C) 2003-2004 by Naoki Saito
;*             Nagoya Municipal Industrial Research Institute, JAPAN
;*  Copyright (C) 2003-2004 by Ryosuke Takeuchi
;*               Platform Development Center RICOH COMPANY,LTD. JAPAN
;* 
;*  惧淡螟侯涪荚は·Free Software Foundation によって给山されている 
;*  GNU General Public License の Version 2 に淡揭されている掘凤か·笆
;*  布の(1)×(4)の掘凤を塔たす眷圭に嘎り·塑ソフトウェア∈塑ソフトウェ
;*  アを猖恃したものを崔むˉ笆布票じ∷を蝗脱ˇ剩澜ˇ猖恃ˇ浩芹邵∈笆布·
;*  网脱と钙ぶ∷することを痰浸で钓满するˉ
;*  (1) 塑ソフトウェアをソ〖スコ〖ドの妨で网脱する眷圭には·惧淡の螟侯
;*      涪山绩·この网脱掘凤および布淡の痰瘦沮惮年が·そのままの妨でソ〖
;*      スコ〖ド面に崔まれていることˉ
;*  (2) 塑ソフトウェアを浩网脱材墙なバイナリコ〖ド∈リロケ〖タブルオブ
;*      ジェクトファイルやライブラリなど∷の妨で网脱する眷圭には·网脱
;*      に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯涪山绩·
;*      この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
;*  (3) 塑ソフトウェアを浩网脱稍材墙なバイナリコ〖ドの妨または怠达に寥
;*      み哈んだ妨で网脱する眷圭には·肌のいずれかの掘凤を塔たすことˉ
;*    (a) 网脱に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟侯
;*        涪山绩·この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
;*    (b) 网脱の妨轮を·侍に年める数恕によって·惧淡螟侯涪荚に鼠桂する
;*        ことˉ
;*  (4) 塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じるいかなる禄
;*      巢からも·惧淡螟侯涪荚を倘勒することˉ
;* 
;*  塑ソフトウェアは·痰瘦沮で捏丁されているものであるˉ惧淡螟侯涪荚は·
;*  塑ソフトウェアに簇して·その努脱材墙拉も崔めて·いかなる瘦沮も乖わ
;*  ないˉまた·塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じたい
;*  かなる禄巢に簇しても·その勒扦を砷わないˉ
;* 
;*  @(#) $Id: start.a30,v 1.3 2005/11/24 12:41:23 honda Exp $

PRCR  .EQU		000AH			; プロテクトレジスタ
PRC0  .BTEQU	0,PRCR			; システムクロックレジスタビット
PRC1  .BTEQU	1,PRCR			; プロセッサモ〖ドレジスタビット
;
PM0   .EQU		0004H			; プロセッサモ〖ドレジスタ０
PM1   .EQU		0005H			; プロセッサモ〖ドレジスタ１
;
CM0   .EQU		0006H			; クロックモ〖ドレジスタ０
CM1   .EQU		0007H			; クロックモ〖ドレジスタ１
MCD   .EQU		000CH
CM2   .EQU		000DH
C_CM0 .EQU		00000000B		; CM0(Xcin-HIGH)
C_CM1 .EQU		00100000B		; CM1(Xin-HIGH)
C_CM2 .EQU		00000000B		; メインクロック尸件なし
C_MCD .EQU		00010010B		; 券慷匿贿浮叫怠墙痰跟


;/*	年眶年盗∈介袋步∷*/
;
VECTOR_ADR 	.EQU	0FFBD00h		; ベクタアドレス

	.include	m16cvec.inc

	.section	bss_NE,DATA,ALIGN
	.section	data_NE,DATA,ALIGN
	.section	data_NEI,ROMDATA,ALIGN
	.section	bss_NO,DATA,ALIGN
	.section	data_NO,DATA,ALIGN
	.section	data_NOI,ROMDATA,ALIGN

;
;************************************************
;*	介袋步ル〖チン                              *
;************************************************
	.section	program, code, align
	.glb		_hardware_start
	.glb		_kernel_start
	.glb		_software_init_hook
;
_hardware_start:
	ldc			#RAMEND,ISP		; 充り哈みスタックポインタセット

; ----- set Processor mode -----
	bset		PRC1			; プロセッサモ〖ドレジスタ今き哈みイネ〖ブル
	mov.b		#00000000b,PM0		; シングルチップモ〖ド、BCLK叫蜗しない
	mov.b		#00000000b,PM1		; メモリ润橙磨、ノ〖ウェイト
	;	CAN 簇息レジスタを蝗脱する眷圭は肌のようにする.
	;	mov.b	#00001000b, PM1		; メモリ润橙磨, 0wait,SFR 1wait(CAN蝗脱箕)
	bclr		PRC1			; プロセッサモ〖ドレジスタ今き哈みディゼ〖ブル
; ----- set System clock -----
	bset		PRC0			; クロックコントロ〖ルレジスタ今き哈みイネ〖ブル
	mov.b		#C_CM0,CM0		; 券慨
	mov.b		#C_CM1,CM1		; 
	mov.b		#C_CM2,CM2		; 券慷匿贿浮叫怠墙痰跟
	mov.b		#C_MCD,MCD		; メインクロック尸件なし
	bclr		PRC0			; レジスタ今き哈みディゼ〖ブル
;
;	ldc		#0000h, flg		; bank#0,充り哈み敦贿,ISP
	ldc		#VECTOR_ADR, intb	; ベクタテ〖ブルの肋年

;------ DATA挝拌の介袋步 ------
init_data_NE:
	mov.w	#(sizeof data_NE), r3
	jz	init_data_NO	; サイズ0なら介袋步涩妥なし
	mov.l	#(topof data_NEI), a0
	mov.l	#(topof data_NE), a1
	smovf.b

init_data_NO:
	mov.w	#(sizeof data_NO), r3
	jz	clear_bss	; サイズ0なら介袋步涩妥なし
	mov.l	#(topof data_NOI), a0
	mov.l	#(topof data_NO), a1
	smovf.b

;------ BSS挝拌の介袋步 ------
clear_bss:
	mov.b	#0, r0l
	mov.w	#(topof bss_NE & 0ffffh), a1
	mov.w	#(sizeof bss_NE) , r3
	sstr.b

	mov.w	#(topof bss_NO & 0ffffh), a1
	mov.w	#(sizeof bss_NO) , r3
	sstr.b

;*  software_init_hook を钙叫し∈0 でない眷圭∷
;*
;*  ソフトウェア茨董∈泼にライブラリ∷に巴赂して涩妥な介袋步借
;*  妄がある眷圭は·software_init_hook という簇眶を脱罢すれば
;*  よいˉM32Cの眷圭、コンパイル箕EXTERN_SOFT_HOOKをデファインする
	mov.l		#_software_init_hook, a0
	mov.l		[a0], a1
	cmp.l		#0, a1
	jz		kernel_link
	jsri.a		a1

;;
;***** カ〖ネルスタ〖トへ	*****
kernel_link:
	jmp		_kernel_start	; --> kernel_start()
;
	.end