1 | ;*
|
---|
2 | ;* TOPPERS/SSP Kernel
|
---|
3 | ;* Smallest Set Profile Kernel
|
---|
4 | ;*
|
---|
5 | ;* Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
|
---|
6 | ;* Toyohashi Univ. of Technology, JAPAN
|
---|
7 | ;* Copyright (C) 2005,2006 by Embedded and Real-Time Systems Laboratory
|
---|
8 | ;* Graduate School of Information Science, Nagoya Univ., JAPAN
|
---|
9 | ;* Copyright (C) 2008-2010 by Witz Corporation, JAPAN
|
---|
10 | ;*
|
---|
11 | ;* ãLì ÒÍCFree Software Foundation ÉæÁÄö\³êÄ¢é
|
---|
12 | ;* GNU General Public License Ì Version 2 ÉLq³êÄ¢éð©CÈ
|
---|
13 | ;* ºÌ(1)`(4)Ìðð½·êÉÀèC{\tgEFAi{\tgEF
|
---|
14 | ;* Aðüϵ½àÌðÜÞDȺ¯¶jðgpE¡»EüÏEÄzziȺC
|
---|
15 | ;* pÆÄÔj·é±Æð³Åø·éD
|
---|
16 | ;* (1) {\tgEFAð\[XR[hÌ`Åp·éêÉÍCãLÌì
|
---|
17 | ;* \¦C±Ìpð¨æÑºLÌ³ÛØKèªC»ÌÜÜÌ`Å\[
|
---|
18 | ;* XR[hÉÜÜêĢ鱯D
|
---|
19 | ;* (2) {\tgEFAðÄpÂ\ÈoCiR[hiP[^uIu
|
---|
20 | ;* WFNgt@CâCuÈÇjÌ`Åp·éêÉÍCp
|
---|
21 | ;* ɺ¤hL
|
---|
22 | gipÒ}j
|
---|
23 | AÈÇjÉCãLÌì \¦C
|
---|
24 | ;* ±Ìpð¨æÑºLÌ³ÛØKèðfÚ·é±ÆD
|
---|
25 | ;* (3) {\tgEFAðÄpsÂ\ÈoCiR[hÌ`ܽÍ@íÉg
|
---|
26 | ;* Ýñ¾`Åp·éêÉÍCÌ¢¸ê©Ìðð½·±ÆD
|
---|
27 | ;* (a) pɺ¤hL
|
---|
28 | gipÒ}j
|
---|
29 | AÈÇjÉCãLÌì
|
---|
30 | ;* \¦C±Ìpð¨æÑºLÌ³ÛØKèðfÚ·é±ÆD
|
---|
31 | ;* (b) pÌ`ÔðCÊÉèßéû@ÉæÁÄCãLì ÒÉñ·é
|
---|
32 | ;* ±ÆD
|
---|
33 | ;* (4) {\tgEFAÌpÉæè¼ÚIܽÍÔÚIɶ¶é¢©Èé¹
|
---|
34 | ;* Q©çàCãLì ÒðÆÓ·é±ÆD
|
---|
35 | ;*
|
---|
36 | ;* {\tgEFAÍC³ÛØÅñ³êÄ¢éàÌÅ éDãLì ÒÍC
|
---|
37 | ;* {\tgEFAÉÖµÄC»ÌKpÂ\«àÜßÄC¢©ÈéÛØàsí
|
---|
38 | ;* È¢DܽC{\tgEFAÌpÉæè¼ÚIܽÍÔÚIɶ¶½¢
|
---|
39 | ;* ©Èé¹QÉÖµÄàC»ÌÓCðíÈ¢D
|
---|
40 | ;*
|
---|
41 |
|
---|
42 | .include sectrx.inc
|
---|
43 |
|
---|
44 | ;
|
---|
45 | ; }bvÌè`(^[Qbg˶)
|
---|
46 | ;
|
---|
47 |
|
---|
48 | DFLRE .equ 007FC440H ; DFLREWX^
|
---|
49 |
|
---|
50 | DB_BLOCK_ENABLE .equ 02D0FH
|
---|
51 |
|
---|
52 | ;
|
---|
53 | ; ú»[`
|
---|
54 | ;
|
---|
55 | .section P, CODE
|
---|
56 |
|
---|
57 | .glb _start
|
---|
58 | .glb _sta_ker
|
---|
59 | .glb _software_init_hook
|
---|
60 | .glb _hardware_init_hook
|
---|
61 | .glb __kernel_istkpt
|
---|
62 |
|
---|
63 | _start:
|
---|
64 | ;
|
---|
65 | ; d¹üãÍx0, SÝÖ~óÔÅ é.
|
---|
66 | ; J[lÅͬÝðgpµÈ¢½ßABPC, BPSWyÑFINTV
|
---|
67 | ; Ìú»ÍsíÈ¢.
|
---|
68 | ;
|
---|
69 |
|
---|
70 | ;
|
---|
71 | ; à ROMif[^tbV
|
---|
72 | jÌæÌÝè
|
---|
73 | ;
|
---|
74 | ; Zbgã, f[^tbV
|
---|
75 | ÌæÍÇÝoµÖ~ÆÈÁÄ¢é
|
---|
76 | ; ½ß, ÇÝoµÂÉÝè·é.
|
---|
77 | ;
|
---|
78 | mov.l #DFLRE, r5
|
---|
79 | mov.w #DB_BLOCK_ENABLE, [R5]
|
---|
80 |
|
---|
81 | ;
|
---|
82 | ; X^bN|C^ÌÝè
|
---|
83 | ;
|
---|
84 | ; [UÉÄñ^XNReLXgpX^bNÌæðpÓµ½ê,
|
---|
85 | ; [UÌæðÝè·é.
|
---|
86 | ; kernel_cfg.cÉÄ"_kernel_istkpt"Ìlðè·é.
|
---|
87 | ;
|
---|
88 | mov.l #__kernel_istkpt, r5
|
---|
89 | mov.l [r5], r0 ; ñ^XNReLXgpX^bNÌæðÝè
|
---|
90 |
|
---|
91 | ;
|
---|
92 | ; ÂÏxN^e[uÌÝè
|
---|
93 | ;
|
---|
94 | mvtc #(topof C$VECT), intb ; xN^e[uÌÝè
|
---|
95 |
|
---|
96 | ;
|
---|
97 | ; n[hEFAÅLÌú»[`ÌÄoµ
|
---|
98 | ;
|
---|
99 | mov.l #_hardware_init_hook, r5
|
---|
100 | cmp #0, r5
|
---|
101 | beq.b init_D
|
---|
102 | jsr r5
|
---|
103 |
|
---|
104 | ;
|
---|
105 | ; úl èÏÌæÌú»
|
---|
106 | ;
|
---|
107 | init_D:
|
---|
108 | mov.l #(sizeof R), r3
|
---|
109 | cmp #0, r3
|
---|
110 | beq.b init_D_2 ; TCY0Èçú»Kvȵ
|
---|
111 | mov.l #(topof R), r1
|
---|
112 | mov.l #(topof D), r2
|
---|
113 | smovf
|
---|
114 |
|
---|
115 | init_D_2:
|
---|
116 | mov.l #(sizeof R_2), r3
|
---|
117 | cmp #0, r3
|
---|
118 | beq.b init_D_1 ; TCY0Èçú»Kvȵ
|
---|
119 | mov.l #(topof R_2), r1
|
---|
120 | mov.l #(topof D_2), r2
|
---|
121 | smovf
|
---|
122 |
|
---|
123 | init_D_1:
|
---|
124 | mov.l #(sizeof R_1), r3
|
---|
125 | cmp #0, r3
|
---|
126 | beq.b clear_B ; TCY0Èçú»Kvȵ
|
---|
127 | mov.l #(topof R_1), r1
|
---|
128 | mov.l #(topof D_1), r2
|
---|
129 | smovf
|
---|
130 |
|
---|
131 | ;
|
---|
132 | ; úlȵÏÌæÌú»
|
---|
133 | ;
|
---|
134 | clear_B:
|
---|
135 | mov.l #0, r2
|
---|
136 | mov.l #(topof B), r1
|
---|
137 | mov.l #(sizeof B) , r3
|
---|
138 | sstr.b
|
---|
139 |
|
---|
140 | clear_B_2:
|
---|
141 | mov.l #0, r2
|
---|
142 | mov.l #(topof B_2), r1
|
---|
143 | mov.l #(sizeof B_2) , r3
|
---|
144 | sstr.b
|
---|
145 |
|
---|
146 | clear_B_1:
|
---|
147 | mov.l #0, r2
|
---|
148 | mov.l #(topof B_1), r1
|
---|
149 | mov.l #(sizeof B_1) , r3
|
---|
150 | sstr.b
|
---|
151 |
|
---|
152 | ;
|
---|
153 | ; software_init_hook ðÄoµi0 ÅÈ¢êj
|
---|
154 | ;
|
---|
155 | ; \tgEFA«iÁÉCujÉ˶µÄKvÈú»
|
---|
156 | ; ª éêÍCsoftware_init_hook Æ¢¤ÖðpÓ·êÎæ¢.
|
---|
157 | ;
|
---|
158 | mov.l #_software_init_hook, r5
|
---|
159 | cmp #0, r5
|
---|
160 | beq.b kernel_link
|
---|
161 | jsr r5
|
---|
162 |
|
---|
163 | ;
|
---|
164 | ; J[lX^[g
|
---|
165 | ;
|
---|
166 | kernel_link:
|
---|
167 | bra.a _sta_ker ; --> _sta_ker()
|
---|
168 |
|
---|
169 | .end
|
---|
170 |
|
---|