Home | History | Annotate | Line # | Download | only in locale
t_io.c revision 1.2.4.2
      1  1.2.4.2  tls /* $NetBSD: t_io.c,v 1.2.4.2 2013/06/23 06:28:56 tls Exp $ */
      2  1.2.4.2  tls 
      3  1.2.4.2  tls /*-
      4  1.2.4.2  tls  * Copyright (c) 2013 The NetBSD Foundation, Inc.
      5  1.2.4.2  tls  * All rights reserved.
      6  1.2.4.2  tls  *
      7  1.2.4.2  tls  * This code is derived from software contributed to The NetBSD Foundation
      8  1.2.4.2  tls  * by Christos Zoulas.
      9  1.2.4.2  tls  *
     10  1.2.4.2  tls  * Redistribution and use in source and binary forms, with or without
     11  1.2.4.2  tls  * modification, are permitted provided that the following conditions
     12  1.2.4.2  tls  * are met:
     13  1.2.4.2  tls  * 1. Redistributions of source code must retain the above copyright
     14  1.2.4.2  tls  *    notice, this list of conditions and the following disclaimer.
     15  1.2.4.2  tls  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.2.4.2  tls  *    notice, this list of conditions and the following disclaimer in the
     17  1.2.4.2  tls  *    documentation and/or other materials provided with the distribution.
     18  1.2.4.2  tls  *
     19  1.2.4.2  tls  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.2.4.2  tls  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.2.4.2  tls  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.2.4.2  tls  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.2.4.2  tls  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.2.4.2  tls  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.2.4.2  tls  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.2.4.2  tls  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.2.4.2  tls  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.2.4.2  tls  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.2.4.2  tls  * POSSIBILITY OF SUCH DAMAGE.
     30  1.2.4.2  tls  */
     31  1.2.4.2  tls 
     32  1.2.4.2  tls #include <sys/cdefs.h>
     33  1.2.4.2  tls __COPYRIGHT("@(#) Copyright (c) 2011\
     34  1.2.4.2  tls  The NetBSD Foundation, inc. All rights reserved.");
     35  1.2.4.2  tls __RCSID("$NetBSD: t_io.c,v 1.2.4.2 2013/06/23 06:28:56 tls Exp $");
     36  1.2.4.2  tls 
     37  1.2.4.2  tls #include <sys/param.h>
     38  1.2.4.2  tls #include <errno.h>
     39  1.2.4.2  tls #include <locale.h>
     40  1.2.4.2  tls #include <stdio.h>
     41  1.2.4.2  tls #include <stdlib.h>
     42  1.2.4.2  tls #include <string.h>
     43  1.2.4.2  tls #include <wchar.h>
     44  1.2.4.2  tls 
     45  1.2.4.2  tls #include <atf-c.h>
     46  1.2.4.2  tls 
     47  1.2.4.2  tls 
     48  1.2.4.2  tls ATF_TC(bad_big5_wprintf);
     49  1.2.4.2  tls ATF_TC_HEAD(bad_big5_wprintf, tc)
     50  1.2.4.2  tls {
     51  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test bad big5 wchar wprintf");
     52  1.2.4.2  tls }
     53  1.2.4.2  tls 
     54  1.2.4.2  tls ATF_TC_BODY(bad_big5_wprintf, tc)
     55  1.2.4.2  tls {
     56  1.2.4.2  tls 	wchar_t ibuf[] = { 0xcf10, 0 };
     57  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
     58  1.2.4.2  tls 	atf_tc_expect_fail("PR lib/47660");
     59  1.2.4.2  tls 	ATF_REQUIRE_EQ(wprintf(L"%ls\n", ibuf), -1);
     60  1.2.4.2  tls }
     61  1.2.4.2  tls 
     62  1.2.4.2  tls ATF_TC(bad_big5_swprintf);
     63  1.2.4.2  tls ATF_TC_HEAD(bad_big5_swprintf, tc)
     64  1.2.4.2  tls {
     65  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test bad big5 wchar swprintf");
     66  1.2.4.2  tls }
     67  1.2.4.2  tls 
     68  1.2.4.2  tls ATF_TC_BODY(bad_big5_swprintf, tc)
     69  1.2.4.2  tls {
     70  1.2.4.2  tls 	wchar_t ibuf[] = { 0xcf10, 0 };
     71  1.2.4.2  tls 	wchar_t obuf[20];
     72  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
     73  1.2.4.2  tls 	ATF_REQUIRE_EQ(swprintf(obuf, sizeof(obuf), L"%ls\n", ibuf), -1);
     74  1.2.4.2  tls }
     75  1.2.4.2  tls 
     76  1.2.4.2  tls ATF_TC(good_big5_wprintf);
     77  1.2.4.2  tls ATF_TC_HEAD(good_big5_wprintf, tc)
     78  1.2.4.2  tls {
     79  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test good big5 wchar wprintf");
     80  1.2.4.2  tls }
     81  1.2.4.2  tls 
     82  1.2.4.2  tls ATF_TC_BODY(good_big5_wprintf, tc)
     83  1.2.4.2  tls {
     84  1.2.4.2  tls 	wchar_t ibuf[] = { 0xcf40, 0 };
     85  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
     86  1.2.4.2  tls 	// WTF? swprintf() fails, wprintf succeeds?
     87  1.2.4.2  tls 	ATF_REQUIRE_EQ(wprintf(L"%ls\n", ibuf), 2);
     88  1.2.4.2  tls }
     89  1.2.4.2  tls 
     90  1.2.4.2  tls ATF_TC(good_big5_swprintf);
     91  1.2.4.2  tls ATF_TC_HEAD(good_big5_swprintf, tc)
     92  1.2.4.2  tls {
     93  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test good big5 wchar swprintf");
     94  1.2.4.2  tls }
     95  1.2.4.2  tls 
     96  1.2.4.2  tls ATF_TC_BODY(good_big5_swprintf, tc)
     97  1.2.4.2  tls {
     98  1.2.4.2  tls 	wchar_t ibuf[] = { 0xcf40, 0 };
     99  1.2.4.2  tls 	wchar_t obuf[20];
    100  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
    101  1.2.4.2  tls 	ATF_REQUIRE_EQ(swprintf(obuf, sizeof(obuf), L"%ls\n", ibuf), 2);
    102  1.2.4.2  tls }
    103  1.2.4.2  tls 
    104  1.2.4.2  tls static int readfn(void *p, char *buf, int len) {
    105  1.2.4.2  tls 	memcpy(buf, p, MIN(len, 2));
    106  1.2.4.2  tls 	return 2;
    107  1.2.4.2  tls }
    108  1.2.4.2  tls 
    109  1.2.4.2  tls ATF_TC(good_big5_getwc);
    110  1.2.4.2  tls ATF_TC_HEAD(good_big5_getwc, tc)
    111  1.2.4.2  tls {
    112  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test good big5 wchar getwc");
    113  1.2.4.2  tls }
    114  1.2.4.2  tls 
    115  1.2.4.2  tls ATF_TC_BODY(good_big5_getwc, tc)
    116  1.2.4.2  tls {
    117  1.2.4.2  tls 	char ibuf[] = { 0xcf, 0x40 };
    118  1.2.4.2  tls 	FILE *fp = funopen(ibuf, readfn, NULL, NULL, NULL);
    119  1.2.4.2  tls 
    120  1.2.4.2  tls 	ATF_REQUIRE(fp != NULL);
    121  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
    122  1.2.4.2  tls 	ATF_REQUIRE_EQ(getwc(fp), 0xcf40);
    123  1.2.4.2  tls 	fclose(fp);
    124  1.2.4.2  tls }
    125  1.2.4.2  tls 
    126  1.2.4.2  tls ATF_TC(bad_big5_getwc);
    127  1.2.4.2  tls ATF_TC_HEAD(bad_big5_getwc, tc)
    128  1.2.4.2  tls {
    129  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test bad big5 wchar getwc");
    130  1.2.4.2  tls }
    131  1.2.4.2  tls 
    132  1.2.4.2  tls ATF_TC_BODY(bad_big5_getwc, tc)
    133  1.2.4.2  tls {
    134  1.2.4.2  tls 	char ibuf[] = { 0xcf, 0x20 };
    135  1.2.4.2  tls 	FILE *fp = funopen(ibuf, readfn, NULL, NULL, NULL);
    136  1.2.4.2  tls 
    137  1.2.4.2  tls 	ATF_REQUIRE(fp != NULL);
    138  1.2.4.2  tls 	setlocale(LC_CTYPE, "zh_TW.Big5");
    139  1.2.4.2  tls 	ATF_REQUIRE_EQ(getwc(fp), WEOF);
    140  1.2.4.2  tls 	fclose(fp);
    141  1.2.4.2  tls }
    142  1.2.4.2  tls 
    143  1.2.4.2  tls ATF_TC(bad_eucJP_getwc);
    144  1.2.4.2  tls ATF_TC_HEAD(bad_eucJP_getwc, tc)
    145  1.2.4.2  tls {
    146  1.2.4.2  tls 	atf_tc_set_md_var(tc, "descr", "Test bad eucJP wchar getwc");
    147  1.2.4.2  tls }
    148  1.2.4.2  tls 
    149  1.2.4.2  tls ATF_TC_BODY(bad_eucJP_getwc, tc)
    150  1.2.4.2  tls {
    151  1.2.4.2  tls 	char ibuf[] = { 0xcf, 0x20 };
    152  1.2.4.2  tls 	FILE *fp = funopen(ibuf, readfn, NULL, NULL, NULL);
    153  1.2.4.2  tls 
    154  1.2.4.2  tls 	ATF_REQUIRE(fp != NULL);
    155  1.2.4.2  tls 	setlocale(LC_CTYPE, "ja_JP.eucJP");
    156  1.2.4.2  tls 	// WTF? Not even returning what it read?
    157  1.2.4.2  tls 	ATF_CHECK_EQ(getwc(fp), 0xcf20);
    158  1.2.4.2  tls 	atf_tc_expect_fail("PR lib/47660");
    159  1.2.4.2  tls 	ATF_REQUIRE_EQ(getwc(fp), WEOF);
    160  1.2.4.2  tls 	fclose(fp);
    161  1.2.4.2  tls }
    162  1.2.4.2  tls 
    163  1.2.4.2  tls ATF_TP_ADD_TCS(tp)
    164  1.2.4.2  tls {
    165  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, bad_big5_wprintf);
    166  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, bad_big5_swprintf);
    167  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, good_big5_wprintf);
    168  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, good_big5_swprintf);
    169  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, good_big5_getwc);
    170  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, bad_big5_getwc);
    171  1.2.4.2  tls 	ATF_TP_ADD_TC(tp, bad_eucJP_getwc);
    172  1.2.4.2  tls 
    173  1.2.4.2  tls 	return atf_no_error();
    174  1.2.4.2  tls }
    175