source: rtos_arduino/trunk/asp_1.9.2/arch/logtrace/trace_dump.c@ 136

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

ライブラリとOS及びベーシックなサンプルの追加．
File size: 4.8 KB
Line 
1/*
2 * TOPPERS Software
3 * Toyohashi Open Platform for Embedded Real-Time Systems
4 *
5 * Copyright (C) 2007-2011 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: trace_dump.c 2420 2012-11-11 06:34:11Z ertl-hiro $
53 */
54
55/*
56 * トレースログのダンプ
57 */
58
59#include "kernel_impl.h"
60#include "task.h"
61#include <log_output.h>
62
63/*
64 * カーネル情
65報の取出し
66 */
67static intptr_t
68get_tskid(intptr_t info)
69{
70 TCB *p_tcb;
71 ID tskid;
72
73 p_tcb = (TCB *) info;
74 if (p_tcb == NULL) {
75 tskid = 0;
76 }
77 else {
78 tskid = TSKID(p_tcb);
79 }
80 return((intptr_t) tskid);
81}
82
83static intptr_t
84get_tskstat(intptr_t info)
85{
86 uint_t tstat;
87 const char *tstatstr;
88
89 tstat = (uint_t) info;
90 switch (tstat & (TS_RUNNABLE|TS_WAITING|TS_SUSPENDED)) {
91 case TS_DORMANT:
92 tstatstr = "DORMANT";
93 break;
94 case TS_RUNNABLE:
95 tstatstr = "RUNNABLE";
96 break;
97 case TS_WAITING:
98 tstatstr = "WAITING";
99 break;
100 case TS_SUSPENDED:
101 tstatstr = "SUSPENDED";
102 break;
103 case TS_WAITING|TS_SUSPENDED:
104 tstatstr = "WAITING-SUSPENDED";
105 break;
106 default:
107 tstatstr = "unknown state";
108 break;
109 }
110 return((intptr_t) tstatstr);
111}
112
113/*
114 * トレースログの表示
115 */
116static void
117trace_print(TRACE *p_trace, void (*putc)(char))
118{
119 intptr_t traceinfo[TMAX_LOGINFO + 1];
120 const char *tracemsg;
121 int_t i;
122
123 traceinfo[0] = (intptr_t)(p_trace->logtim);
124 syslog_printf("[%d] ", traceinfo, putc);
125
126 switch (p_trace->logtype) {
127 case LOG_TYPE_TSKSTAT:
128 traceinfo[0] = get_tskid(p_trace->loginfo[0]);
129 traceinfo[1] = get_tskstat(p_trace->loginfo[1]);
130 tracemsg = "task %d becomes %s.";
131 break;
132 case LOG_TYPE_DSP|LOG_LEAVE:
133 traceinfo[0] = get_tskid(p_trace->loginfo[0]);
134 tracemsg = "dispatch to task %d.";
135 break;
136 case LOG_TYPE_COMMENT:
137 for (i = 1; i < TMAX_LOGINFO; i++) {
138 traceinfo[i-1] = p_trace->loginfo[i];
139 }
140 tracemsg = (const char *)(p_trace->loginfo[0]);
141 break;
142 case LOG_TYPE_ASSERT:
143 traceinfo[0] = p_trace->loginfo[0];
144 traceinfo[1] = p_trace->loginfo[1];
145 traceinfo[2] = p_trace->loginfo[2];
146 tracemsg = "%s:%u: Assertion `%s' failed.";
147 break;
148 default:
149 traceinfo[0] = p_trace->logtype;
150 tracemsg = "unknown trace log type: %d.";
151 break;
152 }
153 syslog_printf(tracemsg, traceinfo, putc);
154 (*putc)('\n');
155}
156
157/*
158 * トレースログのダンプ
159 */
160void
161trace_dump(intptr_t exinf)
162{
163 TRACE trace;
164 void (*putc)(char);
165
166 putc = (void (*)(char)) exinf;
167 while (trace_rea_log(&trace) >= 0) {
168 trace_print(&trace, putc);
169 }
170}
Note: See TracBrowser for help on using the repository browser.