source: asp_wo_cfg/trunk/arch/logtrace/trace_dump.c@ 49

Last change on this file since 49 was 49, checked in by ertl-hiro, 12 years ago

asp_wo_kernelをコミット。
  • Property svn:keywords set to Id
File size: 4.0 KB
Line 
1/*
2 * TOPPERS/ASP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Advanced Standard Profile Kernel
5 *
6 * Copyright (C) 2007-2011 by Embedded and Real-Time Systems Laboratory
7 * Graduate School of Information Science, Nagoya Univ., JAPAN
8 *
9 * 上記著作権者は，以下の(1)〜(4)の条件を満たす場合に限り，本ソフトウェ
10 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
11 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
12 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
13 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
14 * スコード中に含まれていること．
15 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
16 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
17 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
18 * の無保証規定を掲載すること．
19 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
20 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
21 * と．
22 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
23 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
24 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
25 * 報告すること．
26 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
27 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
28 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
29 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
30 * 免責すること．
31 *
32 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
33 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
34 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
35 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
36 * の責任を負わない．
37 *
38 * @(#) $Id: trace_dump.c 49 2012-09-06 04:41:53Z ertl-hiro $
39 */
40
41/*
42 * トレースログのダンプ
43 */
44
45#include "kernel_impl.h"
46#include "task.h"
47#include <log_output.h>
48
49/*
50 * カーネル情報の取出し
51 */
52static intptr_t
53get_tskid(intptr_t info)
54{
55 TCB *p_tcb;
56 ID tskid;
57
58 p_tcb = (TCB *) info;
59 if (p_tcb == NULL) {
60 tskid = 0;
61 }
62 else {
63 tskid = TSKID(p_tcb);
64 }
65 return((intptr_t) tskid);
66}
67
68static intptr_t
69get_tskstat(intptr_t info)
70{
71 uint_t tstat;
72 const char *tstatstr;
73
74 tstat = (uint_t) info;
75 switch (tstat & (TS_RUNNABLE|TS_WAITING|TS_SUSPENDED)) {
76 case TS_DORMANT:
77 tstatstr = "DORMANT";
78 break;
79 case TS_RUNNABLE:
80 tstatstr = "RUNNABLE";
81 break;
82 case TS_WAITING:
83 tstatstr = "WAITING";
84 break;
85 case TS_SUSPENDED:
86 tstatstr = "SUSPENDED";
87 break;
88 case TS_WAITING|TS_SUSPENDED:
89 tstatstr = "WAITING-SUSPENDED";
90 break;
91 default:
92 tstatstr = "unknown state";
93 break;
94 }
95 return((intptr_t) tstatstr);
96}
97
98/*
99 * トレースログの表示
100 */
101static void
102trace_print(TRACE *p_trace, void (*putc)(char))
103{
104 intptr_t traceinfo[TMAX_LOGINFO + 1];
105 const char *tracemsg;
106 int_t i;
107
108 traceinfo[0] = (intptr_t)(p_trace->logtim);
109 syslog_printf("[%d] ", traceinfo, putc);
110
111 switch (p_trace->logtype) {
112 case LOG_TYPE_TSKSTAT:
113 traceinfo[0] = get_tskid(p_trace->loginfo[0]);
114 traceinfo[1] = get_tskstat(p_trace->loginfo[1]);
115 tracemsg = "task %d becomes %s.";
116 break;
117 case LOG_TYPE_DSP|LOG_LEAVE:
118 traceinfo[0] = get_tskid(p_trace->loginfo[0]);
119 tracemsg = "dispatch to task %d.";
120 break;
121 case LOG_TYPE_COMMENT:
122 for (i = 1; i < TMAX_LOGINFO; i++) {
123 traceinfo[i-1] = p_trace->loginfo[i];
124 }
125 tracemsg = (const char *)(p_trace->loginfo[0]);
126 break;
127 case LOG_TYPE_ASSERT:
128 traceinfo[0] = p_trace->loginfo[0];
129 traceinfo[1] = p_trace->loginfo[1];
130 traceinfo[2] = p_trace->loginfo[2];
131 tracemsg = "%s:%u: Assertion `%s' failed.";
132 break;
133 default:
134 traceinfo[0] = p_trace->logtype;
135 tracemsg = "unknown trace log type: %d.";
136 break;
137 }
138 syslog_printf(tracemsg, traceinfo, putc);
139 (*putc)('\n');
140}
141
142/*
143 * トレースログのダンプ
144 */
145void
146trace_dump(intptr_t exinf)
147{
148 TRACE trace;
149 void (*putc)(char);
150
151 putc = (void (*)(char)) exinf;
152 while (trace_rea_log(&trace) >= 0) {
153 trace_print(&trace, putc);
154 }
155}
Note: See TracBrowser for help on using the repository browser.