1/*- 2 * Copyright (c) 2002-2004 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 mbtowc(), as specified by IEEE Std. 1003.1-2001 and 29 * ISO/IEC 9899:1990. 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 <limits.h> 40#include <locale.h> 41#include <stdio.h> 42#include <stdlib.h> 43#include <string.h> 44 45int 46main(int argc, char *argv[]) 47{ 48 size_t len; 49 wchar_t wc; 50 char buf[MB_LEN_MAX + 1]; 51 52 /* 53 * C/POSIX locale. 54 */ 55 56 printf("1..1\n"); 57 58 assert(MB_CUR_MAX == 1); 59 60 /* No shift states in C locale. */ 61 assert(mbtowc(NULL, NULL, 0) == 0); 62 63 /* Null wide character. */ 64 wc = 0xcccc; 65 memset(buf, 0, sizeof(buf)); 66 assert(mbtowc(&wc, buf, 1) == 0); 67 assert(wc == 0); 68 69 /* Latin letter A. */ 70 buf[0] = 'A'; 71 assert(mbtowc(&wc, buf, 1) == 1); 72 assert(wc == L'A'); 73 74 /* Incomplete character sequence. */ 75 wc = L'z'; 76 buf[0] = '\0'; 77 assert(mbtowc(&wc, buf, 0) == -1); 78 assert(wc == L'z'); 79 assert(mbtowc(NULL, NULL, 0) == 0); 80 81 /* 82 * Japanese (EUC) locale. 83 */ 84 85 assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0); 86 assert(MB_CUR_MAX > 1); 87 88 /* Null wide character */ 89 memset(buf, 0xcc, sizeof(buf)); 90 buf[0] = 0; 91 wc = 0xcccc; 92 assert(mbtowc(&wc, buf, 1) == 0); 93 assert(wc == 0); 94 95 /* Latin letter A. */ 96 buf[0] = 'A'; 97 assert(mbtowc(&wc, buf, 1) == 1); 98 assert(wc == L'A'); 99 100 /* Incomplete character sequence (zero length). */ 101 wc = L'z'; 102 buf[0] = '\0'; 103 assert(mbtowc(&wc, buf, 0) == -1); 104 assert(wc == L'z'); 105 assert(mbtowc(NULL, NULL, 0) == 0); 106 107 /* Incomplete character sequence (truncated double-byte). */ 108 memset(buf, 0xcc, sizeof(buf)); 109 buf[0] = 0xa3; 110 buf[1] = 0x00; 111 wc = L'z'; 112 assert(mbtowc(&wc, buf, 1) == -1); 113 assert(wc == L'z'); 114 assert(mbtowc(NULL, NULL, 0) == 0); 115 116 /* Same as above, but complete. */ 117 buf[1] = 0xc1; 118 assert(mbtowc(&wc, buf, 2) == 2); 119 assert(wc == 0xa3c1); 120 121 printf("ok 1 - mbtowc()\n"); 122 123 return (0); 124} 125