| 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 | * Copyright (C) 2013 by Mitsuhiro Matsuura
|
|---|
| 11 | *
|
|---|
| 12 | * ãLì ÒÍCÈºÌ (1)`(4) Ìð©CFree Software Foundation
|
|---|
| 13 | * ÉæÁÄö\³êÄ¢é GNU General Public License Ì Version 2 ÉL
|
|---|
| 14 | * q³êÄ¢éðð½·êÉÀèC{\tgEFAi{\tgEFA
|
|---|
| 15 | * ðüϵ½àÌðÜÞDȺ¯¶jðgpE¡»EüÏEÄzziȺC
|
|---|
| 16 | * pÆÄÔj·é±Æð³Åø·éD
|
|---|
| 17 | * (1) {\tgEFAð\[XR[hÌ`Åp·éêÉÍCãLÌì
|
|---|
| 18 | * \¦C±Ìpð¨æѺL̳ÛØKèªC»ÌÜÜÌ`Å\[
|
|---|
| 19 | * XR[hÉÜÜêÄ¢é±ÆD
|
|---|
| 20 | * (2) {\tgEFAðCCu`®ÈÇC¼Ì\tgEFAJÉg
|
|---|
| 21 | * pÅ«é`ÅÄzz·éêÉÍCÄzzɺ¤hL
|
|---|
| 22 | gip
|
|---|
| 23 | * Ò}j
|
|---|
| 24 | AÈÇjÉCãLÌì \¦C±Ìpð¨æѺL
|
|---|
| 25 | * ̳ÛØKèðfÚ·é±ÆD
|
|---|
| 26 | * (3) {\tgEFAðC@íÉgÝÞÈÇC¼Ì\tgEFAJÉg
|
|---|
| 27 | * pÅ«È¢`ÅÄzz·éêÉÍCÌ¢¸ê©Ìðð½·±
|
|---|
| 28 | * ÆD
|
|---|
| 29 | * (a) Äzzɺ¤hL
|
|---|
| 30 | gipÒ}j
|
|---|
| 31 | AÈÇjÉCãLÌ
|
|---|
| 32 | * ì \¦C±Ìpð¨æѺL̳ÛØKèðfÚ·é±ÆD
|
|---|
| 33 | * (b) ÄzzÌ`ÔðCÊÉèßéû@ÉæÁÄCTOPPERSvWFNgÉ
|
|---|
| 34 | * ñ·é±ÆD
|
|---|
| 35 | * (4) {\tgEFAÌpÉæè¼ÚIܽÍÔÚIɶ¶é¢©Èé¹
|
|---|
| 36 | * Q©çàCãLì Ò¨æÑTOPPERSvWFNgðÆÓ·é±ÆD
|
|---|
| 37 | *
|
|---|
| 38 | * {\tgEFAÍC³ÛØÅñ³êÄ¢éàÌÅ éDãLì Ò¨
|
|---|
| 39 | * æÑTOPPERSvWFNgÍC{\tgEFAÉÖµÄC»ÌKpÂ\«à
|
|---|
| 40 | * ÜßÄC¢©ÈéÛØàsíÈ¢DܽC{\tgEFAÌpÉæè¼
|
|---|
| 41 | * ÚIܽÍÔÚIɶ¶½¢©Èé¹QÉÖµÄàC»ÌÓCðíÈ¢D
|
|---|
| 42 | *
|
|---|
| 43 | */
|
|---|
| 44 |
|
|---|
| 45 | /*
|
|---|
| 46 | * vZbT˶W
|
|---|
| 47 | [iRX630pj
|
|---|
| 48 | *
|
|---|
| 49 | * ±ÌCN[ht@CÍCtarget_config.hiܽÍC»±©çCN
|
|---|
| 50 | * [h³êét@CjÌÝ©çCN[h³êéD¼Ìt@C©ç
|
|---|
| 51 | * ¼ÚCN[hµÄÍÈçÈ¢D
|
|---|
| 52 | */
|
|---|
| 53 |
|
|---|
| 54 | #ifndef TOPPERS_PRC_CONFIG_H
|
|---|
| 55 | #define TOPPERS_PRC_CONFIG_H
|
|---|
| 56 |
|
|---|
| 57 | #ifndef TOPPERS_MACRO_ONLY
|
|---|
| 58 |
|
|---|
| 59 | /*
|
|---|
| 60 | * vZbTÌÁê½ßÌCCÖè`
|
|---|
| 61 | */
|
|---|
| 62 | #include "prc_insn.h"
|
|---|
| 63 |
|
|---|
| 64 |
|
|---|
| 65 | /*
|
|---|
| 66 | * ñ^XNReLXgpÌX^bNúl
|
|---|
| 67 | */
|
|---|
| 68 |
|
|---|
| 69 | //#define TOPPERS_ISTKPT( istk, istksz ) (( STK_T * )(( char * )( istk ) + ( istksz )))
|
|---|
| 70 | #define TOPPERS_ISTKPT( istk, istksz ) __secend("SI")
|
|---|
| 71 |
|
|---|
| 72 | /*
|
|---|
| 73 | * ^XNReLXgubNÌè`
|
|---|
| 74 | */
|
|---|
| 75 | typedef struct task_context_block {
|
|---|
| 76 | void *sp; /* X^bN|C^ */
|
|---|
| 77 | FP pc; /* vOJE^ */
|
|---|
| 78 | } TSKCTXB;
|
|---|
| 79 |
|
|---|
| 80 |
|
|---|
| 81 | /*
|
|---|
| 82 | * ݶñðÛ¶·éÏ
|
|---|
| 83 | */
|
|---|
| 84 | extern uint16_t intnest;
|
|---|
| 85 |
|
|---|
| 86 |
|
|---|
| 87 | /*
|
|---|
| 88 | * CPUbNóÔÅÌÝDæx}XN
|
|---|
| 89 | *
|
|---|
| 90 | * TIPM_LOCKÍCCPUbNóÔÅÌÝDæx}XNC·Èí¿CJ[l
|
|---|
| 91 | * ÇOÌàÌð·×ÄÌÝvð}XN·élÉè`·éD
|
|---|
| 92 | *
|
|---|
| 93 | * TMIN_INTPRIÏX·é±ÆÅÇOÝÌL³ðè·éD
|
|---|
| 94 | * á¦ÎTMIN_INTPRIð-14ÉÝè·éÆCx15ÌݪJ[lÇOÆ
|
|---|
| 95 | * ÈéDTMIN_INTPRIð-15ÉÝè·éÆCNMIÈOÉJ[lÇOÌÝð
|
|---|
| 96 | * ݯȢ±ÆÉÈéi±ÌêÉÍ-15ÉÝè·é±Æð§·éjD
|
|---|
| 97 | */
|
|---|
| 98 | #ifndef TIPM_LOCK
|
|---|
| 99 | #define TIPM_LOCK TMIN_INTPRI
|
|---|
| 100 | #endif /* TIPM_LOCK */
|
|---|
| 101 |
|
|---|
| 102 |
|
|---|
| 103 | /*
|
|---|
| 104 | * TOPPERSWÝfÌÀ»
|
|---|
| 105 | */
|
|---|
| 106 | /*
|
|---|
| 107 | * ReLXgÌQÆ
|
|---|
| 108 | *
|
|---|
| 109 | * RXÅÍCÝÌßèæª^XN©Ç¤©ð»f·é½ßÉ intnest
|
|---|
| 110 | * ðgpµÄ¢éD±êðp¢ÄReLXgð»f·éD
|
|---|
| 111 | */
|
|---|
| 112 | Inline bool_t
|
|---|
| 113 | sense_context( void )
|
|---|
| 114 | {
|
|---|
| 115 | /* lXgJE^0æèåÈçñ^XNReLXg */
|
|---|
| 116 | return ( intnest > 0U );
|
|---|
| 117 | }
|
|---|
| 118 |
|
|---|
| 119 |
|
|---|
| 120 | /*
|
|---|
| 121 | * CPUbNtOÀ»Ì½ßÌÏ
|
|---|
| 122 | *
|
|---|
| 123 | * ±êçÌÏÍCCPUbNóÔÌÌÝ«·¦Äæ¢àÌÆ·éD
|
|---|
| 124 | */
|
|---|
| 125 | #if TIPM_LOCK != -15
|
|---|
| 126 | extern bool_t lock_flag; /* CPUbNtOÌlðÛ·éÏ */
|
|---|
| 127 | extern uint32_t saved_ipl; /* ÝDæxxðÛ¶·éÏ */
|
|---|
| 128 | #endif /* TIPM_LOCK != -15 */
|
|---|
| 129 |
|
|---|
| 130 | #endif /* TOPPERS_MACRO_ONLY */
|
|---|
| 131 |
|
|---|
| 132 |
|
|---|
| 133 | /*
|
|---|
| 134 | * ÝDæx}XNÌO\»Æà\»ÌÏ·
|
|---|
| 135 | *
|
|---|
| 136 | * RX630ÅÍCvZbTXe[^X[hWX^iPSWj̺©ç
|
|---|
| 137 | * 24`27rbgÚÌ4rbgÉÝDæxxiIPLjªu©êÄ¢éD
|
|---|
| 138 | * J[lÇOÝðÀ·éêÉIPLðgpµ½§äðs¤D
|
|---|
| 139 | * J[lÍÝDæx}XNi-1©çA±µ½ÌljÅdzêÄ
|
|---|
| 140 | * ¢é½ßIPLÆÌÏ·ªKvÆÈéD
|
|---|
| 141 | */
|
|---|
| 142 | #define IPL_TO_IPM( ipl ) (-(( PRI )(( ipl ) >> 24U ))) /* IPLðIPMÉ */
|
|---|
| 143 | #define IPM_TO_IPL( ipm ) ((( uint32_t )(-( ipm ))) << 24U ) /* IPMðIPLÉ */
|
|---|
| 144 |
|
|---|
| 145 |
|
|---|
| 146 | /*
|
|---|
| 147 | * CPUbNóÔÅÌÝDæx}XNÌIPL
|
|---|
| 148 | */
|
|---|
| 149 | #define IPL_LOCK ( IPM_TO_IPL( TIPM_LOCK ) )
|
|---|
| 150 |
|
|---|
| 151 | /*
|
|---|
| 152 | * TIPM_ENAALLiÝDæx}XNSðjÌIPL
|
|---|
| 153 | */
|
|---|
| 154 | #define IPL_ENAALL ( IPM_TO_IPL( TIPM_ENAALL ) )
|
|---|
| 155 |
|
|---|
| 156 |
|
|---|
| 157 | #ifndef TOPPERS_MACRO_ONLY
|
|---|
| 158 |
|
|---|
| 159 | /*
|
|---|
| 160 | * ÝvöÌx & ®«è`e[u
|
|---|
| 161 | * (ev[gt@CÉæéoÍ)
|
|---|
| 162 | */
|
|---|
| 163 | typedef struct cfg_int_info {
|
|---|
| 164 | PRI intpri;
|
|---|
| 165 | ATR intatr;
|
|---|
| 166 | } CFG_INT_INFO;
|
|---|
| 167 |
|
|---|
| 168 | extern const CFG_INT_INFO cfg_int_table[];
|
|---|
| 169 |
|
|---|
| 170 |
|
|---|
| 171 | /*
|
|---|
| 172 | * ÝÔÌÍÍÌ»è
|
|---|
| 173 | *
|
|---|
| 174 | * ÝÔªLøÈl©µ§É`FbN·é½ß,
|
|---|
| 175 | * RtBM
|
|---|
| 176 | [^oÍe[uðQÆ·é.
|
|---|
| 177 | */
|
|---|
| 178 | #define VALID_INTNO( intno ) \
|
|---|
| 179 | ( cfg_int_table[( intno )].intpri > 0 )
|
|---|
| 180 | #define VALID_INTNO_DISINT( intno ) VALID_INTNO( intno )
|
|---|
| 181 | #define VALID_INTNO_CFGINT( intno ) VALID_INTNO( intno )
|
|---|
| 182 |
|
|---|
| 183 | /* cre_intÅLøÈÝÔÌwè */
|
|---|
| 184 | #define VALID_INTNO_CREINT VALID_INTNO_CFGINT((intno))
|
|---|
| 185 |
|
|---|
| 186 | /* cre_isrÅLøÈÝÔÌwè */
|
|---|
| 187 | #define VALID_INTNO_CREISR(intno) VALID_INTNO_CFGINT((intno))
|
|---|
| 188 |
|
|---|
| 189 |
|
|---|
| 190 | /*
|
|---|
| 191 | * ݧäWX^ÖAÌè`
|
|---|
| 192 | */
|
|---|
| 193 | #define IRQ_POSEDGE ( 0x08U )
|
|---|
| 194 | #define IRQ_NEGEDGE ( 0x04U )
|
|---|
| 195 | #define IRQ_BOTHEDGE ( 0x0CU )
|
|---|
| 196 | #define IRQ_LOWLEVEL ( 0x00U )
|
|---|
| 197 |
|
|---|
| 198 |
|
|---|
| 199 | /*
|
|---|
| 200 | * CPUbNóÔÖÌÚs
|
|---|
| 201 | *
|
|---|
| 202 | * IPMin[hEFAÌÝDæx}XNjðCsaved_iipmÉÛ¶µCJ[
|
|---|
| 203 | * lÇOÌàÌð·×ÄÌÝvð}XN·éliTIPM_LOCKj
|
|---|
| 204 | * ÉÝè·éDܽClock_flagðTRUEÉ·éD
|
|---|
| 205 | *
|
|---|
| 206 | * IPMªCÅ©çTIPM_LOCKƯ¶©»êæè¢êÉÍC»êð
|
|---|
| 207 | * saved_iipmÉÛ¶·éÌÝÅCTIPM_LOCKÉÍÝèµÈ¢D±êÍCf
|
|---|
| 208 | * ãÌÝDæx}XNªCTIPM_LOCKƯ¶©»êæè¢xÉÝè
|
|---|
| 209 | * ³êÄ¢éóÔÉ ½éD
|
|---|
| 210 | *
|
|---|
| 211 | * ±ÌÖÍCCPUbNóÔilock_flagªTRUEÌóÔjÅÄÎêé±ÆÍ
|
|---|
| 212 | * È¢àÌÆzèµÄ¢éD
|
|---|
| 213 | */
|
|---|
| 214 | Inline void
|
|---|
| 215 | x_lock_cpu( void )
|
|---|
| 216 | {
|
|---|
| 217 | #if TIPM_LOCK == -15
|
|---|
| 218 | disint();
|
|---|
| 219 | #else /* TIPM_LOCK == -15 */
|
|---|
| 220 | uint32_t ipl;
|
|---|
| 221 |
|
|---|
| 222 | /*
|
|---|
| 223 | * current_ipl()ÌÔèlð¼Úsaved_iplÉÛ¶¹¸CêÏipl
|
|---|
| 224 | * ðp¢Ä¢éÌÍCcurrent_ipl()ðÄñ¾¼ãÉݪ¶µC
|
|---|
| 225 | * N®³ê½ÝÅsaved_iplªÏX³êéÂ\«ª é½ßÅ
|
|---|
| 226 | * éD
|
|---|
| 227 | */
|
|---|
| 228 | ipl = current_ipl();
|
|---|
| 229 | if( IPL_LOCK > ipl ){
|
|---|
| 230 | set_ipl( IPL_LOCK );
|
|---|
| 231 | }
|
|---|
| 232 |
|
|---|
| 233 | saved_ipl = ipl;
|
|---|
| 234 | lock_flag = true;
|
|---|
| 235 | #endif /* TIPM_LOCK == -15 */
|
|---|
| 236 | }
|
|---|
| 237 |
|
|---|
| 238 | #define t_lock_cpu() x_lock_cpu()
|
|---|
| 239 | #define i_lock_cpu() x_lock_cpu()
|
|---|
| 240 |
|
|---|
| 241 |
|
|---|
| 242 | /*
|
|---|
| 243 | * CPUbNóÔÌð
|
|---|
| 244 | *
|
|---|
| 245 | * lock_flagðFALSEɵCIPMin[hEFAÌÝDæx}XNjðC
|
|---|
| 246 | * saved_iipmÉÛ¶µ½lÉß·D
|
|---|
| 247 | *
|
|---|
| 248 | * ±ÌÖÍCCPUbNóÔilock_flagªtrueÌóÔjÅÌÝÄÎêéà
|
|---|
| 249 | * ÌÆzèµÄ¢éD
|
|---|
| 250 | */
|
|---|
| 251 | Inline void
|
|---|
| 252 | x_unlock_cpu( void )
|
|---|
| 253 | {
|
|---|
| 254 | #if TIPM_LOCK == -15
|
|---|
| 255 | enaint();
|
|---|
| 256 | #else /* TIPM_LOCK == -15 */
|
|---|
| 257 | lock_flag = false;
|
|---|
| 258 | set_ipl( saved_ipl );
|
|---|
| 259 | #endif /* TIPM_LOCK == -15 */
|
|---|
| 260 | }
|
|---|
| 261 |
|
|---|
| 262 | #define t_unlock_cpu() x_unlock_cpu()
|
|---|
| 263 | #define i_unlock_cpu() x_unlock_cpu()
|
|---|
| 264 |
|
|---|
| 265 |
|
|---|
| 266 | /*
|
|---|
| 267 | * CPUbNóÔÌQÆ
|
|---|
| 268 | */
|
|---|
| 269 | Inline bool_t
|
|---|
| 270 | x_sense_lock( void )
|
|---|
| 271 | {
|
|---|
| 272 | #if TIPM_LOCK == -15
|
|---|
| 273 | return (( bool_t )(( current_psw() & PSW_I_MASK) == 0 ));
|
|---|
| 274 | #else /* TIPM_LOCK == -15 */
|
|---|
| 275 | return lock_flag;
|
|---|
| 276 | #endif /* TIPM_LOCK == -15 */
|
|---|
| 277 | }
|
|---|
| 278 |
|
|---|
| 279 | #define t_sense_lock() x_sense_lock()
|
|---|
| 280 | #define i_sense_lock() x_sense_lock()
|
|---|
| 281 |
|
|---|
| 282 |
|
|---|
| 283 | /*
|
|---|
| 284 | * ifãÌjÝDæx}XNÌÝè
|
|---|
| 285 | *
|
|---|
| 286 | * CPUbNtOªNA³êÄ¢éÍCn[hEFAÌÝDæx}
|
|---|
| 287 | * XNðÝè·éDCPUbNtOªZbg³êÄ¢éÍCsaved_iipm
|
|---|
| 288 | * ðÝèµC³çÉCn[hEFAÌÝDæx}XNðCÝèµæ¤Æ
|
|---|
| 289 | * µ½ifãÌjÝDæx}XNÆTIPM_LOCKÌ¢ûÉÝè·éD
|
|---|
| 290 | */
|
|---|
| 291 | Inline void
|
|---|
| 292 | x_set_ipm( PRI intpri )
|
|---|
| 293 | {
|
|---|
| 294 | uint32_t ipl = IPM_TO_IPL( intpri );
|
|---|
| 295 | #if TIPM_LOCK == -15
|
|---|
| 296 | set_ipl(ipl);
|
|---|
| 297 | #else /* TIPM_LOCK == -15 */
|
|---|
| 298 | if( !lock_flag ){
|
|---|
| 299 | set_ipl(ipl);
|
|---|
| 300 | }
|
|---|
| 301 | else {
|
|---|
| 302 | saved_ipl = ipl;
|
|---|
| 303 | set_ipl(ipl > IPL_LOCK ? ipl : IPL_LOCK);
|
|---|
| 304 | }
|
|---|
| 305 | #endif /* TIPM_LOCK == -15 */
|
|---|
| 306 | }
|
|---|
| 307 |
|
|---|
| 308 | #define t_set_ipm( intpri ) x_set_ipm( intpri )
|
|---|
| 309 | #define i_set_ipm( intpri ) x_set_ipm( intpri )
|
|---|
| 310 |
|
|---|
| 311 |
|
|---|
| 312 | /*
|
|---|
| 313 | * ifãÌjÝDæx}XNÌQÆ
|
|---|
| 314 | *
|
|---|
| 315 | * CPUbNtOªNA³êÄ¢éÍn[hEFAÌÝDæx}
|
|---|
| 316 | * XNðCZbg³êÄ¢éÍsaved_iipmðQÆ·éD
|
|---|
| 317 | */
|
|---|
| 318 | Inline PRI
|
|---|
| 319 | x_get_ipm( void )
|
|---|
| 320 | {
|
|---|
| 321 | uint32_t ipl;
|
|---|
| 322 | #if TIPM_LOCK == -15
|
|---|
| 323 | ipl = current_ipl();
|
|---|
| 324 | #else /* TIPM_LOCK == -15 */
|
|---|
| 325 | if (!lock_flag) {
|
|---|
| 326 | ipl = current_ipl();
|
|---|
| 327 | }
|
|---|
| 328 | else {
|
|---|
| 329 | ipl = saved_ipl;
|
|---|
| 330 | }
|
|---|
| 331 | #endif /* TIPM_LOCK == -15 */
|
|---|
| 332 | return IPL_TO_IPM( ipl );
|
|---|
| 333 | }
|
|---|
| 334 |
|
|---|
| 335 | #define t_get_ipm() x_get_ipm()
|
|---|
| 336 | #define i_get_ipm() x_get_ipm()
|
|---|
| 337 |
|
|---|
| 338 |
|
|---|
| 339 | /*
|
|---|
| 340 | * ÝvÖ~tOÌZbg
|
|---|
| 341 | *
|
|---|
| 342 | * Ý®«ªÝè³êĢȢÝvCÉεÄÝvÖ~
|
|---|
| 343 | * tOðZbgµæ¤Æµ½êÉÍCFALSEðÔ·D
|
|---|
| 344 | */
|
|---|
| 345 | Inline bool_t
|
|---|
| 346 | x_disable_int( INTNO intno )
|
|---|
| 347 | {
|
|---|
| 348 | /*
|
|---|
| 349 | * xè`ª0Å éêÍCFG_INT³êĢȢ
|
|---|
| 350 | */
|
|---|
| 351 | if( cfg_int_table[intno].intpri == 0 ){
|
|---|
| 352 | return ( false );
|
|---|
| 353 | }
|
|---|
| 354 |
|
|---|
| 355 | *ier_reg_addr[intno].addr &= ( ~ier_reg_addr[intno].offset );
|
|---|
| 356 |
|
|---|
| 357 | return ( true );
|
|---|
| 358 | }
|
|---|
| 359 |
|
|---|
| 360 | #define t_disable_int( intno ) x_disable_int( intno )
|
|---|
| 361 | #define i_disable_int( intno ) x_disable_int( intno )
|
|---|
| 362 |
|
|---|
| 363 |
|
|---|
| 364 | /*
|
|---|
| 365 | * ÝvÖ~tOÌNA
|
|---|
| 366 | *
|
|---|
| 367 | * Ý®«ªÝè³êĢȢÝvCÉεÄÝvÖ~
|
|---|
| 368 | * tOðNAµæ¤Æµ½êÉÍCFALSEðÔ·D
|
|---|
| 369 | */
|
|---|
| 370 | Inline bool_t
|
|---|
| 371 | x_enable_int( INTNO intno )
|
|---|
| 372 | {
|
|---|
| 373 | /*
|
|---|
| 374 | * xè`ª0Å éêÍCFG_INT³êĢȢ
|
|---|
| 375 | */
|
|---|
| 376 | if( cfg_int_table[intno].intpri == 0 ){
|
|---|
| 377 | return ( false );
|
|---|
| 378 | }
|
|---|
| 379 |
|
|---|
| 380 | *ier_reg_addr[intno].addr |= ier_reg_addr[intno].offset;
|
|---|
| 381 |
|
|---|
| 382 | return ( true );
|
|---|
| 383 | }
|
|---|
| 384 |
|
|---|
| 385 | #define t_enable_int( intno ) x_enable_int( intno )
|
|---|
| 386 | #define i_enable_int( intno ) x_enable_int( intno )
|
|---|
| 387 |
|
|---|
| 388 |
|
|---|
| 389 | /*
|
|---|
| 390 | * ÝvÌNA
|
|---|
| 391 | */
|
|---|
| 392 | Inline void
|
|---|
| 393 | x_clear_int( INTNO intno )
|
|---|
| 394 | {
|
|---|
| 395 | *IR_REG(intno) = 0U;
|
|---|
| 396 | }
|
|---|
| 397 |
|
|---|
| 398 | #define t_clear_int( intno ) x_clear_int( intno )
|
|---|
| 399 | #define i_clear_int( intno ) x_clear_int( intno )
|
|---|
| 400 |
|
|---|
| 401 |
|
|---|
| 402 | /*
|
|---|
| 403 | * ÝvÌ`FbN
|
|---|
| 404 | */
|
|---|
| 405 | Inline bool_t
|
|---|
| 406 | x_probe_int( INTNO intno )
|
|---|
| 407 | {
|
|---|
| 408 | /*
|
|---|
| 409 | * ÝvWX^Í0 or 1ŵ©È¢½ß,
|
|---|
| 410 | * »ÌÜÜÌlðÔ·.
|
|---|
| 411 | */
|
|---|
| 412 | return ( *IR_REG(intno) );
|
|---|
| 413 | }
|
|---|
| 414 |
|
|---|
| 415 | #define t_probe_int( intno ) x_probe_int( intno )
|
|---|
| 416 | #define i_probe_int( intno ) x_probe_int( intno )
|
|---|
| 417 |
|
|---|
| 418 |
|
|---|
| 419 | /*
|
|---|
| 420 | * ÝvCÌ®«ÌÝè
|
|---|
| 421 | */
|
|---|
| 422 | extern void x_config_int( INTNO intno, ATR intatr, PRI intpri );
|
|---|
| 423 |
|
|---|
| 424 |
|
|---|
| 425 | /*
|
|---|
| 426 | * ÝnhÌüûÅKvÈIRCì
|
|---|
| 427 | *
|
|---|
| 428 | */
|
|---|
| 429 | Inline void
|
|---|
| 430 | i_begin_int( INTNO intno )
|
|---|
| 431 | {
|
|---|
| 432 | volatile uint8_t reg;
|
|---|
| 433 |
|
|---|
| 434 | /*
|
|---|
| 435 | * xoÌÝÉεÄÍÝXe[^X
|
|---|
| 436 | * tOðNA·é.
|
|---|
| 437 | */
|
|---|
| 438 | if( ( cfg_int_table[intno].intatr & TA_LOWLEVEL ) > 0 ){
|
|---|
| 439 | if( *IR_REG(intno) > 0U ){
|
|---|
| 440 | /*
|
|---|
| 441 | * OÝÌê, IRQ[qªHighÉßÁÄ¢é
|
|---|
| 442 | * ±ÆðmF·é|ªLÚ³êÄ¢éª, Ȫ·é.
|
|---|
| 443 | */
|
|---|
| 444 | // *ir_reg_addr[intno] = 0U;
|
|---|
| 445 |
|
|---|
| 446 | /*
|
|---|
| 447 | * n[hEFA}j
|
|---|
| 448 | AÉ0ÉÈÁ½±Æð
|
|---|
| 449 | * mF·é|ªLÚ é½ß, WX^lðÇÝo·.
|
|---|
| 450 | */
|
|---|
| 451 | // reg = *ir_reg_addr[intno];
|
|---|
| 452 | }
|
|---|
| 453 | }
|
|---|
| 454 | }
|
|---|
| 455 |
|
|---|
| 456 |
|
|---|
| 457 | /*
|
|---|
| 458 | * ÝnhÌoûÅKvÈIRCì
|
|---|
| 459 | *
|
|---|
| 460 | */
|
|---|
| 461 | Inline void
|
|---|
| 462 | i_end_int( INTNO intno )
|
|---|
| 463 | {
|
|---|
| 464 | /* ÁÉs¤×«ÍÈ¢ */
|
|---|
| 465 | }
|
|---|
| 466 |
|
|---|
| 467 |
|
|---|
| 468 | /*
|
|---|
| 469 | * ÅDæÊ^XNÖÌfBXpb`iprc_support.a30j
|
|---|
| 470 | *
|
|---|
| 471 | * dispatchÍC^XNReLXg©çÄÑo³ê½T[rXR[©
|
|---|
| 472 | * çÄÑo·×«àÌÅC^XNReLXgECPUbNóÔEfBXpb
|
|---|
| 473 | * `ÂóÔEifãÌjÝDæx}XNSðóÔÅÄÑo³È
|
|---|
| 474 | * ¯êÎÈçÈ¢D
|
|---|
| 475 | */
|
|---|
| 476 | extern void dispatch( void );
|
|---|
| 477 |
|
|---|
| 478 | /*
|
|---|
| 479 | * fBXpb`Ì®ìJniprc_support.a30j
|
|---|
| 480 | *
|
|---|
| 481 | * start_dispatchÍCJ[lN®ÉÄÑo·×«àÌÅC·×ÄÌ
|
|---|
| 482 | * ÝðÖ~µ½óÔiSÝbNóÔƯÌóÔjÅÄÑo³È¯êÎ
|
|---|
| 483 | * ÈçÈ¢D
|
|---|
| 484 | */
|
|---|
| 485 | extern void start_dispatch( void ) NoReturn;
|
|---|
| 486 |
|
|---|
| 487 | /*
|
|---|
| 488 | * »ÝÌReLXgðÌÄÄfBXpb`iprc_support.a30j
|
|---|
| 489 | *
|
|---|
| 490 | * exit_and_dispatchÍCext_tsk©çÄÑo·×«àÌÅC^XNReL
|
|---|
| 491 | * XgECPUbNóÔEfBXpb`ÂóÔEifãÌjÝDæ
|
|---|
| 492 | * x}XNSðóÔÅÄÑo³È¯êÎÈçÈ¢D
|
|---|
| 493 | */
|
|---|
| 494 | #define _kernel_exit_and_dispatch(); \
|
|---|
| 495 | _exit_and_dispatch(); \
|
|---|
| 496 | ercd = E_SYS;
|
|---|
| 497 |
|
|---|
| 498 | extern void _exit_and_dispatch( void ) NoReturn;
|
|---|
| 499 |
|
|---|
| 500 | /*
|
|---|
| 501 | * J[lÌI¹ÌÄoµiprc_support.a30j
|
|---|
| 502 | *
|
|---|
| 503 | * call_exit_kernelÍCJ[lÌI¹ÉÄÑo·×«àÌÅCñ^XN
|
|---|
| 504 | * ReLXgÉØè·¦ÄCJ[lÌI¹iexit_kerneljðÄÑo
|
|---|
| 505 | * ·D
|
|---|
| 506 | */
|
|---|
| 507 | extern void call_exit_kernel( void ) NoReturn;
|
|---|
| 508 |
|
|---|
| 509 | /*
|
|---|
| 510 | * ^XNReLXgÌú»
|
|---|
| 511 | *
|
|---|
| 512 | * ^XNªx~óÔ©çÀsÅ«éóÔÉÚs·éÉÄÎêéD±Ì_
|
|---|
| 513 | * ÅX^bNÌæðgÁÄÍÈçÈ¢D
|
|---|
| 514 | *
|
|---|
| 515 | * activate_contextðCCCÖÅÍÈ}Nè`ƵĢéÌÍC
|
|---|
| 516 | * ±Ì_ÅÍTCBªè`³êĢȢ½ßÅ éD
|
|---|
| 517 | */
|
|---|
| 518 | extern void start_r( void );
|
|---|
| 519 |
|
|---|
| 520 | #define activate_context( p_tcb ) \
|
|---|
| 521 | { \
|
|---|
| 522 | { \
|
|---|
| 523 | \
|
|---|
| 524 | /* X^bN|C^úlÌÝè */ \
|
|---|
| 525 | ( p_tcb )->tskctxb.sp = ( void * )((( uint32_t ) ( p_tcb )->p_tinib->stk ) + \
|
|---|
| 526 | ( p_tcb )->p_tinib->stksz ); \
|
|---|
| 527 | /* N®ÔnÌÝè */ \
|
|---|
| 528 | ( p_tcb )->tskctxb.pc = ( FP ) start_r; \
|
|---|
| 529 | } \
|
|---|
| 530 | }
|
|---|
| 531 |
|
|---|
| 532 |
|
|---|
| 533 | /*
|
|---|
| 534 | * calltexÍgpµÈ¢
|
|---|
| 535 | */
|
|---|
| 536 | #define OMIT_CALLTEX
|
|---|
| 537 |
|
|---|
| 538 |
|
|---|
| 539 | /*
|
|---|
| 540 | * ÝnhÌÝè
|
|---|
| 541 | *
|
|---|
| 542 | * RX630ÍROMÉÝxN^ðzu·é½ßC{ÖÍóÖÅÀ·éD
|
|---|
| 543 | */
|
|---|
| 544 | Inline void
|
|---|
| 545 | x_define_inh( INHNO inhno, FP inthdr )
|
|---|
| 546 | {
|
|---|
| 547 | }
|
|---|
| 548 |
|
|---|
| 549 |
|
|---|
| 550 | /*
|
|---|
| 551 | * CPUáOnhÌÝè
|
|---|
| 552 | *
|
|---|
| 553 | * RX630ÍROMÉáOxN^ðzu·é½ßC{ÖÍóÖÅÀ·éD
|
|---|
| 554 | */
|
|---|
| 555 | Inline void
|
|---|
| 556 | x_define_exc( EXCNO excno, FP exchdr )
|
|---|
| 557 | {
|
|---|
| 558 | }
|
|---|
| 559 |
|
|---|
| 560 |
|
|---|
| 561 | /*
|
|---|
| 562 | * Ý/áOnhÌüû̶¬}N
|
|---|
| 563 | *
|
|---|
| 564 | * ev[gt@CÉæ趬·é½ßó}NÆ·éD
|
|---|
| 565 | */
|
|---|
| 566 | #define HDR_ENTRY(hdr, intexc_num , tobejmp)
|
|---|
| 567 |
|
|---|
| 568 | /*
|
|---|
| 569 | * ÝnhÌüû̶¬}N
|
|---|
| 570 | */
|
|---|
| 571 | #define _INT_ENTRY(inhno, inthdr) _kernel_##inthdr##_##inhno##_entry
|
|---|
| 572 | #define INT_ENTRY(inhno, inthdr) _INT_ENTRY(inhno , inthdr)
|
|---|
| 573 |
|
|---|
| 574 | #define _INTHDR_ENTRY(inhno, inhno_num ,inthdr) \
|
|---|
| 575 | extern _kernel_##inthdr##_##inhno##_entry(void);
|
|---|
| 576 | #define INTHDR_ENTRY(inhno, inhno_num ,inthdr) _INTHDR_ENTRY(inhno, inhno_num ,inthdr)
|
|---|
| 577 |
|
|---|
| 578 |
|
|---|
| 579 | /*
|
|---|
| 580 | * CPUáOnhÌüû̶¬}N
|
|---|
| 581 | */
|
|---|
| 582 | #define _EXC_ENTRY(excno , exchdr) _kernel_##exchdr##_##excno##_entry
|
|---|
| 583 | #define EXC_ENTRY(excno , exchdr) _EXC_ENTRY(excno , exchdr)
|
|---|
| 584 |
|
|---|
| 585 | #define _EXCHDR_ENTRY(excno , excno_num , exchdr) \
|
|---|
| 586 | extern _kernel_##exchdr##_##excno##_entry(void);
|
|---|
| 587 | #define EXCHDR_ENTRY(excno , excno_num , exchdr) _EXCHDR_ENTRY(excno , excno_num , exchdr)
|
|---|
| 588 |
|
|---|
| 589 |
|
|---|
| 590 | /*
|
|---|
| 591 | * CPUáO̶µ½ÌReLXgÌQÆ
|
|---|
| 592 | *
|
|---|
| 593 | * CPUáO̶µ½ÌReLXgªC^XNReLXgÌÉFALSEC
|
|---|
| 594 | * »¤ÅÈ¢ÉtrueðÔ·D
|
|---|
| 595 | */
|
|---|
| 596 | Inline bool_t
|
|---|
| 597 | exc_sense_context( void *p_excinf )
|
|---|
| 598 | {
|
|---|
| 599 | /*
|
|---|
| 600 | * lXgJE^ª1æèåÈçñ^XNReLXg
|
|---|
| 601 | */
|
|---|
| 602 | return( intnest > 1U );
|
|---|
| 603 | }
|
|---|
| 604 |
|
|---|
| 605 |
|
|---|
| 606 | /*
|
|---|
| 607 | * CPUáOîñ p_excinf ©ç PSW Ìlðæ¾·é½ßÌItZbgl
|
|---|
| 608 | * EXCNO + ACC + FPSW + R1`R15 + PC
|
|---|
| 609 | */
|
|---|
| 610 | #define EXC_GET_PSW_OFFSET (4+8+4+60+4)
|
|---|
| 611 |
|
|---|
| 612 | /*
|
|---|
| 613 | * CPUáO̶µ½ÌIPLÌQÆ
|
|---|
| 614 | */
|
|---|
| 615 | Inline uint32_t
|
|---|
| 616 | exc_get_ipl(void *p_excinf)
|
|---|
| 617 | {
|
|---|
| 618 | return((*((uint32_t *)((uintptr_t)p_excinf+EXC_GET_PSW_OFFSET)))
|
|---|
| 619 | & PSW_IPL_MASK);
|
|---|
| 620 | }
|
|---|
| 621 |
|
|---|
| 622 | Inline bool_t
|
|---|
| 623 | exc_sense_i(void *p_excinf)
|
|---|
| 624 | {
|
|---|
| 625 | return((*(((uint32_t *)((uintptr_t)p_excinf+EXC_GET_PSW_OFFSET)))
|
|---|
| 626 | & PSW_I_MASK) != 0u);
|
|---|
| 627 | }
|
|---|
| 628 |
|
|---|
| 629 |
|
|---|
| 630 | /*
|
|---|
| 631 | * CPUáO̶µ½ÌReLXgÆÝÌ}XNóÔÌQÆ
|
|---|
| 632 | *
|
|---|
| 633 | * CPUáO̶µ½ÌVXeóÔªCJ[lÀsÅÈC^XNR
|
|---|
| 634 | * eLXgÅ èCSÝbNóÔÅÈCCPUbNóÔÅÈCi
|
|---|
| 635 | * fãÌjÝDæx}XNSðóÔÅ éÉtrueC»¤ÅÈ¢
|
|---|
| 636 | * ÉFALSEðÔ·iCPUáOªJ[lÇOÌÝŶµ½ê
|
|---|
| 637 | * ÉàFALSEðÔ·jD
|
|---|
| 638 | *
|
|---|
| 639 | * J[lÀsÅÈ¢¨ (TIPM_LOCK== -15) ItO == 1
|
|---|
| 640 | * (else) IPL < IPL_LOCK
|
|---|
| 641 | * ^XNReLXgÅ é¨intnest == 0
|
|---|
| 642 | * SÝbNÅÈ¢¨ ItO == 1
|
|---|
| 643 | * ÝDæx}XNªSð¨IPL == 0
|
|---|
| 644 | *
|
|---|
| 645 | *
|
|---|
| 646 | */
|
|---|
| 647 | Inline bool_t
|
|---|
| 648 | exc_sense_intmask(void *p_excinf)
|
|---|
| 649 | {
|
|---|
| 650 | return((!exc_sense_context(p_excinf))
|
|---|
| 651 | && exc_sense_i(p_excinf)
|
|---|
| 652 | && (exc_get_ipl(p_excinf) == IPL_ENAALL));
|
|---|
| 653 | }
|
|---|
| 654 |
|
|---|
| 655 | /*
|
|---|
| 656 | * CPUáO̶µ½ÌReLXgÆÝ^CPUbNóÔÌQÆ
|
|---|
| 657 | *
|
|---|
| 658 | * CPUáO̶µ½ÌVXeóÔªCJ[lÀsÅÈC^XNR
|
|---|
| 659 | * eLXgÅ èCSÝbNóÔÅÈCCPUbNóÔÅÈ¢É
|
|---|
| 660 | * trueC»¤ÅÈ¢ÉfalseðÔ·iCPUáOªJ[lÇOÌÝ
|
|---|
| 661 | * Ŷµ½êÉàfalseðÔ·jD
|
|---|
| 662 | *
|
|---|
| 663 | * J[lÀsÅÈ¢¨ (TIPM_LOCK== -15) ItO == 1
|
|---|
| 664 | * (else) IPL < TIPM_LOCK
|
|---|
| 665 | * ^XNReLXgÅ é¨intnest < 1
|
|---|
| 666 | * SÝbNÅÈ¢¨ ItO == 1
|
|---|
| 667 | * CPUbNóÔÅÈ¢¨(TIPM_LOCK== -15) ItO == 1
|
|---|
| 668 | * (else) IPL < TIPM_LOCK
|
|---|
| 669 | */
|
|---|
| 670 | Inline bool_t
|
|---|
| 671 | exc_sense_unlock(void *p_excinf)
|
|---|
| 672 | {
|
|---|
| 673 | #if TIPM_LOCK == -15
|
|---|
| 674 | return((!exc_sense_context(p_excinf))
|
|---|
| 675 | && exc_sense_i(p_excinf));
|
|---|
| 676 | #else
|
|---|
| 677 | return((!exc_sense_context(p_excinf))
|
|---|
| 678 | && exc_sense_i(p_excinf)
|
|---|
| 679 | && exc_get_ipl(p_excinf) < IPL_LOCK);
|
|---|
| 680 | #endif
|
|---|
| 681 | }
|
|---|
| 682 |
|
|---|
| 683 | Inline void
|
|---|
| 684 | idle_loop(void)
|
|---|
| 685 | {
|
|---|
| 686 | t_unlock_cpu();
|
|---|
| 687 | t_lock_cpu();
|
|---|
| 688 | }
|
|---|
| 689 |
|
|---|
| 690 | /*
|
|---|
| 691 | * vZbT˶Ìú»
|
|---|
| 692 | */
|
|---|
| 693 | extern void prc_initialize( void );
|
|---|
| 694 |
|
|---|
| 695 | /*
|
|---|
| 696 | * vZbT˶ÌI¹
|
|---|
| 697 | */
|
|---|
| 698 | extern void prc_terminate( void );
|
|---|
| 699 |
|
|---|
| 700 |
|
|---|
| 701 | #ifndef OMIT_DEFAULT_INT_HANDLER
|
|---|
| 702 | /*
|
|---|
| 703 | * ¢o^Ìݪ¶µ½êÉÄÑo³êé
|
|---|
| 704 | */
|
|---|
| 705 | void default_int_handler( void );
|
|---|
| 706 | #endif /* OMIT_DEFAULT_INT_HANDLER */
|
|---|
| 707 |
|
|---|
| 708 | #ifndef OMIT_DEFAULT_EXC_HANDLER
|
|---|
| 709 | /*
|
|---|
| 710 | * ¢o^ÌáOª¶µ½êÉÄÑo³êé
|
|---|
| 711 | */
|
|---|
| 712 | void default_exc_handler( void );
|
|---|
| 713 | #endif /* OMIT_DEFAULT_EXC_HANDLER */
|
|---|
| 714 |
|
|---|
| 715 |
|
|---|
| 716 | #endif /* TOPPERS_MACRO_ONLY */
|
|---|
| 717 |
|
|---|
| 718 | #endif /* TOPPERS_PRC_CONFIG_H */
|
|---|
| 719 |
|
|---|
![(please configure the [header_logo] section in trac.ini)](/trac_user/contrib/chrome/site/your_project_logo.png){kind=logo}
