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

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

ASP for EWARM のコミット.

File size: 3.8 KB
Line 
1/*
2 * TOPPERS Software
3 * Toyohashi Open Platform for Embedded Real-Time Systems
4 *
5 * Copyright (C) 2007-2009 by Embedded and Real-Time Systems Laboratory
6 * Graduate School of Information Science, Nagoya Univ., JAPAN
7 *
8 * ã‹L’˜ìŒ ŽÒ‚́CˆÈ‰º‚Ì(1)`(4)‚ÌðŒ‚ð–ž‚½‚·ê‡‚ÉŒÀ‚èC–{ƒ\ƒtƒgƒEƒF
9 * ƒAi–{ƒ\ƒtƒgƒEƒFƒA‚ð‰ü•Ï‚µ‚½‚à‚Ì‚ðŠÜ‚ށDˆÈ‰º“¯‚¶j‚ðŽg—pE•¡»E‰ü
10 * •ÏEÄ”z•ziˆÈ‰ºC—˜—p‚ƌĂԁj‚·‚邱‚Ƃ𖳏ž‚Å‹–‘ø‚·‚éD
11 * (1) –{ƒ\ƒtƒgƒEƒFƒA‚ðƒ\[ƒXƒR[ƒh‚ÌŒ`‚Å—˜—p‚·‚éê‡‚ɂ́Cã‹L‚Ì’˜ì
12 * Œ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L‚Ì–³•ÛØ‹K’肪C‚»‚Ì‚Ü‚Ü‚ÌŒ`‚Ń\[
13 * ƒXƒR[ƒh’†‚ÉŠÜ‚Ü‚ê‚Ä‚¢‚邱‚ƁD
14 * (2) –{ƒ\ƒtƒgƒEƒFƒA‚ðCƒ‰ƒCƒuƒ‰ƒŠŒ`Ž®‚ȂǁC‘¼‚̃\ƒtƒgƒEƒFƒAŠJ”­‚ÉŽg
15 * —p‚Å‚«‚éŒ`‚ōĔz•z‚·‚éê‡‚ɂ́CÄ”z•z‚É”º‚¤ƒhƒLƒ…
16ƒƒ“ƒgi—˜—p
17 * ŽÒƒ}ƒjƒ…
18ƒAƒ‹‚Ȃǁj‚ɁCã‹L‚Ì’˜ìŒ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L
19 * ‚Ì–³•ÛØ‹K’è‚ðŒfÚ‚·‚邱‚ƁD
20 * (3) –{ƒ\ƒtƒgƒEƒFƒA‚ðC‹@Ší‚É‘g‚ݍž‚ނȂǁC‘¼‚̃\ƒtƒgƒEƒFƒAŠJ”­‚ÉŽg
21 * —p‚Å‚«‚È‚¢Œ`‚ōĔz•z‚·‚éê‡‚ɂ́CŽŸ‚Ì‚¢‚¸‚ê‚©‚ÌðŒ‚ð–ž‚½‚·‚±
22 * ‚ƁD
23 * (a) Ä”z•z‚É”º‚¤ƒhƒLƒ…
24ƒƒ“ƒgi—˜—pŽÒƒ}ƒjƒ…
25ƒAƒ‹‚Ȃǁj‚ɁCã‹L‚Ì’˜
26 * ìŒ •\Ž¦C‚±‚Ì—˜—pðŒ‚¨‚æ‚щº‹L‚Ì–³•ÛØ‹K’è‚ðŒfÚ‚·‚邱‚ƁD
27 * (b) Ä”z•z‚ÌŒ`‘Ô‚ðC•Ê‚É’è‚ß‚é•û–@‚É‚æ‚Á‚āCTOPPERSƒvƒƒWƒFƒNƒg‚É
28 * •ñ‚·‚邱‚ƁD
29 * (4) –{ƒ\ƒtƒgƒEƒFƒA‚Ì—˜—p‚É‚æ‚è’¼Ú“I‚Ü‚½‚͊ԐړI‚ɐ¶‚¶‚é‚¢‚©‚Ȃ鑹
30 * ŠQ‚©‚ç‚àCã‹L’˜ìŒ ŽÒ‚¨‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚ð–Ɛӂ·‚邱‚ƁD
31 * ‚Ü‚½C–{ƒ\ƒtƒgƒEƒFƒA‚̃†[ƒU‚Ü‚½‚̓Gƒ“ƒhƒ†[ƒU‚©‚ç‚Ì‚¢‚©‚Ȃ闝
32 * —R‚ÉŠî‚­¿‹‚©‚ç‚àCã‹L’˜ìŒ ŽÒ‚¨‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚ð
33 * –Ɛӂ·‚邱‚ƁD
34 *
35 * –{ƒ\ƒtƒgƒEƒFƒA‚́C–³•ÛØ‚Å’ñ‹Ÿ‚³‚ê‚Ä‚¢‚é‚à‚Ì‚Å‚ ‚éDã‹L’˜ìŒ ŽÒ‚¨
36 * ‚æ‚ÑTOPPERSƒvƒƒWƒFƒNƒg‚́C–{ƒ\ƒtƒgƒEƒFƒA‚ÉŠÖ‚µ‚āC“Á’è‚ÌŽg—p–Ú“I
37 * ‚ɑ΂·‚é“K‡«‚àŠÜ‚߂āC‚¢‚©‚È‚é•ÛØ‚às‚í‚È‚¢D‚Ü‚½C–{ƒ\ƒtƒgƒEƒF
38 * ƒA‚Ì—˜—p‚É‚æ‚è’¼Ú“I‚Ü‚½‚͊ԐړI‚ɐ¶‚¶‚½‚¢‚©‚Ȃ鑹ŠQ‚ÉŠÖ‚µ‚Ä‚àC‚»
39 * ‚̐ӔC‚𕉂í‚È‚¢D
40 *
41 * @(#) $Id: perf3.c 1575 2009-05-31 14:15:46Z ertl-hiro $
42 */
43
44/*
45 * ƒJ[ƒlƒ‹«”\•]‰¿ƒvƒƒOƒ‰ƒ€(3)
46 *
47 * ‘Ò‚¿‰ðœ‚·‚éƒ^ƒXƒN‚̐”‚É‚æ‚èCset_flg‚̏ˆ—ŽžŠÔ‚ª‚ǂ̂悤‚ɕω»‚·‚é
48 * ‚©‚ðŒv‘ª‚·‚邽‚߂̃vƒƒOƒ‰ƒ€D
49 */
50
51#include <kernel.h>
52#include <t_syslog.h>
53#include <test_lib.h>
54#include <histogram.h>
55#include "kernel_cfg.h"
56#include "perf3.h"
57
58/*
59 * Œv‘ª‰ñ”‚ÆŽÀsŽžŠÔ•ª•z‚ð‹L˜^‚·‚éÅ‘厞ŠÔ
60 */
61#define NO_MEASURE 10000U /* Œv‘ª‰ñ” */
62#define MAX_TIME 1000U /* ŽÀsŽžŠÔ•ª•z‚ð‹L˜^‚·‚éÅ‘厞ŠÔ */
63
64/*
65 * ŽÀsŽžŠÔ•ª•z‚ð‹L˜^‚·‚郁ƒ‚ƒŠ—̈æ
66 */
67static uint_t histarea1[MAX_TIME + 1];
68
69/*
70 * Œv‘ªƒ^ƒXƒN‚̃ŠƒXƒg
71 */
72static ID task_list[20] = {
73 TASK1, TASK2, TASK3, TASK4, TASK5,
74 TASK6, TASK7, TASK8, TASK9, TASK10,
75 TASK11, TASK12, TASK13, TASK14, TASK15,
76 TASK16, TASK17, TASK18, TASK19, TASK20
77};
78
79/*
80 * Œv‘ªƒ^ƒXƒNi’†—Dæ“xj
81 */
82void task(intptr_t exinf)
83{
84 FLGPTN flgptn;
85
86 wai_flg(FLG1, 0x01U, TWF_ORW, &flgptn);
87}
88
89/*
90 * Œv‘ªƒ‹[ƒ`ƒ“
91 */
92void
93perf_eval(uint_t n)
94{
95 uint_t i, j;
96
97 init_hist(1, MAX_TIME, histarea1);
98
99 for (i = 0; i < NO_MEASURE; i++) {
100 ini_flg(FLG1);
101 for (j = 0; j < n; j++) {
102 act_tsk(task_list[j]);
103 }
104 chg_pri(TSK_SELF, MAIN_PRIORITY_LOW);
105 /* ƒ^ƒXƒN‚ª‘Ò‚¿ó‘Ô‚É“ü‚é‚Ì‚ð‘Ò‚Â */
106 chg_pri(TSK_SELF, TPRI_INI);
107
108 begin_measure(1);
109 set_flg(FLG1, 0x01U);
110 end_measure(1);
111
112 chg_pri(TSK_SELF, MAIN_PRIORITY_LOW);
113 /* ƒ^ƒXƒN‚ªI—¹‚·‚é‚Ì‚ð‘Ò‚Â */
114 chg_pri(TSK_SELF, TPRI_INI);
115 }
116
117 syslog_1(LOG_NOTICE, "Execution times of set_flg"
118 " when %d tasks are released from waiting.", n);
119 print_hist(1);
120 syslog_flush();
121}
122
123/*
124 * ƒƒCƒ“ƒ^ƒXƒNi‚—Dæ“xj
125 */
126void main_task(intptr_t exinf)
127{
128 syslog_0(LOG_NOTICE, "Performance evaluation program (3)");
129 syslog_flush();
130
131 perf_eval(0);
132 perf_eval(1);
133 perf_eval(2);
134 perf_eval(3);
135 perf_eval(4);
136 perf_eval(5);
137 perf_eval(10);
138 perf_eval(20);
139 test_finish();
140}
Note: See TracBrowser for help on using the repository browser.