citrus_none.c revision 1.6 1 1.6 yamt /* $NetBSD: citrus_none.c,v 1.6 2003/01/01 13:29:45 yamt Exp $ */
2 1.1 tshiozak
3 1.1 tshiozak /*-
4 1.1 tshiozak * Copyright (c)2002 Citrus Project,
5 1.1 tshiozak * All rights reserved.
6 1.1 tshiozak *
7 1.1 tshiozak * Redistribution and use in source and binary forms, with or without
8 1.1 tshiozak * modification, are permitted provided that the following conditions
9 1.1 tshiozak * are met:
10 1.1 tshiozak * 1. Redistributions of source code must retain the above copyright
11 1.1 tshiozak * notice, this list of conditions and the following disclaimer.
12 1.1 tshiozak * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 tshiozak * notice, this list of conditions and the following disclaimer in the
14 1.1 tshiozak * documentation and/or other materials provided with the distribution.
15 1.1 tshiozak *
16 1.1 tshiozak * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 1.1 tshiozak * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 1.1 tshiozak * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 1.1 tshiozak * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 1.1 tshiozak * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 1.1 tshiozak * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 1.1 tshiozak * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 1.1 tshiozak * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 1.1 tshiozak * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 1.1 tshiozak * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 1.1 tshiozak * SUCH DAMAGE.
27 1.1 tshiozak */
28 1.1 tshiozak
29 1.1 tshiozak #include <sys/cdefs.h>
30 1.1 tshiozak #if defined(LIBC_SCCS) && !defined(lint)
31 1.6 yamt __RCSID("$NetBSD: citrus_none.c,v 1.6 2003/01/01 13:29:45 yamt Exp $");
32 1.1 tshiozak #endif /* LIBC_SCCS and not lint */
33 1.1 tshiozak
34 1.1 tshiozak #include <assert.h>
35 1.1 tshiozak #include <errno.h>
36 1.1 tshiozak #include <string.h>
37 1.1 tshiozak #include <stdio.h>
38 1.1 tshiozak #include <stdlib.h>
39 1.1 tshiozak #include <stddef.h>
40 1.1 tshiozak #include <locale.h>
41 1.1 tshiozak #include <wchar.h>
42 1.1 tshiozak #include <sys/types.h>
43 1.1 tshiozak #include "citrus_module.h"
44 1.1 tshiozak #include "citrus_ctype.h"
45 1.1 tshiozak #include "citrus_none.h"
46 1.1 tshiozak
47 1.1 tshiozak /* ---------------------------------------------------------------------- */
48 1.1 tshiozak
49 1.1 tshiozak _CITRUS_CTYPE_DECLS(NONE);
50 1.1 tshiozak _CITRUS_CTYPE_DEF_OPS(NONE);
51 1.1 tshiozak
52 1.1 tshiozak
53 1.1 tshiozak /* ---------------------------------------------------------------------- */
54 1.1 tshiozak
55 1.1 tshiozak static int
56 1.1 tshiozak /*ARGSUSED*/
57 1.1 tshiozak _citrus_NONE_ctype_init(void ** __restrict cl, void * __restrict var,
58 1.1 tshiozak size_t lenvar, size_t lenps)
59 1.1 tshiozak {
60 1.1 tshiozak *cl = NULL;
61 1.1 tshiozak return (0);
62 1.1 tshiozak }
63 1.1 tshiozak
64 1.1 tshiozak static void
65 1.1 tshiozak /*ARGSUSED*/
66 1.1 tshiozak _citrus_NONE_ctype_uninit(void *cl)
67 1.1 tshiozak {
68 1.1 tshiozak }
69 1.1 tshiozak
70 1.1 tshiozak static unsigned
71 1.1 tshiozak /*ARGSUSED*/
72 1.1 tshiozak _citrus_NONE_ctype_get_mb_cur_max(void *cl)
73 1.1 tshiozak {
74 1.1 tshiozak return (1);
75 1.1 tshiozak }
76 1.1 tshiozak
77 1.1 tshiozak static int
78 1.1 tshiozak /*ARGSUSED*/
79 1.1 tshiozak _citrus_NONE_ctype_mblen(void * __restrict cl, const char * __restrict s,
80 1.1 tshiozak size_t n, int * __restrict nresult)
81 1.1 tshiozak {
82 1.1 tshiozak if (!s) {
83 1.1 tshiozak *nresult = 0; /* state independent */
84 1.1 tshiozak return (0);
85 1.1 tshiozak }
86 1.1 tshiozak if (n==0) {
87 1.1 tshiozak *nresult = -1;
88 1.1 tshiozak return (EILSEQ);
89 1.1 tshiozak }
90 1.1 tshiozak *nresult = (*s == 0) ? 0 : 1;
91 1.1 tshiozak return (0);
92 1.1 tshiozak }
93 1.1 tshiozak
94 1.1 tshiozak static int
95 1.1 tshiozak /*ARGSUSED*/
96 1.1 tshiozak _citrus_NONE_ctype_mbrlen(void * __restrict cl, const char * __restrict s,
97 1.1 tshiozak size_t n, void * __restrict pspriv,
98 1.1 tshiozak size_t * __restrict nresult)
99 1.1 tshiozak {
100 1.1 tshiozak if (!s) {
101 1.1 tshiozak *nresult = 0;
102 1.1 tshiozak return (0);
103 1.1 tshiozak }
104 1.1 tshiozak if (n==0) {
105 1.1 tshiozak *nresult = (size_t)-2;
106 1.1 tshiozak return (0);
107 1.1 tshiozak }
108 1.1 tshiozak *nresult = (*s == 0) ? 0 : 1;
109 1.1 tshiozak return (0);
110 1.1 tshiozak }
111 1.1 tshiozak
112 1.1 tshiozak static int
113 1.1 tshiozak /*ARGSUSED*/
114 1.1 tshiozak _citrus_NONE_ctype_mbrtowc(void * __restrict cl, wchar_t * __restrict pwc,
115 1.1 tshiozak const char * __restrict s, size_t n,
116 1.1 tshiozak void * __restrict pspriv,
117 1.1 tshiozak size_t * __restrict nresult)
118 1.1 tshiozak {
119 1.1 tshiozak if (s == NULL) {
120 1.1 tshiozak *nresult = 0;
121 1.1 tshiozak return (0);
122 1.1 tshiozak }
123 1.1 tshiozak if (n == 0) {
124 1.1 tshiozak *nresult = (size_t)-2;
125 1.1 tshiozak return (0);
126 1.1 tshiozak }
127 1.1 tshiozak
128 1.1 tshiozak if (pwc != NULL)
129 1.1 tshiozak *pwc = (wchar_t)(unsigned char) *s;
130 1.1 tshiozak
131 1.1 tshiozak *nresult = *s == '\0' ? 0 : 1;
132 1.1 tshiozak return (0);
133 1.1 tshiozak }
134 1.1 tshiozak
135 1.1 tshiozak static int
136 1.1 tshiozak /*ARGSUSED*/
137 1.1 tshiozak _citrus_NONE_ctype_mbsinit(void * __restrict cl,
138 1.1 tshiozak const void * __restrict pspriv,
139 1.1 tshiozak int * __restrict nresult)
140 1.1 tshiozak {
141 1.1 tshiozak *nresult = 1; /* always initial state */
142 1.1 tshiozak return (0);
143 1.1 tshiozak }
144 1.1 tshiozak
145 1.1 tshiozak static int
146 1.1 tshiozak /*ARGSUSED*/
147 1.6 yamt _citrus_NONE_ctype_mbsrtowcs(void * __restrict cl, wchar_t * __restrict pwcs,
148 1.1 tshiozak const char ** __restrict s, size_t n,
149 1.1 tshiozak void * __restrict pspriv,
150 1.1 tshiozak size_t * __restrict nresult)
151 1.1 tshiozak {
152 1.6 yamt int cnt;
153 1.1 tshiozak const char *s0;
154 1.1 tshiozak
155 1.6 yamt /* if pwcs is NULL, ignore n */
156 1.6 yamt if (pwcs == NULL)
157 1.6 yamt n = 1; /* arbitrary >0 value */
158 1.6 yamt
159 1.6 yamt cnt = 0;
160 1.6 yamt s0 = *s; /* to keep *s unchanged for now, use copy instead. */
161 1.6 yamt while (n > 0) {
162 1.6 yamt if (pwcs != NULL) {
163 1.6 yamt *pwcs = (wchar_t)(unsigned char)*s0;
164 1.6 yamt }
165 1.1 tshiozak if (*s0 == '\0') {
166 1.1 tshiozak s0 = NULL;
167 1.1 tshiozak break;
168 1.1 tshiozak }
169 1.1 tshiozak s0++;
170 1.6 yamt if (pwcs != NULL) {
171 1.6 yamt pwcs++;
172 1.6 yamt n--;
173 1.6 yamt }
174 1.6 yamt cnt++;
175 1.1 tshiozak }
176 1.6 yamt if (pwcs)
177 1.1 tshiozak *s = s0;
178 1.1 tshiozak
179 1.6 yamt *nresult = (size_t)cnt;
180 1.1 tshiozak
181 1.1 tshiozak return (0);
182 1.1 tshiozak }
183 1.1 tshiozak
184 1.1 tshiozak static int
185 1.1 tshiozak _citrus_NONE_ctype_mbstowcs(void * __restrict cl, wchar_t * __restrict wcs,
186 1.1 tshiozak const char * __restrict s, size_t n,
187 1.1 tshiozak size_t * __restrict nresult)
188 1.1 tshiozak {
189 1.5 thorpej return (_citrus_NONE_ctype_mbsrtowcs(cl, wcs, (const char **)&s, n, NULL, nresult));
190 1.1 tshiozak }
191 1.1 tshiozak
192 1.1 tshiozak static int
193 1.2 tshiozak /*ARGSUSED*/
194 1.1 tshiozak _citrus_NONE_ctype_mbtowc(void * __restrict cl, wchar_t * __restrict pwc,
195 1.1 tshiozak const char * __restrict s, size_t n,
196 1.1 tshiozak int * __restrict nresult)
197 1.1 tshiozak {
198 1.1 tshiozak
199 1.2 tshiozak if (s == NULL) {
200 1.2 tshiozak *nresult = 0; /* state independent */
201 1.2 tshiozak return (0);
202 1.2 tshiozak }
203 1.2 tshiozak if (n == 0) {
204 1.2 tshiozak return (EILSEQ);
205 1.2 tshiozak }
206 1.2 tshiozak if (pwc == NULL) {
207 1.2 tshiozak if (*s == '\0') {
208 1.2 tshiozak *nresult = 0;
209 1.2 tshiozak } else {
210 1.2 tshiozak *nresult = 1;
211 1.2 tshiozak }
212 1.2 tshiozak return (0);
213 1.2 tshiozak }
214 1.1 tshiozak
215 1.2 tshiozak *pwc = (wchar_t)*s;
216 1.2 tshiozak *nresult = *s == '\0' ? 0 : 1;
217 1.1 tshiozak
218 1.2 tshiozak return (0);
219 1.1 tshiozak }
220 1.1 tshiozak
221 1.1 tshiozak static int
222 1.1 tshiozak /*ARGSUSED*/
223 1.1 tshiozak _citrus_NONE_ctype_wcrtomb(void * __restrict cl, char * __restrict s,
224 1.1 tshiozak wchar_t wc, void * __restrict pspriv,
225 1.1 tshiozak size_t * __restrict nresult)
226 1.1 tshiozak {
227 1.1 tshiozak if ((wc&~0xFFU) != 0) {
228 1.1 tshiozak *nresult = (size_t)-1;
229 1.1 tshiozak return (EILSEQ);
230 1.1 tshiozak }
231 1.1 tshiozak
232 1.1 tshiozak *nresult = 1;
233 1.1 tshiozak if (s!=NULL)
234 1.1 tshiozak *s = (char)wc;
235 1.1 tshiozak
236 1.1 tshiozak return (0);
237 1.1 tshiozak }
238 1.1 tshiozak
239 1.1 tshiozak static int
240 1.1 tshiozak /*ARGSUSED*/
241 1.1 tshiozak _citrus_NONE_ctype_wcsrtombs(void * __restrict cl, char * __restrict s,
242 1.1 tshiozak const wchar_t ** __restrict pwcs, size_t n,
243 1.1 tshiozak void * __restrict pspriv,
244 1.1 tshiozak size_t * __restrict nresult)
245 1.1 tshiozak {
246 1.1 tshiozak size_t count;
247 1.1 tshiozak const wchar_t *pwcs0;
248 1.1 tshiozak
249 1.1 tshiozak pwcs0 = *pwcs;
250 1.1 tshiozak count = 0;
251 1.4 yamt
252 1.4 yamt if (s == NULL)
253 1.4 yamt n = 1;
254 1.4 yamt
255 1.4 yamt while (n > 0) {
256 1.1 tshiozak if ((*pwcs0 & ~0xFFU) != 0) {
257 1.4 yamt *nresult = (size_t)-1;
258 1.1 tshiozak return (EILSEQ);
259 1.1 tshiozak }
260 1.4 yamt if (s != NULL) {
261 1.1 tshiozak *s++ = (char)*pwcs0;
262 1.4 yamt n--;
263 1.4 yamt }
264 1.1 tshiozak if (*pwcs0 == L'\0') {
265 1.1 tshiozak pwcs0 = NULL;
266 1.1 tshiozak break;
267 1.1 tshiozak }
268 1.1 tshiozak count++;
269 1.1 tshiozak pwcs0++;
270 1.1 tshiozak }
271 1.1 tshiozak if (s != NULL)
272 1.1 tshiozak *pwcs = pwcs0;
273 1.1 tshiozak
274 1.1 tshiozak *nresult = count;
275 1.1 tshiozak
276 1.1 tshiozak return (0);
277 1.1 tshiozak }
278 1.1 tshiozak
279 1.1 tshiozak static int
280 1.1 tshiozak _citrus_NONE_ctype_wcstombs(void * __restrict cl, char * __restrict s,
281 1.1 tshiozak const wchar_t * __restrict pwcs, size_t n,
282 1.1 tshiozak size_t * __restrict nresult)
283 1.1 tshiozak {
284 1.5 thorpej return (_citrus_NONE_ctype_wcsrtombs(cl, s, (const wchar_t **)&pwcs, n, NULL, nresult));
285 1.1 tshiozak }
286 1.1 tshiozak
287 1.1 tshiozak static int
288 1.1 tshiozak _citrus_NONE_ctype_wctomb(void * __restrict cl, char * __restrict s,
289 1.1 tshiozak wchar_t wc, int * __restrict nresult)
290 1.1 tshiozak {
291 1.1 tshiozak int ret;
292 1.1 tshiozak size_t nr;
293 1.1 tshiozak
294 1.1 tshiozak ret = _citrus_NONE_ctype_wcrtomb(cl, s, wc, NULL, &nr);
295 1.1 tshiozak *nresult = (int)nr;
296 1.1 tshiozak
297 1.1 tshiozak return (ret);
298 1.1 tshiozak }
299