multibyte_c90.c revision 1.2 1 /* $NetBSD: multibyte_c90.c,v 1.2 2002/03/18 09:56:50 yamt Exp $ */
2
3 /*-
4 * Copyright (c)2002 Citrus Project,
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 #if defined(LIBC_SCCS) && !defined(lint)
31 __RCSID("$NetBSD: multibyte_c90.c,v 1.2 2002/03/18 09:56:50 yamt Exp $");
32 #endif /* LIBC_SCCS and not lint */
33
34 #include <assert.h>
35 #include <stdlib.h>
36 #include <errno.h>
37 #include <sys/types.h>
38 #include <citrus/citrus_module.h>
39 #include <citrus/citrus_ctype.h>
40 #include "rune.h"
41 #include "multibyte.h"
42
43 int
44 mblen(const char *s, size_t n)
45 {
46 int ret;
47 int err0;
48
49 err0 = _citrus_ctype_mblen(_to_cur_ctype(), s, n, &ret);
50 if (err0)
51 errno = err0;
52
53 return ret;
54 }
55
56 size_t
57 mbrtowc(wchar_t *pwc, const char *s, size_t n, mbstate_t *ps)
58 {
59 size_t ret;
60 int err0;
61
62 _fixup_ps(_CurrentRuneLocale, ps, s==NULL);
63
64 err0 = _citrus_ctype_mbrtowc(_ps_to_ctype(ps), pwc, s, n,
65 _ps_to_private(ps), &ret);
66 if (err0)
67 errno = err0;
68
69 return ret;
70 }
71
72 size_t
73 mbstowcs(wchar_t *pwcs, const char *s, size_t n)
74 {
75 size_t ret;
76 int err0;
77
78 err0 = _citrus_ctype_mbstowcs(_to_cur_ctype(), pwcs, s, n, &ret);
79 if (err0)
80 errno = err0;
81
82 return ret;
83 }
84
85 int
86 mbtowc(wchar_t *pw, const char *s, size_t n)
87 {
88 int ret;
89 int err0;
90
91 err0 = _citrus_ctype_mbtowc(_to_cur_ctype(), pw, s, n, &ret);
92 if (err0)
93 errno = err0;
94
95 return ret;
96 }
97
98 size_t
99 wcstombs(char *s, const wchar_t *wcs, size_t n)
100 {
101 size_t ret;
102 int err0;
103
104 err0 = _citrus_ctype_wcstombs(_to_cur_ctype(), s, wcs, n, &ret);
105 if (err0)
106 errno = err0;
107
108 return ret;
109 }
110
111 int
112 wctomb(char *s, wchar_t wc)
113 {
114 int ret;
115 int err0;
116
117 err0 = _citrus_ctype_wctomb(_to_cur_ctype(), s, wc, &ret);
118 if (err0)
119 errno = err0;
120
121 return ret;
122 }
123