1 | ; *
|
---|
2 | ; * TOPPERS/JSP Kernel
|
---|
3 | ; * Toyohashi Open Platform for Embedded Real-Time Systems/
|
---|
4 | ; * Just Standard Profile Kernel
|
---|
5 | ; *
|
---|
6 | ; * Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
|
---|
7 | ; * Toyohashi Univ. of Technology, JAPAN
|
---|
8 | ; *
|
---|
9 | ; * ä¸è¨è使¨©è
|
---|
10 | ã¯ï¼ä»¥ä¸ã® (1)ã(4) ã®æ¡ä»¶ãï¼Free Software Foundation
|
---|
11 | ; * ã«ãã£ã¦å
|
---|
12 | ¬è¡¨ããã¦ãã GNU General Public License ã® Version 2 ã«è¨
|
---|
13 | ; * è¿°ããã¦ããæ¡ä»¶ãæºããå ´åã«éãï¼æ¬ã½ããã¦ã§ã¢ï¼æ¬ã½ããã¦ã§ã¢
|
---|
14 | ; * ãæ¹å¤ãããã®ãå«ãï¼ä»¥ä¸åãï¼ã使ç¨ã»è¤è£½ã»æ¹å¤ã»åé
|
---|
15 | å¸ï¼ä»¥ä¸ï¼
|
---|
16 | ; * å©ç¨ã¨å¼ã¶ï¼ãããã¨ãç¡åã§è¨±è«¾ããï¼
|
---|
17 | ; * (1) æ¬ã½ããã¦ã§ã¢ãã½ã¼ã¹ã³ã¼ãã®å½¢ã§å©ç¨ããå ´åã«ã¯ï¼ä¸è¨ã®èä½
|
---|
18 | ; * 権表示ï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãï¼ãã®ã¾ã¾ã®å½¢ã§ã½ã¼
|
---|
19 | ; * ã¹ã³ã¼ãä¸ã«å«ã¾ãã¦ãããã¨ï¼
|
---|
20 | ; * (2) æ¬ã½ããã¦ã§ã¢ãï¼ã©ã¤ãã©ãªå½¢å¼ãªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
21 | ; * ç¨ã§ããå½¢ã§åé
|
---|
22 | å¸ããå ´åã«ã¯ï¼åé
|
---|
23 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨
|
---|
24 | ; * è
|
---|
25 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®è使¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨
|
---|
26 | ; * ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
27 | ; * (3) æ¬ã½ããã¦ã§ã¢ãï¼æ©å¨ã«çµã¿è¾¼ããªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
28 | ; * ç¨ã§ããªãå½¢ã§åé
|
---|
29 | å¸ããå ´åã«ã¯ï¼æ¬¡ã®ããããã®æ¡ä»¶ãæºããã
|
---|
30 | ; * ã¨ï¼
|
---|
31 | ; * (a) åé
|
---|
32 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨è
|
---|
33 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®è
|
---|
34 | ; * 使¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
35 | ; * (b) åé
|
---|
36 | å¸ã®å½¢æ
|
---|
37 | ãï¼å¥ã«å®ããæ¹æ³ã«ãã£ã¦ï¼TOPPERSããã¸ã§ã¯ãã«
|
---|
38 | ; * å ±åãããã¨ï¼
|
---|
39 | ; * (4) æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ
|
---|
40 | ; * 害ãããï¼ä¸è¨è使¨©è
|
---|
41 | ããã³TOPPERSããã¸ã§ã¯ããå
|
---|
42 | 責ãããã¨ï¼
|
---|
43 | ; *
|
---|
44 | ; * æ¬ã½ããã¦ã§ã¢ã¯ï¼ç¡ä¿è¨¼ã§æä¾ããã¦ãããã®ã§ããï¼ä¸è¨è使¨©è
|
---|
45 | ã
|
---|
46 | ; * ãã³TOPPERSããã¸ã§ã¯ãã¯ï¼æ¬ã½ããã¦ã§ã¢ã«é¢ãã¦ï¼ãã®é©ç¨å¯è½æ§ã
|
---|
47 | ; * å«ãã¦ï¼ãããªãä¿è¨¼ãè¡ããªãï¼ã¾ãï¼æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´
|
---|
48 | ; * æ¥çã¾ãã¯éæ¥çã«çãããããªãæå®³ã«é¢ãã¦ãï¼ãã®è²¬ä»»ãè² ããªãï¼
|
---|
49 | ; *
|
---|
50 | ; * @(#) $Id: cpu_support.S,v 1.5 2003/12/04 08:25:44 honda Exp $
|
---|
51 | ; *
|
---|
52 |
|
---|
53 | .c_mode
|
---|
54 | .align 1
|
---|
55 | .global __kernel_dispatch
|
---|
56 | .include "c5402dsk.h"
|
---|
57 | .mmregs
|
---|
58 |
|
---|
59 | __kernel_dispatch:
|
---|
60 | PSHM AR1 ;AR1,6,7ãã¹ã¿ãã¯ã«ä¿å
|
---|
61 | PSHM AR6 ;PCã¯å¼ã³åºãæã«ã¹ã¿ãã¯ã«ä¿åããã
|
---|
62 | PSHM AR7 ;ä»ã®è£å©ã¬ã¸ã¹ã¿ARxã¯ä¿åããå¿
|
---|
63 | è¦ã¯ãªã
|
---|
64 | LDM SP,A
|
---|
65 | MVDM *(__kernel_runtsk),AR1 ;AR1 <- runtsk
|
---|
66 | NOP
|
---|
67 | STL A,*AR1(TCB_sp) ;ã¿ã¹ã¯ã¹ã¿ãã¯ãTCBã«ä¿å
|
---|
68 | ST #dispatch_r,*AR1(TCB_pc) ;å®è¡åéçªå°ãTCBã«ä¿å
|
---|
69 | B dispatcher_1
|
---|
70 |
|
---|
71 | dispatch_r:
|
---|
72 | POPM AR7 ;ã¬ã¸ã¹ã¿ã復帰
|
---|
73 | POPM AR6
|
---|
74 | POPM AR1
|
---|
75 | B __kernel_calltex ;ã¿ã¹ã¯ä¾å¤ã«ã¼ãã³ã®å¼ã³åºã
|
---|
76 |
|
---|
77 | .global __kernel_exit_and_dispatch
|
---|
78 | __kernel_exit_and_dispatch:
|
---|
79 | SSBX INTM ;å²ãè¾¼ã¿ç¦æ¢
|
---|
80 | ST #0,*(__kernel_nest) ;ã«ã¼ãã«ã®åæåå¦çæã®ãã
|
---|
81 | dispatcher_1:
|
---|
82 | LD *(__kernel_schedtsk),A ;schedtskããããï¼
|
---|
83 | BC dispatcher_2,AEQ ;ç¡ããã°ã¸ã£ã³ã
|
---|
84 | MVDK *(__kernel_schedtsk),*(__kernel_runtsk) ;schedtskãruntskã«
|
---|
85 | MVDM *(__kernel_runtsk),AR1
|
---|
86 | NOP
|
---|
87 | MVDK *AR1(TCB_sp),SP ;TCBããã¹ã¿ãã¯ã復帰
|
---|
88 | LD *AR1(TCB_pc),A ;TCBããå®è¡åéçªå°ã復帰
|
---|
89 | BACC A
|
---|
90 |
|
---|
91 | dispatcher_2:
|
---|
92 | STM #STACKTOP,SP
|
---|
93 | ST #0x01,*(__kernel_nest)
|
---|
94 | RSBX INTM ;å²ãè¾¼ã¿è¨±å¯
|
---|
95 | IDLE 1 ;ãªã»ããããã¹ã¯ããã¦ããªãå²è¾¼ã¿å¾
|
---|
96 | ã¡
|
---|
97 | SSBX INTM ;å²ãè¾¼ã¿ç¦æ¢
|
---|
98 | ST #0x0,*(__kernel_nest)
|
---|
99 | B dispatcher_1
|
---|
100 |
|
---|
101 |
|
---|
102 | ;
|
---|
103 | ; ã¿ã¹ã¯ã®èµ·åå¦ç
|
---|
104 | ;
|
---|
105 |
|
---|
106 | .global __kernel_activate_r
|
---|
107 | ; .global _activate_r
|
---|
108 | __kernel_activate_r:
|
---|
109 | ;_activate_r:
|
---|
110 | RSBX INTM ;å²ãè¾¼ã¿è¨±å¯
|
---|
111 | POPM AR2
|
---|
112 | POPM AR3
|
---|
113 | LDM AR2,B
|
---|
114 | LDM AR3,A
|
---|
115 | BACC B
|
---|
116 |
|
---|
117 |
|
---|
118 |
|
---|
119 | .global _interrupt
|
---|
120 | _interrupt:
|
---|
121 | PSHM ST0
|
---|
122 | PSHM AL
|
---|
123 | PSHM AH
|
---|
124 | PSHM AG
|
---|
125 | PSHM BL
|
---|
126 | PSHM BH
|
---|
127 | PSHM BG
|
---|
128 | PSHM ST1
|
---|
129 | PSHM AR0
|
---|
130 | PSHM AR2
|
---|
131 | PSHM AR3
|
---|
132 | PSHM AR4
|
---|
133 | PSHM AR5
|
---|
134 | PSHM T
|
---|
135 | PSHM TRN
|
---|
136 | PSHM BK
|
---|
137 | PSHM BRC
|
---|
138 | PSHM RSA
|
---|
139 | PSHM REA
|
---|
140 | PSHM PMST
|
---|
141 | LD *(__kernel_nest),A
|
---|
142 | ADDM #1,*(__kernel_nest) ;å²ãè¾¼ã¿ã®ãã¹ãåæ°ãã¤ã³ã¯ãªã¡ã³ã
|
---|
143 | BC _interrupt_from_int,ANEQ
|
---|
144 | LDM SP,A ;ã¹ã¿ãã¯å
|
---|
145 | ¥ãæ¿ãã¨
|
---|
146 | STM #STACKTOP,SP ;å
|
---|
147 | ã®ã¹ã¿ãã¯ãã¤ã³ã¿ã®
|
---|
148 | PSHM AL ;ä¿åãè¡ã
|
---|
149 | PSHM IMR
|
---|
150 | MVDM *(_INT_VECNO),AR2 ;ãªãã»ããå¤ãAR2ã«ã»ãã
|
---|
151 | STM #IMR,AR3 ;åãå²ãè¾¼ã¿ãä½åº¦ãããããªãããã«
|
---|
152 | LD *AR2(__kernel_int_mask_table),A ; ï½
|
---|
153 | AND *AR3,A ; â
|
---|
154 | STL A,*AR3 ;ç¾å¨ã®å²ãè¾¼ã¿ããã¹ã¯ãã
|
---|
155 | LD *AR2(__kernel_int_table),A ;å²ãè¾¼ã¿ãã³ãã©ã®ã¢ãã¬ã¹ãåå¾
|
---|
156 | RSBX INTM ;ãã以éå²ãè¾¼ã¿ãåãåãä»ãã
|
---|
157 | CALA A ;å²ãè¾¼ã¿ãã³ãã©ã¸
|
---|
158 | SSBX INTM ;å²ãè¾¼ã¿ãç¦æ¢
|
---|
159 | ADDM #-1,*(__kernel_nest) ;ãã¯ãªã¡ã³ã
|
---|
160 | POPM IMR
|
---|
161 | POPM SP ;æ»ãå
|
---|
162 | ãã¿ã¹ã¯ãªã®ã§ã¹ã¿ãã¯ãæ»ã
|
---|
163 | LD *(__kernel_reqflg),A
|
---|
164 | BC _ret_to_task_int,AEQ ;reqflgãFALSEãªãã¸ã£ã³ã
|
---|
165 | ST #0,*(__kernel_reqflg)
|
---|
166 | B ret_int
|
---|
167 |
|
---|
168 | _interrupt_from_int:
|
---|
169 | LDM SP,A
|
---|
170 | ANDM #0xFFFE,*(SP)
|
---|
171 | NOP
|
---|
172 | NOP
|
---|
173 | PSHM AL
|
---|
174 | PSHM IMR
|
---|
175 | MVDM *(_INT_VECNO),AR2 ;ãªãã»ããå¤ãAR2ã«ã»ãã
|
---|
176 | STM #IMR,AR3 ;åãå²ãè¾¼ã¿ãä½åº¦ãããããªãããã«
|
---|
177 | LD *AR2(__kernel_int_mask_table),A ; ï½
|
---|
178 | AND *AR3,A ; â
|
---|
179 | STL A,*AR3 ;ç¾å¨ã®å²ãè¾¼ã¿ããã¹ã¯ãã
|
---|
180 | LD *AR2(__kernel_int_table),A ;å²ãè¾¼ã¿ãã³ãã©ã®ã¢ãã¬ã¹ãåå¾
|
---|
181 | RSBX INTM ;ãã以éå²ãè¾¼ã¿ãåãä»ãã
|
---|
182 | CALA A ;å²ãè¾¼ã¿ãã³ãã©ã
|
---|
183 | SSBX INTM ;å²ãè¾¼ã¿ç¦æ¢
|
---|
184 | POPM IMR
|
---|
185 | POPM SP
|
---|
186 | ADDM #-1,*(__kernel_nest) ;å²ãè¾¼ã¿ã®ãã¹ãåæ°ããã¯ãªã¡ã³ã
|
---|
187 | _ret_to_task_int: ;ã¬ã¸ã¹ã¿ã復帰ãå²ãè¾¼ã¿å
|
---|
188 | ã¸æ»ãã
|
---|
189 | POPM PMST
|
---|
190 | POPM REA
|
---|
191 | POPM RSA
|
---|
192 | POPM BRC
|
---|
193 | POPM BK
|
---|
194 | POPM TRN
|
---|
195 | POPM T
|
---|
196 | POPM AR5
|
---|
197 | POPM AR4
|
---|
198 | POPM AR3
|
---|
199 | POPM AR2
|
---|
200 | POPM AR0
|
---|
201 | POPM ST1
|
---|
202 | POPM BG
|
---|
203 | POPM BH
|
---|
204 | POPM BL
|
---|
205 | POPM AG
|
---|
206 | POPM AH
|
---|
207 | POPM AL
|
---|
208 | POPM ST0
|
---|
209 | RETE
|
---|
210 |
|
---|
211 | .global ret_int
|
---|
212 | ret_int:
|
---|
213 | LD *(__kernel_enadsp),A
|
---|
214 | BC ret_int_1,AEQ
|
---|
215 | MVDM *(__kernel_runtsk),AR0
|
---|
216 | MVDM *(__kernel_schedtsk),AR2
|
---|
217 | NOP
|
---|
218 | CMPR EQ,AR2 ;runtskã¨schedtskãæ¯è¼
|
---|
219 | BC ret_int_1,TC
|
---|
220 | PSHM AR1
|
---|
221 | PSHM AR6
|
---|
222 | PSHM AR7
|
---|
223 | LDM SP,A
|
---|
224 | STL A,*AR0(TCB_sp)
|
---|
225 | ST #ret_int_r,*AR0(TCB_pc)
|
---|
226 | B dispatcher_1
|
---|
227 | ret_int_r:
|
---|
228 | POPM AR7
|
---|
229 | POPM AR6
|
---|
230 | POPM AR1
|
---|
231 | ret_int_1:
|
---|
232 | LDM SP,A
|
---|
233 | ANDM #0xFFFE,*(SP)
|
---|
234 | NOP
|
---|
235 | NOP
|
---|
236 | PSHM AL
|
---|
237 | FRAME #-1
|
---|
238 | LD #__kernel_calltex,A
|
---|
239 | CALA A
|
---|
240 | FRAME #1
|
---|
241 | POPM SP
|
---|
242 | NOP
|
---|
243 | POPM PMST
|
---|
244 | POPM REA
|
---|
245 | POPM RSA
|
---|
246 | POPM BRC
|
---|
247 | POPM BK
|
---|
248 | POPM TRN
|
---|
249 | POPM T
|
---|
250 | POPM AR5
|
---|
251 | POPM AR4
|
---|
252 | POPM AR3
|
---|
253 | POPM AR2
|
---|
254 | POPM AR0
|
---|
255 | POPM ST1
|
---|
256 | POPM BG
|
---|
257 | POPM BH
|
---|
258 | POPM BL
|
---|
259 | POPM AG
|
---|
260 | POPM AH
|
---|
261 | POPM AL
|
---|
262 | POPM ST0
|
---|
263 | RETE
|
---|
264 |
|
---|
265 | ;
|
---|
266 | ; 微尿éå¾
|
---|
267 | ã¡
|
---|
268 | ;
|
---|
269 | .global _sil_dly_nse
|
---|
270 | _sil_dly_nse:
|
---|
271 | SSBX SXM
|
---|
272 | NOP
|
---|
273 | LD *(AL), A
|
---|
274 | SUB #SIL_DLY_TIM1, A, A
|
---|
275 | BC _sil_dly_nse1, AGT
|
---|
276 | RET
|
---|
277 | _sil_dly_nse1:
|
---|
278 | SUB #SIL_DLY_TIM2, A, A
|
---|
279 | BC _sil_dly_nse1, AGT
|
---|
280 | RET
|
---|
281 |
|
---|