1/*- 2 * Copyright (c) 2002 Tim J. Robbins 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 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. 13 * 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 24 * SUCH DAMAGE. 25 */ 26 27/* 28 * Test program for mbrtowc(), as specified by IEEE Std. 1003.1-2001 and 29 * ISO/IEC 9899:1999. 30 * 31 * The function is tested with both the "C" ("POSIX") LC_CTYPE setting and 32 * "ja_JP.eucJP". Other encodings are not tested. 33 */ 34 35#include <sys/cdefs.h> 36__FBSDID("$FreeBSD$"); 37 38#include <assert.h> 39#include <errno.h> 40#include <limits.h> 41#include <locale.h> 42#include <stdio.h> 43#include <stdlib.h> 44#include <string.h> 45#include <wchar.h> 46 47int 48main(int argc, char *argv[]) 49{ 50 mbstate_t s; 51 size_t len; 52 wchar_t wc; 53 char buf[MB_LEN_MAX + 1]; 54 55 /* 56 * C/POSIX locale. 57 */ 58 59 printf("1..1\n"); 60 61 assert(MB_CUR_MAX == 1); 62 63 /* Null wide character, internal state. */ 64 memset(buf, 0xcc, sizeof(buf)); 65 buf[0] = 0; 66 assert(mbrtowc(&wc, buf, 1, NULL) == 0); 67 assert(wc == 0); 68 69 /* Null wide character. */ 70 memset(&s, 0, sizeof(s)); 71 assert(mbrtowc(&wc, buf, 1, &s) == 0); 72 assert(wc == 0); 73 74 /* Latin letter A, internal state. */ 75 assert(mbrtowc(NULL, 0, 0, NULL) == 0); 76 buf[0] = 'A'; 77 assert(mbrtowc(&wc, buf, 1, NULL) == 1); 78 assert(wc == L'A'); 79 80 /* Latin letter A. */ 81 memset(&s, 0, sizeof(s)); 82 assert(mbrtowc(&wc, buf, 1, &s) == 1); 83 assert(wc == L'A'); 84 85 /* Incomplete character sequence. */ 86 wc = L'z'; 87 memset(&s, 0, sizeof(s)); 88 assert(mbrtowc(&wc, buf, 0, &s) == (size_t)-2); 89 assert(wc == L'z'); 90 91 /* Check that mbrtowc() doesn't access the buffer when n == 0. */ 92 wc = L'z'; 93 memset(&s, 0, sizeof(s)); 94 buf[0] = '\0'; 95 assert(mbrtowc(&wc, buf, 0, &s) == (size_t)-2); 96 assert(wc == L'z'); 97 98 /* 99 * Japanese (EUC) locale. 100 */ 101 102 assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0); 103 assert(MB_CUR_MAX > 1); 104 105 /* Null wide character, internal state. */ 106 assert(mbrtowc(NULL, 0, 0, NULL) == 0); 107 memset(buf, 0xcc, sizeof(buf)); 108 buf[0] = 0; 109 assert(mbrtowc(&wc, buf, 1, NULL) == 0); 110 assert(wc == 0); 111 112 /* Null wide character. */ 113 memset(&s, 0, sizeof(s)); 114 assert(mbrtowc(&wc, buf, 1, &s) == 0); 115 assert(wc == 0); 116 117 /* Latin letter A, internal state. */ 118 assert(mbrtowc(NULL, 0, 0, NULL) == 0); 119 buf[0] = 'A'; 120 assert(mbrtowc(&wc, buf, 1, NULL) == 1); 121 assert(wc == L'A'); 122 123 /* Latin letter A. */ 124 memset(&s, 0, sizeof(s)); 125 assert(mbrtowc(&wc, buf, 1, &s) == 1); 126 assert(wc == L'A'); 127 128 /* Incomplete character sequence (zero length). */ 129 wc = L'z'; 130 memset(&s, 0, sizeof(s)); 131 assert(mbrtowc(&wc, buf, 0, &s) == (size_t)-2); 132 assert(wc == L'z'); 133 134 /* Incomplete character sequence (truncated double-byte). */ 135 memset(buf, 0xcc, sizeof(buf)); 136 buf[0] = 0xa3; 137 buf[1] = 0x00; 138 memset(&s, 0, sizeof(s)); 139 wc = 0; 140 assert(mbrtowc(&wc, buf, 1, &s) == (size_t)-2); 141 142 /* Same as above, but complete. */ 143 buf[1] = 0xc1; 144 memset(&s, 0, sizeof(s)); 145 wc = 0; 146 assert(mbrtowc(&wc, buf, 2, &s) == 2); 147 assert(wc == 0xa3c1); 148 149 /* Test restarting behaviour. */ 150 memset(buf, 0xcc, sizeof(buf)); 151 buf[0] = 0xa3; 152 memset(&s, 0, sizeof(s)); 153 wc = 0; 154 assert(mbrtowc(&wc, buf, 1, &s) == (size_t)-2); 155 assert(wc == 0); 156 buf[0] = 0xc1; 157 assert(mbrtowc(&wc, buf, 1, &s) == 1); 158 assert(wc == 0xa3c1); 159 160 printf("ok 1 - mbrtowc()\n"); 161 162 return (0); 163} 164