Context Navigation

← Previous Revision
Latest Revision
Next Revision →
Blame
Revision Log

sys_manage.c@ 363

Last change on this file since 363 was 363, checked in by ykominami, 5 years ago
add tags/jsp-1.4.4-full-UTF8
Property svn:executable set to ``*
File size: 7.6 KB

Line
1	/*
2	* TOPPERS/JSP Kernel
3	* Toyohashi Open Platform for Embedded Real-Time Systems/
4	* Just Standard Profile Kernel
5	*
6	* Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
7	* Toyohashi Univ. of Technology, JAPAN
8	*
9	* ä¸è¨èä½æ¨©è
10	ã¯ï¼ä»¥ä¸ã® (1)ã(4) ã®æ¡ä»¶ãï¼Free Software Foundation
11	* ã«ãã£ã¦å
12	¬è¡¨ããã¦ãã GNU General Public License ã® Version 2 ã«è¨
13	* è¿°ããã¦ããæ¡ä»¶ãæºããå ´åã«éãï¼æ¬ã½ããã¦ã§ã¢ï¼æ¬ã½ããã¦ã§ã¢
14	* ãæ¹å¤ãããã®ãå«ãï¼ä»¥ä¸åãï¼ãä½¿ç¨ã»è¤è£½ã»æ¹å¤ã»åé
15	å¸ï¼ä»¥ä¸ï¼
16	* å©ç¨ã¨å¼ã¶ï¼ãããã¨ãç¡åã§è¨±è«¾ããï¼
17	* (1) æ¬ã½ããã¦ã§ã¢ãã½ã¼ã¹ã³ã¼ãã®å½¢ã§å©ç¨ããå ´åã«ã¯ï¼ä¸è¨ã®èä½
18	* æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãï¼ãã®ã¾ã¾ã®å½¢ã§ã½ã¼
19	* ã¹ã³ã¼ãä¸ã«å«ã¾ãã¦ãããã¨ï¼
20	* (2) æ¬ã½ããã¦ã§ã¢ãï¼ã©ã¤ãã©ãªå½¢å¼ãªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
21	* ç¨ã§ããå½¢ã§åé
22	å¸ããå ´åã«ã¯ï¼åé
23	å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨
24	* è
25	ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®èä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨
26	* ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
27	* (3) æ¬ã½ããã¦ã§ã¢ãï¼æ©å¨ã«çµã¿è¾¼ããªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
28	* ç¨ã§ããªãå½¢ã§åé
29	å¸ããå ´åã«ã¯ï¼æ¬¡ã®ããããã®æ¡ä»¶ãæºããã
30	* ã¨ï¼
31	* (a) åé
32	å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨è
33	ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®è
34	* ä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
35	* (b) åé
36	å¸ã®å½¢æ
37	ãï¼å¥ã«å®ããæ¹æ³ã«ãã£ã¦ï¼TOPPERSããã¸ã§ã¯ãã«
38	* å ±åãããã¨ï¼
39	* (4) æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ
40	* å®³ãããï¼ä¸è¨èä½æ¨©è
41	ããã³TOPPERSããã¸ã§ã¯ããå
42	è²¬ãããã¨ï¼
43	*
44	* æ¬ã½ããã¦ã§ã¢ã¯ï¼ç¡ä¿è¨¼ã§æä¾ããã¦ãããã®ã§ããï¼ä¸è¨èä½æ¨©è
45	ã
46	* ãã³TOPPERSããã¸ã§ã¯ãã¯ï¼æ¬ã½ããã¦ã§ã¢ã«é¢ãã¦ï¼ãã®é©ç¨å¯è½æ§ã
47	* å«ãã¦ï¼ãããªãä¿è¨¼ãè¡ããªãï¼ã¾ãï¼æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´
48	* æ¥çã¾ãã¯éæ¥çã«çãããããªãæå®³ã«é¢ãã¦ãï¼ãã®è²¬ä»»ãè² ããªãï¼
49	*
50	* @(#) $Id: sys_manage.c,v 1.8 2003/07/01 13:30:35 hiro Exp $
51	*/
52
53	/*
54	* ã·ã¹ãã ç¶æ
55	ç®¡çæ©è½
56	*/
57
58	#include "jsp_kernel.h"
59	#include "check.h"
60	#include "task.h"
61
62	/*
63	* ã¿ã¹ã¯ã®åªå
64	é ä½ã®åè»¢
65	*/
66	#ifdef __rot_rdq
67
68	SYSCALL ER
69	rot_rdq(PRI tskpri)
70	{
71	UINT pri;
72	ER ercd;
73
74	LOG_ROT_RDQ_ENTER(tskpri);
75	CHECK_TSKCTX_UNL();
76	CHECK_TPRI_SELF(tskpri);
77
78	t_lock_cpu();
79	pri = (tskpri == TPRI_SELF) ? runtsk->priority : INT_PRIORITY(tskpri);
80	if (rotate_ready_queue(pri)) {
81	dispatch();
82	}
83	ercd = E_OK;
84	t_unlock_cpu();
85
86	exit:
87	LOG_ROT_RDQ_LEAVE(ercd);
88	return(ercd);
89	}
90
91	#endif /* __rot_rdq */
92
93	/*
94	* ã¿ã¹ã¯ã®åªå
95	é ä½ã®åè»¢ï¼éã¿ã¹ã¯ã³ã³ããã¹ãç¨ï¼
96	*/
97	#ifdef __irot_rdq
98
99	SYSCALL ER
100	irot_rdq(PRI tskpri)
101	{
102	ER ercd;
103
104	LOG_IROT_RDQ_ENTER(tskpri);
105	CHECK_INTCTX_UNL();
106	CHECK_TPRI(tskpri);
107
108	i_lock_cpu();
109	if (rotate_ready_queue(INT_PRIORITY(tskpri))) {
110	reqflg = TRUE;
111	}
112	ercd = E_OK;
113	i_unlock_cpu();
114
115	exit:
116	LOG_IROT_RDQ_LEAVE(ercd);
117	return(ercd);
118	}
119
120	#endif /* __irot_rdq */
121
122	/*
123	* å®è¡ç¶æ
124	ã®ã¿ã¹ã¯IDã®åç
125	§
126	*/
127	#ifdef __get_tid
128
129	SYSCALL ER
130	get_tid(ID *p_tskid)
131	{
132	ER ercd;
133
134	LOG_GET_TID_ENTER(p_tskid);
135	CHECK_TSKCTX_UNL();
136
137	t_lock_cpu();
138	*p_tskid = TSKID(runtsk);
139	ercd = E_OK;
140	t_unlock_cpu();
141
142	exit:
143	LOG_GET_TID_LEAVE(ercd, *p_tskid);
144	return(ercd);
145	}
146
147	#endif /* __get_tid */
148
149	/*
150	* å®è¡ç¶æ
151	ã®ã¿ã¹ã¯IDã®åç
152	§ï¼éã¿ã¹ã¯ã³ã³ããã¹ãç¨ï¼
153	*/
154	#ifdef __iget_tid
155
156	SYSCALL ER
157	iget_tid(ID *p_tskid)
158	{
159	ER ercd;
160
161	LOG_IGET_TID_ENTER(p_tskid);
162	CHECK_INTCTX_UNL();
163
164	i_lock_cpu();
165	*p_tskid = (runtsk == NULL) ? TSK_NONE : TSKID(runtsk);
166	ercd = E_OK;
167	i_unlock_cpu();
168
169	exit:
170	LOG_IGET_TID_LEAVE(ercd, *p_tskid);
171	return(ercd);
172	}
173
174	#endif /* __iget_tid */
175
176	/*
177	* CPUããã¯ç¶æ
178	ã¸ã®ç§»è¡
179	*/
180	#ifdef __loc_cpu
181
182	SYSCALL ER
183	loc_cpu(void)
184	{
185	ER ercd;
186
187	LOG_LOC_CPU_ENTER();
188	CHECK_TSKCTX();
189
190	if (!(t_sense_lock())) {
191	t_lock_cpu();
192	}
193	ercd = E_OK;
194
195	exit:
196	LOG_LOC_CPU_LEAVE(ercd);
197	return(ercd);
198	}
199
200	#endif /* __loc_cpu */
201
202	/*
203	* CPUããã¯ç¶æ
204	ã¸ã®ç§»è¡ï¼éã¿ã¹ã¯ã³ã³ããã¹ãç¨ï¼
205	*/
206	#ifdef __iloc_cpu
207
208	SYSCALL ER
209	iloc_cpu(void)
210	{
211	ER ercd;
212
213	LOG_ILOC_CPU_ENTER();
214	CHECK_INTCTX();
215
216	if (!(i_sense_lock())) {
217	i_lock_cpu();
218	}
219	ercd = E_OK;
220
221	exit:
222	LOG_ILOC_CPU_LEAVE(ercd);
223	return(ercd);
224	}
225
226	#endif /* __iloc_cpu */
227
228	/*
229	* CPUããã¯ç¶æ
230	ã®è§£é¤
231	*
232	* CPUããã¯ä¸ã¯ï¼ãã£ã¹ããããå¿
233	è¦ã¨ãªããµã¼ãã¹ã³ã¼ã«ãå¼ã³åºãã
234	* ã¨ã¯ã§ããªãããï¼CPUããã¯ç¶æ
235	ã®è§£é¤æã«ãã£ã¹ãããã£ãèµ·åãã
236	* å¿
237	è¦ã¯ãªãï¼
238	*/
239	#ifdef __unl_cpu
240
241	SYSCALL ER
242	unl_cpu(void)
243	{
244	ER ercd;
245
246	LOG_UNL_CPU_ENTER();
247	CHECK_TSKCTX();
248
249	if (t_sense_lock()) {
250	t_unlock_cpu();
251	}
252	ercd = E_OK;
253
254	exit:
255	LOG_UNL_CPU_LEAVE(ercd);
256	return(ercd);
257	}
258
259	#endif /* __unl_cpu */
260
261	/*
262	* CPUããã¯ç¶æ
263	ã®è§£é¤ï¼éã¿ã¹ã¯ã³ã³ããã¹ãç¨ï¼
264	*
265	* CPUããã¯ä¸ã¯ï¼ãã£ã¹ããããå¿
266	è¦ã¨ãªããµã¼ãã¹ã³ã¼ã«ãå¼ã³åºãã
267	* ã¨ã¯ã§ããªãããï¼CPUããã¯ç¶æ
268	ã®è§£é¤æã«ãã£ã¹ãããã£ã®èµ·åãè¦
269	* æ±ããå¿
270	è¦ã¯ãªãï¼
271	*/
272	#ifdef __iunl_cpu
273
274	SYSCALL ER
275	iunl_cpu(void)
276	{
277	ER ercd;
278
279	LOG_IUNL_CPU_ENTER();
280	CHECK_INTCTX();
281
282	if (i_sense_lock()) {
283	i_unlock_cpu();
284	}
285	ercd = E_OK;
286
287	exit:
288	LOG_IUNL_CPU_LEAVE(ercd);
289	return(ercd);
290	}
291
292	#endif /* __iunl_cpu */
293
294	/*
295	* ãã£ã¹ãããã®ç¦æ¢
296	*/
297	#ifdef __dis_dsp
298
299	SYSCALL ER
300	dis_dsp(void)
301	{
302	ER ercd;
303
304	LOG_DIS_DSP_ENTER();
305	CHECK_TSKCTX_UNL();
306
307	t_lock_cpu();
308	enadsp = FALSE;
309	ercd = E_OK;
310	t_unlock_cpu();
311
312	exit:
313	LOG_DIS_DSP_LEAVE(ercd);
314	return(ercd);
315	}
316
317	#endif /* __dis_dsp */
318
319	/*
320	* ãã£ã¹ãããã®è¨±å¯
321	*/
322	#ifdef __ena_dsp
323
324	SYSCALL ER
325	ena_dsp(void)
326	{
327	ER ercd;
328
329	LOG_ENA_DSP_ENTER();
330	CHECK_TSKCTX_UNL();
331
332	t_lock_cpu();
333	enadsp = TRUE;
334	if (runtsk != schedtsk) {
335	dispatch();
336	}
337	ercd = E_OK;
338	t_unlock_cpu();
339
340	exit:
341	LOG_ENA_DSP_LEAVE(ercd);
342	return(ercd);
343	}
344
345	#endif /* __ena_dsp */
346
347	/*
348	* ã³ã³ããã¹ãã®åç
349	§
350	*/
351	#ifdef __sns_ctx
352
353	SYSCALL BOOL
354	sns_ctx(void)
355	{
356	BOOL state;
357
358	LOG_SNS_CTX_ENTER();
359	state = sense_context() ? TRUE : FALSE;
360	LOG_SNS_CTX_LEAVE(state);
361	return(state);
362	}
363
364	#endif /* __sns_ctx */
365
366	/*
367	* CPUããã¯ç¶æ
368	ã®åç
369	§
370	*/
371	#ifdef __sns_loc
372
373	SYSCALL BOOL
374	sns_loc(void)
375	{
376	BOOL state;
377
378	LOG_SNS_LOC_ENTER();
379	state = sense_lock() ? TRUE : FALSE;
380	LOG_SNS_LOC_LEAVE(state);
381	return(state);
382	}
383
384	#endif /* __sns_loc */
385
386	/*
387	* ãã£ã¹ãããç¦æ¢ç¶æ
388	ã®åç
389	§
390	*/
391	#ifdef __sns_dsp
392
393	SYSCALL BOOL
394	sns_dsp(void)
395	{
396	BOOL state;
397
398	LOG_SNS_DSP_ENTER();
399	state = !(enadsp) ? TRUE : FALSE;
400	LOG_SNS_DSP_LEAVE(state);
401	return(state);
402	}
403
404	#endif /* __sns_dsp */
405
406	/*
407	* ãã£ã¹ãããä¿çç¶æ
408	ã®åç
409	§
410	*/
411	#ifdef __sns_dpn
412
413	SYSCALL BOOL
414	sns_dpn(void)
415	{
416	BOOL state;
417
418	LOG_SNS_DPN_ENTER();
419	state = (sense_context() \|\| sense_lock() \|\| !(enadsp)) ? TRUE : FALSE;
420	LOG_SNS_DPN_LEAVE(state);
421	return(state);
422	}
423
424	#endif /* __sns_dpn */
425
426	/*
427	* ã«ã¼ãã«åä½ç¶æ
428	ã®åç
429	§
430	*/
431	#ifdef __vsns_ini
432
433	SYSCALL BOOL
434	vsns_ini(void)
435	{
436	BOOL state;
437
438	LOG_VSNS_INI_ENTER();
439	state = !(iniflg) ? TRUE : FALSE;
440	LOG_VSNS_INI_LEAVE(state);
441	return(state);
442	}
443
444	#endif /* __vsns_ini */

Note: See TracBrowser for help on using the repository browser.

Context Navigation

source: anotherchoice/tags/jsp-1.4.4-full-UTF8/kernel/sys_manage.c@ 363

Download in other formats: