Home | History | Annotate | Line # | Download | only in stdlib
t_strtol.c revision 1.5.2.2
      1  1.5.2.2  cherry /*	$NetBSD: t_strtol.c,v 1.5.2.2 2011/06/23 14:20:40 cherry Exp $ */
      2  1.5.2.2  cherry 
      3  1.5.2.2  cherry /*-
      4  1.5.2.2  cherry  * Copyright (c) 2011 The NetBSD Foundation, Inc.
      5  1.5.2.2  cherry  * All rights reserved.
      6  1.5.2.2  cherry  *
      7  1.5.2.2  cherry  * This code is derived from software contributed to The NetBSD Foundation
      8  1.5.2.2  cherry  * by Jukka Ruohonen.
      9  1.5.2.2  cherry  *
     10  1.5.2.2  cherry  * Redistribution and use in source and binary forms, with or without
     11  1.5.2.2  cherry  * modification, are permitted provided that the following conditions
     12  1.5.2.2  cherry  * are met:
     13  1.5.2.2  cherry  * 1. Redistributions of source code must retain the above copyright
     14  1.5.2.2  cherry  *    notice, this list of conditions and the following disclaimer.
     15  1.5.2.2  cherry  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.5.2.2  cherry  *    notice, this list of conditions and the following disclaimer in the
     17  1.5.2.2  cherry  *    documentation and/or other materials provided with the distribution.
     18  1.5.2.2  cherry  *
     19  1.5.2.2  cherry  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  1.5.2.2  cherry  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  1.5.2.2  cherry  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  1.5.2.2  cherry  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  1.5.2.2  cherry  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  1.5.2.2  cherry  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  1.5.2.2  cherry  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  1.5.2.2  cherry  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  1.5.2.2  cherry  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  1.5.2.2  cherry  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  1.5.2.2  cherry  * POSSIBILITY OF SUCH DAMAGE.
     30  1.5.2.2  cherry  */
     31  1.5.2.2  cherry 
     32  1.5.2.2  cherry #include <sys/cdefs.h>
     33  1.5.2.2  cherry __RCSID("$NetBSD: t_strtol.c,v 1.5.2.2 2011/06/23 14:20:40 cherry Exp $");
     34  1.5.2.2  cherry 
     35  1.5.2.2  cherry #include <atf-c.h>
     36  1.5.2.2  cherry #include <errno.h>
     37  1.5.2.2  cherry #include <stdlib.h>
     38  1.5.2.2  cherry #include <string.h>
     39  1.5.2.2  cherry #include <limits.h>
     40  1.5.2.2  cherry 
     41  1.5.2.2  cherry struct test {
     42  1.5.2.2  cherry 	const char	*str;
     43  1.5.2.2  cherry 	int64_t		 res;
     44  1.5.2.2  cherry 	int		 base;
     45  1.5.2.2  cherry 	const char	*end;
     46  1.5.2.2  cherry };
     47  1.5.2.2  cherry 
     48  1.5.2.2  cherry static void	check(struct test *, long int, long long int, char *);
     49  1.5.2.2  cherry 
     50  1.5.2.2  cherry static void
     51  1.5.2.2  cherry check(struct test *t, long int li, long long int lli, char *end)
     52  1.5.2.2  cherry {
     53  1.5.2.2  cherry 
     54  1.5.2.2  cherry 	if (li != -1 && li != t->res)
     55  1.5.2.2  cherry 		atf_tc_fail_nonfatal("strtol(%s, &end, %d) failed "
     56  1.5.2.2  cherry 		    "(rv = %ld)", t->str, t->base, li);
     57  1.5.2.2  cherry 
     58  1.5.2.2  cherry 	if (lli != -1 && lli != t->res)
     59  1.5.2.2  cherry 		atf_tc_fail_nonfatal("strtoll(%s, NULL, %d) failed "
     60  1.5.2.2  cherry 		    "(rv = %lld)", t->str, t->base, lli);
     61  1.5.2.2  cherry 
     62  1.5.2.2  cherry 	if (t->end != NULL && strcmp(t->end, end) != 0)
     63  1.5.2.2  cherry 		atf_tc_fail_nonfatal("invalid end pointer ('%s') from "
     64  1.5.2.2  cherry 		    "strtol(%s, &end, %d)", end, t->str, t->base);
     65  1.5.2.2  cherry }
     66  1.5.2.2  cherry 
     67  1.5.2.2  cherry ATF_TC(strtol_base);
     68  1.5.2.2  cherry ATF_TC_HEAD(strtol_base, tc)
     69  1.5.2.2  cherry {
     70  1.5.2.2  cherry 	atf_tc_set_md_var(tc, "descr", "Test strtol(3) with different bases");
     71  1.5.2.2  cherry }
     72  1.5.2.2  cherry 
     73  1.5.2.2  cherry ATF_TC_BODY(strtol_base, tc)
     74  1.5.2.2  cherry {
     75  1.5.2.2  cherry 	struct test t[] = {
     76  1.5.2.2  cherry 		{ "123456789",			 123456789,  0, NULL	},
     77  1.5.2.2  cherry 		{ "111010110111100110100010101", 123456789,  2, NULL	},
     78  1.5.2.2  cherry 		{ "22121022020212200",		 123456789,  3, NULL	},
     79  1.5.2.2  cherry 		{ "13112330310111",		 123456789,  4, NULL	},
     80  1.5.2.2  cherry 		{ "223101104124",		 123456789,  5, NULL	},
     81  1.5.2.2  cherry 		{ "20130035113",		 123456789,  6, NULL	},
     82  1.5.2.2  cherry 		{ "3026236221",			 123456789,  7, NULL	},
     83  1.5.2.2  cherry 		{ "726746425",			 123456789,  8, NULL	},
     84  1.5.2.2  cherry 		{ "277266780",			 123456789,  9, NULL	},
     85  1.5.2.2  cherry 		{ "123456789",			 123456789, 10, NULL	},
     86  1.5.2.2  cherry 		{ "63762A05",			 123456789, 11, NULL	},
     87  1.5.2.2  cherry 		{ "35418A99",			 123456789, 12, NULL	},
     88  1.5.2.2  cherry 		{ "1C767471",			 123456789, 13, NULL	},
     89  1.5.2.2  cherry 		{ "12579781",			 123456789, 14, NULL	},
     90  1.5.2.2  cherry 		{ "AC89BC9",			 123456789, 15, NULL	},
     91  1.5.2.2  cherry 		{ "75BCD15",			 123456789, 16, NULL	},
     92  1.5.2.2  cherry 		{ "123456789",			    342391,  8, NULL	},
     93  1.5.2.2  cherry 		{ "0123456789",			    342391,  0, NULL	},
     94  1.5.2.2  cherry 		{ "0123456789",			 123456789, 10, NULL	},
     95  1.5.2.2  cherry 		{ "0x75bcd15",		         123456789,  0, NULL	},
     96  1.5.2.2  cherry 	};
     97  1.5.2.2  cherry 
     98  1.5.2.2  cherry 	long long int lli;
     99  1.5.2.2  cherry 	long int li;
    100  1.5.2.2  cherry 	char *end;
    101  1.5.2.2  cherry 	size_t i;
    102  1.5.2.2  cherry 
    103  1.5.2.2  cherry 	for (i = 0; i < __arraycount(t); i++) {
    104  1.5.2.2  cherry 
    105  1.5.2.2  cherry 		li = strtol(t[i].str, &end, t[i].base);
    106  1.5.2.2  cherry 		lli = strtoll(t[i].str, NULL, t[i].base);
    107  1.5.2.2  cherry 
    108  1.5.2.2  cherry 		check(&t[i], li, lli, end);
    109  1.5.2.2  cherry 	}
    110  1.5.2.2  cherry }
    111  1.5.2.2  cherry 
    112  1.5.2.2  cherry ATF_TC(strtol_case);
    113  1.5.2.2  cherry ATF_TC_HEAD(strtol_case, tc)
    114  1.5.2.2  cherry {
    115  1.5.2.2  cherry 	atf_tc_set_md_var(tc, "descr", "Case insensitivity with strtol(3)");
    116  1.5.2.2  cherry }
    117  1.5.2.2  cherry 
    118  1.5.2.2  cherry ATF_TC_BODY(strtol_case, tc)
    119  1.5.2.2  cherry {
    120  1.5.2.2  cherry 	struct test t[] = {
    121  1.5.2.2  cherry 		{ "abcd",	0xabcd, 16, NULL	},
    122  1.5.2.2  cherry 		{ "     dcba",	0xdcba, 16, NULL	},
    123  1.5.2.2  cherry 		{ "abcd dcba",	0xabcd, 16, " dcba"	},
    124  1.5.2.2  cherry 		{ "abc0x123",	0xabc0, 16, NULL	},
    125  1.5.2.2  cherry 		{ "abcd\0x123",	0xabcd, 16, "\0x123"	},
    126  1.5.2.2  cherry 		{ "ABCD",	0xabcd, 16, NULL	},
    127  1.5.2.2  cherry 		{ "aBcD",	0xabcd, 16, NULL	},
    128  1.5.2.2  cherry 		{ "0xABCD",	0xabcd, 16, NULL	},
    129  1.5.2.2  cherry 		{ "0xABCDX",	0xabcd, 16, "X"		},
    130  1.5.2.2  cherry 	};
    131  1.5.2.2  cherry 
    132  1.5.2.2  cherry 	long long int lli;
    133  1.5.2.2  cherry 	long int li;
    134  1.5.2.2  cherry 	char *end;
    135  1.5.2.2  cherry 	size_t i;
    136  1.5.2.2  cherry 
    137  1.5.2.2  cherry 	for (i = 0; i < __arraycount(t); i++) {
    138  1.5.2.2  cherry 
    139  1.5.2.2  cherry 		li = strtol(t[i].str, &end, t[i].base);
    140  1.5.2.2  cherry 		lli = strtoll(t[i].str, NULL, t[i].base);
    141  1.5.2.2  cherry 
    142  1.5.2.2  cherry 		check(&t[i], li, lli, end);
    143  1.5.2.2  cherry 	}
    144  1.5.2.2  cherry }
    145  1.5.2.2  cherry 
    146  1.5.2.2  cherry ATF_TC(strtol_range);
    147  1.5.2.2  cherry ATF_TC_HEAD(strtol_range, tc)
    148  1.5.2.2  cherry {
    149  1.5.2.2  cherry 	atf_tc_set_md_var(tc, "descr", "Test ERANGE from strtol(3)");
    150  1.5.2.2  cherry }
    151  1.5.2.2  cherry 
    152  1.5.2.2  cherry ATF_TC_BODY(strtol_range, tc)
    153  1.5.2.2  cherry {
    154  1.5.2.2  cherry 
    155  1.5.2.2  cherry #if LONG_MAX == 0x7fffffff	/* XXX: Is this portable? */
    156  1.5.2.2  cherry 
    157  1.5.2.2  cherry 	struct test t[] = {
    158  1.5.2.2  cherry 		{ "20000000000", 2147483647, 8, NULL },
    159  1.5.2.2  cherry 		{ "2147483648",  2147483647, 10, NULL },
    160  1.5.2.2  cherry 		{ "80000000",	 2147483647, 16, NULL },
    161  1.5.2.2  cherry 	};
    162  1.5.2.2  cherry #else
    163  1.5.2.2  cherry 	struct test t[] = {
    164  1.5.2.2  cherry 		{ "1000000000000000000000", 9223372036854775807, 8, NULL },
    165  1.5.2.2  cherry 		{ "9223372036854775808",    9223372036854775807, 10, NULL },
    166  1.5.2.2  cherry 		{ "8000000000000000",       9223372036854775807, 16, NULL },
    167  1.5.2.2  cherry 	};
    168  1.5.2.2  cherry #endif
    169  1.5.2.2  cherry 
    170  1.5.2.2  cherry 	long int li;
    171  1.5.2.2  cherry 	char *end;
    172  1.5.2.2  cherry 	size_t i;
    173  1.5.2.2  cherry 
    174  1.5.2.2  cherry 	for (i = 0; i < __arraycount(t); i++) {
    175  1.5.2.2  cherry 
    176  1.5.2.2  cherry 		errno = 0;
    177  1.5.2.2  cherry 		li = strtol(t[i].str, &end, t[i].base);
    178  1.5.2.2  cherry 
    179  1.5.2.2  cherry 		if (errno != ERANGE)
    180  1.5.2.2  cherry 			atf_tc_fail("strtol(3) did not catch ERANGE");
    181  1.5.2.2  cherry 
    182  1.5.2.2  cherry 		check(&t[i], li, -1, end);
    183  1.5.2.2  cherry 	}
    184  1.5.2.2  cherry }
    185  1.5.2.2  cherry 
    186  1.5.2.2  cherry ATF_TC(strtol_signed);
    187  1.5.2.2  cherry ATF_TC_HEAD(strtol_signed, tc)
    188  1.5.2.2  cherry {
    189  1.5.2.2  cherry 	atf_tc_set_md_var(tc, "descr", "A basic test of strtol(3)");
    190  1.5.2.2  cherry }
    191  1.5.2.2  cherry 
    192  1.5.2.2  cherry ATF_TC_BODY(strtol_signed, tc)
    193  1.5.2.2  cherry {
    194  1.5.2.2  cherry 	struct test t[] = {
    195  1.5.2.2  cherry 		{ "1",		 1, 0, NULL	},
    196  1.5.2.2  cherry 		{ " 2",		 2, 0, NULL	},
    197  1.5.2.2  cherry 		{ "  3",	 3, 0, NULL	},
    198  1.5.2.2  cherry 		{ " -3",	-3, 0, NULL	},
    199  1.5.2.2  cherry 		{ "--1",	 0, 0, "--1"	},
    200  1.5.2.2  cherry 		{ "+-2",	 0, 0, "+-2"	},
    201  1.5.2.2  cherry 		{ "++3",	 0, 0, "++3"	},
    202  1.5.2.2  cherry 		{ "+9",		 9, 0, NULL	},
    203  1.5.2.2  cherry 		{ "+123",      123, 0, NULL	},
    204  1.5.2.2  cherry 		{ "-1 3",       -1, 0, " 3"	},
    205  1.5.2.2  cherry 		{ "-1.3",       -1, 0, ".3"	},
    206  1.5.2.2  cherry 		{ "-  3",        0, 0, "-  3"	},
    207  1.5.2.2  cherry 		{ "+33.",       33, 0, "."	},
    208  1.5.2.2  cherry 		{ "30x0",       30, 0, "x0"	},
    209  1.5.2.2  cherry 	};
    210  1.5.2.2  cherry 
    211  1.5.2.2  cherry 	long long int lli;
    212  1.5.2.2  cherry 	long int li;
    213  1.5.2.2  cherry 	char *end;
    214  1.5.2.2  cherry 	size_t i;
    215  1.5.2.2  cherry 
    216  1.5.2.2  cherry 	for (i = 0; i < __arraycount(t); i++) {
    217  1.5.2.2  cherry 
    218  1.5.2.2  cherry 		li = strtol(t[i].str, &end, t[i].base);
    219  1.5.2.2  cherry 		lli = strtoll(t[i].str, NULL, t[i].base);
    220  1.5.2.2  cherry 
    221  1.5.2.2  cherry 		check(&t[i], li, lli, end);
    222  1.5.2.2  cherry 	}
    223  1.5.2.2  cherry }
    224  1.5.2.2  cherry 
    225  1.5.2.2  cherry ATF_TP_ADD_TCS(tp)
    226  1.5.2.2  cherry {
    227  1.5.2.2  cherry 
    228  1.5.2.2  cherry 	ATF_TP_ADD_TC(tp, strtol_base);
    229  1.5.2.2  cherry 	ATF_TP_ADD_TC(tp, strtol_case);
    230  1.5.2.2  cherry 	ATF_TP_ADD_TC(tp, strtol_range);
    231  1.5.2.2  cherry 	ATF_TP_ADD_TC(tp, strtol_signed);
    232  1.5.2.2  cherry 
    233  1.5.2.2  cherry 	return atf_no_error();
    234  1.5.2.2  cherry }
    235