huwcampbell.com
Reactos
1/*
2 * PROJECT: ReactOS api tests
3 * LICENSE: GPL-2.0-or-later (https://spdx.org/licenses/GPL-2.0-or-later)
4 * PURPOSE: Tests for StrToInt{,Ex,Ex64}{A,W}
5 * COPYRIGHT: Copyright 2026 Katayama Hirofumi MZ <katayama.hirofumi.mz@gmail.com>
6 */
7
8#include <apitest.h>
9#include <shlwapi.h>
10
11#define ok_longlong(expression, result) do { \
12 long long _value = (expression); \
13 ok(_value == (result), "Wrong value for '%s', expected: " #result " (0x%llx), got: 0x%llx\n", \
14 #expression, (long long)(result), _value); \
15} while (0)
16
17static VOID TEST_StrToIntA(VOID)
18{
19 INT n0, n1;
20 LONGLONG n2;
21 LPCSTR psz;
22 BOOL ret1, ret2;
23
24 n2 = n1 = 0xDEADFACE;
25 psz = NULL;
26 n0 = StrToIntA(psz);
27 ret1 = StrToIntExA(psz, 0, &n1);
28 ret2 = StrToInt64ExA(psz, 0, &n2);
29 ok_int(n0, 0);
30 ok_int(n1, 0);
31 ok_longlong(n2, 0xFFFFFFFFDEADFACE);
32 ok_int(ret1, FALSE);
33 ok_int(ret2, FALSE);
34
35 n2 = n1 = 0xDEADFACE;
36 psz = "";
37 n0 = StrToIntA(psz);
38 ret1 = StrToIntExA(psz, 0, &n1);
39 ret2 = StrToInt64ExA(psz, 0, &n2);
40 ok_int(n0, 0);
41 ok_int(n1, 0);
42 ok_longlong(n2, 0);
43 ok_int(ret1, FALSE);
44 ok_int(ret2, FALSE);
45
46 n2 = n1 = 0xDEADFACE;
47 psz = "123";
48 n0 = StrToIntA(psz);
49 ret1 = StrToIntExA(psz, 0, &n1);
50 ret2 = StrToInt64ExA(psz, 0, &n2);
51 ok_int(n0, 123);
52 ok_int(n1, 123);
53 ok_longlong(n2, 123);
54 ok_int(ret1, TRUE);
55 ok_int(ret2, TRUE);
56
57 n2 = n1 = 0xDEADFACE;
58 psz = "+123";
59 n0 = StrToIntA(psz);
60 ret1 = StrToIntExA(psz, 0, &n1);
61 ret2 = StrToInt64ExA(psz, 0, &n2);
62 ok_int(n0, 0);
63 ok_int(n1, 123);
64 ok_longlong(n2, 123);
65 ok_int(ret1, TRUE);
66 ok_int(ret2, TRUE);
67
68 n2 = n1 = 0xDEADFACE;
69 psz = "-123";
70 n0 = StrToIntA(psz);
71 ret1 = StrToIntExA(psz, 0, &n1);
72 ret2 = StrToInt64ExA(psz, 0, &n2);
73 ok_int(n0, -123);
74 ok_int(n1, -123);
75 ok_longlong(n2, -123);
76 ok_int(ret1, TRUE);
77 ok_int(ret2, TRUE);
78
79 n2 = n1 = 0xDEADFACE;
80 psz = " +123";
81 n0 = StrToIntA(psz);
82 ret1 = StrToIntExA(psz, 0, &n1);
83 ret2 = StrToInt64ExA(psz, 0, &n2);
84 ok_int(n0, 0);
85 ok_int(n1, 123);
86 ok_longlong(n2, 123);
87 ok_int(ret1, TRUE);
88 ok_int(ret2, TRUE);
89
90 n2 = n1 = 0xDEADFACE;
91 psz = " -123";
92 n0 = StrToIntA(psz);
93 ret1 = StrToIntExA(psz, 0, &n1);
94 ret2 = StrToInt64ExA(psz, 0, &n2);
95 ok_int(n0, 0);
96 ok_int(n1, -123);
97 ok_longlong(n2, -123);
98 ok_int(ret1, TRUE);
99 ok_int(ret2, TRUE);
100}
101
102static VOID TEST_StrToIntW(VOID)
103{
104 INT n0, n1;
105 LONGLONG n2;
106 LPCWSTR psz;
107 BOOL ret1, ret2;
108
109 n2 = n1 = 0xDEADFACE;
110 psz = NULL;
111 n0 = StrToIntW(psz);
112 ret1 = StrToIntExW(psz, 0, &n1);
113 ret2 = StrToInt64ExW(psz, 0, &n2);
114 ok_int(n0, 0);
115 ok_int(n1, 0);
116 ok_longlong(n2, 0xFFFFFFFFDEADFACE);
117 ok_int(ret1, FALSE);
118 ok_int(ret2, FALSE);
119
120 n2 = n1 = 0xDEADFACE;
121 psz = L"";
122 n0 = StrToIntW(psz);
123 ret1 = StrToIntExW(psz, 0, &n1);
124 ret2 = StrToInt64ExW(psz, 0, &n2);
125 ok_int(n0, 0);
126 ok_int(n1, 0);
127 ok_longlong(n2, 0);
128 ok_int(ret1, FALSE);
129 ok_int(ret2, FALSE);
130
131 n2 = n1 = 0xDEADFACE;
132 psz = L"123";
133 n0 = StrToIntW(psz);
134 ret1 = StrToIntExW(psz, 0, &n1);
135 ret2 = StrToInt64ExW(psz, 0, &n2);
136 ok_int(n0, 123);
137 ok_int(n1, 123);
138 ok_longlong(n2, 123);
139 ok_int(ret1, TRUE);
140 ok_int(ret2, TRUE);
141
142 n2 = n1 = 0xDEADFACE;
143 psz = L"+123";
144 n0 = StrToIntW(psz);
145 ret1 = StrToIntExW(psz, 0, &n1);
146 ret2 = StrToInt64ExW(psz, 0, &n2);
147 ok_int(n0, 0);
148 ok_int(n1, 123);
149 ok_longlong(n2, 123);
150 ok_int(ret1, TRUE);
151 ok_int(ret2, TRUE);
152
153 n2 = n1 = 0xDEADFACE;
154 psz = L"-123";
155 n0 = StrToIntW(psz);
156 ret1 = StrToIntExW(psz, 0, &n1);
157 ret2 = StrToInt64ExW(psz, 0, &n2);
158 ok_int(n0, -123);
159 ok_int(n1, -123);
160 ok_longlong(n2, -123);
161 ok_int(ret1, TRUE);
162 ok_int(ret2, TRUE);
163
164 n2 = n1 = 0xDEADFACE;
165 psz = L" +123";
166 n0 = StrToIntW(psz);
167 ret1 = StrToIntExW(psz, 0, &n1);
168 ret2 = StrToInt64ExW(psz, 0, &n2);
169 ok_int(n0, 0);
170 ok_int(n1, 123);
171 ok_longlong(n2, 123);
172 ok_int(ret1, TRUE);
173 ok_int(ret2, TRUE);
174
175 n2 = n1 = 0xDEADFACE;
176 psz = L" -123";
177 n0 = StrToIntW(psz);
178 ret1 = StrToIntExW(psz, 0, &n1);
179 ret2 = StrToInt64ExW(psz, 0, &n2);
180 ok_int(n0, 0);
181 ok_int(n1, -123);
182 ok_longlong(n2, -123);
183 ok_int(ret1, TRUE);
184 ok_int(ret2, TRUE);
185}
186
187START_TEST(StrToInt)
188{
189 TEST_StrToIntA();
190 TEST_StrToIntW();
191}