source: anotherchoice/tags/jsp-1.4.4-full-UTF8/config/s1c33/lib.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: 4.8 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) 2004 by SEIKO EPSON Corp, JAPAN
7 *
8 * 上記著作権者
9は，以下の (1)〜(4) の条件か，Free Software Foundation
10 * によってå…
11¬è¡¨ã•ã‚Œã¦ã„ã‚‹ GNU General Public License の Version 2 に記
12 * 述されている条件を満たす場合に限り，本ソフトウェア（本ソフトウェア
13 * を改変したものを含む．以下同じ）を使用・複製・改変・再é…
14å¸ƒï¼ˆä»¥ä¸‹ï¼Œ
15 * 利用と呼ぶ）することを無償で許諾する．
16 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
17 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
18 * スコード中に含まれていること．
19 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
20 * 用できる形で再é…
21å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é…
22å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
23 * 者
24マニュアルなど）に，上記の著作権表示，この利用条件および下記
25 * の無保証規定を掲載すること．
26 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
27 * 用できない形で再é…
28å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
29 * と．
30 * (a) 再é…
31å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€…
32マニュアルなど）に，上記の著
33 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
34 * (b) 再é…
35å¸ƒã®å½¢æ…
36‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
37 * 報告すること．
38 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
39 * 害からも，上記著作権者
40およびTOPPERSプロジェクトをå…
41è²¬ã™ã‚‹ã“と．
42 *
43 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者
44お
45 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，その適用可能性も
46 * 含めて，いかなる保証も行わない．また，本ソフトウェアの利用により直
47 * 接的または間接的に生じたいかなる損害に関しても，その責任を負わない．
48 *
49 */
50#include "smcvals.h"
51#include "stdio.h"
52#include "cpu_rename.h"
53
54FILE _iob[FOPEN_MAX + 1]; /* standard i/o stream */
55
56FILE *stdin; /* standard input */
57FILE *stdout; /* standard output */
58FILE *stderr; /* standard error */
59
60int errno; /* error number */
61
62unsigned int seed; /* seed of random value */
63
64unsigned char *ucNxtAlcP; /* next memory allocate address */
65unsigned char *ucBefAlcP; /* one previous allocated address */
66unsigned char *end_alloc; /* end memory allocate address */
67
68#ifndef DBL_LNG_TYPE
69
70#define DBL_LNG_TYPE
71
72/* the architecture of double floating point
73 *
74 * 0 1 11 31 32 63 bit
75 * -----------------------------------------------------------------------
76 * | | exponent | fraction |
77 * -----------------------------------------------------------------------
78 *
79 * | | | |
80 * | 12bits 20 bits | 32 bits |
81 * | lower word | higher word |
82 *
83 * bit 0 sign bit ( 1 bit )
84 * 1 - 11 exponent part ( 11 bits )
85 * 12 - 63 fraction part ( 52 bits )
86 *
87 */
88
89typedef union {
90 struct {
91#ifdef BIG_ENDIAN
92 unsigned long _LL;
93 unsigned long _LH;
94#else
95 unsigned long _LH;
96 unsigned long _LL;
97#endif
98 } st;
99 } DBL_LNG;
100
101#endif
102
103DBL_LNG _HUGE; /* HUGE VALUE */
104
105unsigned char *_STACK_TOP; /* address of stack top */
106unsigned char *_STACK_BOTTOM; /* address of stack bottom */
107
108long gm_sec;
109
110/*
111 * initialize routine
112 */
113
114void init_lib()
115{
116
117 /* initialize allocate address */
118 end_alloc = (unsigned char *)_STACK_TOP;
119 ucNxtAlcP = (unsigned char *)(_BOUND((unsigned long)_STACK_BOTTOM));
120 ucBefAlcP = (unsigned char *)NULL;
121
122 errno = 0; /* clear error number */
123
124 seed = 1; /* initialize random seed */
125
126 gm_sec = -1; /* initialize time */
127
128 _HUGE.st._LL = 0x7ff00000; /* HUGE VALUE */
129 _HUGE.st._LH = 0;
130
131/*
132 * INITIALIZE STANDARD STREAMS
133 */
134
135 _iob[0]._flg = _UGETN; /* initialize stdin stream */
136 _iob[0]._buf = 0;
137 _iob[0]._fd = 0;
138
139 _iob[1]._flg = _UGETN; /* initialize stdout stream */
140 _iob[1]._buf = 0;
141 _iob[1]._fd = 1;
142
143 _iob[2]._flg = _UGETN; /* initialize stderr stream */
144 _iob[2]._buf = 0;
145 _iob[2]._fd = 2;
146
147 stdin = &_iob[0];
148 stdout = &_iob[1];
149 stderr = &_iob[2];
150
151}
152
Note: See TracBrowser for help on using the repository browser.