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 mbsrtowcs(), 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 char srcbuf[128]; 51 wchar_t dstbuf[128]; 52 char *src; 53 mbstate_t s; 54 55 /* 56 * C/POSIX locale. 57 */ 58 59 printf("1..1\n"); 60 61 /* Simple null terminated string. */ 62 memset(srcbuf, 0xcc, sizeof(srcbuf)); 63 strcpy(srcbuf, "hello"); 64 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 65 src = srcbuf; 66 memset(&s, 0, sizeof(s)); 67 assert(mbsrtowcs(dstbuf, (const char **)&src, sizeof(dstbuf) / 68 sizeof(*dstbuf), &s) == 5); 69 assert(wcscmp(dstbuf, L"hello") == 0); 70 assert(dstbuf[6] == 0xcccc); 71 assert(src == NULL); 72 73 /* Not enough space in destination buffer. */ 74 memset(srcbuf, 0xcc, sizeof(srcbuf)); 75 strcpy(srcbuf, "hello"); 76 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 77 src = srcbuf; 78 memset(&s, 0, sizeof(s)); 79 assert(mbsrtowcs(dstbuf, (const char **)&src, 4, &s) == 4); 80 assert(wmemcmp(dstbuf, L"hell", 4) == 0); 81 assert(dstbuf[5] == 0xcccc); 82 assert(src == srcbuf + 4); 83 84 /* Null terminated string, internal dest. buffer */ 85 memset(srcbuf, 0xcc, sizeof(srcbuf)); 86 strcpy(srcbuf, "hello"); 87 src = srcbuf; 88 memset(&s, 0, sizeof(s)); 89 assert(mbsrtowcs(NULL, (const char **)&src, 0, &s) == 5); 90 91 /* Null terminated string, internal state. */ 92 memset(srcbuf, 0xcc, sizeof(srcbuf)); 93 strcpy(srcbuf, "hello"); 94 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 95 src = srcbuf; 96 assert(mbsrtowcs(dstbuf, (const char **)&src, sizeof(dstbuf) / 97 sizeof(*dstbuf), NULL) == 5); 98 assert(wcscmp(dstbuf, L"hello") == 0); 99 assert(dstbuf[6] == 0xcccc); 100 assert(src == NULL); 101 102 /* Null terminated string, internal state, internal dest. buffer. */ 103 memset(srcbuf, 0xcc, sizeof(srcbuf)); 104 strcpy(srcbuf, "hello"); 105 src = srcbuf; 106 assert(mbsrtowcs(NULL, (const char **)&src, 0, NULL) == 5); 107 108 /* Empty source buffer. */ 109 memset(srcbuf, 0xcc, sizeof(srcbuf)); 110 srcbuf[0] = '\0'; 111 src = srcbuf; 112 memset(&s, 0, sizeof(s)); 113 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 114 assert(mbsrtowcs(dstbuf, (const char **)&src, 1, &s) == 0); 115 assert(dstbuf[0] == 0); 116 assert(dstbuf[1] == 0xcccc); 117 assert(src == NULL); 118 119 /* Zero length destination buffer. */ 120 memset(srcbuf, 0xcc, sizeof(srcbuf)); 121 strcpy(srcbuf, "hello"); 122 src = srcbuf; 123 memset(&s, 0, sizeof(s)); 124 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 125 assert(mbsrtowcs(dstbuf, (const char **)&src, 0, &s) == 0); 126 assert(dstbuf[0] == 0xcccc); 127 assert(src == srcbuf); 128 129 /* 130 * Japanese (EUC) locale. 131 */ 132 133 assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0); 134 assert(MB_CUR_MAX > 1); 135 136 memset(srcbuf, 0xcc, sizeof(srcbuf)); 137 strcpy(srcbuf, "\xA3\xC1 B \xA3\xC3"); 138 src = srcbuf; 139 memset(&s, 0, sizeof(s)); 140 wmemset(dstbuf, 0xcccc, sizeof(dstbuf) / sizeof(*dstbuf)); 141 assert(mbsrtowcs(dstbuf, (const char **)&src, sizeof(dstbuf) / 142 sizeof(*dstbuf), &s) == 5); 143 assert(dstbuf[0] == 0xA3C1 && dstbuf[1] == 0x20 && dstbuf[2] == 0x42 && 144 dstbuf[3] == 0x20 && dstbuf[4] == 0xA3C3 && dstbuf[5] == 0); 145 assert(src == NULL); 146 147 printf("ok 1 - mbsrtowcs()\n"); 148 149 return (0); 150} 151