source: asp3_gr_sakura/trunk/kernel/task_term.c

Last change on this file was 318, checked in by coas-nagasima, 7 years ago

プロパティの文字コードにUTF-8を追加、キーワードを削除
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc; charset=UTF-8
File size: 8.8 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-2014 by Embedded and Real-Time Systems Laboratory
9 * Graduate School of Information Science, Nagoya Univ., JAPAN
10 *
11 * 上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
12 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
13 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
14 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
15 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
16 * スコード中に含まれていること．
17 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
18 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
19 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
20 * の無保証規定を掲載すること．
21 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
22 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
23 * と．
24 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
25 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
26 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
27 * 報告すること．
28 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
29 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
30 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
31 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
32 * 免責すること．
33 *
34 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
35 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
36 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
37 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
38 * の責任を負わない．
39 *
40 * $Id$
41 */
42
43/*
44 * タスク終了機能
45 */
46
47#include "kernel_impl.h"
48#include "check.h"
49#include "task.h"
50#include "wait.h"
51#include "overrun.h"
52
53/*
54 * トレースログマクロのデフォルト定義
55 */
56#ifndef LOG_EXT_TSK_ENTER
57#define LOG_EXT_TSK_ENTER()
58#endif /* LOG_EXT_TSK_ENTER */
59
60#ifndef LOG_EXT_TSK_LEAVE
61#define LOG_EXT_TSK_LEAVE(ercd)
62#endif /* LOG_EXT_TSK_LEAVE */
63
64#ifndef LOG_RAS_TER_ENTER
65#define LOG_RAS_TER_ENTER(tskid)
66#endif /* LOG_RAS_TER_ENTER */
67
68#ifndef LOG_RAS_TER_LEAVE
69#define LOG_RAS_TER_LEAVE(ercd)
70#endif /* LOG_RAS_TER_LEAVE */
71
72#ifndef LOG_DIS_TER_ENTER
73#define LOG_DIS_TER_ENTER()
74#endif /* LOG_DIS_TER_ENTER */
75
76#ifndef LOG_DIS_TER_LEAVE
77#define LOG_DIS_TER_LEAVE(ercd)
78#endif /* LOG_DIS_TER_LEAVE */
79
80#ifndef LOG_ENA_TER_ENTER
81#define LOG_ENA_TER_ENTER()
82#endif /* LOG_ENA_TER_ENTER */
83
84#ifndef LOG_ENA_TER_LEAVE
85#define LOG_ENA_TER_LEAVE(ercd)
86#endif /* LOG_ENA_TER_LEAVE */
87
88#ifndef LOG_SNS_TER_ENTER
89#define LOG_SNS_TER_ENTER()
90#endif /* LOG_SNS_TER_ENTER */
91
92#ifndef LOG_SNS_TER_LEAVE
93#define LOG_SNS_TER_LEAVE(state)
94#endif /* LOG_SNS_TER_LEAVE */
95
96#ifndef LOG_TER_TSK_ENTER
97#define LOG_TER_TSK_ENTER(tskid)
98#endif /* LOG_TER_TSK_ENTER */
99
100#ifndef LOG_TER_TSK_LEAVE
101#define LOG_TER_TSK_LEAVE(ercd)
102#endif /* LOG_TER_TSK_LEAVE */
103
104/*
105 * 自タスクの終了［NGKI1162］
106 */
107#ifdef TOPPERS_ext_tsk
108
109ER
110ext_tsk(void)
111{
112 PRI intpri;
113 ER ercd;
114
115 LOG_EXT_TSK_ENTER();
116 CHECK_TSKCTX(); /*［NGKI1164］*/
117
118 if (sense_lock()) {
119 /*
120 * CPUロック状態でext_tskが呼ばれた場合は，CPUロックを解除し
121 * てからタスクを終了する．実装上は，サービスコール内でのCPU
122 * ロックを省略すればよいだけ．［NGKI1168］
123 */
124 }
125 else {
126 lock_cpu();
127 }
128
129 intpri = t_get_ipm();
130 if (!enadsp || intpri != TIPM_ENAALL) {
131 if (!enadsp) {
132 /*
133 * ディスパッチ禁止状態でext_tskが呼ばれた場合は，ディスパッ
134 * チ許可状態にしてからタスクを終了する．［NGKI1168］
135 */
136 enadsp = true;
137 }
138 if (intpri != TIPM_ENAALL) {
139 /*
140 * 割込み優先度マスク（IPM）がTIPM_ENAALL以外の状態で
141 * ext_tskが呼ばれた場合は，IPMをTIPM_ENAALLにしてからタス
142 * クを終了する．［NGKI1168］
143 */
144 t_set_ipm(TIPM_ENAALL);
145 }
146 dspflg = true;
147 p_schedtsk = search_schedtsk();
148 }
149
150#ifdef TOPPERS_SUPPORT_OVRHDR
151 if (p_runtsk->staovr) {
152 (void) target_ovrtimer_stop(INTNO_DUMMY_TIMER);
153 ovrtimer_flag = false;
154 }
155#endif /* TOPPERS_SUPPORT_OVRHDR */
156 task_terminate(p_runtsk); /* ［NGKI3449］*/
157 exit_and_dispatch(); /* ［NGKI1169］*/
158 ercd = E_SYS; /* ［NGKI1163］*/
159
160 error_exit:
161 LOG_EXT_TSK_LEAVE(ercd);
162 return(ercd);
163}
164
165#endif /* TOPPERS_ext_tsk */
166
167/*
168 * タスクの終了要求［NGKI3469］
169 */
170#ifdef TOPPERS_ras_ter
171
172ER
173ras_ter(ID tskid)
174{
175 TCB *p_tcb;
176 ER ercd;
177
178 LOG_RAS_TER_ENTER(tskid);
179 CHECK_TSKCTX_UNL(); /*［NGKI3470］［NGKI3471］*/
180 CHECK_ID(VALID_TSKID(tskid)); /*［NGKI3472］*/
181 p_tcb = get_tcb(tskid);
182 CHECK_ILUSE(p_tcb != p_runtsk); /*［NGKI3475］*/
183
184 lock_cpu();
185 if (p_tcb->p_tinib->tskatr == TA_NOEXS) {
186 ercd = E_NOEXS; /*［NGKI3473］*/
187 }
188 else if (TSTAT_DORMANT(p_tcb->tstat)) {
189 ercd = E_OBJ; /*［NGKI3476］*/
190 }
191 else if (p_tcb->enater) {
192 task_terminate(p_tcb); /*［NGKI3477］*/
193 if (p_runtsk != p_schedtsk) {
194 dispatch();
195 }
196 ercd = E_OK;
197 }
198 else {
199 p_tcb->raster = true; /*［NGKI3478］*/
200 if (!TSTAT_RUNNABLE(p_tcb->tstat)) {
201 if (TSTAT_WAITING(p_tcb->tstat)) {
202 wait_dequeue_wobj(p_tcb); /*［NGKI3479］*/
203 wait_dequeue_tmevtb(p_tcb);
204 p_tcb->p_winfo->wercd = E_RASTER; /*［NGKI3480］*/
205 }
206 p_tcb->tstat = TS_RUNNABLE; /*［NGKI3606］*/
207 LOG_TSKSTAT(p_tcb);
208 make_runnable(p_tcb);
209 if (p_runtsk != p_schedtsk) {
210 dispatch();
211 }
212 }
213 ercd = E_OK;
214 }
215 unlock_cpu();
216
217 error_exit:
218 LOG_RAS_TER_LEAVE(ercd);
219 return(ercd);
220}
221
222#endif /* TOPPERS_ras_ter */
223
224/*
225 * タスク終了の禁止［NGKI3482］
226 */
227#ifdef TOPPERS_dis_ter
228
229ER
230dis_ter(void)
231{
232 ER ercd;
233
234 LOG_DIS_TER_ENTER();
235 CHECK_TSKCTX_UNL(); /*［NGKI3483］［NGKI3484］*/
236
237 lock_cpu();
238 p_runtsk->enater = false; /*［NGKI3486］*/
239 ercd = E_OK;
240 unlock_cpu();
241
242 error_exit:
243 LOG_DIS_TER_LEAVE(ercd);
244 return(ercd);
245}
246
247#endif /* TOPPERS_dis_ter */
248
249/*
250 * タスク終了の許可［NGKI3487］
251 */
252#ifdef TOPPERS_ena_ter
253
254ER
255ena_ter(void)
256{
257 ER ercd;
258
259 LOG_ENA_TER_ENTER();
260 CHECK_TSKCTX_UNL(); /*［NGKI3488］［NGKI3489］*/
261
262 lock_cpu();
263 if (p_runtsk->raster && dspflg) {
264#ifdef TOPPERS_SUPPORT_OVRHDR
265 if (p_runtsk->staovr) {
266 (void) target_ovrtimer_stop(INTNO_DUMMY_TIMER);
267 ovrtimer_flag = false;
268 }
269#endif /* TOPPERS_SUPPORT_OVRHDR */
270 task_terminate(p_runtsk);
271 exit_and_dispatch();
272 ercd = E_SYS;
273 }
274 else {
275 p_runtsk->enater = true; /*［NGKI3491］*/
276 ercd = E_OK;
277 }
278 unlock_cpu();
279
280 error_exit:
281 LOG_ENA_TER_LEAVE(ercd);
282 return(ercd);
283}
284
285#endif /* TOPPERS_ena_ter */
286
287/*
288 * タスク終了禁止状態の参照［NGKI3494］
289 */
290#ifdef TOPPERS_sns_ter
291
292bool_t
293sns_ter(void)
294{
295 bool_t state;
296
297 LOG_SNS_TER_ENTER();
298 /*
299 * enaterを変更できるのは自タスクのみであるため，排他制御せずに読
300 * んでも問題ない．
301 */
302 state = (p_runtsk != NULL && p_runtsk->enater) ? false : true;
303 /*［NGKI3495］［NGKI3496］*/
304 LOG_SNS_TER_LEAVE(state);
305 return(state);
306}
307
308#endif /* TOPPERS_sns_ter */
309
310/*
311 * タスクの強制終了［NGKI1170］
312 */
313#ifdef TOPPERS_ter_tsk
314
315ER
316ter_tsk(ID tskid)
317{
318 TCB *p_tcb;
319 ER ercd;
320
321 LOG_TER_TSK_ENTER(tskid);
322 CHECK_TSKCTX_UNL(); /*［NGKI1171］［NGKI1172］*/
323 CHECK_ID(VALID_TSKID(tskid)); /*［NGKI1173］*/
324 p_tcb = get_tcb(tskid);
325 CHECK_ILUSE(p_tcb != p_runtsk); /*［NGKI1176］*/
326
327 lock_cpu();
328 if (p_tcb->p_tinib->tskatr == TA_NOEXS) {
329 ercd = E_NOEXS; /*［NGKI1174］*/
330 }
331 else if (TSTAT_DORMANT(p_tcb->tstat)) {
332 ercd = E_OBJ; /*［NGKI1177］*/
333 }
334 else {
335 task_terminate(p_tcb); /*［NGKI3450］*/
336 if (p_runtsk != p_schedtsk) {
337 dispatch();
338 }
339 ercd = E_OK;
340 }
341 unlock_cpu();
342
343 error_exit:
344 LOG_TER_TSK_LEAVE(ercd);
345 return(ercd);
346}
347
348#endif /* TOPPERS_ter_tsk */
Note: See TracBrowser for help on using the repository browser.