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