[101] | 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 |
|
---|