2 * Copyright (c) 2002 Tim J. Robbins
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * Test program for wcrtomb(), as specified by IEEE Std. 1003.1-2001 and
31 * The function is tested with both the "C" ("POSIX") LC_CTYPE setting and
32 * "ja_JP.eucJP". Other encodings are not tested.
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
48 main(int argc, char *argv[])
52 char buf[MB_LEN_MAX + 1];
60 assert(MB_CUR_MAX == 1);
63 * If the buffer argument is NULL, wc is implicitly L'\0',
64 * wcrtomb() resets its internal state.
66 assert(wcrtomb(NULL, L'\0', NULL) == 1);
67 assert(wcrtomb(NULL, UCHAR_MAX + 1, NULL) == 1);
69 /* Null wide character. */
70 memset(&s, 0, sizeof(s));
71 memset(buf, 0xcc, sizeof(buf));
72 len = wcrtomb(buf, L'\0', &s);
74 assert((unsigned char)buf[0] == 0 && (unsigned char)buf[1] == 0xcc);
76 /* Latin letter A, internal state. */
77 assert(wcrtomb(NULL, L'\0', NULL) == 1);
78 assert(wcrtomb(NULL, L'A', NULL) == 1);
81 memset(&s, 0, sizeof(s));
82 memset(buf, 0xcc, sizeof(buf));
83 len = wcrtomb(buf, L'A', &s);
85 assert((unsigned char)buf[0] == 'A' && (unsigned char)buf[1] == 0xcc);
88 assert(wcrtomb(buf, UCHAR_MAX + 1, NULL) == (size_t)-1);
89 assert(errno == EILSEQ);
92 * Japanese (EUC) locale.
95 assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0);
96 assert(MB_CUR_MAX == 3);
99 * If the buffer argument is NULL, wc is implicitly L'\0',
100 * wcrtomb() resets its internal state.
102 assert(wcrtomb(NULL, L'\0', NULL) == 1);
104 /* Null wide character. */
105 memset(&s, 0, sizeof(s));
106 memset(buf, 0xcc, sizeof(buf));
107 len = wcrtomb(buf, L'\0', &s);
109 assert((unsigned char)buf[0] == 0 && (unsigned char)buf[1] == 0xcc);
111 /* Latin letter A, internal state. */
112 assert(wcrtomb(NULL, L'\0', NULL) == 1);
113 assert(wcrtomb(NULL, L'A', NULL) == 1);
115 /* Latin letter A. */
116 memset(&s, 0, sizeof(s));
117 memset(buf, 0xcc, sizeof(buf));
118 len = wcrtomb(buf, L'A', &s);
120 assert((unsigned char)buf[0] == 'A' && (unsigned char)buf[1] == 0xcc);
122 /* Full width letter A. */
123 memset(&s, 0, sizeof(s));
124 memset(buf, 0xcc, sizeof(buf));
125 len = wcrtomb(buf, 0xa3c1, &s);
127 assert((unsigned char)buf[0] == 0xa3 &&
128 (unsigned char)buf[1] == 0xc1 &&
129 (unsigned char)buf[2] == 0xcc);
131 printf("ok 1 - wcrtomb()\n");