5 This file is part of the Public Domain C Library (PDCLib).
6 Permission is granted to use, modify, and / or redistribute at will.
9 /* This is an example initialization of stdin, stdout and stderr to the integer
10 file descriptors 0, 1, and 2, respectively. This applies for a great variety
11 of operating systems, including POSIX compliant ones.
19 #include <_PDCLIB_io.h>
20 #include <_PDCLIB_locale.h>
21 #include <_PDCLIB_clocale.h>
24 /* In a POSIX system, stdin / stdout / stderr are equivalent to the (int) file
25 descriptors 0, 1, and 2 respectively.
27 /* TODO: This is proof-of-concept, requires finetuning. */
28 static char _PDCLIB_sin_buffer[BUFSIZ];
29 static char _PDCLIB_sout_buffer[BUFSIZ];
30 static char _PDCLIB_serr_buffer[BUFSIZ];
32 static unsigned char _PDCLIB_sin_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
33 static unsigned char _PDCLIB_sout_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
34 static unsigned char _PDCLIB_serr_ungetbuf[_PDCLIB_UNGETCBUFSIZE];
36 extern _PDCLIB_fileops_t _PDCLIB_fileops;
38 static FILE _PDCLIB_serr = {
39 .ops = &_PDCLIB_fileops,
40 .handle = { .sval = 2 },
41 .buffer = _PDCLIB_serr_buffer,
46 .ungetbuf = _PDCLIB_serr_ungetbuf,
47 .status = _IONBF | _PDCLIB_FWRITE | _PDCLIB_STATIC,
51 static FILE _PDCLIB_sout = {
52 .ops = &_PDCLIB_fileops,
53 .handle = { .sval = 1 },
54 .buffer = _PDCLIB_sout_buffer,
59 .ungetbuf = _PDCLIB_sout_ungetbuf,
60 .status = _IOLBF | _PDCLIB_FWRITE | _PDCLIB_STATIC,
64 static FILE _PDCLIB_sin = {
65 .ops = &_PDCLIB_fileops,
66 .handle = { .sval = 0 },
67 .buffer = _PDCLIB_sin_buffer,
72 .ungetbuf = _PDCLIB_sin_ungetbuf,
73 .status = _IOLBF | _PDCLIB_FREAD | _PDCLIB_STATIC,
78 FILE * stdin = &_PDCLIB_sin;
79 FILE * stdout = &_PDCLIB_sout;
80 FILE * stderr = &_PDCLIB_serr;
82 tss_t _PDCLIB_locale_tss;
84 /* FIXME: This approach is a possible attack vector. */
85 FILE * _PDCLIB_filelist = &_PDCLIB_sin;
87 /* "C" locale - defaulting to ASCII-7.
88 1 kByte (+ 4 byte) of <ctype.h> data.
89 Each line: flags, lowercase, uppercase, collation.
92 _PDCLIB_ctype_t global_ctype[] = {
93 { /* EOF */ 0, 0, 0, 0 },
94 { /* NUL */ _PDCLIB_CTYPE_CNTRL, 0x00, 0x00, 0x00 },
95 { /* SOH */ _PDCLIB_CTYPE_CNTRL, 0x01, 0x01, 0x01 },
96 { /* STX */ _PDCLIB_CTYPE_CNTRL, 0x02, 0x02, 0x02 },
97 { /* ETX */ _PDCLIB_CTYPE_CNTRL, 0x03, 0x03, 0x03 },
98 { /* EOT */ _PDCLIB_CTYPE_CNTRL, 0x04, 0x04, 0x04 },
99 { /* ENQ */ _PDCLIB_CTYPE_CNTRL, 0x05, 0x05, 0x05 },
100 { /* ACK */ _PDCLIB_CTYPE_CNTRL, 0x06, 0x06, 0x06 },
101 { /* BEL */ _PDCLIB_CTYPE_CNTRL, 0x07, 0x07, 0x07 },
102 { /* BS */ _PDCLIB_CTYPE_CNTRL, 0x08, 0x08, 0x08 },
103 { /* HT */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_BLANK | _PDCLIB_CTYPE_SPACE, 0x09, 0x09, 0x09 },
104 { /* LF */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0A, 0x0A, 0x0A },
105 { /* VT */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0B, 0x0B, 0x0B },
106 { /* FF */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0C, 0x0C, 0x0C },
107 { /* CR */ _PDCLIB_CTYPE_CNTRL | _PDCLIB_CTYPE_SPACE, 0x0D, 0x0D, 0x0D },
108 { /* SO */ _PDCLIB_CTYPE_CNTRL, 0x0E, 0x0E, 0x0E },
109 { /* SI */ _PDCLIB_CTYPE_CNTRL, 0x0F, 0x0F, 0x0F },
110 { /* DLE */ _PDCLIB_CTYPE_CNTRL, 0x10, 0x10, 0x10 },
111 { /* DC1 */ _PDCLIB_CTYPE_CNTRL, 0x11, 0x11, 0x11 },
112 { /* DC2 */ _PDCLIB_CTYPE_CNTRL, 0x12, 0x12, 0x12 },
113 { /* DC3 */ _PDCLIB_CTYPE_CNTRL, 0x13, 0x13, 0x13 },
114 { /* DC4 */ _PDCLIB_CTYPE_CNTRL, 0x14, 0x14, 0x14 },
115 { /* NAK */ _PDCLIB_CTYPE_CNTRL, 0x15, 0x15, 0x15 },
116 { /* SYN */ _PDCLIB_CTYPE_CNTRL, 0x16, 0x16, 0x16 },
117 { /* ETB */ _PDCLIB_CTYPE_CNTRL, 0x17, 0x17, 0x17 },
118 { /* CAN */ _PDCLIB_CTYPE_CNTRL, 0x18, 0x18, 0x18 },
119 { /* EM */ _PDCLIB_CTYPE_CNTRL, 0x19, 0x19, 0x19 },
120 { /* SUB */ _PDCLIB_CTYPE_CNTRL, 0x1A, 0x1A, 0x1A },
121 { /* ESC */ _PDCLIB_CTYPE_CNTRL, 0x1B, 0x1B, 0x1B },
122 { /* FS */ _PDCLIB_CTYPE_CNTRL, 0x1C, 0x1C, 0x1C },
123 { /* GS */ _PDCLIB_CTYPE_CNTRL, 0x1D, 0x1D, 0x1D },
124 { /* RS */ _PDCLIB_CTYPE_CNTRL, 0x1E, 0x1E, 0x1E },
125 { /* US */ _PDCLIB_CTYPE_CNTRL, 0x1F, 0x1F, 0x1F },
126 { /* SP */ _PDCLIB_CTYPE_BLANK | _PDCLIB_CTYPE_SPACE, 0x20, 0x20, 0x20 },
127 { /* '!' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x21, 0x21, 0x21 },
128 { /* '"' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x22, 0x22, 0x22 },
129 { /* '#' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x23, 0x23, 0x23 },
130 { /* '$' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x24, 0x24, 0x24 },
131 { /* '%' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x25, 0x25, 0x25 },
132 { /* '&' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x26, 0x26, 0x26 },
133 { /* ''' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x27, 0x27, 0x27 },
134 { /* '(' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x28, 0x28, 0x28 },
135 { /* ')' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x29, 0x29, 0x29 },
136 { /* '*' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2A, 0x2A, 0x2A },
137 { /* '+' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2B, 0x2B, 0x2B },
138 { /* ',' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2C, 0x2C, 0x2C },
139 { /* '-' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2D, 0x2D, 0x2D },
140 { /* '.' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2E, 0x2E, 0x2E },
141 { /* '/' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x2F, 0x2F, 0x2F },
142 { /* '0' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x30, 0x30, 0x30 },
143 { /* '1' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x31, 0x31, 0x31 },
144 { /* '2' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x32, 0x32, 0x32 },
145 { /* '3' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x33, 0x33, 0x33 },
146 { /* '4' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x34, 0x34, 0x34 },
147 { /* '5' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x35, 0x35, 0x35 },
148 { /* '6' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x36, 0x36, 0x36 },
149 { /* '7' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x37, 0x37, 0x37 },
150 { /* '8' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x38, 0x38, 0x38 },
151 { /* '9' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_DIGIT | _PDCLIB_CTYPE_XDIGT, 0x39, 0x39, 0x39 },
152 { /* ':' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3A, 0x3A, 0x3A },
153 { /* ';' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3B, 0x3B, 0x3B },
154 { /* '<' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3C, 0x3C, 0x3C },
155 { /* '=' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3D, 0x3D, 0x3D },
156 { /* '>' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3E, 0x3E, 0x3E },
157 { /* '?' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x3F, 0x3F, 0x3F },
158 { /* '@' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x40, 0x40, 0x40 },
159 { /* 'A' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x41, 0x61, 0x41 },
160 { /* 'B' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x42, 0x62, 0x42 },
161 { /* 'C' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x43, 0x63, 0x43 },
162 { /* 'D' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x44, 0x64, 0x44 },
163 { /* 'E' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x45, 0x65, 0x45 },
164 { /* 'F' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER | _PDCLIB_CTYPE_XDIGT, 0x46, 0x66, 0x46 },
165 { /* 'G' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x47, 0x67, 0x47 },
166 { /* 'H' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x48, 0x68, 0x48 },
167 { /* 'I' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x49, 0x69, 0x49 },
168 { /* 'J' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4A, 0x6A, 0x4A },
169 { /* 'K' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4B, 0x6B, 0x4B },
170 { /* 'L' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4C, 0x6C, 0x4C },
171 { /* 'M' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4D, 0x6D, 0x4D },
172 { /* 'N' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4E, 0x6E, 0x4E },
173 { /* 'O' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x4F, 0x6F, 0x4F },
174 { /* 'P' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x50, 0x70, 0x50 },
175 { /* 'Q' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x51, 0x71, 0x51 },
176 { /* 'R' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x52, 0x72, 0x52 },
177 { /* 'S' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x53, 0x73, 0x53 },
178 { /* 'T' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x54, 0x74, 0x54 },
179 { /* 'U' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x55, 0x75, 0x55 },
180 { /* 'V' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x56, 0x76, 0x56 },
181 { /* 'W' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x57, 0x77, 0x57 },
182 { /* 'X' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x58, 0x78, 0x58 },
183 { /* 'Y' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x59, 0x79, 0x59 },
184 { /* 'Z' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_UPPER, 0x5A, 0x7A, 0x5A },
185 { /* '[' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5B, 0x5B, 0x5B },
186 { /* '\' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5C, 0x5C, 0x5C },
187 { /* ']' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5D, 0x5D, 0x5D },
188 { /* '^' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5E, 0x5E, 0x5E },
189 { /* '_' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x5F, 0x5F, 0x5F },
190 { /* '`' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x60, 0x60, 0x60 },
191 { /* 'a' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x41, 0x61, 0x61 },
192 { /* 'b' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x42, 0x62, 0x62 },
193 { /* 'c' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x43, 0x63, 0x63 },
194 { /* 'd' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x44, 0x64, 0x64 },
195 { /* 'e' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x45, 0x65, 0x65 },
196 { /* 'f' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER | _PDCLIB_CTYPE_XDIGT, 0x46, 0x66, 0x66 },
197 { /* 'g' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x47, 0x67, 0x67 },
198 { /* 'h' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x48, 0x68, 0x68 },
199 { /* 'i' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x49, 0x69, 0x69 },
200 { /* 'j' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4A, 0x6A, 0x6A },
201 { /* 'k' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4B, 0x6B, 0x6B },
202 { /* 'l' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4C, 0x6C, 0x6C },
203 { /* 'm' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4D, 0x6D, 0x6D },
204 { /* 'n' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4E, 0x6E, 0x6E },
205 { /* 'o' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x4F, 0x6F, 0x6F },
206 { /* 'p' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x50, 0x70, 0x70 },
207 { /* 'q' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x51, 0x71, 0x71 },
208 { /* 'r' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x52, 0x72, 0x72 },
209 { /* 's' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x53, 0x73, 0x73 },
210 { /* 't' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x54, 0x74, 0x74 },
211 { /* 'u' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x55, 0x75, 0x75 },
212 { /* 'v' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x56, 0x76, 0x76 },
213 { /* 'w' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x57, 0x77, 0x77 },
214 { /* 'x' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x58, 0x78, 0x78 },
215 { /* 'y' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x59, 0x79, 0x79 },
216 { /* 'z' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_ALPHA | _PDCLIB_CTYPE_LOWER, 0x5A, 0x7A, 0x7A },
217 { /* '{' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7B, 0x7B, 0x7B },
218 { /* '|' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7C, 0x7C, 0x7C },
219 { /* '}' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7D, 0x7D, 0x7D },
220 { /* '~' */ _PDCLIB_CTYPE_GRAPH | _PDCLIB_CTYPE_PUNCT, 0x7E, 0x7E, 0x7E },
221 { /* DEL */ _PDCLIB_CTYPE_CNTRL, 0x7F, 0x7F, 0x7F },
222 { 0x00, 0x80, 0x80, 0x80 },
223 { 0x00, 0x81, 0x81, 0x81 },
224 { 0x00, 0x82, 0x82, 0x82 },
225 { 0x00, 0x83, 0x83, 0x83 },
226 { 0x00, 0x84, 0x84, 0x84 },
227 { 0x00, 0x85, 0x85, 0x85 },
228 { 0x00, 0x86, 0x86, 0x86 },
229 { 0x00, 0x87, 0x87, 0x87 },
230 { 0x00, 0x88, 0x88, 0x88 },
231 { 0x00, 0x89, 0x89, 0x89 },
232 { 0x00, 0x8A, 0x8A, 0x8A },
233 { 0x00, 0x8B, 0x8B, 0x8B },
234 { 0x00, 0x8C, 0x8C, 0x8C },
235 { 0x00, 0x8D, 0x8D, 0x8D },
236 { 0x00, 0x8E, 0x8E, 0x8E },
237 { 0x00, 0x8F, 0x8F, 0x8F },
238 { 0x00, 0x90, 0x90, 0x90 },
239 { 0x00, 0x91, 0x91, 0x91 },
240 { 0x00, 0x92, 0x92, 0x92 },
241 { 0x00, 0x93, 0x93, 0x93 },
242 { 0x00, 0x94, 0x94, 0x94 },
243 { 0x00, 0x95, 0x95, 0x95 },
244 { 0x00, 0x96, 0x96, 0x96 },
245 { 0x00, 0x97, 0x97, 0x97 },
246 { 0x00, 0x98, 0x98, 0x98 },
247 { 0x00, 0x99, 0x99, 0x99 },
248 { 0x00, 0x9A, 0x9A, 0x9A },
249 { 0x00, 0x9B, 0x9B, 0x9B },
250 { 0x00, 0x9C, 0x9C, 0x9C },
251 { 0x00, 0x9D, 0x9D, 0x9D },
252 { 0x00, 0x9E, 0x9E, 0x9E },
253 { 0x00, 0x9F, 0x9F, 0x9F },
254 { 0x00, 0xA0, 0xA0, 0xA0 },
255 { 0x00, 0xA1, 0xA1, 0xA1 },
256 { 0x00, 0xA2, 0xA2, 0xA2 },
257 { 0x00, 0xA3, 0xA3, 0xA3 },
258 { 0x00, 0xA4, 0xA4, 0xA4 },
259 { 0x00, 0xA5, 0xA5, 0xA5 },
260 { 0x00, 0xA6, 0xA6, 0xA6 },
261 { 0x00, 0xA7, 0xA7, 0xA7 },
262 { 0x00, 0xA8, 0xA8, 0xA8 },
263 { 0x00, 0xA9, 0xA9, 0xA9 },
264 { 0x00, 0xAA, 0xAA, 0xAA },
265 { 0x00, 0xAB, 0xAB, 0xAB },
266 { 0x00, 0xAC, 0xAC, 0xAC },
267 { 0x00, 0xAD, 0xAD, 0xAD },
268 { 0x00, 0xAE, 0xAE, 0xAE },
269 { 0x00, 0xAF, 0xAF, 0xAF },
270 { 0x00, 0xB0, 0xB0, 0xB0 },
271 { 0x00, 0xB1, 0xB1, 0xB1 },
272 { 0x00, 0xB2, 0xB2, 0xB2 },
273 { 0x00, 0xB3, 0xB3, 0xB3 },
274 { 0x00, 0xB4, 0xB4, 0xB4 },
275 { 0x00, 0xB5, 0xB5, 0xB5 },
276 { 0x00, 0xB6, 0xB6, 0xB6 },
277 { 0x00, 0xB7, 0xB7, 0xB7 },
278 { 0x00, 0xB8, 0xB8, 0xB8 },
279 { 0x00, 0xB9, 0xB9, 0xB9 },
280 { 0x00, 0xBA, 0xBA, 0xBA },
281 { 0x00, 0xBB, 0xBB, 0xBB },
282 { 0x00, 0xBC, 0xBC, 0xBC },
283 { 0x00, 0xBD, 0xBD, 0xBD },
284 { 0x00, 0xBE, 0xBE, 0xBE },
285 { 0x00, 0xBF, 0xBF, 0xBF },
286 { 0x00, 0xC0, 0xC0, 0xC0 },
287 { 0x00, 0xC1, 0xC1, 0xC1 },
288 { 0x00, 0xC2, 0xC2, 0xC2 },
289 { 0x00, 0xC3, 0xC3, 0xC3 },
290 { 0x00, 0xC4, 0xC4, 0xC4 },
291 { 0x00, 0xC5, 0xC5, 0xC5 },
292 { 0x00, 0xC6, 0xC6, 0xC6 },
293 { 0x00, 0xC7, 0xC7, 0xC7 },
294 { 0x00, 0xC8, 0xC8, 0xC8 },
295 { 0x00, 0xC9, 0xC9, 0xC9 },
296 { 0x00, 0xCA, 0xCA, 0xCA },
297 { 0x00, 0xCB, 0xCB, 0xCB },
298 { 0x00, 0xCC, 0xCC, 0xCC },
299 { 0x00, 0xCD, 0xCD, 0xCD },
300 { 0x00, 0xCE, 0xCE, 0xCE },
301 { 0x00, 0xCF, 0xCF, 0xCF },
302 { 0x00, 0xD0, 0xD0, 0xD0 },
303 { 0x00, 0xD1, 0xD1, 0xD1 },
304 { 0x00, 0xD2, 0xD2, 0xD2 },
305 { 0x00, 0xD3, 0xD3, 0xD3 },
306 { 0x00, 0xD4, 0xD4, 0xD4 },
307 { 0x00, 0xD5, 0xD5, 0xD5 },
308 { 0x00, 0xD6, 0xD6, 0xD6 },
309 { 0x00, 0xD7, 0xD7, 0xD7 },
310 { 0x00, 0xD8, 0xD8, 0xD8 },
311 { 0x00, 0xD9, 0xD9, 0xD9 },
312 { 0x00, 0xDA, 0xDA, 0xDA },
313 { 0x00, 0xDB, 0xDB, 0xDB },
314 { 0x00, 0xDC, 0xDC, 0xDC },
315 { 0x00, 0xDD, 0xDD, 0xDD },
316 { 0x00, 0xDE, 0xDE, 0xDE },
317 { 0x00, 0xDF, 0xDF, 0xDF },
318 { 0x00, 0xE0, 0xE0, 0xE0 },
319 { 0x00, 0xE1, 0xE1, 0xE1 },
320 { 0x00, 0xE2, 0xE2, 0xE2 },
321 { 0x00, 0xE3, 0xE3, 0xE3 },
322 { 0x00, 0xE4, 0xE4, 0xE4 },
323 { 0x00, 0xE5, 0xE5, 0xE5 },
324 { 0x00, 0xE6, 0xE6, 0xE6 },
325 { 0x00, 0xE7, 0xE7, 0xE7 },
326 { 0x00, 0xE8, 0xE8, 0xE8 },
327 { 0x00, 0xE9, 0xE9, 0xE9 },
328 { 0x00, 0xEA, 0xEA, 0xEA },
329 { 0x00, 0xEB, 0xEB, 0xEB },
330 { 0x00, 0xEC, 0xEC, 0xEC },
331 { 0x00, 0xED, 0xED, 0xED },
332 { 0x00, 0xEE, 0xEE, 0xEE },
333 { 0x00, 0xEF, 0xEF, 0xEF },
334 { 0x00, 0xF0, 0xF0, 0xF0 },
335 { 0x00, 0xF1, 0xF1, 0xF1 },
336 { 0x00, 0xF2, 0xF2, 0xF2 },
337 { 0x00, 0xF3, 0xF3, 0xF3 },
338 { 0x00, 0xF4, 0xF4, 0xF4 },
339 { 0x00, 0xF5, 0xF5, 0xF5 },
340 { 0x00, 0xF6, 0xF6, 0xF6 },
341 { 0x00, 0xF7, 0xF7, 0xF7 },
342 { 0x00, 0xF8, 0xF8, 0xF8 },
343 { 0x00, 0xF9, 0xF9, 0xF9 },
344 { 0x00, 0xFA, 0xFA, 0xFA },
345 { 0x00, 0xFB, 0xFB, 0xFB },
346 { 0x00, 0xFC, 0xFC, 0xFC },
347 { 0x00, 0xFD, 0xFD, 0xFD },
348 { 0x00, 0xFE, 0xFE, 0xFE },
349 { 0x00, 0xFF, 0xFF, 0xFF }
352 extern struct _PDCLIB_charcodec _PDCLIB_ascii_codec;
353 struct _PDCLIB_locale _PDCLIB_global_locale = {
354 ._Codec = &_PDCLIB_ascii_codec,
356 /* decimal_point */ (char *)".",
357 /* thousands_sep */ (char *)"",
358 /* grouping */ (char *)"",
359 /* mon_decimal_point */ (char *)"",
360 /* mon_thousands_sep */ (char *)"",
361 /* mon_grouping */ (char *)"",
362 /* positive_sign */ (char *)"",
363 /* negative_sign */ (char *)"",
364 /* currency_symbol */ (char *)"",
365 /* int_curr_symbol */ (char *)"",
366 /* frac_digits */ CHAR_MAX,
367 /* p_cs_precedes */ CHAR_MAX,
368 /* n_cs_precedes */ CHAR_MAX,
369 /* p_sep_by_space */ CHAR_MAX,
370 /* n_sep_by_space */ CHAR_MAX,
371 /* p_sign_posn */ CHAR_MAX,
372 /* n_sign_posn */ CHAR_MAX,
373 /* int_frac_digits */ CHAR_MAX,
374 /* int_p_cs_precedes */ CHAR_MAX,
375 /* int_n_cs_precedes */ CHAR_MAX,
376 /* int_p_sep_by_space */ CHAR_MAX,
377 /* int_n_sep_by_space */ CHAR_MAX,
378 /* int_p_sign_posn */ CHAR_MAX,
379 /* int_n_sign_posn */ CHAR_MAX,
381 ._CType = &global_ctype[1],
383 /* no error */ (char *)"",
384 /* ERANGE */ (char *)"ERANGE (Range error)",
385 /* EDOM */ (char *)"EDOM (Domain error)",
386 /* EILSEQ */ (char *)"EILSEQ (Illegal sequence)"
390 /* Todo: Better solution than this! */
391 __attribute__((constructor)) void init_stdio(void)
393 _PDCLIB_initclocale( &_PDCLIB_global_locale );
394 tss_create(&_PDCLIB_locale_tss, (tss_dtor_t) freelocale);
395 mtx_init(&stdin->lock, mtx_recursive);
396 mtx_init(&stdout->lock, mtx_recursive);
397 mtx_init(&stderr->lock, mtx_recursive);
403 #include <_PDCLIB_test.h>
407 /* Testing covered by several other testdrivers using stdin / stdout /