source: rtos_arduino/trunk/asp_1.9.2/test/perf4.c@ 136

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

ライブラリとOS及びベーシックなサンプルの追加.

File size: 6.0 KB
Line 
1/*
2 * TOPPERS Software
3 * Toyohashi Open Platform for Embedded Real-Time Systems
4 *
5 * Copyright (C) 2006-2009 by Embedded and Real-Time Systems Laboratory
6 * Graduate School of Information Science, Nagoya Univ., JAPAN
7 *
8 * 上記著作権者
9は,以下の(1)~(4)の条件を満たす場合に限り,本ソフトウェ
10 * ア(本ソフトウェアを改変したものを含む.以下同じ)を使用・複製・改
11 * 変・再é…
12å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する.
13 * (1) 本ソフトウェアをソースコードの形で利用する場合には,上記の著作
14 * 権表示,この利用条件および下記の無保証規定が,そのままの形でソー
15 * スコード中に含まれていること.
16 * (2) 本ソフトウェアを,ライブラリ形式など,他のソフトウェア開発に使
17 * 用できる形で再é…
18å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
19å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
20 * 者
21マニュアルなど)に,上記の著作権表示,この利用条件および下記
22 * の無保証規定を掲載すること.
23 * (3) 本ソフトウェアを,機器に組み込むなど,他のソフトウェア開発に使
24 * 用できない形で再é…
25å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
26 * と.
27 * (a) 再é…
28å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
29マニュアルなど)に,上記の著
30 * 作権表示,この利用条件および下記の無保証規定を掲載すること.
31 * (b) 再é…
32å¸ƒã®å½¢æ…
33‹ã‚’,別に定める方法によって,TOPPERSプロジェクトに
34 * 報告すること.
35 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
36 * 害からも,上記著作権者
37およびTOPPERSプロジェクトをå…
38è²¬ã™ã‚‹ã“と.
39 * また,本ソフトウェアのユーザまたはエンドユーザからのいかなる理
40 * 由に基づく請求からも,上記著作権者
41およびTOPPERSプロジェクトを
42 * å…
43è²¬ã™ã‚‹ã“と.
44 *
45 * 本ソフトウェアは,無保証で提供されているものである.上記著作権者
46お
47 * よびTOPPERSプロジェクトは,本ソフトウェアに関して,特定の使用目的
48 * に対する適合性も含めて,いかなる保証も行わない.また,本ソフトウェ
49 * アの利用により直接的または間接的に生じたいかなる損害に関しても,そ
50 * の責任を負わない.
51 *
52 * @(#) $Id: perf4.c 2673 2015-02-08 10:08:03Z ertl-hiro $
53 */
54
55/*
56 * カーネル性能評価プログラム(4)
57 *
58 * act_tsk,iact_tskの処理時間とタスク切換え時間を計測するためのプログ
59 * ラム.以下の3つの時間を測定する.
60 *
61 * (1) タスク切換えを起こさないact_tskの処理時間.自タスクよりも優å…
62ˆåº¦
63 * の低いタスクに対してact_tskを発行し,休止状æ…
64‹ã‹ã‚‰å®Ÿè¡Œã§ãã‚‹çŠ¶æ…
65‹
66 * に遷移させる処理の時間.
67 *
68 * (2) タスク切換えを起こすact_tskの処理時間.自タスクよりも優å…
69ˆåº¦ã®é«˜
70 * いタスクに対してact_tskを発行し,休止状æ…
71‹ã‹ã‚‰å®Ÿè¡Œã§ãã‚‹çŠ¶æ…
72‹ã«é·
73 * 移させ,タスク切換えを起こして,高い優å…
74ˆåº¦ã®ã‚¿ã‚¹ã‚¯ã®å®Ÿè¡ŒãŒå§‹ã¾
75 * るまでの時間.
76 *
77 * (3) タスク切換えを起こすiact_tskの処理時間.周期ハンドラから,実行
78 * 状æ…
79‹ã®ã‚¿ã‚¹ã‚¯ã‚ˆã‚Šã‚‚高い優å…
80ˆåº¦ã®ã‚¿ã‚¹ã‚¯ã«å¯¾ã—てact_tskを発行し,休
81 * 止状æ…
82‹ã‹ã‚‰å®Ÿè¡Œã§ãã‚‹çŠ¶æ…
83‹ã«é·ç§»ã•ã›ãŸã‚とに周期ハンドラからリター
84 * ンし,タスク切換えを起こして,高い優å…
85ˆåº¦ã®ã‚¿ã‚¹ã‚¯ã®å®Ÿè¡ŒãŒå§‹ã¾ã‚‹
86 * までの時間.
87 */
88
89#include <kernel.h>
90#include <t_syslog.h>
91#include <test_lib.h>
92#include <histogram.h>
93#include "kernel_cfg.h"
94#include "perf4.h"
95
96/*
97 * 計測回数と実行時間分布を記録する最大時間
98 */
99#define NO_MEASURE 10000U /* 計測回数 */
100#define MAX_TIME 1000U /* 実行時間分布を記録する最大時間 */
101
102/*
103 * 実行時間分布を記録するメモリ領域
104 */
105static uint_t histarea1[MAX_TIME + 1];
106static uint_t histarea2[MAX_TIME + 1];
107static uint_t histarea3[MAX_TIME + 1];
108
109/*
110 * 計測タスク1(高優å…
111ˆåº¦ï¼‰
112 */
113void task1(intptr_t exinf)
114{
115 end_measure(2);
116 ext_tsk();
117}
118
119/*
120 * 計測タスク2とメインタスクのå…
121±æœ‰å¤‰æ•°
122 */
123volatile uint_t task2_count;
124
125/*
126 * 計測タスク2(高優å…
127ˆåº¦ï¼‰
128 */
129void task2(intptr_t exinf)
130{
131 end_measure(3);
132 task2_count++;
133 ext_tsk();
134}
135
136/*
137 * 計測タスク3(低優å…
138ˆåº¦ï¼‰
139 */
140void task3(intptr_t exinf)
141{
142 ext_tsk();
143}
144
145/*
146 * 計測タスク4(最低優å…
147ˆåº¦ï¼‰
148 */
149void task4(intptr_t exinf)
150{
151 while (true) {
152 wup_tsk(MAIN_TASK);
153 }
154}
155
156/*
157 * 周期ハンドラ
158 */
159void cyclic_handler(intptr_t exinf)
160{
161 begin_measure(3);
162 iact_tsk(TASK2);
163}
164
165/*
166 * メインタスク(中優å…
167ˆåº¦ï¼‰
168 */
169void main_task(intptr_t exinf)
170{
171 uint_t i;
172
173 syslog_0(LOG_NOTICE, "Performance evaluation program (4)");
174 init_hist(1, MAX_TIME, histarea1);
175 init_hist(2, MAX_TIME, histarea2);
176 init_hist(3, MAX_TIME, histarea3);
177 syslog_flush();
178
179 /*
180 * タスク切換えを起こさないact_tskの処理時間の測定
181 */
182 for (i = 0; i < NO_MEASURE; i++) {
183 begin_measure(1);
184 act_tsk(TASK3);
185 end_measure(1);
186 slp_tsk();
187 }
188
189 /*
190 * タスク切換えを起こすact_tskの処理時間の測定
191 */
192 for (i = 0; i < NO_MEASURE; i++) {
193 begin_measure(2);
194 act_tsk(TASK1);
195 }
196
197 /*
198 * タスク切換えを起こすiact_tskの処理時間の測定(測定回数は10分の1)
199 */
200 task2_count = 0;
201 sta_cyc(CYC1);
202 while (task2_count < NO_MEASURE / 10) ;
203 stp_cyc(CYC1);
204
205 syslog_0(LOG_NOTICE, "Execution times of act_tsk without task switch");
206 print_hist(1);
207 syslog_0(LOG_NOTICE, "Execution times of act_tsk with task switch");
208 print_hist(2);
209 syslog_0(LOG_NOTICE, "Execution times of iact_tsk with task switch");
210 print_hist(3);
211 test_finish();
212}
Note: See TracBrowser for help on using the repository browser.