Release 1.5.29.
[wine] / dlls / msvcrt / tests / scanf.c
1 /*
2  * Unit test suite for *scanf functions.
3  *
4  * Copyright 2002 Uwe Bonnes
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include <stdio.h>
22
23 #include "wine/test.h"
24
25 static void test_sscanf( void )
26 {
27     char buffer[100], buffer1[100];
28     char format[20];
29     int result, ret;
30     LONGLONG result64;
31     char c;
32     void *ptr;
33     float res1= -82.6267f, res2= 27.76f, res11, res12;
34     double double_res;
35     static const char pname[]=" St. Petersburg, Florida\n";
36     int hour=21,min=59,sec=20;
37     int  number,number_so_far;
38
39
40     /* check EOF */
41     strcpy(buffer,"");
42     ret = sscanf(buffer, "%d", &result);
43     ok( ret == EOF,"sscanf returns %x instead of %x\n", ret, EOF );
44
45     /* check %p */
46     ok( sscanf("000000000046F170", "%p", &ptr) == 1, "sscanf failed\n"  );
47     ok( ptr == (void *)0x46F170,"sscanf reads %p instead of %x\n", ptr, 0x46F170 );
48
49     ok( sscanf("0046F171", "%p", &ptr) == 1, "sscanf failed\n"  );
50     ok( ptr == (void *)0x46F171,"sscanf reads %p instead of %x\n", ptr, 0x46F171 );
51
52     ok( sscanf("46F172", "%p", &ptr) == 1, "sscanf failed\n"  );
53     ok( ptr == (void *)0x46F172,"sscanf reads %p instead of %x\n", ptr, 0x46F172 );
54
55     ok( sscanf("0x46F173", "%p", &ptr) == 1, "sscanf failed\n"  );
56     ok( ptr == NULL,"sscanf reads %p instead of %x\n", ptr, 0 );
57
58     ok( sscanf("-46F174", "%p", &ptr) == 1, "sscanf failed\n"  );
59     ok( ptr == (void *)(ULONG_PTR)-0x46f174,"sscanf reads %p instead of %p\n",
60         ptr, (void *)(ULONG_PTR)-0x46f174 );
61
62     ok( sscanf("+46F175", "%p", &ptr) == 1, "sscanf failed\n"  );
63     ok( ptr == (void *)0x46F175,"sscanf reads %p instead of %x\n", ptr, 0x46F175 );
64
65     /* check %p with no hex digits */
66     ok( sscanf("1233", "%p", &ptr) == 1, "sscanf failed\n"  );
67     ok( ptr == (void *)0x1233,"sscanf reads %p instead of %x\n", ptr, 0x1233 );
68
69     ok( sscanf("1234", "%P", &ptr) == 1, "sscanf failed\n"  );
70     ok( ptr == (void *)0x1234,"sscanf reads %p instead of %x\n", ptr, 0x1234 );
71
72     /* check %x */
73     strcpy(buffer,"0x519");
74     ok( sscanf(buffer, "%x", &result) == 1, "sscanf failed\n"  );
75     ok( result == 0x519,"sscanf reads %x instead of %x\n", result, 0x519 );
76
77     strcpy(buffer,"0x51a");
78     ok( sscanf(buffer, "%x", &result) == 1, "sscanf failed\n" );
79     ok( result == 0x51a ,"sscanf reads %x instead of %x\n", result, 0x51a );
80
81     strcpy(buffer,"0x51g");
82     ok( sscanf(buffer, "%x", &result) == 1, "sscanf failed\n" );
83     ok( result == 0x51, "sscanf reads %x instead of %x\n", result, 0x51 );
84
85     result = 0;
86     ret = sscanf("-1", "%x", &result);
87     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
88     ok(result == -1, "Read %d, expected -1\n", result);
89
90     /* check % followed by any char */
91     strcpy(buffer,"\"%12@");
92     strcpy(format,"%\"%%%d%@");  /* work around gcc format check */
93     ok( sscanf(buffer, format, &result) == 1, "sscanf failed\n" );
94     ok( result == 12, "sscanf reads %x instead of %x\n", result, 12 );
95
96     /* Check float */
97     ret = sprintf(buffer,"%f %f",res1, res2);
98     ok( ret == 20, "expected 20, got %u\n", ret);
99     ret = sscanf(buffer,"%f%f",&res11, &res12);
100     ok( ret == 2, "expected 2, got %u\n", ret);
101     ok( (res11 == res1) && (res12 == res2), "Error reading floats\n");
102
103     /* Check double */
104     ret = sprintf(buffer, "%lf", 32.715);
105     ok(ret == 9, "expected 9, got %u\n", ret);
106     ret = sscanf(buffer, "%lf", &double_res);
107     ok(ret == 1, "expected 1, got %u\n", ret);
108     ok(double_res == 32.715, "Got %lf, expected %lf\n", double_res, 32.715);
109     ret = sscanf(buffer, "%Lf", &double_res);
110     ok(ret == 1, "expected 1, got %u\n", ret);
111     ok(double_res == 32.715, "Got %lf, expected %lf\n", double_res, 32.715);
112
113     strcpy(buffer, "1.1e-30");
114     ret = sscanf(buffer, "%lf", &double_res);
115     ok(ret == 1, "expected 1, got %u\n", ret);
116     ok(double_res >= 1.1e-30-1e-45 && double_res <= 1.1e-30+1e-45,
117             "Got %.18le, expected %.18le\n", double_res, 1.1e-30);
118
119     /* check strings */
120     ret = sprintf(buffer," %s", pname);
121     ok( ret == 26, "expected 26, got %u\n", ret);
122     ret = sscanf(buffer,"%*c%[^\n]",buffer1);
123     ok( ret == 1, "Error with format \"%s\"\n","%*c%[^\n]");
124     ok( strncmp(pname,buffer1,strlen(buffer1)) == 0, "Error with \"%s\" \"%s\"\n",pname, buffer1);
125
126     ret = sscanf("abcefgdh","%*[a-cg-e]%c",&buffer[0]);
127     ok( ret == 1, "Error with format \"%s\"\n","%*[a-cg-e]%c");
128     ok( buffer[0] == 'd', "Error with \"abcefgdh\" \"%c\"\n", buffer[0]);
129
130     ret = sscanf("abcefgdh","%*[a-cd-dg-e]%c",&buffer[0]);
131     ok( ret == 1, "Error with format \"%s\"\n","%*[a-cd-dg-e]%c");
132     ok( buffer[0] == 'h', "Error with \"abcefgdh\" \"%c\"\n", buffer[0]);
133
134     /* check digits */
135     ret = sprintf(buffer,"%d:%d:%d",hour,min,sec);
136     ok( ret == 8, "expected 8, got %u\n", ret);
137     ret = sscanf(buffer,"%d%n",&number,&number_so_far);
138     ok(ret == 1 , "problem with format arg \"%%d%%n\"\n");
139     ok(number == hour,"Read wrong arg %d instead of %d\n",number, hour);
140     ok(number_so_far == 2,"Read wrong arg for \"%%n\" %d instead of 2\n",number_so_far);
141
142     ret = sscanf(buffer+2,"%*c%n",&number_so_far);
143     ok(ret == 0 , "problem with format arg \"%%*c%%n\"\n");
144     ok(number_so_far == 1,"Read wrong arg for \"%%n\" %d instead of 2\n",number_so_far);
145
146     result = 0xdeadbeef;
147     strcpy(buffer,"12345678");
148     ret = sscanf(buffer, "%hd", &result);
149     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
150     ok(result == 0xdead614e, "Wrong number read (%x)\n", result);
151
152     result = 0xdeadbeef;
153     ret = sscanf(buffer, "%hhd", &result);
154     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
155     ok(result == 0xbc614e, "Wrong number read (%x)\n", result);
156
157     strcpy(buffer,"12345678901234");
158     ret = sscanf(buffer, "%lld", &result64);
159     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
160     ret = sprintf(buffer1, "%lld", result64);
161     ok(ret==14 || broken(ret==10), "sprintf retuned %d\n", ret);
162     if(ret == 14)
163         ok(!strcmp(buffer, buffer1), "got %s, expected %s\n", buffer1, buffer);
164
165     /* Check %i according to bug 1878 */
166     strcpy(buffer,"123");
167     ret = sscanf(buffer, "%i", &result);
168     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
169     ok(result == 123, "Wrong number read\n");
170     result = 0;
171     ret = sscanf("-1", "%i", &result);
172     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
173     ok(result == -1, "Read %d, expected -1\n", result);
174     ret = sscanf(buffer, "%d", &result);
175     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
176     ok(result == 123, "Wrong number read\n");
177     result = 0;
178     ret = sscanf("-1", "%d", &result);
179     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
180     ok(result == -1, "Read %d, expected -1\n", result);
181
182     /* Check %i for octal and hexadecimal input */
183     result = 0;
184     strcpy(buffer,"017");
185     ret = sscanf(buffer, "%i", &result);
186     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
187     ok(result == 15, "Wrong number read\n");
188     result = 0;
189     strcpy(buffer,"0x17");
190     ret = sscanf(buffer, "%i", &result);
191     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
192     ok(result == 23, "Wrong number read\n");
193
194     /* %o */
195     result = 0;
196     ret = sscanf("-1", "%o", &result);
197     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
198     ok(result == -1, "Read %d, expected -1\n", result);
199
200     /* %u */
201     result = 0;
202     ret = sscanf("-1", "%u", &result);
203     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
204     ok(result == -1, "Read %d, expected -1\n", result);
205
206     /* Check %c */
207     strcpy(buffer,"a");
208     c = 0x55;
209     ret = sscanf(buffer, "%c", &c);
210     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
211     ok(c == 'a', "Field incorrect: '%c'\n", c);
212
213     strcpy(buffer," a");
214     c = 0x55;
215     ret = sscanf(buffer, "%c", &c);
216     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
217     ok(c == ' ', "Field incorrect: '%c'\n", c);
218
219     strcpy(buffer,"18:59");
220     c = 0x55;
221     ret = sscanf(buffer, "%d:%d%c", &hour, &min, &c);
222     ok(ret == 2, "Wrong number of arguments read: %d\n", ret);
223     ok(hour == 18, "Field 1 incorrect: %d\n", hour);
224     ok(min == 59, "Field 2 incorrect: %d\n", min);
225     ok(c == 0x55, "Field 3 incorrect: 0x%02x\n", c);
226
227     /* Check %n (also whitespace in format strings and %s) */
228     buffer[0]=0; buffer1[0]=0;
229     ret = sscanf("abc   def", "%s %n%s", buffer, &number_so_far, buffer1);
230     ok(strcmp(buffer, "abc")==0, "First %%s read incorrectly: %s\n", buffer);
231     ok(strcmp(buffer1,"def")==0, "Second %%s read incorrectly: %s\n", buffer1);
232     ok(number_so_far==6, "%%n yielded wrong result: %d\n", number_so_far);
233     ok(ret == 2, "%%n shouldn't count as a conversion: %d\n", ret);
234
235     /* Check where %n matches to EOF in buffer */
236     strcpy(buffer, "3:45");
237     ret = sscanf(buffer, "%d:%d%n", &hour, &min, &number_so_far);
238     ok(ret == 2, "Wrong number of arguments read: %d\n", ret);
239     ok(number_so_far == 4, "%%n yielded wrong result: %d\n", number_so_far);
240 }
241
242 static void test_sscanf_s(void)
243 {
244     int (__cdecl *psscanf_s)(const char*,const char*,...);
245     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
246     int i, ret;
247     char buf[100];
248
249     psscanf_s = (void*)GetProcAddress(hmod, "sscanf_s");
250     if(!psscanf_s) {
251         win_skip("sscanf_s not available\n");
252         return;
253     }
254
255     ret = psscanf_s("123", "%d", &i);
256     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
257     ok(i == 123, "i = %d\n", i);
258
259     ret = psscanf_s("123", "%s", buf, 100);
260     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
261     ok(!strcmp("123", buf), "buf = %s\n", buf);
262
263     ret = psscanf_s("123", "%s", buf, 3);
264     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
265     ok(buf[0]=='\0', "buf = %s\n", buf);
266
267     buf[0] = 'a';
268     ret = psscanf_s("123", "%3c", buf, 2);
269     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
270     ok(buf[0]=='\0', "buf = %s\n", buf);
271
272     i = 1;
273     ret = psscanf_s("123 123", "%s %d", buf, 2, &i);
274     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
275     ok(i==1, "i = %d\n", i);
276
277     i = 1;
278     ret = psscanf_s("123 123", "%d %s", &i, buf, 2);
279     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
280     ok(i==123, "i = %d\n", i);
281 }
282
283 static void test_swscanf( void )
284 {
285     wchar_t buffer[100];
286     int result, ret;
287     static const WCHAR formatd[] = {'%','d',0};
288
289     /* check WEOF */
290     /* WEOF is an unsigned short -1 but swscanf returns int
291        so it should be sign-extended */
292     buffer[0] = 0;
293     ret = swscanf(buffer, formatd, &result);
294     /* msvcrt returns 0 but should return -1 (later versions do) */
295     ok( ret == (short)WEOF || broken(ret == 0),
296         "swscanf returns %x instead of %x\n", ret, WEOF );
297 }
298
299 START_TEST(scanf)
300 {
301     test_sscanf();
302     test_sscanf_s();
303     test_swscanf();
304 }