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 wctomb(), 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 46int 47main(int argc, char *argv[]) 48{ 49 size_t len; 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(wctomb(NULL, L'\0') == 0); 62 63 /* Null wide character. */ 64 memset(buf, 0xcc, sizeof(buf)); 65 len = wctomb(buf, L'\0'); 66 assert(len == 1); 67 assert((unsigned char)buf[0] == 0 && (unsigned char)buf[1] == 0xcc); 68 69 /* Latin letter A. */ 70 memset(buf, 0xcc, sizeof(buf)); 71 len = wctomb(buf, L'A'); 72 assert(len == 1); 73 assert((unsigned char)buf[0] == 'A' && (unsigned char)buf[1] == 0xcc); 74 75 /* Invalid code. */ 76 assert(wctomb(buf, UCHAR_MAX + 1) == -1); 77 assert(wctomb(NULL, 0) == 0); 78 79 /* 80 * Japanese (EUC) locale. 81 */ 82 83 assert(strcmp(setlocale(LC_CTYPE, "ja_JP.eucJP"), "ja_JP.eucJP") == 0); 84 assert(MB_CUR_MAX == 3); 85 86 /* No shift states in EUC encoding. */ 87 assert(wctomb(NULL, L'\0') == 0); 88 89 /* Null wide character. */ 90 memset(buf, 0xcc, sizeof(buf)); 91 len = wctomb(buf, L'\0'); 92 assert(len == 1); 93 assert((unsigned char)buf[0] == 0 && (unsigned char)buf[1] == 0xcc); 94 95 /* Latin letter A. */ 96 memset(buf, 0xcc, sizeof(buf)); 97 len = wctomb(buf, L'A'); 98 assert(len == 1); 99 assert((unsigned char)buf[0] == 'A' && (unsigned char)buf[1] == 0xcc); 100 101 /* Full width letter A. */ 102 memset(buf, 0xcc, sizeof(buf)); 103 len = wctomb(buf, 0xa3c1); 104 assert(len == 2); 105 assert((unsigned char)buf[0] == 0xa3 && 106 (unsigned char)buf[1] == 0xc1 && 107 (unsigned char)buf[2] == 0xcc); 108 109 printf("ok 1 - wctomb()\n"); 110 111 return (0); 112} 113