source: asp_wo_cfg/trunk/kernel/task_refer.c@ 72

Last change on this file since 72 was 49, checked in by ertl-hiro, 12 years ago

asp_wo_kernelをコミット。
  • Property svn:keywords set to Id
File size: 5.3 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) 2005-2012 by Embedded and Real-Time Systems Laboratory
7 * Graduate School of Information Science, Nagoya Univ., JAPAN
8 *
9 * 上記著作権者は，以下の(1)〜(4)の条件を満たす場合に限り，本ソフトウェ
10 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
11 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
12 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
13 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
14 * スコード中に含まれていること．
15 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
16 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
17 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
18 * の無保証規定を掲載すること．
19 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
20 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
21 * と．
22 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
23 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
24 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
25 * 報告すること．
26 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
27 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
28 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
29 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
30 * 免責すること．
31 *
32 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
33 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
34 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
35 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
36 * の責任を負わない．
37 *
38 * @(#) $Id: task_refer.c 49 2012-09-06 04:41:53Z ertl-hiro $
39 */
40
41/*
42 * タスクの状態参照機能
43 */
44
45#include "kernel_impl.h"
46#include "check.h"
47#include "task.h"
48#include "wait.h"
49#include "semaphore.h"
50#include "eventflag.h"
51#include "dataqueue.h"
52#include "pridataq.h"
53#include "mailbox.h"
54#include "mempfix.h"
55#include "time_event.h"
56
57/*
58 * トレースログマクロのデフォルト定義
59 */
60#ifndef LOG_REF_TSK_ENTER
61#define LOG_REF_TSK_ENTER(tskid, pk_rtsk)
62#endif /* LOG_REF_TSK_ENTER */
63
64#ifndef LOG_REF_TSK_LEAVE
65#define LOG_REF_TSK_LEAVE(ercd, pk_rtsk)
66#endif /* LOG_REF_TSK_LEAVE */
67
68/*
69 * タスクの状態参照
70 */
71#ifdef TOPPERS_ref_tsk
72
73ER
74ref_tsk(ID tskid, T_RTSK *pk_rtsk)
75{
76 TCB *p_tcb;
77 uint_t tstat;
78 ER ercd;
79
80 LOG_REF_TSK_ENTER(tskid, pk_rtsk);
81 CHECK_TSKCTX_UNL();
82 CHECK_TSKID_SELF(tskid);
83 p_tcb = get_tcb_self(tskid);
84 CHECK_NOEXS(p_tcb->p_tinib->tskatr);
85
86 t_lock_cpu();
87 tstat = p_tcb->tstat;
88 if (TSTAT_DORMANT(tstat)) {
89 /*
90 * 対象タスクが休止状態の場合
91 */
92 pk_rtsk->tskstat = TTS_DMT;
93 }
94 else {
95 /*
96 * タスク状態の取出し
97 */
98 if (TSTAT_SUSPENDED(tstat)) {
99 if (TSTAT_WAITING(tstat)) {
100 pk_rtsk->tskstat = TTS_WAS;
101 }
102 else {
103 pk_rtsk->tskstat = TTS_SUS;
104 }
105 }
106 else if (TSTAT_WAITING(tstat)) {
107 pk_rtsk->tskstat = TTS_WAI;
108 }
109 else if (p_tcb == p_runtsk) {
110 pk_rtsk->tskstat = TTS_RUN;
111 }
112 else {
113 pk_rtsk->tskstat = TTS_RDY;
114 }
115
116 /*
117 * 現在優先度とベース優先度の取出し
118 */
119 pk_rtsk->tskpri = EXT_TSKPRI(p_tcb->priority);
120 pk_rtsk->tskbpri = EXT_TSKPRI(p_tcb->priority);
121
122 if (TSTAT_WAITING(tstat)) {
123 /*
124 * 待ち要因と待ち対象のオブジェクトのIDの取出し
125 */
126 switch (tstat & TS_WAIT_MASK) {
127 case TS_WAIT_SLP:
128 pk_rtsk->tskwait = TTW_SLP;
129 break;
130 case TS_WAIT_DLY:
131 pk_rtsk->tskwait = TTW_DLY;
132 break;
133 case TS_WAIT_SEM:
134 pk_rtsk->tskwait = TTW_SEM;
135 pk_rtsk->wobjid = SEMID(((WINFO_SEM *)(p_tcb->p_winfo))
136 ->p_semcb);
137 break;
138 case TS_WAIT_FLG:
139 pk_rtsk->tskwait = TTW_FLG;
140 pk_rtsk->wobjid = FLGID(((WINFO_FLG *)(p_tcb->p_winfo))
141 ->p_flgcb);
142 break;
143 case TS_WAIT_SDTQ:
144 pk_rtsk->tskwait = TTW_SDTQ;
145 pk_rtsk->wobjid = DTQID(((WINFO_DTQ *)(p_tcb->p_winfo))
146 ->p_dtqcb);
147 break;
148 case TS_WAIT_RDTQ:
149 pk_rtsk->tskwait = TTW_RDTQ;
150 pk_rtsk->wobjid = DTQID(((WINFO_DTQ *)(p_tcb->p_winfo))
151 ->p_dtqcb);
152 break;
153 case TS_WAIT_SPDQ:
154 pk_rtsk->tskwait = TTW_SPDQ;
155 pk_rtsk->wobjid = PDQID(((WINFO_PDQ *)(p_tcb->p_winfo))
156 ->p_pdqcb);
157 break;
158 case TS_WAIT_RPDQ:
159 pk_rtsk->tskwait = TTW_RPDQ;
160 pk_rtsk->wobjid = PDQID(((WINFO_PDQ *)(p_tcb->p_winfo))
161 ->p_pdqcb);
162 break;
163 case TS_WAIT_MBX:
164 pk_rtsk->tskwait = TTW_MBX;
165 pk_rtsk->wobjid = MBXID(((WINFO_MBX *)(p_tcb->p_winfo))
166 ->p_mbxcb);
167 break;
168 case TS_WAIT_MPF:
169 pk_rtsk->tskwait = TTW_MPF;
170 pk_rtsk->wobjid = MPFID(((WINFO_MPF *)(p_tcb->p_winfo))
171 ->p_mpfcb);
172 break;
173 }
174
175 /*
176 * タイムアウトするまでの時間の取出し
177 */
178 if (p_tcb->p_winfo->p_tmevtb != NULL) {
179 pk_rtsk->lefttmo
180 = (TMO) tmevt_lefttim(p_tcb->p_winfo->p_tmevtb);
181 }
182 else {
183 pk_rtsk->lefttmo = TMO_FEVR;
184 }
185 }
186
187 /*
188 * 起床要求キューイング数の取出し
189 */
190 pk_rtsk->wupcnt = p_tcb->wupque ? 1U : 0U;
191 }
192
193 /*
194 * 起動要求キューイング数の取出し
195 */
196 pk_rtsk->actcnt = p_tcb->actque ? 1U : 0U;
197 ercd = E_OK;
198 t_unlock_cpu();
199
200 error_exit:
201 LOG_REF_TSK_LEAVE(ercd, pk_rtsk);
202 return(ercd);
203}
204
205#endif /* TOPPERS_ref_tsk */
Note: See TracBrowser for help on using the repository browser.