source: asp_ewarm/asp-1.7.0/kernel/startup.c@ 61

Last change on this file since 61 was 61, checked in by ertl-honda, 11 years ago

ASP for EWARM のコミット.

File size: 4.0 KB
Line 
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-2009 by Embedded and Real-Time Systems Laboratory
9 * Graduate School of Information Science, Nagoya Univ., JAPAN
10 *
11 * ã‹L’˜ìŒ ŽÒ‚́CˆÈ‰º‚Ì(1)`(4)‚ÌðŒ‚ð–ž‚½‚·ê‡‚ÉŒÀ‚èC–{ƒ\ƒtƒgƒEƒF
12 * ƒAi–{ƒ\ƒtƒgƒEƒFƒA‚ð‰ü•Ï‚µ‚½‚à‚Ì‚ðŠÜ‚ށDˆÈ‰º“¯‚¶j‚ðŽg—pE•¡»E‰ü
13 * •ÏEÄ”z•ziˆÈ‰ºC—˜—p‚ƌĂԁj‚·‚邱‚Ƃ𖳏ž‚Å‹–‘ø‚·‚éD
14 * (1) –{ƒ\ƒtƒgƒEƒFƒA‚ðƒ\[ƒXƒR[ƒh‚ÌŒ`‚Å—˜—p‚·‚éê‡‚ɂ́Cã‹L‚Ì’˜ì
15 * Œ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L‚Ì–³•ÛØ‹K’肪C‚»‚Ì‚Ü‚Ü‚ÌŒ`‚Ń\[
16 * ƒXƒR[ƒh’†‚ÉŠÜ‚Ü‚ê‚Ä‚¢‚邱‚ƁD
17 * (2) –{ƒ\ƒtƒgƒEƒFƒA‚ðCƒ‰ƒCƒuƒ‰ƒŠŒ`Ž®‚ȂǁC‘¼‚̃\ƒtƒgƒEƒFƒAŠJ”­‚ÉŽg
18 * —p‚Å‚«‚éŒ`‚ōĔz•z‚·‚éê‡‚ɂ́CÄ”z•z‚É”º‚¤ƒhƒLƒ…
19ƒƒ“ƒgi—˜—p
20 * ŽÒƒ}ƒjƒ…
21ƒAƒ‹‚Ȃǁj‚ɁCã‹L‚Ì’˜ìŒ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L
22 * ‚Ì–³•ÛØ‹K’è‚ðŒfÚ‚·‚邱‚ƁD
23 * (3) –{ƒ\ƒtƒgƒEƒFƒA‚ðC‹@Ší‚É‘g‚ݍž‚ނȂǁC‘¼‚̃\ƒtƒgƒEƒFƒAŠJ”­‚ÉŽg
24 * —p‚Å‚«‚È‚¢Œ`‚ōĔz•z‚·‚éê‡‚ɂ́CŽŸ‚Ì‚¢‚¸‚ê‚©‚ÌðŒ‚ð–ž‚½‚·‚±
25 * ‚ƁD
26 * (a) Ä”z•z‚É”º‚¤ƒhƒLƒ…
27ƒƒ“ƒgi—˜—pŽÒƒ}ƒjƒ…
28ƒAƒ‹‚Ȃǁj‚ɁCã‹L‚Ì’˜
29 * ìŒ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L‚Ì–³•ÛØ‹K’è‚ðŒfÚ‚·‚邱‚ƁD
30 * (b) Ä”z•z‚ÌŒ`‘Ô‚ðC•Ê‚É’è‚ß‚é•û–@‚É‚æ‚Á‚āCTOPPERSƒvƒƒWƒFƒNƒg‚É
31 * •ñ‚·‚邱‚ƁD
32 * (4) –{ƒ\ƒtƒgƒEƒFƒA‚Ì—˜—p‚É‚æ‚è’¼Ú“I‚Ü‚½‚͊ԐړI‚ɐ¶‚¶‚é‚¢‚©‚Ȃ鑹
33 * ŠQ‚©‚ç‚àCã‹L’˜ìŒ ŽÒ‚¨‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚ð–Ɛӂ·‚邱‚ƁD
34 * ‚Ü‚½C–{ƒ\ƒtƒgƒEƒFƒA‚̃†[ƒU‚Ü‚½‚̓Gƒ“ƒhƒ†[ƒU‚©‚ç‚Ì‚¢‚©‚Ȃ闝
35 * —R‚ÉŠî‚­¿‹‚©‚ç‚àCã‹L’˜ìŒ ŽÒ‚¨‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚ð
36 * –Ɛӂ·‚邱‚ƁD
37 *
38 * –{ƒ\ƒtƒgƒEƒFƒA‚́C–³•ÛØ‚Å’ñ‹Ÿ‚³‚ê‚Ä‚¢‚é‚à‚Ì‚Å‚ ‚éDã‹L’˜ìŒ ŽÒ‚¨
39 * ‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚́C–{ƒ\ƒtƒgƒEƒFƒA‚ÉŠÖ‚µ‚āC“Á’è‚ÌŽg—p–Ú“I
40 * ‚ɑ΂·‚é“K‡«‚àŠÜ‚߂āC‚¢‚©‚È‚é•ÛØ‚às‚í‚È‚¢D‚Ü‚½C–{ƒ\ƒtƒgƒEƒF
41 * ƒA‚Ì—˜—p‚É‚æ‚è’¼Ú“I‚Ü‚½‚͊ԐړI‚ɐ¶‚¶‚½‚¢‚©‚Ȃ鑹ŠQ‚ÉŠÖ‚µ‚Ä‚àC‚»
42 * ‚̐ӔC‚𕉂í‚È‚¢D
43 *
44 * @(#) $Id: startup.c 2067 2011-05-05 00:46:29Z ertl-hiro $
45 */
46
47/*
48 * ƒJ[ƒlƒ‹‚̏‰Šú‰»‚ƏI—¹ˆ—
49 */
50
51#include "kernel_impl.h"
52#include "time_event.h"
53#include <sil.h>
54
55/*
56 * ƒgƒŒ[ƒXƒƒOƒ}ƒNƒ‚̃fƒtƒHƒ‹ƒg’è‹`
57 */
58#ifndef LOG_KER_ENTER
59#define LOG_KER_ENTER()
60#endif /* LOG_KER_ENTER */
61
62#ifndef LOG_KER_LEAVE
63#define LOG_KER_LEAVE()
64#endif /* LOG_KER_LEAVE */
65
66#ifndef LOG_EXT_KER_ENTER
67#define LOG_EXT_KER_ENTER()
68#endif /* LOG_EXT_KER_ENTER */
69
70#ifndef LOG_EXT_KER_LEAVE
71#define LOG_EXT_KER_LEAVE(ercd)
72#endif /* LOG_EXT_KER_LEAVE */
73
74#ifdef TOPPERS_sta_ker
75
76/*
77 * ƒJ[ƒlƒ‹“®ìó‘Ôƒtƒ‰ƒO
78 *
79 * ƒXƒ^[ƒgƒAƒbƒvƒ‹[ƒ`ƒ“‚ŁCfalsei0j‚ɏ‰Šú‰»‚³‚ê‚邱‚Æ‚ðŠú‘Ò‚µ‚Ä
80 * ‚¢‚éD
81 */
82bool_t kerflg = false;
83
84/*
85 * ƒJ[ƒlƒ‹‚Ì‹N“®
86 */
87void
88sta_ker(void)
89{
90 /*
91 * ƒ^[ƒQƒbƒgˆË‘¶‚̏‰Šú‰»
92 */
93 target_initialize();
94
95 /*
96 * Šeƒ‚ƒWƒ…
97[ƒ‹‚̏‰Šú‰»
98 *
99 * ƒ^ƒCƒ€ƒCƒxƒ“ƒgŠÇ—ƒ‚ƒWƒ…
100[ƒ‹‚Í‘¼‚̃‚ƒWƒ…
101[ƒ‹‚æ‚èæ‚ɏ‰Šú‰»
102 * ‚·‚é•K—v‚ª‚ ‚éD
103 */
104 initialize_tmevt();
105 initialize_object();
106
107 /*
108 * ‰Šú‰»ƒ‹[ƒ`ƒ“‚ÌŽÀs
109 */
110 call_inirtn();
111
112 /*
113 * ƒJ[ƒlƒ‹“®ì‚ÌŠJŽn
114 */
115 kerflg = true;
116 LOG_KER_ENTER();
117 start_dispatch();
118 assert(0);
119}
120
121#endif /* TOPPERS_sta_ker */
122
123/*
124 * ƒJ[ƒlƒ‹‚̏I—¹
125 */
126#ifdef TOPPERS_ext_ker
127
128ER
129ext_ker(void)
130{
131 SIL_PRE_LOC;
132
133 LOG_EXT_KER_ENTER();
134
135 /*
136 * Š„ž‚݃ƒbƒNó‘ԂɈڍs
137 */
138 SIL_LOC_INT();
139
140 /*
141 * ƒJ[ƒlƒ‹“®ì‚̏I—¹
142 */
143 LOG_KER_LEAVE();
144 kerflg = false;
145
146 /*
147 * ƒJ[ƒlƒ‹‚̏I—¹ˆ—‚̌ďo‚µ
148 *
149 * ”ñƒ^ƒXƒNƒRƒ“ƒeƒLƒXƒg‚ɐ؂芷‚¦‚āCexit_kernel‚ðŒÄ‚яo‚·D
150 */
151 call_exit_kernel();
152
153 /*
154 * ƒRƒ“ƒpƒCƒ‰‚ÌŒx‘΍ôi‚±‚±‚Ö—ˆ‚邱‚Æ‚Í‚È‚¢‚Í‚¸j
155 */
156 SIL_UNL_INT();
157 LOG_EXT_KER_LEAVE(E_SYS);
158 return(E_SYS);
159}
160
161/*
162 * ƒJ[ƒlƒ‹‚̏I—¹ˆ—
163 */
164void
165exit_kernel(void)
166{
167 /*
168 * I—¹ˆ—ƒ‹[ƒ`ƒ“‚ÌŽÀs
169 */
170 call_terrtn();
171
172 /*
173 * ƒ^[ƒQƒbƒgˆË‘¶‚̏I—¹ˆ—
174 */
175 target_exit();
176 assert(0);
177}
178
179#endif /* TOPPERS_ext_ker */
Note: See TracBrowser for help on using the repository browser.