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