source: anotherchoice/tags/jsp-1.4.4-full-UTF8/library/log_output.c@ 363

Last change on this file since 363 was 363, checked in by ykominami, 5 years ago

add tags/jsp-1.4.4-full-UTF8
  • Property svn:executable set to *
File size: 6.0 KB
Line 
1/*
2 * TOPPERS/JSP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Just Standard Profile Kernel
5 *
6 * Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
7 * Toyohashi Univ. of Technology, JAPAN
8 * Copyright (C) 2004-2005 by Embedded and Real-Time Systems Laboratory
9 * Graduate School of Information Science, Nagoya Univ., JAPAN
10 *
11 * 上記著作権者
12は，以下の (1)〜(4) の条件か，Free Software Foundation
13 * によってå…
14¬è¡¨ã•ã‚Œã¦ã„ã‚‹ GNU General Public License の Version 2 に記
15 * 述されている条件を満たす場合に限り，本ソフトウェア（本ソフトウェア
16 * を改変したものを含む．以下同じ）を使用・複製・改変・再é…
17å¸ƒï¼ˆä»¥ä¸‹ï¼Œ
18 * 利用と呼ぶ）することを無償で許諾する．
19 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
20 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
21 * スコード中に含まれていること．
22 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
23 * 用できる形で再é…
24å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
25å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
26 * 者
27マニュアルなど）に，上記の著作権表示，この利用条件および下記
28 * の無保証規定を掲載すること．
29 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
30 * 用できない形で再é…
31å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
32 * と．
33 * (a) 再é…
34å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
35マニュアルなど）に，上記の著
36 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
37 * (b) 再é…
38å¸ƒã®å½¢æ…
39‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
40 * 報告すること．
41 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
42 * 害からも，上記著作権者
43およびTOPPERSプロジェクトをå…
44è²¬ã™ã‚‹ã“と．
45 *
46 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者
47お
48 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，その適用可能性も
49 * 含めて，いかなる保証も行わない．また，本ソフトウェアの利用により直
50 * 接的または間接的に生じたいかなる損害に関しても，その責任を負わない．
51 *
52 * @(#) $Id: log_output.c,v 1.11 2007/03/27 08:56:12 hiro Exp $
53 */
54
55/*
56 * システムログのフォーマット出力
57 */
58
59#include <t_services.h>
60
61/*
62 * ポインタを格納できる整数型のデフォルトの定義
63 */
64#ifndef _intptr_
65#define _intptr_ long
66#endif /* _intptr_ */
67
68/*
69 * 数値を文字列に変換
70 */
71#define CONVERT_BUFLEN ((sizeof(_intptr_) * CHAR_BIT + 2) / 3)
72 /* _intptr_型の数値の最大文字数 */
73static void
74convert(unsigned _intptr_ val, unsigned int radix, const char *radchar,
75 int width, int minus, int padzero, void (*putc)(char))
76{
77 char buf[CONVERT_BUFLEN];
78 int i, j;
79
80 i = 0;
81 do {
82 buf[i++] = radchar[val % radix];
83 val /= radix;
84 } while (val != 0);
85
86 width -= minus;
87 if (minus > 0 && padzero > 0) {
88 (*putc)('-');
89 }
90 for (j = i; j < width; j++) {
91 (*putc)((char)(padzero > 0 ? '0' : ' '));
92 }
93 if (minus > 0 && padzero <= 0) {
94 (*putc)('-');
95 }
96 while (i > 0) {
97 (*putc)(buf[--i]);
98 }
99}
100
101/*
102 * ログ情
103報のフォーマット出力
104 */
105static const char raddec[] = "0123456789";
106static const char radhex[] = "0123456789abcdef";
107static const char radHEX[] = "0123456789ABCDEF";
108
109void
110syslog_printf(const char *format, VP_INT *args, void (*putc)(char))
111{
112 int c;
113 int width;
114 int padzero;
115 _intptr_ val;
116 const char *str;
117
118 while ((c = *format++) != '\0') {
119 if (c != '%') {
120 (*putc)((char) c);
121 continue;
122 }
123
124 width = padzero = 0;
125 if ((c = *format++) == '0') {
126 padzero = 1;
127 c = *format++;
128 }
129 while ('0' <= c && c <= '9') {
130 width = width * 10 + c - '0';
131 c = *format++;
132 }
133 if (c == 'l') {
134 c = *format++;
135 }
136 switch (c) {
137 case 'd':
138 val = (_intptr_)(*args++);
139 if (val >= 0) {
140 convert((unsigned _intptr_) val, 10, raddec,
141 width, 0, padzero, putc);
142 }
143 else {
144 convert((unsigned _intptr_)(-val), 10, raddec,
145 width, 1, padzero, putc);
146 }
147 break;
148 case 'u':
149 val = (_intptr_)(*args++);
150 convert((unsigned _intptr_) val, 10, raddec,
151 width, 0, padzero, putc);
152 break;
153 case 'x':
154 case 'p':
155 val = (_intptr_)(*args++);
156 convert((unsigned _intptr_) val, 16, radhex,
157 width, 0, padzero, putc);
158 break;
159 case 'X':
160 val = (_intptr_)(*args++);
161 convert((unsigned _intptr_) val, 16, radHEX,
162 width, 0, padzero, putc);
163 break;
164 case 'c':
165 (*putc)((char)(_intptr_)(*args++));
166 break;
167 case 's':
168 str = (const char *)(*args++);
169 while ((c = *str++) != '\0') {
170 (*putc)((char) c);
171 }
172 break;
173 case '%':
174 (*putc)('%');
175 break;
176 case '\0':
177 format--;
178 break;
179 default:
180 break;
181 }
182 }
183 (*putc)('\n');
184}
185
186void
187syslog_print(SYSLOG *p_log, void (*putc)(char))
188{
189 switch (p_log->logtype) {
190 case LOG_TYPE_COMMENT:
191 syslog_printf((const char *)(p_log->loginfo[0]),
192 &(p_log->loginfo[1]), putc);
193 break;
194 case LOG_TYPE_ASSERT:
195 syslog_printf("%s:%u: Assertion `%s' failed.",
196 &(p_log->loginfo[0]), putc);
197 break;
198 }
199}
200
201static void
202syslog_lostmsg(INT lost, void (*putc)(char))
203{
204 VP_INT lostinfo[1];
205
206 lostinfo[0] = (VP_INT) lost;
207 syslog_printf("%d messages are lost.", lostinfo, putc);
208}
209
210void
211syslog_output(void (*putc)(char))
212{
213 SYSLOG log;
214 INT lostnum, n;
215
216 lostnum = 0;
217 while ((n = vrea_log(&log)) >= 0) {
218 lostnum += n;
219 if (log.logtype < LOG_TYPE_COMMENT) {
220 continue;
221 }
222 if (lostnum > 0) {
223 syslog_lostmsg(lostnum, putc);
224 lostnum = 0;
225 }
226 syslog_print(&log, putc);
227 }
228 if (lostnum > 0) {
229 syslog_lostmsg(lostnum, putc);
230 }
231}
Note: See TracBrowser for help on using the repository browser.