Context Navigation

← Previous Revision
Latest Revision
Next Revision →
Blame
Revision Log

test_tex1.c@ 61

Last change on this file since 61 was 61, checked in by ertl-honda, 11 years ago
ASP for EWARM のコミット．
File size: 14.2 KB

Line
1	/*
2	* TOPPERS Software
3	* Toyohashi Open Platform for Embedded Real-Time Systems
4	*
5	* Copyright (C) 2006-2010 by Embedded and Real-Time Systems Laboratory
6	* Graduate School of Information Science, Nagoya Univ., JAPAN
7	*
8	* ãLì ÒÍCÈºÌ(1)`(4)Ìðð½·êÉÀèC{\tgEF
9	* Ai{\tgEFAðüÏµ½àÌðÜÞDÈº¯¶jðgpE¡»Eü
10	* ÏEÄzziÈºCpÆÄÔj·é±Æð³Åø·éD
11	* (1) {\tgEFAð\[XR[hÌ`Åp·éêÉÍCãLÌì
12	* \¦C±Ìpð¨æÑºLÌ³ÛØKèªC»ÌÜÜÌ`Å\[
13	* XR[hÉÜÜêÄ¢é±ÆD
14	* (2) {\tgEFAðCCu`®ÈÇC¼Ì\tgEFAJÉg
15	* pÅ«é`ÅÄzz·éêÉÍCÄzzÉº¤hL
16	gip
17	* Ò}j
18	AÈÇjÉCãLÌì \¦C±Ìpð¨æÑºL
19	* Ì³ÛØKèðfÚ·é±ÆD
20	* (3) {\tgEFAðC@íÉgÝÞÈÇC¼Ì\tgEFAJÉg
21	* pÅ«È¢`ÅÄzz·éêÉÍCÌ¢¸ê©Ìðð½·±
22	* ÆD
23	* (a) ÄzzÉº¤hL
24	gipÒ}j
25	AÈÇjÉCãLÌ
26	* ì \¦C±Ìpð¨æÑºLÌ³ÛØKèðfÚ·é±ÆD
27	* (b) ÄzzÌ`ÔðCÊÉèßéû@ÉæÁÄCTOPPERSvWFNgÉ
28	* ñ·é±ÆD
29	* (4) {\tgEFAÌpÉæè¼ÚIÜ½ÍÔÚIÉ¶¶é¢©Èé¹
30	* Q©çàCãLì Ò¨æÑTOPPERSvWFNgðÆÓ·é±ÆD
31	* Ü½C{\tgEFAÌ[UÜ½ÍGh[U©çÌ¢©Èé
32	* RÉîÃ¿©çàCãLì Ò¨æÑTOPPERSvWFNgð
33	* ÆÓ·é±ÆD
34	*
35	* {\tgEFAÍC³ÛØÅñ³êÄ¢éàÌÅ éDãLì Ò¨
36	* æÑTOPPERSvWFNgÍC{\tgEFAÉÖµÄCÁèÌgpÚI
37	* ÉÎ·éK«àÜßÄC¢©ÈéÛØàsíÈ¢DÜ½C{\tgEF
38	* AÌpÉæè¼ÚIÜ½ÍÔÚIÉ¶¶½¢©Èé¹QÉÖµÄàC»
39	* ÌÓCðíÈ¢D
40	*
41	* @(#) $Id: test_tex1.c 2007 2010-12-31 05:48:15Z ertl-hiro $
42	*/
43
44	/*
45	* ^XNáOÉÖ·éeXg(1)
46	*
47	* yeXgÌÚIz
48	*
49	* ^XN©ç^XNáO[`ðN®·éðÔ
50	IÉeXg·éD
51	*
52	* yeXgÚz
53	*
54	* (A) ras_texÌG[o
55	* (A-1) ÎÛ^XNªx~óÔ
56	* (A-2) ÎÛ^XNÌ^XNáO[`ªè`³êÄ¢È¢
57	* (B) dis_texÌG[o
58	* (B-1) ©^XNÌ^XNáO[`ªè`³êÄ¢È¢
59	* (C) ena_texÌG[o
60	* (C-1) ©^XNÌ^XNáO[`ªè`³êÄ¢È¢
61	* (D) ref_texÌG[o
62	* (D-1) ÎÛ^XNªx~óÔ
63	* (D-2) ÎÛ^XNÌ^XNáO[`ªè`³êÄ¢È¢
64	* (E) ras_texÌ³í
65	* (E-1) ÎÛ^XNª©^XNC^XNáOÂC©ÂÝDæ
66	* x}XNSðóÔÅC·®ÉÀsJn
67	* (E-2) ÎÛ^XNª©^XNÅÈ¢
68	* (E-3) ÎÛ^XNª©^XN¾ªC^XNáOÖ~
69	* (E-4) ÎÛ^XNª©^XNÅ^XNáOÂ¾ªCÝDæ
70	* x}XNªSðÅÈ¢
71	* (F) ena_texÌ³í
72	* (F-1) ^XNáOvª èC©ÂÝDæx}XNSðó
73	* ÔÅC·®ÉÀsJn
74	* (F-2) ^XNáOvªÈ¢
75	* (F-3) ^XNáOvª éªCÝDæx}XNªSðÅ
76	* È¢
77	* (G) chg_ipmÌ³í
78	* (G-1) ^XNáOvª èC©Â^XNáOÂÅC·®
79	* ÉÀsJn
80	* (G-2) ^XNáOvªÈ¢
81	* (G-3) ^XNáOvª éªC^XNáOÖ~
82	* (H) ^XNfBXpb`ÉæéN®
83	* (H-1) fBXpb`ãÌ^XNª^XNáOÂÅ^XNáOv
84	* è
85	* (I) ^XNáO[`©çÌ^[ÉæéN®iA±N®j
86	* (J) ^XNáO[`©çÌßèÉæéóÔA
87	* (J-1) ^XNÉßÁÄé
88	* (J-2) ^XNáO[`ªA±N®³êé
89	* (K) ^XNáO[`Ì½dN®
90	* (L) ^XNáO[`©çÌßèÌ^XNØ·¦
91	*
92	* ygp\[Xz
93	*
94	* TASK1: CÌ^XND©^XNÉÎµÄ^XNáOðv·é
95	* TASK2: ¼^XNÉÎµÄ^XNáOðv·éÎÛ^XN
96	* TASK3: ^XNáO[`ªè`³êÄ¢È¢^XN
97	* TASK4: x~óÔÌ^XN
98	*
99	* yeXgV[PXz
100	*
101	* == TASK1iDæxF10j==
102	* 1: úóÔÌ`FbN
103	* ref_tex(TSK_SELF, &rtex)
104	* ras_tex(TASK3, 0x0001) -> E_OBJ ... (A-2)
105	* ras_tex(TASK4, 0x0001) -> E_OBJ ... (A-1)
106	* ref_tex(TASK3, &rtex) -> E_OBJ ... (D-2)
107	* ref_tex(TASK4, &rtex) -> E_OBJ ... (D-1)
108	* 2: ena_tex() ... (F-2)
109	* ref_tex(TSK_SELF, &rtex)
110	* 3: ras_tex(TSK_SELF, 0x0001) ... (E-1)
111	* == TASK1^XNáO[`i1ñÚj==
112	* 4: úóÔÌ`FbN
113	* 5: dis_dsp() ... 4ÂÌóÔð»ê¼êÏ»³¹é
114	* chg_ipm(TMAX_INTPRI)
115	* ena_tex()
116	* loc_cpu()
117	* ^[
118	* == TASK1i±«j==
119	* 6: ßÁÄ«½óÔÌ`FbN ... (J-1)
120	* 7: dis_dsp() ... fBXpb`Ö~C^XNáOÖ~
121	* dis_tex()
122	* 8: ras_tex(TASK1, 0x0002) ... (E-3)
123	* ref_tex(TSK_SELF, &rtex)
124	* 9: ena_tex() ... (F-1)
125	* == TASK1^XNáO[`i2ñÚj==
126	* 10: úóÔÌ`FbN
127	* 11: ras_tex(TASK1, 0x0001) ... (E-3)
128	* ras_tex(TASK1, 0x0002) ... (E-3)
129	* 12: ena_dsp() ... 3ÂÌóÔð»ê¼êÏ»³¹é
130	* chg_ipm(TMAX_INTPRI)
131	* loc_cpu()
132	* ^[ ... (I)
133	* == TASK1^XNáO[`i3ñÚj==
134	* 13: úóÔÌ`FbN
135	* 14: ena_dsp() ... fBXpb`ÂC^XNáOÂ
136	* chg_ipm(TMAX_INTPRI)
137	* ena_tex()
138	* chg_ipm(TIPM_ENAALL) ... (G-2)
139	* chg_ipm(TMAX_INTPRI)
140	* 15: ras_tex(TSK_SELF, 0x0004) ... (E-4)
141	* dis_tex()
142	* chg_ipm(TIPM_ENAALL) ... (G-3)
143	* chg_ipm(TMAX_INTPRI)
144	* ena_tex() ... (F-3)
145	* 16: chg_ipm(TIPM_ENAALL) ... (G-1)(K)
146	* == TASK1^XNáO[`i4ñÚj==
147	* 17: úóÔÌ`FbN
148	* 18: dis_dsp() ... 3ÂÌóÔð»ê¼êÏ»³¹é
149	* chg_ipm(TMAX_INTPRI)
150	* loc_cpu()
151	* ^[
152	* == TASK1^XNáO[`i3ñÚ±«j==
153	* 19: ßÁÄ«½óÔÌ`FbN ... (J-2)
154	* ^[
155	* == TASK1i±«j==
156	* 20: ßÁÄ«½óÔÌ`FbN ... (J-1)
157	* 21: ena_dsp()
158	* rot_rdq(TPRI_SELF)
159	* == TASK2iDæxF10j ==
160	* 22: úóÔÌ`FbN
161	* 23: ena_tex()
162	* rot_rdq(TPRI_SELF)
163	* == TASK3iDæxF10j ==
164	* 24: úóÔÌ`FbN
165	* 25: ena_tex() -> E_OBJ ... (C-1)
166	* 26: dis_tex() -> E_OBJ ... (B-1)
167	* ext_tsk()
168	* == TASK1i±«j==
169	* 27: ras_tex(TASK2, 0x0001) ... (E-2)
170	* ref_tex(TASK2, &rtex)
171	* 28: rot_rdq(TPRI_SELF) ... (H-1)
172	* == TASK2^XNáO[`i1ñÚj==
173	* 29: úóÔÌ`FbN
174	* ^[
175	* == TASK2i±«j==
176	* 30: ras_tex(TSK_SELF, 0x0002)
177	* == TASK2^XNáO[`i2ñÚj==
178	* 31: úóÔÌ`FbN
179	* 32: dis_dsp()
180	* rot_rdq(TPRI_SELF)
181	* 33: ^[ ... (L)
182	* == TASK1i±«j==
183	* 34: ^[i^XNI¹j
184	* == TASK2i±«j==
185	* 35: eXgI¹
186	*/
187
188	#include <kernel.h>
189	#include <test_lib.h>
190	#include <t_syslog.h>
191	#include "kernel_cfg.h"
192	#include "test_tex1.h"
193
194	void
195	tex_task1(TEXPTN texptn, intptr_t exinf)
196	{
197	ER ercd;
198
199	switch (texptn) {
200	case 0x0001:
201	check_point(4);
202	check_state(false, false, TIPM_ENAALL, false, false, true);
203
204	/*
205	* fBXpb`Ö~CÝDæx}XNÏXC^XNáOÂ
206	*/
207	check_point(5);
208	ercd = dis_dsp();
209	check_ercd(ercd, E_OK);
210	ercd = chg_ipm(TMAX_INTPRI);
211	check_ercd(ercd, E_OK);
212	ercd = ena_tex();
213	check_ercd(ercd, E_OK);
214	ercd = loc_cpu();
215	check_ercd(ercd, E_OK);
216	check_state(false, true, TMAX_INTPRI, true, true, false);
217	break;
218
219	case 0x0002:
220	check_point(10);
221	check_state(false, false, TIPM_ENAALL, true, true, true);
222
223	/*
224	* ^XNáOðv
225	*/
226	check_point(11);
227	ercd = ras_tex(TSK_SELF, 0x0001);
228	check_ercd(ercd, E_OK);
229	ercd = ras_tex(TSK_SELF, 0x0002);
230	check_ercd(ercd, E_OK);
231
232	/*
233	* fBXpb`ÂCÝDæx}XNÏXCCPUbN
234	*/
235	check_point(12);
236	ercd = ena_dsp();
237	check_ercd(ercd, E_OK);
238	ercd = chg_ipm(TMAX_INTPRI);
239	check_ercd(ercd, E_OK);
240	ercd = loc_cpu();
241	check_ercd(ercd, E_OK);
242	check_state(false, true, TMAX_INTPRI, false, true, true);
243	break;
244
245	case 0x0003:
246	check_point(13);
247	check_state(false, false, TIPM_ENAALL, true, true, true);
248
249	/*
250	* fBXpb`ÂCÝDæx}XNÏXC^XNáOÂ
251	*/
252	check_point(14);
253	ercd = ena_dsp();
254	check_ercd(ercd, E_OK);
255	ercd = chg_ipm(TMAX_INTPRI);
256	check_ercd(ercd, E_OK);
257	ercd = ena_tex();
258	check_ercd(ercd, E_OK);
259	check_state(false, false, TMAX_INTPRI, false, true, false);
260
261	ercd = chg_ipm(TIPM_ENAALL);
262	check_ercd(ercd, E_OK);
263	ercd = chg_ipm(TMAX_INTPRI);
264	check_ercd(ercd, E_OK);
265
266	/*
267	* ^XNáOðv
268	*/
269	check_point(15);
270	ercd = ras_tex(TSK_SELF, 0x0004);
271
272	ercd = dis_tex();
273	check_ercd(ercd, E_OK);
274	ercd = chg_ipm(TIPM_ENAALL);
275	check_ercd(ercd, E_OK);
276	ercd = chg_ipm(TMAX_INTPRI);
277	check_ercd(ercd, E_OK);
278	ercd = ena_tex();
279	check_ercd(ercd, E_OK);
280
281	check_point(16);
282	ercd = chg_ipm(TIPM_ENAALL);
283	/* ±±Å^XNáO[`ª®ì·é */
284	check_ercd(ercd, E_OK);
285
286	/*
287	* ^XNáO©çÌ^[Éæè³ÌóÔÉßÁÄ¢é±Æ
288	* ð`FbN
289	*/
290	check_point(19);
291	check_state(false, false, TIPM_ENAALL, false, false, false);
292	break;
293
294	case 0x0004:
295	check_point(17);
296	check_state(false, false, TIPM_ENAALL, false, false, true);
297
298	/*
299	* fBXpb`Ö~CÝDæx}XNÏXCCPUbN
300	*/
301	check_point(18);
302	ercd = dis_dsp();
303	check_ercd(ercd, E_OK);
304	ercd = chg_ipm(TMAX_INTPRI);
305	check_ercd(ercd, E_OK);
306	ercd = loc_cpu();
307	check_ercd(ercd, E_OK);
308	check_state(false, true, TMAX_INTPRI, true, true, true);
309	break;
310
311	default:
312	check_point(0);
313	break;
314	}
315	}
316
317	void
318	task1(intptr_t exinf)
319	{
320	ER ercd;
321	T_RTEX rtex;
322
323	/*
324	* úóÔÌ`FbN
325	*/
326	check_point(1);
327	check_state(false, false, TIPM_ENAALL, false, false, true);
328	ercd = ref_tex(TSK_SELF, &rtex);
329	check_ercd(ercd, E_OK);
330	check_assert((rtex.texstat & TTEX_DIS) != 0);
331	check_assert(rtex.pndptn == 0);
332
333	/*
334	* ras_texÌG[o
335	*/
336	ercd = ras_tex(TASK3, 0x0001);
337	check_ercd(ercd, E_OBJ);
338	ercd = ras_tex(TASK4, 0x0001);
339	check_ercd(ercd, E_OBJ);
340
341	/*
342	* ref_texÌG[o
343	*/
344	ercd = ref_tex(TASK3, &rtex);
345	check_ercd(ercd, E_OBJ);
346	ercd = ref_tex(TASK4, &rtex);
347	check_ercd(ercd, E_OBJ);
348
349	/*
350	* ^XNáOÌÂ
351	*/
352	check_point(2);
353	ercd = ena_tex();
354	check_ercd(ercd, E_OK);
355	check_state(false, false, TIPM_ENAALL, false, false, false);
356	ercd = ref_tex(TSK_SELF, &rtex);
357	check_ercd(ercd, E_OK);
358	check_assert((rtex.texstat & TTEX_ENA) != 0);
359	check_assert(rtex.pndptn == 0);
360
361	/*
362	* ^XNáOðv
363	*/
364	check_point(3);
365	ercd = ras_tex(TSK_SELF, 0x0001);
366	/* ±±Å^XNáO[`ª®ì·é */
367	check_ercd(ercd, E_OK);
368
369	/*
370	* ^XNáO©çÌ^[Éæè³ÌóÔÉßÁÄ¢é±Æð
371	* `FbN
372	*/
373	check_point(6);
374	check_state(false, false, TIPM_ENAALL, false, false, false);
375
376	/*
377	* fBXpb`Ö~C^XNáOÖ~
378	*/
379	check_point(7);
380	ercd = dis_dsp();
381	check_ercd(ercd, E_OK);
382	ercd = dis_tex();
383	check_ercd(ercd, E_OK);
384	check_state(false, false, TIPM_ENAALL, true, true, true);
385
386	/*
387	* ^XNáOðv
388	*/
389	check_point(8);
390	ercd = ras_tex(TASK1, 0x0002);
391	check_ercd(ercd, E_OK);
392	ercd = ref_tex(TSK_SELF, &rtex);
393	check_ercd(ercd, E_OK);
394	check_assert((rtex.texstat & TTEX_DIS) != 0);
395	check_assert(rtex.pndptn == 0x0002);
396
397	/*
398	* ^XNáOðÂ
399	*/
400	check_point(9);
401	ercd = ena_tex();
402	/* ±±Å^XNáO[`ª®ì·é */
403	check_ercd(ercd, E_OK);
404
405	/*
406	* ^XNáO©çÌ^[Éæè³ÌóÔÉßÁÄ¢é±Æð
407	* `FbN
408	*/
409	check_point(20);
410	check_state(false, false, TIPM_ENAALL, true, true, false);
411
412	/*
413	* ^XN2ÉØè·¦é
414	*/
415	check_point(21);
416	ercd = ena_dsp();
417	check_ercd(ercd, E_OK);
418	ercd = rot_rdq(TPRI_SELF);
419	/* ±±Å¼Ì^XNª®ì·é */
420	check_ercd(ercd, E_OK);
421
422	/*
423	* ^XN2ÉÎµÄ^XNáOðv
424	*/
425	check_point(27);
426	ercd = ras_tex(TASK2, 0x0001);
427	check_ercd(ercd, E_OK);
428	ercd = ref_tex(TASK2, &rtex);
429	check_ercd(ercd, E_OK);
430	check_assert((rtex.texstat & TTEX_ENA) != 0);
431	check_assert(rtex.pndptn == 0x0001);
432
433	/*
434	* ^XN2ÉØè·¦é
435	*/
436	check_point(28);
437	ercd = rot_rdq(TPRI_SELF);
438	/* ±±Å¼Ì^XNª®ì·é */
439	check_ercd(ercd, E_OK);
440
441	/*
442	* ^XNI¹
443	*/
444	check_point(34);
445	}
446
447	void
448	tex_task2(TEXPTN texptn, intptr_t exinf)
449	{
450	ER ercd;
451
452	switch (texptn) {
453	case 0x0001:
454	check_point(29);
455	check_state(false, false, TIPM_ENAALL, false, false, true);
456	break;
457
458	case 0x0002:
459	check_point(31);
460	check_state(false, false, TIPM_ENAALL, false, false, true);
461
462	/*
463	* fBXpb`ðÖ~µÄC^XNØ·¦ðv·éD
464	*/
465	check_point(32);
466	ercd = dis_dsp();
467	check_ercd(ercd, E_OK);
468	ercd = rot_rdq(TPRI_SELF);
469	check_ercd(ercd, E_OK);
470
471	/*
472	* ^XNáO[`©çÌ^[ÅC^XNØ·¦ª¶
473	* ·éD
474	*/
475	check_point(33);
476	break;
477
478	default:
479	check_point(0);
480	break;
481	}
482	}
483
484	void
485	task2(intptr_t exinf)
486	{
487	ER ercd;
488
489	/*
490	* úóÔÌ`FbN
491	*/
492	check_point(22);
493	check_state(false, false, TIPM_ENAALL, false, false, true);
494
495	/*
496	* ^XNáOÌÂ
497	*/
498	check_point(23);
499	ercd = ena_tex();
500	check_ercd(ercd, E_OK);
501	check_state(false, false, TIPM_ENAALL, false, false, false);
502
503	/*
504	* ^XN3ÉØè·¦é
505	*/
506	ercd = rot_rdq(TPRI_SELF);
507	/* ±±Å¼Ì^XNª®ì·é */
508	check_ercd(ercd, E_OK);
509
510	/*
511	* ^XNáOðv
512	*/
513	check_point(30);
514	ercd = ras_tex(TSK_SELF, 0x0002);
515	/* ±±Å^XNáO[`ª®ì·é */
516	check_ercd(ercd, E_OK);
517
518	/*
519	* eXgI¹
520	*/
521	check_finish(35);
522	}
523
524	void
525	task3(intptr_t exinf)
526	{
527	ER ercd;
528
529	/*
530	* úóÔÌ`FbN
531	*/
532	check_point(24);
533	check_state(false, false, TIPM_ENAALL, false, false, true);
534
535	/*
536	* ^XNáOÌÂ
537	*/
538	check_point(25);
539	ercd = ena_tex();
540	check_ercd(ercd, E_OBJ);
541	check_state(false, false, TIPM_ENAALL, false, false, true);
542
543	/*
544	* ^XNáOÌÖ~
545	*/
546	check_point(26);
547	ercd = dis_tex();
548	check_ercd(ercd, E_OBJ);
549	check_state(false, false, TIPM_ENAALL, false, false, true);
550
551	/*
552	* ^XNI¹
553	*/
554	ercd = ext_tsk();
555	check_point(0);
556	}
557
558	void
559	task4(intptr_t exinf)
560	{
561	check_point(0);
562	}
563
564	void
565	tex_task4(TEXPTN texptn, intptr_t exinf)
566	{
567	check_point(0);
568	}

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

Context Navigation

source: asp_ewarm/asp-1.7.0/test/test_tex1.c@ 61

Download in other formats: