1*b30d1939SAndy Fiddaman /***********************************************************************
2*b30d1939SAndy Fiddaman * *
3*b30d1939SAndy Fiddaman * This software is part of the ast package *
4*b30d1939SAndy Fiddaman * Copyright (c) 1985-2011 AT&T Intellectual Property *
5*b30d1939SAndy Fiddaman * and is licensed under the *
6*b30d1939SAndy Fiddaman * Eclipse Public License, Version 1.0 *
7*b30d1939SAndy Fiddaman * by AT&T Intellectual Property *
8*b30d1939SAndy Fiddaman * *
9*b30d1939SAndy Fiddaman * A copy of the License is available at *
10*b30d1939SAndy Fiddaman * http://www.eclipse.org/org/documents/epl-v10.html *
11*b30d1939SAndy Fiddaman * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12*b30d1939SAndy Fiddaman * *
13*b30d1939SAndy Fiddaman * Information and Software Systems Research *
14*b30d1939SAndy Fiddaman * AT&T Research *
15*b30d1939SAndy Fiddaman * Florham Park NJ *
16*b30d1939SAndy Fiddaman * *
17*b30d1939SAndy Fiddaman * Glenn Fowler <gsf@research.att.com> *
18*b30d1939SAndy Fiddaman * David Korn <dgk@research.att.com> *
19*b30d1939SAndy Fiddaman * Phong Vo <kpv@research.att.com> *
20*b30d1939SAndy Fiddaman * *
21*b30d1939SAndy Fiddaman ***********************************************************************/
22*b30d1939SAndy Fiddaman #pragma prototyped
23*b30d1939SAndy Fiddaman
24*b30d1939SAndy Fiddaman /*
25*b30d1939SAndy Fiddaman * NOTE: mbs* and wcs* are provided to avoid link errors only
26*b30d1939SAndy Fiddaman */
27*b30d1939SAndy Fiddaman
28*b30d1939SAndy Fiddaman #include <ast.h>
29*b30d1939SAndy Fiddaman #include <wchar.h>
30*b30d1939SAndy Fiddaman
31*b30d1939SAndy Fiddaman #define STUB 1
32*b30d1939SAndy Fiddaman
33*b30d1939SAndy Fiddaman #if !_lib_mbtowc
34*b30d1939SAndy Fiddaman #undef STUB
35*b30d1939SAndy Fiddaman size_t
mbtowc(wchar_t * t,const char * s,size_t n)36*b30d1939SAndy Fiddaman mbtowc(wchar_t* t, const char* s, size_t n)
37*b30d1939SAndy Fiddaman {
38*b30d1939SAndy Fiddaman if (t && n > 0)
39*b30d1939SAndy Fiddaman *t = *s;
40*b30d1939SAndy Fiddaman return 1;
41*b30d1939SAndy Fiddaman }
42*b30d1939SAndy Fiddaman #endif
43*b30d1939SAndy Fiddaman
44*b30d1939SAndy Fiddaman #if !_lib_mbrtowc
45*b30d1939SAndy Fiddaman #undef STUB
46*b30d1939SAndy Fiddaman size_t
mbrtowc(wchar_t * t,const char * s,size_t n,mbstate_t * q)47*b30d1939SAndy Fiddaman mbrtowc(wchar_t* t, const char* s, size_t n, mbstate_t* q)
48*b30d1939SAndy Fiddaman {
49*b30d1939SAndy Fiddaman #if _lib_mbtowc
50*b30d1939SAndy Fiddaman #undef STUB
51*b30d1939SAndy Fiddaman memset(q, 0, sizeof(*q));
52*b30d1939SAndy Fiddaman return mbtowc(t, s, n);
53*b30d1939SAndy Fiddaman #else
54*b30d1939SAndy Fiddaman *q = 0;
55*b30d1939SAndy Fiddaman if (t && n > 0)
56*b30d1939SAndy Fiddaman *t = *s;
57*b30d1939SAndy Fiddaman return 1;
58*b30d1939SAndy Fiddaman #endif
59*b30d1939SAndy Fiddaman }
60*b30d1939SAndy Fiddaman #endif
61*b30d1939SAndy Fiddaman
62*b30d1939SAndy Fiddaman #if !_lib_mbstowcs
63*b30d1939SAndy Fiddaman #undef STUB
64*b30d1939SAndy Fiddaman size_t
mbstowcs(wchar_t * t,const char * s,size_t n)65*b30d1939SAndy Fiddaman mbstowcs(wchar_t* t, const char* s, size_t n)
66*b30d1939SAndy Fiddaman {
67*b30d1939SAndy Fiddaman register wchar_t* p = t;
68*b30d1939SAndy Fiddaman register wchar_t* e = t + n;
69*b30d1939SAndy Fiddaman register unsigned char* u = (unsigned char*)s;
70*b30d1939SAndy Fiddaman
71*b30d1939SAndy Fiddaman if (t)
72*b30d1939SAndy Fiddaman while (p < e && (*p++ = *u++));
73*b30d1939SAndy Fiddaman else
74*b30d1939SAndy Fiddaman while (p++, *u++);
75*b30d1939SAndy Fiddaman return p - t;
76*b30d1939SAndy Fiddaman }
77*b30d1939SAndy Fiddaman #endif
78*b30d1939SAndy Fiddaman
79*b30d1939SAndy Fiddaman #if !_lib_wctomb
80*b30d1939SAndy Fiddaman #undef STUB
81*b30d1939SAndy Fiddaman int
wctomb(char * s,wchar_t c)82*b30d1939SAndy Fiddaman wctomb(char* s, wchar_t c)
83*b30d1939SAndy Fiddaman {
84*b30d1939SAndy Fiddaman if (s)
85*b30d1939SAndy Fiddaman *s = c;
86*b30d1939SAndy Fiddaman return 1;
87*b30d1939SAndy Fiddaman }
88*b30d1939SAndy Fiddaman #endif
89*b30d1939SAndy Fiddaman
90*b30d1939SAndy Fiddaman #if !_lib_wcrtomb
91*b30d1939SAndy Fiddaman #undef STUB
92*b30d1939SAndy Fiddaman size_t
wcrtomb(char * s,wchar_t c,mbstate_t * q)93*b30d1939SAndy Fiddaman wcrtomb(char* s, wchar_t c, mbstate_t* q)
94*b30d1939SAndy Fiddaman {
95*b30d1939SAndy Fiddaman #if _lib_wctomb
96*b30d1939SAndy Fiddaman #undef STUB
97*b30d1939SAndy Fiddaman memset(q, 0, sizeof(*q));
98*b30d1939SAndy Fiddaman return wctomb(s, c);
99*b30d1939SAndy Fiddaman #else
100*b30d1939SAndy Fiddaman if (s)
101*b30d1939SAndy Fiddaman *s = c;
102*b30d1939SAndy Fiddaman *q = 0;
103*b30d1939SAndy Fiddaman return 1;
104*b30d1939SAndy Fiddaman #endif
105*b30d1939SAndy Fiddaman }
106*b30d1939SAndy Fiddaman #endif
107*b30d1939SAndy Fiddaman
108*b30d1939SAndy Fiddaman #if !_lib_wcslen
109*b30d1939SAndy Fiddaman #undef STUB
110*b30d1939SAndy Fiddaman size_t
wcslen(const wchar_t * s)111*b30d1939SAndy Fiddaman wcslen(const wchar_t* s)
112*b30d1939SAndy Fiddaman {
113*b30d1939SAndy Fiddaman register const wchar_t* p = s;
114*b30d1939SAndy Fiddaman
115*b30d1939SAndy Fiddaman while (*p)
116*b30d1939SAndy Fiddaman p++;
117*b30d1939SAndy Fiddaman return p - s;
118*b30d1939SAndy Fiddaman }
119*b30d1939SAndy Fiddaman #endif
120*b30d1939SAndy Fiddaman
121*b30d1939SAndy Fiddaman #if !_lib_wcstombs
122*b30d1939SAndy Fiddaman #undef STUB
123*b30d1939SAndy Fiddaman size_t
wcstombs(char * t,register const wchar_t * s,size_t n)124*b30d1939SAndy Fiddaman wcstombs(char* t, register const wchar_t* s, size_t n)
125*b30d1939SAndy Fiddaman {
126*b30d1939SAndy Fiddaman register char* p = t;
127*b30d1939SAndy Fiddaman register char* e = t + n;
128*b30d1939SAndy Fiddaman
129*b30d1939SAndy Fiddaman if (t)
130*b30d1939SAndy Fiddaman while (p < e && (*p++ = *s++));
131*b30d1939SAndy Fiddaman else
132*b30d1939SAndy Fiddaman while (p++, *s++);
133*b30d1939SAndy Fiddaman return p - t;
134*b30d1939SAndy Fiddaman }
135*b30d1939SAndy Fiddaman #endif
136*b30d1939SAndy Fiddaman
137*b30d1939SAndy Fiddaman #if STUB
138*b30d1939SAndy Fiddaman NoN(wc)
139*b30d1939SAndy Fiddaman #endif
140