832672a7b52a71a7d2c36a8881ad438104d6dd6e
1 /* Copyright (C) 1991, 1992, 1995, 1996, 1997 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB. If not,
16 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17 Boston, MA 02111-1307, USA. */
19 #include <crtdll/stdlib.h>
20 #include <crtdll/wchar.h>
22 #include <crtdll/errno.h>
23 #include <crtdll/wchar.h>
24 #include <crtdll/internal/file.h>
30 static const wchar_t encoding_mask
[] =
32 (wchar_t)~0x7ff, (wchar_t)~0xffff, (wchar_t)~0x1fffff, (wchar_t)~0x3ffffff
35 static const unsigned char encoding_byte
[] =
37 0xc0, 0xe0, 0xf0, 0xf8, 0xfc
40 /* The state is for this UTF8 encoding not used. */
41 //static mbstate_t internal;
44 //extern mbstate_t __no_r_state; /* Defined in mbtowc.c. */
47 __wcrtomb (char *s
, wchar_t wc
);
49 /* Convert WCHAR into its multibyte character representation,
50 putting this in S and returning its length.
52 Attention: this function should NEVER be intentionally used.
53 The interface is completely stupid. The state is shared between
54 all conversion functions. You should use instead the restartable
57 wctomb (char *s
, wchar_t wchar
)
59 /* If S is NULL the function has to return null or not null
60 depending on the encoding having a state depending encoding or
61 not. This is nonsense because any multibyte encoding has a
62 state. The ISO C amendment 1 corrects this while introducing the
63 restartable functions. We simply say here all encodings have a
68 return __wcrtomb (s
, wchar
);
73 __wcrtomb (char *s
, wchar_t wc
)
86 /* Store the UTF8 representation of WC. */
87 if (wc
< 0 || wc
> 0x7fffffff)
89 /* This is no correct ISO 10646 character. */
96 /* It's a one byte sequence. */
102 for (written
= 2; written
< 6; ++written
)
103 if ((wc
& encoding_mask
[written
- 2]) == 0)
108 size_t cnt
= written
;
109 s
[0] = encoding_byte
[cnt
- 2];
114 s
[cnt
] = 0x80 | (wc
& 0x3f);