[136] | 1 | /*
|
---|
| 2 | * TOPPERS/ASP Kernel
|
---|
| 3 | * Toyohashi Open Platform for Embedded Real-Time Systems/
|
---|
| 4 | * Advanced Standard Profile Kernel
|
---|
| 5 | *
|
---|
| 6 | * Copyright (C) 2008-2015 by Embedded and Real-Time Systems Laboratory
|
---|
| 7 | * Graduate School of Information Science, Nagoya Univ., JAPAN
|
---|
| 8 | *
|
---|
| 9 | * ä¸è¨èä½æ¨©è
|
---|
| 10 | ã¯ï¼ä»¥ä¸ã®(1)ï½(4)ã®æ¡ä»¶ãæºããå ´åã«éãï¼æ¬ã½ããã¦ã§
|
---|
| 11 | * ã¢ï¼æ¬ã½ããã¦ã§ã¢ãæ¹å¤ãããã®ãå«ãï¼ä»¥ä¸åãï¼ã使ç¨ã»è¤è£½ã»æ¹
|
---|
| 12 | * å¤ã»åé
|
---|
| 13 | å¸ï¼ä»¥ä¸ï¼å©ç¨ã¨å¼ã¶ï¼ãããã¨ãç¡åã§è¨±è«¾ããï¼
|
---|
| 14 | * (1) æ¬ã½ããã¦ã§ã¢ãã½ã¼ã¹ã³ã¼ãã®å½¢ã§å©ç¨ããå ´åã«ã¯ï¼ä¸è¨ã®èä½
|
---|
| 15 | * 権表示ï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãï¼ãã®ã¾ã¾ã®å½¢ã§ã½ã¼
|
---|
| 16 | * ã¹ã³ã¼ãä¸ã«å«ã¾ãã¦ãããã¨ï¼
|
---|
| 17 | * (2) æ¬ã½ããã¦ã§ã¢ãï¼ã©ã¤ãã©ãªå½¢å¼ãªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
| 18 | * ç¨ã§ããå½¢ã§åé
|
---|
| 19 | å¸ããå ´åã«ã¯ï¼åé
|
---|
| 20 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨
|
---|
| 21 | * è
|
---|
| 22 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®èä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨
|
---|
| 23 | * ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
| 24 | * (3) æ¬ã½ããã¦ã§ã¢ãï¼æ©å¨ã«çµã¿è¾¼ããªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
| 25 | * ç¨ã§ããªãå½¢ã§åé
|
---|
| 26 | å¸ããå ´åã«ã¯ï¼æ¬¡ã®ããããã®æ¡ä»¶ãæºããã
|
---|
| 27 | * ã¨ï¼
|
---|
| 28 | * (a) åé
|
---|
| 29 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨è
|
---|
| 30 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®è
|
---|
| 31 | * ä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
| 32 | * (b) åé
|
---|
| 33 | å¸ã®å½¢æ
|
---|
| 34 | ãï¼å¥ã«å®ããæ¹æ³ã«ãã£ã¦ï¼TOPPERSããã¸ã§ã¯ãã«
|
---|
| 35 | * å ±åãããã¨ï¼
|
---|
| 36 | * (4) æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ
|
---|
| 37 | * 害ãããï¼ä¸è¨èä½æ¨©è
|
---|
| 38 | ããã³TOPPERSããã¸ã§ã¯ããå
|
---|
| 39 | 責ãããã¨ï¼
|
---|
| 40 | * ã¾ãï¼æ¬ã½ããã¦ã§ã¢ã®ã¦ã¼ã¶ã¾ãã¯ã¨ã³ãã¦ã¼ã¶ããã®ãããªãç
|
---|
| 41 | * ç±ã«åºã¥ãè«æ±ãããï¼ä¸è¨èä½æ¨©è
|
---|
| 42 | ããã³TOPPERSããã¸ã§ã¯ãã
|
---|
| 43 | * å
|
---|
| 44 | 責ãããã¨ï¼
|
---|
| 45 | *
|
---|
| 46 | * æ¬ã½ããã¦ã§ã¢ã¯ï¼ç¡ä¿è¨¼ã§æä¾ããã¦ãããã®ã§ããï¼ä¸è¨èä½æ¨©è
|
---|
| 47 | ã
|
---|
| 48 | * ãã³TOPPERSããã¸ã§ã¯ãã¯ï¼æ¬ã½ããã¦ã§ã¢ã«é¢ãã¦ï¼ç¹å®ã®ä½¿ç¨ç®ç
|
---|
| 49 | * ã«å¯¾ããé©åæ§ãå«ãã¦ï¼ãããªãä¿è¨¼ãè¡ããªãï¼ã¾ãï¼æ¬ã½ããã¦ã§
|
---|
| 50 | * ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ害ã«é¢ãã¦ãï¼ã
|
---|
| 51 | * ã®è²¬ä»»ãè² ããªãï¼
|
---|
| 52 | *
|
---|
| 53 | * @(#) $Id: core_support.S 2704 2015-11-21 15:50:12Z ertl-honda $
|
---|
| 54 | */
|
---|
| 55 |
|
---|
| 56 | /*
|
---|
| 57 | * ããã»ããµä¾åã¢ã¸ã¥ã¼ã« ã¢ã»ã³ããªè¨èªé¨ï¼ARM-Mç¨ï¼
|
---|
| 58 | */
|
---|
| 59 |
|
---|
| 60 | #define TOPPERS_MACRO_ONLY
|
---|
| 61 | #define UINT_C(val) (val) /* uint_tåã®å®æ°ãä½ããã¯ã */
|
---|
| 62 | #define ULONG_C(val) (val) /* ulong_tåã®å®æ°ãä½ããã¯ã */
|
---|
| 63 | #define CAST(type, val) (val) /* åãã£ã¹ããè¡ããã¯ã */
|
---|
| 64 |
|
---|
| 65 | #include "kernel_impl.h"
|
---|
| 66 | #include "arm_m.h"
|
---|
| 67 | #include "offset.h"
|
---|
| 68 | #include "target_asm.inc"
|
---|
| 69 |
|
---|
| 70 | /*
|
---|
| 71 | * ã¿ã¹ã¯ãã£ã¹ãããã£
|
---|
| 72 | */
|
---|
| 73 | ATEXT
|
---|
| 74 | ABALIGN(4)
|
---|
| 75 | ATHUMB(dispatch)
|
---|
| 76 | AGLOBAL(dispatch)
|
---|
| 77 | ALABEL(dispatch)
|
---|
| 78 | /*
|
---|
| 79 | *
|
---|
| 80 | * ãã®ã«ã¼ãã³ã¯ï¼ã¿ã¹ã¯ã³ã³ããã¹ãã»CPUããã¯ç¶æ
|
---|
| 81 | ã»ãã£ããã許å¯ç¶æ
|
---|
| 82 |
|
---|
| 83 | * ã»ï¼ã¢ãã«ä¸ã®ï¼å²è¾¼ã¿åªå
|
---|
| 84 | 度ãã¹ã¯å
|
---|
| 85 | ¨éç¶æ
|
---|
| 86 | ã§å¼ã³åºãããï¼
|
---|
| 87 | */
|
---|
| 88 | stmfd sp!,{r4-r11,lr} /* ã¬ã¸ã¹ã¿ã®ä¿å */
|
---|
| 89 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 90 | /*
|
---|
| 91 | * ãã£ã¹ãããå
|
---|
| 92 | ã®ã¿ã¹ã¯FPUã使ç¨ããå ´åã¯FPUã¬ã¸ã¹ã¿ãä¿å
|
---|
| 93 | */
|
---|
| 94 | mrs r0, control /* CONTROL.FPCA == 0(FPUæªä½¿ç¨)ãªãã°ã¹ããã */
|
---|
| 95 | tst r0, #CONTROL_FPCA
|
---|
| 96 | beq dispatch_1
|
---|
| 97 | vpush {s16-s31} /* FPUã¬ã¸ã¹ã¿ã®ä¿å */
|
---|
| 98 | ALABEL(dispatch_1)
|
---|
| 99 | push {r0} /* 復帰æã®å¤å®ç¨ã«CONTROLãä¿å */
|
---|
| 100 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 101 | ldr r0, =p_runtsk /* p_runtskãèªã¿è¾¼ã */
|
---|
| 102 | ldr r1, [r0]
|
---|
| 103 | str sp, [r1,#TCB_sp] /* ã¿ã¹ã¯ã¹ã¿ãã¯ãä¿å */
|
---|
| 104 | ldr lr, =dispatch_r /* å®è¡åéçªå°ãä¿å */
|
---|
| 105 | str lr, [r1,#TCB_pc]
|
---|
| 106 | b dispatcher
|
---|
| 107 |
|
---|
| 108 | ATHUMB(dispatch_r)
|
---|
| 109 | AGLOBAL(dispatch_r)
|
---|
| 110 | ALABEL(dispatch_r)
|
---|
| 111 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 112 | /*
|
---|
| 113 | * ãã£ã¹ãããå
|
---|
| 114 | ã®ã¿ã¹ã¯ã§FPUã使ç¨ãã¦ããå ´åã¯FPUã¬ã¸ã¹ã¿ã復帰
|
---|
| 115 | * ã¹ã¿ãã¯ã«ä¿åããCONTROL.FPCAããã§ãã¯
|
---|
| 116 | */
|
---|
| 117 | pop {r3}
|
---|
| 118 | tst r3, #CONTROL_FPCA /* CONTROL.FPCA == 0(FPUæªä½¿ç¨)ãªãã°ã¹ããã */
|
---|
| 119 | beq dispatch_r_0
|
---|
| 120 | vpop {s16-s31} /* FPUã¬ã¸ã¹ã¿ã®å¾©å¸° */
|
---|
| 121 | ALABEL(dispatch_r_0)
|
---|
| 122 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 123 | ldmfd sp!,{r4 - r11,lr} /* ã¬ã¸ã¹ã¿ã®å¾©å¸° */
|
---|
| 124 | /*
|
---|
| 125 | * ã¿ã¹ã¯ä¾å¤å¦çã«ã¼ãã³ã®èµ·å
|
---|
| 126 | * dispatcherããå¼ã³åºãããããï¼TCBã®ã¢ãã¬ã¹ã¯r1ã«å
|
---|
| 127 | ¥ã£ã¦ãã
|
---|
| 128 | */
|
---|
| 129 | ldrb r0,[r1,#TCB_enatex]
|
---|
| 130 | tst r0,#TCB_enatex_mask
|
---|
| 131 | beq dispatch_r_1 /* enatex ã false ãªããªã¿ã¼ã³ */
|
---|
| 132 | ldr r0,[r1,#TCB_texptn] /* texptn ã 0 ãªããªã¿ã¼ã³ */
|
---|
| 133 | tst r0,r0
|
---|
| 134 | beq dispatch_r_1
|
---|
| 135 | ldr r1, =ipmflg /* ipmflgã false ãªããªã¿ã¼ã³ */
|
---|
| 136 | ldr r0, [r1]
|
---|
| 137 | tst r0,r0
|
---|
| 138 | beq dispatch_r_1
|
---|
| 139 | ldr r0, =call_texrtn /* ã¿ã¹ã¯ä¾å¤ã«ã¼ãã³ã®å¼ã³åºã */
|
---|
| 140 | bx r0
|
---|
| 141 | ALABEL(dispatch_r_1) /* ã¿ã¹ã¯ã¸ã®call_textnããæ»ã */
|
---|
| 142 | bx lr
|
---|
| 143 |
|
---|
| 144 | /*
|
---|
| 145 | * CPUä¾å¤ã¨ã³ããª
|
---|
| 146 | *
|
---|
| 147 | * å²è¾¼ã¿ã¨ã³ããªã¨å¦çã®å
|
---|
| 148 | 容ã¯åçã ãï¼ãã°ã®ç¨®é¡ãç°ãªãããï¼
|
---|
| 149 | * åãã¦ããï¼
|
---|
| 150 | */
|
---|
| 151 | ABALIGN(4)
|
---|
| 152 | ATEXT
|
---|
| 153 | ATHUMB(core_exc_entry)
|
---|
| 154 | AGLOBAL(core_exc_entry)
|
---|
| 155 | ALABEL(core_exc_entry)
|
---|
| 156 | /*
|
---|
| 157 | * ä¾å¤/å²è¾¼ã¿ãçºçããã¨ï¼çºçæã«ã¢ã¯ãã£ããªã¹ã¿ãã¯ã«ã¹ã¯ã©
|
---|
| 158 | * ããã¬ã¸ã¹ã¿çãä¿åãããï¼
|
---|
| 159 | * ãã®å
|
---|
| 160 | 容ã«å ãã¦ï¼CPUä¾å¤ãã³ãã©ã¸ã®æ
|
---|
| 161 | å ±ã¨ãã¦ï¼basepri ã®å¤ã¨ï¼
|
---|
| 162 | * EXC_RETURNã®æ
|
---|
| 163 | å ±ãå ãã¦ä¿åããï¼basepriã®å¤ã¯ï¼CPUä¾å¤ããã®
|
---|
| 164 | * ãªã¿ã¼ã³æã«å²è¾¼ã¿åªå
|
---|
| 165 | 度ãã¹ã¯ã®å¤ãå
|
---|
| 166 | ã«æ»ãããã«ãç¨ããããï¼
|
---|
| 167 | *
|
---|
| 168 | * -----------
|
---|
| 169 | * | basepri |
|
---|
| 170 | * -----------
|
---|
| 171 | * | EXC_RETURN|
|
---|
| 172 | * -----------
|
---|
| 173 | * | R0 |
|
---|
| 174 | * -----------
|
---|
| 175 | * | R1 |
|
---|
| 176 | * -----------
|
---|
| 177 | * | R2 |
|
---|
| 178 | * -----------
|
---|
| 179 | * | R3 |
|
---|
| 180 | * -----------
|
---|
| 181 | * | R12 |
|
---|
| 182 | * -----------
|
---|
| 183 | * | LR |
|
---|
| 184 | * -----------
|
---|
| 185 | * | PC |
|
---|
| 186 | * -----------
|
---|
| 187 | * | xPSR |
|
---|
| 188 | * -----------
|
---|
| 189 | *
|
---|
| 190 | */
|
---|
| 191 |
|
---|
| 192 | /*
|
---|
| 193 | * ã«ã¼ãã«ç®¡çå¤ã®ä¾å¤ããã§ãã¯
|
---|
| 194 | * ã«ã¼ãã«å
|
---|
| 195 | ã®ã¯ãªãã£ã«ã«ã»ã¯ã·ã§ã³ã®å®è¡ä¸ï¼å
|
---|
| 196 | ¨å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 197 | ï¼
|
---|
| 198 | * CPUããã¯ç¶æ
|
---|
| 199 | ï¼ã«ã¼ãã«ç®¡çå¤ã®å²è¾¼ã¿ãã³ãã©å®è¡ä¸ã®ããããã§
|
---|
| 200 | * çºçããCPUä¾å¤ãï¼ã«ã¼ãã«ç®¡çå¤ã®CPUä¾å¤ã¨å¼ã¶
|
---|
| 201 | * å
|
---|
| 202 | ¨å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 203 | ã¯FAULTMASKã'1'ã®å ´å
|
---|
| 204 | * CPUããã¯ç¶æ
|
---|
| 205 | ã¯basepriãIIPM_LOCKãã§å¤æããï¼
|
---|
| 206 | */
|
---|
| 207 | mrs r2, FAULTMASK /* å
|
---|
| 208 | ¨å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 209 | ãªãã«ã¼ãã«ç®¡çå¤ä¾å¤å¦ç㸠*/
|
---|
| 210 | cbnz r2, core_nonkernel_exc_entry
|
---|
| 211 |
|
---|
| 212 | mrs r0, basepri /* baepriã®å¤ãåå¾ */
|
---|
| 213 | cmp r0, #IIPM_LOCK /* CPUããã¯ç¶æ
|
---|
| 214 | ãªãã«ã¼ãã«ç®¡çå¤ä¾å¤å¦ç㸠*/
|
---|
| 215 | beq core_nonkernel_exc_entry
|
---|
| 216 |
|
---|
| 217 | /*
|
---|
| 218 | * ã¹ã¿ãã¯ãå¤æ´ããå¿
|
---|
| 219 | è¦ãããããã§ãã¯
|
---|
| 220 | * EXC_RETURNï¼å²è¾¼ã¿æã«LRã«è¨å®ãããå¤ï¼ããã§ãã¯ãã¦ï¼ä¾å¤çºçæã«
|
---|
| 221 | * ã¢ã¯ãã£ããªã¹ã¿ãã¯ãç¹å®ãããã¨ã§å¤éå²è¾¼ã¿ãå¤å®ããï¼
|
---|
| 222 | */
|
---|
| 223 | tst lr, #EXC_RETURN_PSP /* å²è¾¼ã¿å
|
---|
| 224 | ãMSPãªãå¤éå²è¾¼ã¿ */
|
---|
| 225 | beq core_exc_entry_1 /* å¤éå²è¾¼ã¿ãªãcore_exc_entry_1㸠*/
|
---|
| 226 | mrs r3, psp /* ä¸æ®µç®ã®å²è¾¼ã¿ã®å ´åã¯PSPä¸ã« */
|
---|
| 227 | stmfd r3!, {r0, lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 228 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 229 | msr psp, r3
|
---|
| 230 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 231 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«MSPä¸ã«ç©ã */
|
---|
| 232 | mov r0, r3 /* CPUä¾å¤ãã³ãã©ã¸ã®å¼æ°ã¨ãªã */
|
---|
| 233 | b core_exc_entry_2
|
---|
| 234 | ALABEL(core_exc_entry_1) /* å¤éå²è¾¼ã¿ã®å ´å */
|
---|
| 235 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 236 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 237 | mov r0, sp /* CPUä¾å¤ãã³ãã©ã¸ã®å¼æ°ã¨ãªã */
|
---|
| 238 |
|
---|
| 239 | /*
|
---|
| 240 | * å
|
---|
| 241 | ±éå¦ç
|
---|
| 242 | */
|
---|
| 243 | ALABEL(core_exc_entry_2)
|
---|
| 244 | mrs r3, ipsr /* ãã³ãã©ã¢ãã¬ã¹ãåå¾ */
|
---|
| 245 | ldr r1, =_kernel_exc_tbl
|
---|
| 246 | ldr r2, [r1, r3, lsl #2]
|
---|
| 247 |
|
---|
| 248 | #ifdef LOG_EXC_ENTER
|
---|
| 249 | push {r0,r2,r3}
|
---|
| 250 | mov r0, r3 /* ä¾å¤çªå·ããã©ã¡ã¼ã¿ã« */
|
---|
| 251 | bl log_exc_enter /* log_exc_enterãå¼ã³åºã */
|
---|
| 252 | pop {r0,r2,r3}
|
---|
| 253 | push {r3} /* ä¾å¤çªå·ãã¹ã¿ãã¯ã¸ */
|
---|
| 254 | #endif /* LOG_EXC_ENTER */
|
---|
| 255 |
|
---|
| 256 | /*
|
---|
| 257 | * CPUä¾å¤ãã³ãã©ã®å¼ã³åºã
|
---|
| 258 | */
|
---|
| 259 | blx r2
|
---|
| 260 |
|
---|
| 261 | #ifdef LOG_EXC_ENTER
|
---|
| 262 | pop {r0} /* ä¾å¤çªå·ãå¼æ°ã« */
|
---|
| 263 | bl log_exc_leave /* log_exc_leaveãå¼ã³åºã */
|
---|
| 264 | #endif /* LOG_EXC_ENTER */
|
---|
| 265 |
|
---|
| 266 | b ret_exc
|
---|
| 267 |
|
---|
| 268 | /*
|
---|
| 269 | * ã«ã¼ãã«ç®¡çå¤ã®CPUä¾å¤ã®åºå
|
---|
| 270 | ¥å£å¦ç
|
---|
| 271 | */
|
---|
| 272 | ALABEL(core_nonkernel_exc_entry)
|
---|
| 273 | tst lr, #EXC_RETURN_PSP /* å²è¾¼ã¿å
|
---|
| 274 | ãMSPãªãå¤éå²è¾¼ã¿ */
|
---|
| 275 | beq core_nonkernel_exc_entry_1 /* å¤éå²è¾¼ã¿ãªã */
|
---|
| 276 | mrs r3, psp /* ä¸æ®µç®ã®å²è¾¼ã¿ã®å ´åã¯PSPä¸ã« */
|
---|
| 277 | stmfd r3!, {r0, lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 278 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 279 | msr psp, r3
|
---|
| 280 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 281 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«MSPä¸ã«ç©ã */
|
---|
| 282 | mov r0, r3 /* CPUä¾å¤ãã³ãã©ã¸ã®å¼æ°ã¨ãªã */
|
---|
| 283 | b core_nonkernel_exc_entry_2
|
---|
| 284 | ALABEL(core_nonkernel_exc_entry_1) /* å¤éå²è¾¼ã¿ã®å ´å */
|
---|
| 285 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 286 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 287 | mov r0, sp /* CPUä¾å¤ãã³ãã©ã¸ã®å¼æ°ã¨ãªã */
|
---|
| 288 |
|
---|
| 289 | ALABEL(core_nonkernel_exc_entry_2)
|
---|
| 290 | mrs r3, ipsr /* CPUä¾å¤ãã³ãã©ã®ã¢ãã¬ã¹ãåå¾ */
|
---|
| 291 | ldr r1, =_kernel_exc_tbl
|
---|
| 292 | ldr r2, [r1, r3, lsl #2]
|
---|
| 293 |
|
---|
| 294 | /*
|
---|
| 295 | * CPUä¾å¤ãã³ãã©ã®å¼ã³åºã
|
---|
| 296 | */
|
---|
| 297 | blx r2
|
---|
| 298 |
|
---|
| 299 | /*
|
---|
| 300 | * å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 301 | ã¨ããï¼
|
---|
| 302 | */
|
---|
| 303 | cpsid f
|
---|
| 304 |
|
---|
| 305 | /*
|
---|
| 306 | * æ»ãå
|
---|
| 307 | ã®ã³ã³ããã¹ãã®å¤å®
|
---|
| 308 | *
|
---|
| 309 | * å²è¾¼ã¿ãã³ãã©å®è¡ã«LRã«ã»ãããããEXC_RETURNããã§ãã¯ãã¦ï¼æ»ã
|
---|
| 310 | * å
|
---|
| 311 | ã§MSPã使ããã¦ããã°ï¼å²è¾¼ã¿å
|
---|
| 312 | ãéã¿ã¹ã¯ã³ã³ããã¹ãã¨å¤å®ããï¼
|
---|
| 313 | */
|
---|
| 314 | pop {r1,r3} /* å
|
---|
| 315 | ã®å²è¾¼ã¿åªå
|
---|
| 316 | 度ãã¹ã¯(basepri)ãr1ã¸ï¼EXC_RETURNãr3㸠*/
|
---|
| 317 | tst r3, #EXC_RETURN_PSP /* æ»ãå
|
---|
| 318 | ãPSPãªã */
|
---|
| 319 | bne core_nonkernel_ret_exc_1
|
---|
| 320 | b core_nonkernel_ret_exc_2 /* ã®å¤ãMSPããåå¾ */
|
---|
| 321 |
|
---|
| 322 | ALABEL(core_nonkernel_ret_exc_1)
|
---|
| 323 | /*
|
---|
| 324 | * PSPä¸ããï¼EXC_RETURN(r0)ã¨å
|
---|
| 325 | ã®å²è¾¼ã¿åªå
|
---|
| 326 | 度ãã¹ã¯(basepri)åãåé¤
|
---|
| 327 | */
|
---|
| 328 | mrs r2, psp
|
---|
| 329 | add r2, r2, #(0x04*2)
|
---|
| 330 | msr psp, r2
|
---|
| 331 |
|
---|
| 332 | ALABEL(core_nonkernel_ret_exc_2)
|
---|
| 333 | msr basepri, r1 /* å²è¾¼ã¿åªå
|
---|
| 334 | 度ãã¹ã¯ãå²è¾¼ã¿åã«ç¶æ
|
---|
| 335 | 㸠*/
|
---|
| 336 | bx r3 /* ãªã¿ã¼ã³ */
|
---|
| 337 |
|
---|
| 338 | /*
|
---|
| 339 | * å²è¾¼ã¿ã¨ã³ããª
|
---|
| 340 | */
|
---|
| 341 | ATHUMB(core_int_entry)
|
---|
| 342 | AGLOBAL(core_int_entry)
|
---|
| 343 | ALABEL(core_int_entry)
|
---|
| 344 | /*
|
---|
| 345 | * å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 346 | 度ãã¹ã¯ãã¹ã¿ãã¯ã«ä¿åããããåå¾
|
---|
| 347 | */
|
---|
| 348 | mrs r0, basepri /* baepriã®å¤ãåå¾ */
|
---|
| 349 |
|
---|
| 350 | /*
|
---|
| 351 | * å¤éå²è¾¼ã¿ããã§ãã¯
|
---|
| 352 | * EXC_RETURNï¼å²è¾¼ã¿æã«LRã«è¨å®ãããå¤ï¼ããã§ãã¯ãã¦ï¼ä¾å¤çºçæã«
|
---|
| 353 | * ã¢ã¯ãã£ããªã¹ã¿ãã¯ãç¹å®ãããã¨ã§å¤éå²è¾¼ã¿ãå¤å®ããï¼
|
---|
| 354 | */
|
---|
| 355 | tst lr, #EXC_RETURN_PSP /* å²è¾¼ã¿å
|
---|
| 356 | ãMSPãªãå¤éå²è¾¼ã¿ */
|
---|
| 357 | beq core_int_entry_1 /* å¤éå²è¾¼ã¿ãªãcore_int_entry_1㸠*/
|
---|
| 358 | mrs r3, psp /* ä¸æ®µç®ã®å²è¾¼ã¿ã®å ´åã¯PSPä¸ã« */
|
---|
| 359 | stmfd r3!, {r0, lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 360 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 361 | msr psp, r3
|
---|
| 362 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 363 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«MSPä¸ã«ç©ã */
|
---|
| 364 | mov r0, r3 /* æªå®ç¾©ã®å²è¾¼ã¿ãçºçããå ´åã®æ
|
---|
| 365 | å ±ã¨ãã */
|
---|
| 366 | b core_int_entry_2
|
---|
| 367 | ALABEL(core_int_entry_1) /* å¤éå²è¾¼ã¿ã®å ´å */
|
---|
| 368 | push {r0,lr} /* å²è¾¼ã¿çºçæã®å²è¾¼ã¿åªå
|
---|
| 369 | 度ãã¹ã¯(r0)ï¼EXC_RETURN(lr)ã®é ã«PSPä¸ã«ç©ã */
|
---|
| 370 | mov r0, sp /* æªå®ç¾©ã®å²è¾¼ã¿ãçºçããå ´åã®æ
|
---|
| 371 | å ±ã¨ãã */
|
---|
| 372 |
|
---|
| 373 | /*
|
---|
| 374 | * å
|
---|
| 375 | ±éå¦ç
|
---|
| 376 | */
|
---|
| 377 | ALABEL(core_int_entry_2)
|
---|
| 378 | mrs r3, ipsr /* ãã³ãã©ã¢ãã¬ã¹ãåå¾ */
|
---|
| 379 | ldr r1, =_kernel_exc_tbl
|
---|
| 380 | ldr r2, [r1, r3, lsl #2]
|
---|
| 381 |
|
---|
| 382 | /*
|
---|
| 383 | * basepriã®è¨å®
|
---|
| 384 | * NVICåªå
|
---|
| 385 | 度ãã¹ã¯ãèªåçã«è¨å®ãããããåªå
|
---|
| 386 | 度ãã¹ã¯ã®ç¹ã§ã¯å¿
|
---|
| 387 | è¦ãª
|
---|
| 388 | * ããï¼x_get_ipm()ãbasepriãåç
|
---|
| 389 | §ããããï¼basepriãæ´æ°ããï¼
|
---|
| 390 | */
|
---|
| 391 | ldr r1, =_kernel_int_iipm_tbl
|
---|
| 392 | ldr lr, [r1, r3, lsl #2]
|
---|
| 393 | msr basepri, lr
|
---|
| 394 |
|
---|
| 395 | #ifdef LOG_INH_ENTER
|
---|
| 396 | push {r0,r2,r3}
|
---|
| 397 | mov r0, r3 /* ä¾å¤çªå·ããã©ã¡ã¼ã¿ã« */
|
---|
| 398 | bl log_inh_enter /* log_exc_enterãå¼ã³åºã */
|
---|
| 399 | pop {r0,r2,r3}
|
---|
| 400 | #endif /* LOG_EXC_ENTER */
|
---|
| 401 |
|
---|
| 402 | #ifdef LOG_INH_LEAVE
|
---|
| 403 | push { r3 } /* ä¾å¤çªå·ãã¹ã¿ãã¯ã¸ */
|
---|
| 404 | #endif /* LOG_INT_LEAVE */
|
---|
| 405 |
|
---|
| 406 | /*
|
---|
| 407 | * å²è¾¼ã¿ãã³ãã©ã®å¼ã³åºã
|
---|
| 408 | */
|
---|
| 409 | blx r2
|
---|
| 410 |
|
---|
| 411 | #ifdef LOG_INH_LEAVE
|
---|
| 412 | pop {r0} /* ä¾å¤çªå·ãå¼æ°ã« */
|
---|
| 413 | bl log_exc_leave /* log_exc_leaveãå¼ã³åºã */
|
---|
| 414 | #endif /* LOG_INH_LEAVE */
|
---|
| 415 |
|
---|
| 416 | /*
|
---|
| 417 | * å²è¾¼ã¿/ä¾å¤åºå£
|
---|
| 418 | *
|
---|
| 419 | * ret_exc/ret_intã¯ï¼CPUä¾å¤/å²è¾¼ã¿ãã³ãã©ããæ»ã£ãç´å¾ã«å®è¡ãã
|
---|
| 420 | * ã«ã¼ãã³ã§ããï¼
|
---|
| 421 | */
|
---|
| 422 | ALABEL(ret_exc)
|
---|
| 423 | ALABEL(ret_int)
|
---|
| 424 | /*
|
---|
| 425 | * å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 426 | ã¨ããï¼ãã®æç¹ã§ã¯ï¼CPUããã¯ç¶æ
|
---|
| 427 | ã«ã¯ãªããªã
|
---|
| 428 | * ï¼basepriã¨lock_flagã¨saved_iipmã¯æ´æ°ããªãï¼ï¼
|
---|
| 429 | *
|
---|
| 430 | * å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 431 | ã¨ããã®ã¯ï¼æ»ãå
|
---|
| 432 | ã®ã³ã³ããã¹ãã®ãã§ãã¯ã¨ï¼
|
---|
| 433 | * æ»ãå
|
---|
| 434 | ãéã¿ã¹ã¯ã³ã³ããã¹ãã§ãã£ãå ´åã®ãªã¿ã¼ã³ãã¢ãããã¯
|
---|
| 435 | * ã«è¡ãããã§ããï¼bsepriãCPUããã¯ã®å¤ã«ãããã¨ã§ãã¢ããã
|
---|
| 436 | * ã¯ãªãã§ãã¯ã¨å¾©å¸°ã¯å¯è½ã§ãããï¼å²è¾¼ã¿ãããªã¿ã¼ã³ãã¦ãï¼
|
---|
| 437 | * basepri ã®è¨å®å
|
---|
| 438 | 容ã¯å
|
---|
| 439 | ã«æ»ããªãããï¼ä½¿ç¨ãããã¨ãã§ããªãï¼
|
---|
| 440 | * ä¸æ¹ï¼FAULTMASKã¯ï¼å²è¾¼ã¿ããã®ãªã¿ã¼ã³å¦çã«ãã£ã¦ï¼'0'ã«ã¯ãª
|
---|
| 441 | * ã¢ãããï¼
|
---|
| 442 | */
|
---|
| 443 | cpsid f
|
---|
| 444 |
|
---|
| 445 | /*
|
---|
| 446 | * æ»ãå
|
---|
| 447 | ã®ã³ã³ããã¹ãã®å¤å®
|
---|
| 448 | *
|
---|
| 449 | * å²è¾¼ã¿ãã³ãã©å®è¡ã«LRã«ã»ãããããEXC_RETURNããã§ãã¯ãã¦ï¼æ»ã
|
---|
| 450 | * å
|
---|
| 451 | ã§MSPã使ããã¦ããã°ï¼å²è¾¼ã¿å
|
---|
| 452 | ãéã¿ã¹ã¯ã³ã³ããã¹ãã¨å¤å®ããï¼
|
---|
| 453 | */
|
---|
| 454 | pop {r1,r3} /* å
|
---|
| 455 | ã®å²è¾¼ã¿åªå
|
---|
| 456 | 度ãã¹ã¯(basepri)ãr1ã¸ï¼EXC_RETURNãr3㸠*/
|
---|
| 457 | tst r3, #EXC_RETURN_PSP /* æ»ãå
|
---|
| 458 | ãPSPãªã ret_int_1 㸠*/
|
---|
| 459 | bne ret_int_1
|
---|
| 460 | b ret_int_2 /* ã®å¤ãMSPããåå¾ */
|
---|
| 461 |
|
---|
| 462 | /*
|
---|
| 463 | * ä¸æ®µç®ã®å²è¾¼ã¿ã®åºå£å¦ç
|
---|
| 464 | */
|
---|
| 465 | ALABEL(ret_int_1)
|
---|
| 466 | /*
|
---|
| 467 | * reqflgããã§ãã¯ãã
|
---|
| 468 | *
|
---|
| 469 | * ã«ã¼ãã«ç®¡çå
|
---|
| 470 | ã®å²è¾¼ã¿ã¯ç¦æ¢ããç¶æ
|
---|
| 471 | ã§å®è¡ããå¿
|
---|
| 472 | è¦ãããããï¼
|
---|
| 473 | * FAULTMASKã'1'ã«ããç¶æ
|
---|
| 474 | ã§å®è¡ããï¼
|
---|
| 475 | * reqflgããã§ãã¯ããåã«å²è¾¼ã¿ãç¦æ¢ããã®ã¯ï¼reqflgããã§ãã¯
|
---|
| 476 | * ããç´å¾ã«å²è¾¼ã¿ãã³ãã©ãèµ·åããï¼ãã®ä¸ã§ãã£ã¹ããããè¦æ±
|
---|
| 477 | * ãããå ´åã«ï¼ããã«ãã£ã¹ããããããªãã¨ããåé¡ãçãããã
|
---|
| 478 | * ã§ããï¼
|
---|
| 479 | */
|
---|
| 480 | ldr r0, =reqflg /* reqflgãfalseãªããã®ã¾ã¾æ»ã */
|
---|
| 481 | ldr r2, [r0]
|
---|
| 482 | cbnz r2, ret_int_3 /* trueãªãret_int_3㸠*/
|
---|
| 483 |
|
---|
| 484 | /*
|
---|
| 485 | * PSPä¸ããï¼EXC_RETURN(r0)ã¨å
|
---|
| 486 | ã®å²è¾¼ã¿åªå
|
---|
| 487 | 度ãã¹ã¯(basepri)åãåé¤
|
---|
| 488 | */
|
---|
| 489 | mrs r2, psp
|
---|
| 490 | add r2, r2, #(0x04*2)
|
---|
| 491 | msr psp, r2
|
---|
| 492 |
|
---|
| 493 | ALABEL(ret_int_2)
|
---|
| 494 | /*
|
---|
| 495 | * ããã«ã¯å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 496 | ï¼FAULTMASKãã»ããï¼ãããç¶æ
|
---|
| 497 | ã§æ¥ãï¼
|
---|
| 498 | * Threadã¢ã¼ãããã®ãªã¿ã¼ã³ã«ããèªåçã«å²è¾¼ã¿ããã¯è§£é¤ç¶æ
|
---|
| 499 | ã«ãªãï¼
|
---|
| 500 | * å²è¾¼ã¿åªå
|
---|
| 501 | 度ãã¹ã¯ã¯å²è¾¼ã¿åã«ç¶æ
|
---|
| 502 | ã«æ»ãï¼
|
---|
| 503 | */
|
---|
| 504 | msr basepri, r1 /* å²è¾¼ã¿åªå
|
---|
| 505 | 度ãã¹ã¯ãå²è¾¼ã¿åã®ç¶æ
|
---|
| 506 | 㸠*/
|
---|
| 507 | bx r3 /* ãªã¿ã¼ã³ */
|
---|
| 508 |
|
---|
| 509 | ALABEL(ret_int_3)
|
---|
| 510 | /*
|
---|
| 511 | * ããã§ã¯ï¼æ»ãå
|
---|
| 512 | ãã¿ã¹ã¯ã§ããï¼PSPä¸ã«ã¹ã¯ã©ããã¬ã¸ã¹ã¿ã¨å²
|
---|
| 513 | * è¾¼ã¿åªå
|
---|
| 514 | 度ãã¹ã¯(basepri)ãä¿åãããç¶æ
|
---|
| 515 | ã«ãªã£ã¦ããï¼ã¾ãï¼
|
---|
| 516 | * ããã»ããµã¯ï¼Handlerã¢ã¼ãã»å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 517 | ã¨ãªã£ã¦ããï¼
|
---|
| 518 | * ã¾ãï¼r0ã«ã¯ï¼reqflgã®ã¢ãã¬ã¹ï¼r3ã«ã¯å²è¾¼ã¿åä»æã®lrã®å¤ãä¿
|
---|
| 519 | * æããã¦ããï¼
|
---|
| 520 | */
|
---|
| 521 | /*
|
---|
| 522 | * ã¿ã¹ã¯ä¾å¤ãã³ãã©ããã£ã¹ããããããéã«Threadã¢ã¼ãã¸é·ç§»ãã
|
---|
| 523 | * ããã¼ã®ã¹ã¿ãã¯ãã¬ã¼ã ãä½æãã¦ï¼bxå½ä»¤ã§Handlerã¢ã¼ããããª
|
---|
| 524 | * ã¿ã¼ã³ããï¼ã¾ãï¼é
|
---|
| 525 | 延ãã£ã¹ãããããå ´åãï¼åã³å²ãè¾¼ãã ã¿ã¹
|
---|
| 526 | * ã¯ã«æ»ãéã«ã¯ï¼svcå½ä»¤ã§ï¼svc_handlerãå¼ã³åºãï¼
|
---|
| 527 | * ã¹ã¿ãã¯ãã¬ã¼ã ã¯ï¼Configureation and Control Register(CCR)ã®
|
---|
| 528 | * STKALIGNã'1'ã®å ´åã¯ï¼8byteå¢çã«ã¢ã©ã¤ã³ãããï¼
|
---|
| 529 | * åè : DDI0403B_arm_architecture_v7m_reference_manual(P.220)
|
---|
| 530 | * ãã®ããï¼ãã®æç¹ã®ã¹ã¿ãã¯ã¯å²è¾¼ã¿ãä¾å¤çºçæã«ä½æããã
|
---|
| 531 | * ã¹ã¿ãã¯ãã¬ã¼ã ããï¼8byteå¢çã®ãµã¤ãºã«ãã¦ããã¨ï¼svc_handler
|
---|
| 532 | * çã§ã¹ã¿ãã¯ãã¬ã¼ã ã®ã¢ã©ã¤ã¡ã³ãã®æç¡ã®ç¢ºèªãçç¥ã§ããï¼
|
---|
| 533 | * ãã ãï¼ã·ã¹ãã èµ·åå¾ã¯ï¼åçã«CCRã®STKALIGNã®è¨å®ãå¤æ´ããã®ã¯
|
---|
| 534 | * ç¦æ¢ã¨ããï¼
|
---|
| 535 | * ãã®æç¹ã¯æ¨æºã®ã¹ã¿ãã¯ãã¬ã¼ã ã¯ï¼å²è¾¼ã¿ã»ä¾å¤çºçæã¨åçã§ã
|
---|
| 536 | * ãããï¼ã¿ã¹ã¯ã¹ã¿ãã¯(PSP)ã¯8byteå¢çã«ãªã£ã¦ããï¼
|
---|
| 537 | */
|
---|
| 538 | mov r1, #0 /* reqflgãfalseã« */
|
---|
| 539 | str r1, [r0]
|
---|
| 540 |
|
---|
| 541 | /*
|
---|
| 542 | * CPUããã¯ç¶æ
|
---|
| 543 | ã«ç§»è¡ããï¼
|
---|
| 544 | *
|
---|
| 545 | * ã«ã¼ãã«ã®ç®¡çå
|
---|
| 546 | ã®å²è¾¼ã¿ãç¦æ¢ããããã«basepriãè¨å®ãï¼
|
---|
| 547 | * lock_flag 㨠saved_iipm ãæ´æ°ããï¼saved_iipmã¯ï¼æ»ãå
|
---|
| 548 | ã®å²è¾¼ã¿
|
---|
| 549 | * åªå
|
---|
| 550 | 度ãã¹ã¯ï¼ã®å
|
---|
| 551 | é¨è¡¨ç¾ï¼ã«è¨å®ããï¼
|
---|
| 552 | * ãã®æç¹ã§CPUããã¯ç¶æ
|
---|
| 553 | ã¨ããã®ã¯ï¼dispatcherã¸åå²ããæã¨ï¼
|
---|
| 554 | * call_texrtnãå¼ã³åºãæã«ï¼CPUããã¯ç¶æ
|
---|
| 555 | ã«ãªã£ã¦ããå¿
|
---|
| 556 | è¦ããã
|
---|
| 557 | * ããã§ããï¼
|
---|
| 558 | * ãªãï¼ãã®å¦çã®å¾ï¼Threadã¢ã¼ãã¸ã®ç§»è¡å¦çãè¡ãªãããï¼å²è¾¼ã¿
|
---|
| 559 | * ããã¯ç¶æ
|
---|
| 560 | (FAULTMASKã"1")ã¯ä¿æããï¼
|
---|
| 561 | */
|
---|
| 562 | ldr r1, =IIPM_LOCK /* CPUããã¯ç¶æ
|
---|
| 563 | */
|
---|
| 564 | msr basepri, r1
|
---|
| 565 | mov r1, #0x01 /* lock_flag ã trueã« */
|
---|
| 566 | ldr r0, =lock_flag
|
---|
| 567 | str r1, [r0]
|
---|
| 568 |
|
---|
| 569 | /*
|
---|
| 570 | * å²è¾¼ã¿åªå
|
---|
| 571 | 度ãã¹ã¯ãï¼å
|
---|
| 572 | ¨è§£é¤ç¶æ
|
---|
| 573 | ï¼TIPM_ENAALLï¼ã«è¨å®ãã
|
---|
| 574 | * ãã§ã«CPUããã¯ç¶æ
|
---|
| 575 | ãªã®ã§ï¼saved_iipmãIIPM_ENAALLã¨ããï¼
|
---|
| 576 | */
|
---|
| 577 | ldr r1, =IIPM_ENAALL
|
---|
| 578 | ldr r0, =saved_iipm
|
---|
| 579 | str r1, [r0]
|
---|
| 580 |
|
---|
| 581 | /*
|
---|
| 582 | * Threadã¢ã¼ãã¸ç§»è¡ããï¼
|
---|
| 583 | *
|
---|
| 584 | * dispatcherãcall_texrnãå¼ã³åºãå ´åã¯ï¼Threadã¢ã¼ãã§ããå¿
|
---|
| 585 |
|
---|
| 586 | * è¦ãããããï¼PSPã¹ã¿ãã¯ä¸ã«ããã¼ã®ä¾å¤ãã¬ã¼ã ãç½®ãã¦ï¼
|
---|
| 587 | * æ¬ä¼¼çã«å²è¾¼ã¿ãã³ãã©ãããªã¿ã¼ã³ããï¼
|
---|
| 588 | * ãªã¿ã¼ã³ã¨åæã«FAULTMASKãèªåçã«ã¯ãªã¢ããï¼ã«ã¼ãã«ç®¡çå¤ã®
|
---|
| 589 | * å²è¾¼ã¿ã許å¯ãããï¼
|
---|
| 590 | */
|
---|
| 591 | ldr r0, =ret_int_4 /* PC */
|
---|
| 592 | ldr r1, =EPSR_T /* xPSR(Tãããã'1'ã§ããå¿
|
---|
| 593 | è¦ããã) */
|
---|
| 594 | mrs r2, psp
|
---|
| 595 | stmfd r2!, {r0-r1} /* ããã¼ãã¬ã¼ã ãã¹ã¿ãã¯ä¸ã«ç©ã */
|
---|
| 596 | subs r2, #(EXC_FRAME_SIZE - (4*2)) /* r0-r3,r12,lrã®å
|
---|
| 597 | 容ã¯è¨å®ããå¿
|
---|
| 598 | è¦ããªã */
|
---|
| 599 | msr psp,r2
|
---|
| 600 | /* Basicãã¬ã¼ã ï¼THREADã¢ã¼ãï¼PSPã®ããã® EXC_RETURN */
|
---|
| 601 | mov r0, #(EXC_RETURN_TREAD_PSP|EXC_RETURN_OTHER|EXC_RETURN_FP_NONUSED)
|
---|
| 602 | bx r0 /* Threadã¢ã¼ãã¸ç§»è¡ */
|
---|
| 603 |
|
---|
| 604 | ALABEL(ret_int_4)
|
---|
| 605 | /*
|
---|
| 606 | * ä¸è¨ã®å¦çã«ããï¼Threadã¢ã¼ãã§å®è¡ãããï¼
|
---|
| 607 | * dspflgãfalseã§ããå ´åã¨ï¼p_runtskã¨p_schedtskãåãå ´åã«ã¯ï¼
|
---|
| 608 | * ãã£ã¹ããããè¡ããªãï¼ãã®ãã§ãã¯ãå¿
|
---|
| 609 | è¦ãªã®ã¯ï¼ã¿ã¹ã¯ä¾å¤å¦
|
---|
| 610 | * çã«ã¼ãã³ã®å¼åºããå¿
|
---|
| 611 | è¦ãªå ´åã«ï¼ãã£ã¹ããããå¿
|
---|
| 612 | è¦ãªãã¦ãï¼
|
---|
| 613 | * reqflgãtrueã«ããããã§ããï¼
|
---|
| 614 | */
|
---|
| 615 | ldr r0, =p_runtsk /* ãã£ã¹ããããè¡ããªãå ´åã§ãï¼r1ã«p_runtsk ã®å¤(TCB) */
|
---|
| 616 | ldr r1, [r0] /* ãå
|
---|
| 617 | ¥ã£ã¦ããå¿
|
---|
| 618 | è¦ãããã®ã§ï¼å
|
---|
| 619 | ã«èªã¿è¾¼ã */
|
---|
| 620 | ldr r0, =dspflg
|
---|
| 621 | ldr r2, [r0]
|
---|
| 622 | cbz r2, ret_int_r_1 /* dspflgãfalseãªãret_int_r_1㸠*/
|
---|
| 623 | ldr r0, =p_schedtsk
|
---|
| 624 | ldr r2, [r0]
|
---|
| 625 | cmp r1, r2 /* p_runtskã¨p_schedtskãåããªã */
|
---|
| 626 | beq ret_int_r_1 /* ret_int_r_1㸠*/
|
---|
| 627 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 628 | ldr r3, [sp,4] /* ãã£ã¹ãããå
|
---|
| 629 | ã®EXC_RETURNãåå¾ */
|
---|
| 630 | /*
|
---|
| 631 | * ãã£ã¹ãããå
|
---|
| 632 | ã®ã¿ã¹ã¯FPUã使ç¨ããå ´åã¯FPUã¬ã¸ã¹ã¿ãä¿å
|
---|
| 633 | */
|
---|
| 634 | tst r3, #EXC_RETURN_FP
|
---|
| 635 | bne ret_int_5 /* EXC_RETURN[4] == 1(FPUæªä½¿ç¨)ãªãã°ã¹ããã */
|
---|
| 636 | vpush {s16-s31} /* FPUã¬ã¸ã¹ã¿ã®ä¿å */
|
---|
| 637 | ALABEL(ret_int_5)
|
---|
| 638 | push {r3} /* æ»ãå
|
---|
| 639 | ã®EXC_RETURNãä¿å */
|
---|
| 640 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 641 | stmfd sp!, {r4-r11} /* æ®ãã®ã¬ã¸ã¹ã¿ãä¿å */
|
---|
| 642 | str sp, [r1,#TCB_sp] /* ã¿ã¹ã¯ã¹ã¿ãã¯ãä¿å */
|
---|
| 643 | ldr lr, =ret_int_r /* å®è¡åéçªå°ãä¿å */
|
---|
| 644 | str lr, [r1,#TCB_pc]
|
---|
| 645 | b dispatcher /* ãã£ã¹ãããã£ã¸ */
|
---|
| 646 |
|
---|
| 647 | /*
|
---|
| 648 | * å²è¾¼ã¿ã«ããããªã¨ã³ãããããã¿ã¹ã¯ã¸ã®ãªã¿ã¼ã³å¦ç
|
---|
| 649 | *
|
---|
| 650 | * Threadã¢ã¼ãã§ï¼ãã£ã¹ãããã£ãå²è¾¼ã¿ã®åºå£å¦çããå¼ã³åºãããï¼
|
---|
| 651 | * å²è¾¼ã¿ã«ããããªã¨ã³ãããããã¿ã¹ã¯ã¸ãªã¿ã¼ã³ããã«ã¯ï¼ãã£ãã
|
---|
| 652 | * Handlerã¢ã¼ãã«ç§»è¡ãï¼PCã«0xfffffffdã代å
|
---|
| 653 | ¥ãã¦ãªã¿ã¼ã³ããå¿
|
---|
| 654 | è¦
|
---|
| 655 | * ãããï¼ãã®ããï¼SVCã«ããï¼SVCãã³ãã©ãå¼ã³åºãï¼Handlerã¢ã¼
|
---|
| 656 | * ãã¸ç§»è¡ããï¼
|
---|
| 657 | */
|
---|
| 658 | ATHUMB(ret_int_r)
|
---|
| 659 | AGLOBAL(ret_int_r)
|
---|
| 660 | ALABEL(ret_int_r)
|
---|
| 661 | pop {r4-r11} /* ã¬ã¸ã¹ã¿ã®å¾©å¸° */
|
---|
| 662 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 663 | pop {r3} /* æ»ãå
|
---|
| 664 | ã®EXC_RETURNãåå¾ */
|
---|
| 665 | /*
|
---|
| 666 | * ãã£ã¹ãããå
|
---|
| 667 | ã®ã¿ã¹ã¯FPUã使ç¨ããå ´åã¯FPUã¬ã¸ã¹ã¿ã復帰
|
---|
| 668 | */
|
---|
| 669 | tst r3, #EXC_RETURN_FP
|
---|
| 670 | bne ret_int_r_1 /* EXC_RETURN[4] == 1(FPUæªä½¿ç¨)ãªãã°ã¹ããã */
|
---|
| 671 | vpop {s16-s31} /* FPUã¬ã¸ã¹ã¿ã®å¾©å¸° */
|
---|
| 672 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 673 | ALABEL(ret_int_r_1)
|
---|
| 674 | /*
|
---|
| 675 | * enatexãtrueã§ï¼texptnã0ã§ãªããã°ï¼ã¿ã¹ã¯ä¾å¤å¦çã«ã¼ãã³ã
|
---|
| 676 | * å¼ã³åºãï¼
|
---|
| 677 | * dispatcherããå¼ã³åºãããããï¼TCBã®ã¢ãã¬ã¹ã¯r1ã«å
|
---|
| 678 | ¥ã£ã¦ãã
|
---|
| 679 | */
|
---|
| 680 | ldrb r0, [r1,#TCB_enatex]
|
---|
| 681 | tst r0, #TCB_enatex_mask
|
---|
| 682 | beq ret_int_r_2 /* enatex ã false ãªã ret_int_r_2㸠*/
|
---|
| 683 | ldr r0, [r1,#TCB_texptn] /* texptn ã 0 ãªããªã¿ã¼ã³ */
|
---|
| 684 | cbz r0, ret_int_r_2
|
---|
| 685 | ldr r1, =ipmflg /* ipmflgã false ãªããªã¿ã¼ã³ */
|
---|
| 686 | ldr r0, [r1]
|
---|
| 687 | cbz r0, ret_int_r_2
|
---|
| 688 | #ifdef TOPPERS_FPU_LAZYSTACKING
|
---|
| 689 | /*
|
---|
| 690 | * Lazy Stacking ã㤠å²è¾¼ã¿ã®åºå£å¦çããã®åå²ã§æ¥ãå ´åã¯
|
---|
| 691 | * ããã§FPUå½ä»¤ãå®è¡ãã¦ä¾å¤ãã¬ã¼ã ã«FPUã®ã³ã³ããã¹ããæ¸ãæ»ãå¿
|
---|
| 692 | è¦ããã
|
---|
| 693 | * ä»ã®ç¶æ³ã§ã¯å¿
|
---|
| 694 | è¦ãªããï¼å¤æãå°é£ãªããä¸å¾å®è¡ããï¼
|
---|
| 695 | */
|
---|
| 696 | vmov r3, s15
|
---|
| 697 | #endif /* TOPPERS_FPU_LAZYSTACKING */
|
---|
| 698 | bl call_texrtn /* ã¿ã¹ã¯ä¾å¤ã«ã¼ãã³ã®å¼ã³åºã */
|
---|
| 699 | ALABEL(ret_int_r_2)
|
---|
| 700 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 701 | /*
|
---|
| 702 | * SVCã®å®è¡ã§FPUã³ã³ããã¹ããã¹ã¿ãã¯ã«ç©ã¾ãªãããã«
|
---|
| 703 | * CONTROL.FPCAãã¯ãªã¢
|
---|
| 704 | */
|
---|
| 705 | mrs r3, control
|
---|
| 706 | bic r3, r3, #CONTROL_FPCA
|
---|
| 707 | msr control, r3
|
---|
| 708 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 709 | svc 0 /* SVCã®å¼ã³åºã */
|
---|
| 710 |
|
---|
| 711 | /*
|
---|
| 712 | * SVCãã³ãã©
|
---|
| 713 | */
|
---|
| 714 | ATHUMB(svc_handler)
|
---|
| 715 | AGLOBAL(svc_handler)
|
---|
| 716 | ALABEL(svc_handler)
|
---|
| 717 | /*
|
---|
| 718 | * å²è¾¼ã¿å¦çããã®ãªã¿ã¼ã³ã«ããï¼CPUããã¯è§£é¤ç¶æ
|
---|
| 719 | ã«ç§»è¡ããã
|
---|
| 720 | * ãæºåããï¼
|
---|
| 721 | */
|
---|
| 722 | cpsid f /* å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 723 | 㸠*/
|
---|
| 724 | mrs r0, psp
|
---|
| 725 | adds r0, #EXC_FRAME_SIZE /* ã¹ã¿ãã¯ãæ¨ã¦ã */
|
---|
| 726 | ldmfd r0!,{r1,lr} /* EXC_RETURNã¯ï¼FPU使ç¨æã»æªä½¿ç¨æã§ç°ãªãããã¹ã¿ãã¯ããåå¾ */
|
---|
| 727 | msr psp, r0
|
---|
| 728 | mov r0, #0
|
---|
| 729 | ldr r1, =lock_flag /* CPUããã¯è§£é¤ç¶æ
|
---|
| 730 | 㸠*/
|
---|
| 731 | str r0, [r1]
|
---|
| 732 | ldr r1, =IIPM_ENAALL /* å²è¾¼ã¿åªå
|
---|
| 733 | 度ãã¹ã¯ãå
|
---|
| 734 | ¨è§£é¤ç¶æ
|
---|
| 735 | ã«è¨å® */
|
---|
| 736 | msr basepri, r1
|
---|
| 737 | bx lr /* ãªã¿ã¼ã³ */
|
---|
| 738 |
|
---|
| 739 | /*
|
---|
| 740 | * ãã£ã¹ãããã£ã®åä½éå§
|
---|
| 741 | */
|
---|
| 742 | ATHUMB(start_dispatch)
|
---|
| 743 | AGLOBAL(start_dispatch)
|
---|
| 744 | ALABEL(start_dispatch)
|
---|
| 745 | /*
|
---|
| 746 | * ãã®ã«ã¼ãã³ã¯ï¼ã«ã¼ãã«èµ·åæã«ï¼ãã¹ã¦ã®å²è¾¼ã¿ãç¦æ¢ããç¶æ
|
---|
| 747 |
|
---|
| 748 | * ï¼å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 749 | ã¨åçï¼ã§å¼ã³åºãããï¼ã¾ãï¼å²è¾¼ã¿ã¢ã¼ãï¼é
|
---|
| 750 | * ã¿ã¹ã¯ã³ã³ããã¹ãã¨åçï¼ã§å¼ã³åºããããã¨ãæ³å®ãã¦ããï¼
|
---|
| 751 | *
|
---|
| 752 | * core_initializeã§ï¼lock_flagãtrueã«ï¼saved_iipmãIIPM_ENAALLã«
|
---|
| 753 | * åæåãã¦ããããï¼ã«ã¼ãã«ç®¡çå¤ã®å²è¾¼ã¿ã許å¯ãããã¨ã§ï¼
|
---|
| 754 | * CPUããã¯ç¶æ
|
---|
| 755 | ã»ï¼ã¢ãã«ä¸ã®ï¼å²è¾¼ã¿åªå
|
---|
| 756 | 度ãã¹ã¯å
|
---|
| 757 | ¨è§£é¤ç¶æ
|
---|
| 758 | ã«ãªãï¼
|
---|
| 759 | * ã¾ãï¼task_initializeã§disdspãfalseã«åæåãã¦ããããï¼ãã£
|
---|
| 760 | * ã¹ããã許å¯ç¶æ
|
---|
| 761 | ã«ãªã£ã¦ããï¼
|
---|
| 762 | */
|
---|
| 763 | ldr r0,=istkpt /* MSPãåæå */
|
---|
| 764 | ldr r1,[r0] /* start_dispatchå¼ã³åºãæã«å¼ã³åºãç¨ã« */
|
---|
| 765 | msr msp, r1 /* 使ç¨ãã¦ããããåæåãã */
|
---|
| 766 | ldr r1, =IIPM_LOCK /* ã«ã¼ãã«ç®¡çå
|
---|
| 767 | ã®å²è¾¼ã¿ãç¦æ¢ */
|
---|
| 768 | msr basepri, r1
|
---|
| 769 | cpsie f /* ã«ã¼ãã«ç®¡çå¤ã®å²è¾¼ã¿ãè¨±å¯ */
|
---|
| 770 | mov r0, #CONTROL_PSP /* PSPãæå¹ã« */
|
---|
| 771 | msr control, r0
|
---|
| 772 | isb /* control ã®æä½å¾ã«å¿
|
---|
| 773 | è¦ */
|
---|
| 774 |
|
---|
| 775 | /*
|
---|
| 776 | * ç¾å¨ã®ã³ã³ããã¹ããæ¨ã¦ã¦ãã£ã¹ããã
|
---|
| 777 | */
|
---|
| 778 | ATHUMB(exit_and_dispatch)
|
---|
| 779 | AGLOBAL(exit_and_dispatch)
|
---|
| 780 | ALABEL(exit_and_dispatch)
|
---|
| 781 | /* ãã£ã¹ãããã£æ¬ä½ï¼dispatcherï¼ã¸ */
|
---|
| 782 |
|
---|
| 783 | /*
|
---|
| 784 | * ãã£ã¹ãããã£æ¬ä½
|
---|
| 785 | */
|
---|
| 786 | ALABEL(dispatcher)
|
---|
| 787 | /*
|
---|
| 788 | * ãã®ã«ã¼ãã³ã¯ï¼ã¿ã¹ã¯ã³ã³ããã¹ãã»CPUããã¯ç¶æ
|
---|
| 789 | ã»ãã£ã¹ããã
|
---|
| 790 | * 許å¯ç¶æ
|
---|
| 791 | ã»ï¼ã¢ãã«ä¸ã®ï¼å²è¾¼ã¿åªå
|
---|
| 792 | 度ãã¹ã¯å
|
---|
| 793 | ¨è§£é¤ç¶æ
|
---|
| 794 | ã§å¼ã³åºã
|
---|
| 795 | * ããï¼
|
---|
| 796 | *
|
---|
| 797 | * ããªãã¡ï¼Threadã¢ã¼ãã»lock_flagãtrueã»disdspãfalseã»dspflg
|
---|
| 798 | * ãtrueã»saved_iipmãIIPM_ENAALLã¨ãªã£ã¦ããï¼å®è¡åéçªå°ã¸ãã
|
---|
| 799 | * ã®ç¶æ
|
---|
| 800 | ã®ã¾ã¾åå²ããï¼
|
---|
| 801 | */
|
---|
| 802 | #ifdef TOPPERS_FPU_CONTEXT
|
---|
| 803 | mrs r3, control /* ãã£ã¹ãããã£å®è¡æã¯FPCAãä¸å¾ã¯ãªã¢ãã */
|
---|
| 804 | bic r3, r3, #CONTROL_FPCA
|
---|
| 805 | msr control, r3
|
---|
| 806 | #endif /* TOPPERS_FPU_CONTEXT */
|
---|
| 807 | #ifdef LOG_DSP_ENTER
|
---|
| 808 | ldr r1, =p_runtsk /* p_runtskããã©ã¡ã¼ã¿ã« */
|
---|
| 809 | ldr r0, [r1]
|
---|
| 810 | bl log_dsp_enter
|
---|
| 811 | #endif /* LOG_DSP_ENTER */
|
---|
| 812 | ALABEL(dispatcher_0)
|
---|
| 813 | ldr r0, =p_schedtsk /* p_schedtskãp_runtskã« */
|
---|
| 814 | ldr r1, [r0]
|
---|
| 815 | ldr r2, =p_runtsk
|
---|
| 816 | str r1, [r2]
|
---|
| 817 | cbz r1, dispatcher_1 /* p_runtskãNULLãªãdispatcher_1㸠*/
|
---|
| 818 | ldr sp, [r1,#TCB_sp] /* ã¿ã¹ã¯ã¹ã¿ãã¯ã復帰 */
|
---|
| 819 | #ifdef LOG_DSP_LEAVE
|
---|
| 820 | mov r0, r1 /* p_runtskããã©ã¡ã¼ã¿ã« */
|
---|
| 821 | mov r4, r1 /* r1ã¯ã¹ã¯ã©ããã¬ã¸ã¹ã¿ãªã®ã§ä¿å */
|
---|
| 822 | bl log_dsp_leave
|
---|
| 823 | mov r1, r4
|
---|
| 824 | #endif /* LOG_DSP_LEAVE */
|
---|
| 825 | ldr pc, [r1,#TCB_pc] /* å®è¡åéçªå°ã復帰 */
|
---|
| 826 | ALABEL(dispatcher_1)
|
---|
| 827 | /*
|
---|
| 828 | * CPUããã¯ç¶æ
|
---|
| 829 | ã®è§£é¤ã¨ï¼éã¿ã¹ã¯ã³ã³ããã¹ãå®è¡ç¶æ
|
---|
| 830 | ã¸ã®
|
---|
| 831 | * æºåããã
|
---|
| 832 | */
|
---|
| 833 | mov r0, #CONTROL_MSP /* MSPãæå¹ã« */
|
---|
| 834 | msr control, r0
|
---|
| 835 | isb /* control ã®æä½å¾ã«å¿
|
---|
| 836 | è¦ */
|
---|
| 837 | mov r4, #0 /* r4 <- '0' */
|
---|
| 838 | ldr r5, =IIPM_LOCK /* r5 <- å²è¾¼ã¿ããã¯ç¶æ
|
---|
| 839 | ã®å²è¾¼ã¿åªå
|
---|
| 840 | 度ãã¹ã¯ã®å¤ */
|
---|
| 841 | ldr r6, =reqflg /* r6 <- reqflg */
|
---|
| 842 | ldr r7, =lock_flag /* r7 <- lock_flg */
|
---|
| 843 | str r4, [r7] /* CPUããã¯è§£é¤ç¶æ
|
---|
| 844 | 㸠*/
|
---|
| 845 | ALABEL(dispatcher_2)
|
---|
| 846 | /*
|
---|
| 847 | * å²è¾¼ã¿ã許å¯ãï¼éã¿ã¹ã¯ã³ã³ããã¹ãå®è¡ç¶æ
|
---|
| 848 | ã¨ãå²è¾¼ã¿ãå¾
|
---|
| 849 | ã¤ï¼
|
---|
| 850 | *
|
---|
| 851 | * ããã§éã¿ã¹ã¯ã³ã³ããã¹ãå®è¡ç¶æ
|
---|
| 852 | ã«åãæããã®ã¯ï¼ããã§çºç
|
---|
| 853 | * ããå²è¾¼ã¿å¦çã«ã©ã®ã¹ã¿ãã¯ã使ããã¨ããåé¡ã®è§£æ±ºã¨ï¼å²è¾¼ã¿
|
---|
| 854 | * ãã³ãã©å
|
---|
| 855 | ã§ã®ã¿ã¹ã¯ãã£ã¹ãããã®é²æ¢ã¨ãã2ã¤ã®æå³ãããï¼
|
---|
| 856 | *
|
---|
| 857 | * ããã»ããµãå²è¾¼ã¿å¾
|
---|
| 858 | ã¡ã«ç§»è¡ãããå¦çã¨ï¼å²è¾¼ã¿è¨±å¯ã¨ã¯ï¼ä¸å¯
|
---|
| 859 | * åã«è¡ãªãå¿
|
---|
| 860 | è¦ãããï¼
|
---|
| 861 | * ãããä¸å¯åã«è¡ãªããªãå ´åï¼å²è¾¼ã¿ã許å¯ããç´å¾ã«å²è¾¼
|
---|
| 862 | * ã¿ãå
|
---|
| 863 | ¥ãï¼ãã®ä¸ã§ã¿ã¹ã¯ãå®è¡å¯è½ç¶æ
|
---|
| 864 | ã«ãªãã¨ï¼å®è¡ãã¹ãã¿ã¹
|
---|
| 865 | * ã¯ãããã«ããããããããã»ããµãå²è¾¼ã¿å¾
|
---|
| 866 | ã¡ã«ãªã£ã¦ãã¾ãï¼
|
---|
| 867 | * ARM-Mã§ã¯ï¼PRIMASKãã»ããããç¶æ
|
---|
| 868 | ã§WFIãå¼ã³åºããã¨ã§å®ç¾ã§ããï¼
|
---|
| 869 | * ãã®ç¶æ
|
---|
| 870 | ã§å²è¾¼ã¿ãå
|
---|
| 871 | ¥ãã¨ï¼å²è¾¼ã¿ã¯å®è¡ãããï¼WFIãããªã¿ã¼ã³ã
|
---|
| 872 | * ããã¨ã«ãªãã®ã§ï¼ä¸æ¦å²è¾¼ã¿ã許å¯ãã¦å²è¾¼ã¿ãã³ãã©ãå®è¡ããï¼
|
---|
| 873 | *
|
---|
| 874 | * å²è¾¼ã¿å¾
|
---|
| 875 | ã¡ã®éã¯ï¼p_runtskãNULLï¼ï¼0ï¼ã«è¨å®ããªããã°ãªããª
|
---|
| 876 | * ãï¼ãã®ããã«è¨å®ããªãã¨ï¼å²è¾¼ã¿ãã³ãã©ããiget_tidãå¼ã³åº
|
---|
| 877 | * ããéã®åä½ãä»æ§ã«åè´ããªããªãï¼
|
---|
| 878 | *
|
---|
| 879 | * ã¿ã¼ã²ããã«ãã£ã¦ã¯ï¼çé»åã¢ã¼ãçã«ç§»è¡ããããï¼æ¨æºã®æ¹æ³ã¨
|
---|
| 880 | * ç°ãªãæé ãå¿
|
---|
| 881 | è¦ãªå ´åãããï¼
|
---|
| 882 | * ãã®ãããªã¿ã¼ã²ããã§ã¯ï¼ã¿ã¼ã²ããä¾åã«ããã¦ï¼TOPPERS_CUSTOM_IDLE
|
---|
| 883 | * ãå®ç¾©ãï¼ã¢ã»ã³ãã©ãã¯ãã¨ãã¦ï¼toppers_asm_custom_idle ãç¨æ
|
---|
| 884 | * ããã°ããï¼
|
---|
| 885 | *
|
---|
| 886 | * ãªãï¼toppers_asm_custom_idle ã®è¨è¿°ã«ããã£ã¦ã¯ï¼æ¬¡ã®ã¬ã¸ã¹ã¿ã¯
|
---|
| 887 | * toppers_asm_custom_idleã®åå¾ã§ä½¿ç¨ããããï¼
|
---|
| 888 | * toppers_asm_custom_idle å
|
---|
| 889 | ã§ä½¿ç¨ããå ´åã¯ï¼åå¾ã§ä¿å復帰ãããã¨ï¼
|
---|
| 890 | * ãããã®ã¬ã¸ã¹ã¿ã¯ Calee saved ã¬ã¸ã¹ã¿ã§ããããï¼
|
---|
| 891 | * toppers_asm_custom_idle ã¨ãã¦é¢æ°å¼ã³åºããããå ´åã¯ï¼å¼ã³åºãã
|
---|
| 892 | * é¢æ°ã§èªåçã«ä¿å復帰ãããããï¼ã¢ã»ã³ãã©ã¬ãã«ã§ã®ä¿å復帰ã¯å¿
|
---|
| 893 |
|
---|
| 894 | * è¦ãªãï¼
|
---|
| 895 | *
|
---|
| 896 | * ã¬ã¸ã¹ã¿ : å
|
---|
| 897 | 容
|
---|
| 898 | * r4 : '0'
|
---|
| 899 | * r5 : 'IIPM_LOCK'
|
---|
| 900 | * r6 : reqflgã®ã¢ãã¬ã¹
|
---|
| 901 | * r7 : lock_flgã®ã¢ãã¬ã¹
|
---|
| 902 | * sp : éã¿ã¹ã¯ã³ã³ããã¹ãç¨ã®ã¹ã¿ãã¯ã®å
|
---|
| 903 | é ã¢ãã¬ã¹(msp)
|
---|
| 904 | */
|
---|
| 905 | #ifdef TOPPERS_CUSTOM_IDLE
|
---|
| 906 | toppers_asm_custom_idle
|
---|
| 907 | #else
|
---|
| 908 | cpsid i /* PRIMASK ãã»ãã */
|
---|
| 909 | msr basepri, r4 /* å
|
---|
| 910 | ¨å²è¾¼ã¿è¨±å¯ */
|
---|
| 911 | wfi
|
---|
| 912 | cpsie i /* PRIMASK ãã¯ãªã¢ï¼å²è¾¼ã¿ãåãä»ããï¼ */
|
---|
| 913 | msr basepri, r5 /* CPUããã¯ç¶æ
|
---|
| 914 | 㸠*/
|
---|
| 915 | #endif /* TOPPERS_CUSTOM_IDLE */
|
---|
| 916 |
|
---|
| 917 | ldr r0, [r6] /* reqflgãfalseãªãdispatcher_2㸠*/
|
---|
| 918 | cmp r0, #0
|
---|
| 919 | beq dispatcher_2
|
---|
| 920 | str r4, [r6] /* reqflgãfalseã« */
|
---|
| 921 |
|
---|
| 922 | /*
|
---|
| 923 | * CPUããã¯ç¶æ
|
---|
| 924 | ã«æ»ãï¼å²è¾¼ã¿å¾
|
---|
| 925 | ã¡ã®éã«å®è¡ããå²è¾¼ã¿ãã³ãã©ã«ã
|
---|
| 926 | * ãï¼saved_iipmãæ¸ãæããããå¯è½æ§ãããããï¼å
|
---|
| 927 | ã®å¤ã«æ»ãå¿
|
---|
| 928 |
|
---|
| 929 | * è¦ãããï¼dispatcherãå®è¡ãããæã¯ï¼saved_iipmãIIPM_ENAALL
|
---|
| 930 | * ã¨ãªã£ã¦ããããï¼ããã§ã¯saved_iipmãIIPM_ENAALLï¼ï¼0ï¼ã«æ»ã
|
---|
| 931 | * ã°ããï¼
|
---|
| 932 | */
|
---|
| 933 | mov r0, #CONTROL_PSP /* PSPãæå¹ã« */
|
---|
| 934 | msr control, r0
|
---|
| 935 | isb /* control ã®æä½å¾ã«å¿
|
---|
| 936 | è¦ */
|
---|
| 937 | mov r2, #1 /* lock_flagãtrue㸠*/
|
---|
| 938 | str r2, [r7]
|
---|
| 939 | ldr r0, =saved_iipm /* saved_iipm ã0ã« */
|
---|
| 940 | str r4, [r0]
|
---|
| 941 | b dispatcher_0
|
---|
| 942 |
|
---|
| 943 |
|
---|
| 944 | /*
|
---|
| 945 | * ã«ã¼ãã«ã®çµäºå¦çã®å¼åºã
|
---|
| 946 | *
|
---|
| 947 | * ã¹ã¿ãã¯ãéã¿ã¹ã¯ã³ã³ããã¹ãç¨ã«åãæ¿ãï¼
|
---|
| 948 | *
|
---|
| 949 | */
|
---|
| 950 | ATHUMB(call_exit_kernel)
|
---|
| 951 | AGLOBAL(call_exit_kernel)
|
---|
| 952 | ALABEL(call_exit_kernel)
|
---|
| 953 | mov r0, #CONTROL_MSP
|
---|
| 954 | msr control, r0 /* MSPãæå¹ã« */
|
---|
| 955 | isb /* control ã®æä½å¾ã«å¿
|
---|
| 956 | è¦ */
|
---|
| 957 | ldr r0, =exit_kernel /* ã«ã¼ãã«ã®çµäºå¦çãå¼ã¶ */
|
---|
| 958 | bx r0
|
---|
| 959 |
|
---|
| 960 |
|
---|
| 961 | /*
|
---|
| 962 | * ã¿ã¹ã¯èµ·åå¦ç
|
---|
| 963 | *
|
---|
| 964 | * dispatcherããå¼ã³åºãããããï¼TCBã®ã¢ãã¬ã¹ã¯r1ã«å
|
---|
| 965 | ¥ã£ã¦ãã
|
---|
| 966 | *
|
---|
| 967 | */
|
---|
| 968 | ATHUMB(start_r)
|
---|
| 969 | AGLOBAL(start_r)
|
---|
| 970 | ALABEL(start_r)
|
---|
| 971 | mov r0, #0
|
---|
| 972 | ldr r4, =lock_flag /* CPUããã¯è§£é¤ç¶æ
|
---|
| 973 | 㸠*/
|
---|
| 974 | str r0, [r4]
|
---|
| 975 | msr basepri, r0 /* å²è¾¼ã¿è¨±å¯ */
|
---|
| 976 | ldr lr, =ext_tsk /* æ»ãçªå°è¨å® */
|
---|
| 977 | ldr r2, [r1, #TCB_p_tinib] /* p_runtsk->p_tinibãr2ã« */
|
---|
| 978 | ldr r0, [r2, #TINIB_exinf] /* exinfãå¼æ°ã¬ã¸ã¹ã¿r0ã« */
|
---|
| 979 | ldr r1, [r2, #TINIB_task] /* ã¿ã¹ã¯èµ·åçªå°ã«ã¸ã£ã³ã */
|
---|
| 980 | bx r1
|
---|
| 981 |
|
---|
| 982 | /*
|
---|
| 983 | * å¾®å°æéå¾
|
---|
| 984 | ã¡
|
---|
| 985 | */
|
---|
| 986 | ABALIGN(4)
|
---|
| 987 | ATEXT
|
---|
| 988 | ATHUMB(sil_dly_nse)
|
---|
| 989 | AGLOBAL(sil_dly_nse)
|
---|
| 990 | ALABEL(sil_dly_nse)
|
---|
| 991 | subs r0, r0, #SIL_DLY_TIM1
|
---|
| 992 | cmp r0, #0
|
---|
| 993 | bgt sil_dly_nse1
|
---|
| 994 | bx lr
|
---|
| 995 | ALABEL(sil_dly_nse1)
|
---|
| 996 | subs r0, r0, #SIL_DLY_TIM2
|
---|
| 997 | cmp r0, #0
|
---|
| 998 | bgt sil_dly_nse1
|
---|
| 999 | bx lr
|
---|