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_fscanf( void )
  26 {
  27     static const char file_name[] = "fscanf.tst";
  28     static const char contents[] =
  29         "line1\n"
  30         "line2 "
  31     ;
  32     char buf[1024];
  33     FILE *fp;
  34     int ret;
  35
  36     fp = fopen(file_name, "wb");
  37     ok(fp != NULL, "fp = %p\n", fp);
  38     if(!fp) {
  39         skip("failed to create temporary test file\n");
  40         return;
  41     }
  42
  43     ret = fprintf(fp, contents);
  44     fclose(fp);
  45
  46     fp = fopen(file_name, "rb");
  47     ret = fscanf(fp, "%s", buf);
  48     ok(ret == 1, "ret = %d\n", ret);
  49     ok(strcmp(buf, "line1") == 0, "buf = %s\n", buf);
  50     ret = fscanf(fp, "%s", buf);
  51     ok(ret == 1, "ret = %d\n", ret);
  52     ok(strcmp(buf, "line2") == 0, "buf = %s\n", buf);
  53     ret = fscanf(fp, "%s", buf);
  54     ok(ret == EOF, "ret = %d\n", ret);
  55     fclose(fp);
  56
  57     unlink(file_name);
  58 }
  59
  60 static void test_sscanf( void )
  61 {
  62     /* use function pointers to bypass gcc builtin */
  63     int (WINAPIV *p_sprintf)(char *buf, const char *fmt, ...);
  64     int (WINAPIV *p_sscanf)(const char *buf, const char *fmt, ...);
  65     char buffer[100], buffer1[100];
  66     char format[20];
  67     int result, ret;
  68     LONGLONG result64;
  69     char c;
  70     void *ptr;
  71     float res1= -82.6267f, res2= 27.76f, res11, res12;
  72     double double_res;
  73     static const char pname[]=" St. Petersburg, Florida\n";
  74     int hour=21,min=59,sec=20;
  75     int  number,number_so_far;
  76     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
  77
  78     p_sprintf = (void *)GetProcAddress( hmod, "sprintf" );
  79     p_sscanf = (void *)GetProcAddress( hmod, "sscanf" );
  80
  81     /* check EOF */
  82     strcpy(buffer,"");
  83     ret = p_sscanf(buffer, "%d", &result);
  84     ok( ret == EOF,"sscanf returns %x instead of %x\n", ret, EOF );
  85
  86     ret = p_sscanf(" \t\n\n", "%s", buffer);
  87     ok( ret == EOF, "ret = %d\n", ret );
  88
  89     buffer1[0] = 'a';
  90     ret = p_sscanf("test\n", "%s%c", buffer, buffer1);
  91     ok( ret == 2, "ret = %d\n", ret );
  92     ok( buffer1[0] == '\n', "buffer1[0] = %d\n", buffer1[0] );
  93
  94     /* check %p */
  95     ok( p_sscanf("000000000046F170", "%p", &ptr) == 1, "sscanf failed\n"  );
  96     ok( ptr == (void *)0x46F170,"sscanf reads %p instead of %x\n", ptr, 0x46F170 );
  97
  98     ok( p_sscanf("0046F171", "%p", &ptr) == 1, "sscanf failed\n"  );
  99     ok( ptr == (void *)0x46F171,"sscanf reads %p instead of %x\n", ptr, 0x46F171 );
 100
 101     ok( p_sscanf("46F172", "%p", &ptr) == 1, "sscanf failed\n"  );
 102     ok( ptr == (void *)0x46F172,"sscanf reads %p instead of %x\n", ptr, 0x46F172 );
 103
 104     ok( p_sscanf("0x46F173", "%p", &ptr) == 1, "sscanf failed\n"  );
 105     ok( ptr == NULL,"sscanf reads %p instead of %x\n", ptr, 0 );
 106
 107     ok( p_sscanf("-46F174", "%p", &ptr) == 1, "sscanf failed\n"  );
 108     ok( ptr == (void *)(ULONG_PTR)-0x46f174,"sscanf reads %p instead of %p\n",
 109         ptr, (void *)(ULONG_PTR)-0x46f174 );
 110
 111     ok( p_sscanf("+46F175", "%p", &ptr) == 1, "sscanf failed\n"  );
 112     ok( ptr == (void *)0x46F175,"sscanf reads %p instead of %x\n", ptr, 0x46F175 );
 113
 114     /* check %p with no hex digits */
 115     ok( p_sscanf("1233", "%p", &ptr) == 1, "sscanf failed\n"  );
 116     ok( ptr == (void *)0x1233,"sscanf reads %p instead of %x\n", ptr, 0x1233 );
 117
 118     ok( p_sscanf("1234", "%P", &ptr) == 1, "sscanf failed\n"  );
 119     ok( ptr == (void *)0x1234,"sscanf reads %p instead of %x\n", ptr, 0x1234 );
 120
 121     /* check %x */
 122     strcpy(buffer,"0x519");
 123     ok( p_sscanf(buffer, "%x", &result) == 1, "sscanf failed\n"  );
 124     ok( result == 0x519,"sscanf reads %x instead of %x\n", result, 0x519 );
 125
 126     strcpy(buffer,"0x51a");
 127     ok( p_sscanf(buffer, "%x", &result) == 1, "sscanf failed\n" );
 128     ok( result == 0x51a ,"sscanf reads %x instead of %x\n", result, 0x51a );
 129
 130     strcpy(buffer,"0x51g");
 131     ok( p_sscanf(buffer, "%x", &result) == 1, "sscanf failed\n" );
 132     ok( result == 0x51, "sscanf reads %x instead of %x\n", result, 0x51 );
 133
 134     result = 0;
 135     ret = p_sscanf("-1", "%x", &result);
 136     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
 137     ok(result == -1, "Read %d, expected -1\n", result);
 138
 139     /* check % followed by any char */
 140     strcpy(buffer,"\"%12@");
 141     strcpy(format,"%\"%%%d%@");  /* work around gcc format check */
 142     ok( p_sscanf(buffer, format, &result) == 1, "sscanf failed\n" );
 143     ok( result == 12, "sscanf reads %x instead of %x\n", result, 12 );
 144
 145     /* Check float */
 146     ret = p_sprintf(buffer,"%f %f",res1, res2);
 147     ok( ret == 20, "expected 20, got %u\n", ret);
 148     ret = p_sscanf(buffer,"%f%f",&res11, &res12);
 149     ok( ret == 2, "expected 2, got %u\n", ret);
 150     ok( (res11 == res1) && (res12 == res2), "Error reading floats\n");
 151
 152     /* Check double */
 153     ret = p_sprintf(buffer, "%lf", 32.715);
 154     ok(ret == 9, "expected 9, got %u\n", ret);
 155     ret = p_sscanf(buffer, "%lf", &double_res);
 156     ok(ret == 1, "expected 1, got %u\n", ret);
 157     ok(double_res == 32.715, "Got %lf, expected %lf\n", double_res, 32.715);
 158     ret = p_sscanf(buffer, "%Lf", &double_res);
 159     ok(ret == 1, "expected 1, got %u\n", ret);
 160     ok(double_res == 32.715, "Got %lf, expected %lf\n", double_res, 32.715);
 161
 162     strcpy(buffer, "1.1e-30");
 163     ret = p_sscanf(buffer, "%lf", &double_res);
 164     ok(ret == 1, "expected 1, got %u\n", ret);
 165     ok(double_res >= 1.1e-30-1e-45 && double_res <= 1.1e-30+1e-45,
 166             "Got %.18le, expected %.18le\n", double_res, 1.1e-30);
 167
 168     buffer[0] = 0;
 169     double_res = 1;
 170     ret = p_sscanf(buffer, "%lf", &double_res);
 171     ok(ret == -1, "expected 0, got %u\n", ret);
 172     ok(double_res == 1, "Got %lf, expected 1\n", double_res);
 173
 174     /* check strings */
 175     ret = p_sprintf(buffer," %s", pname);
 176     ok( ret == 26, "expected 26, got %u\n", ret);
 177     ret = p_sscanf(buffer,"%*c%[^\n]",buffer1);
 178     ok( ret == 1, "Error with format \"%s\"\n","%*c%[^\n]");
 179     ok( strncmp(pname,buffer1,strlen(buffer1)) == 0, "Error with \"%s\" \"%s\"\n",pname, buffer1);
 180
 181     ret = p_sscanf("abcefgdh","%*[a-cg-e]%c",&buffer[0]);
 182     ok( ret == 1, "Error with format \"%s\"\n","%*[a-cg-e]%c");
 183     ok( buffer[0] == 'd', "Error with \"abcefgdh\" \"%c\"\n", buffer[0]);
 184
 185     ret = p_sscanf("abcefgdh","%*[a-cd-dg-e]%c",&buffer[0]);
 186     ok( ret == 1, "Error with format \"%s\"\n","%*[a-cd-dg-e]%c");
 187     ok( buffer[0] == 'h', "Error with \"abcefgdh\" \"%c\"\n", buffer[0]);
 188
 189     ret = p_sscanf("-123", "%[-0-9]", buffer);
 190     ok( ret == 1, "Error with format \"%s\"\n", "%[-0-9]");
 191     ok( strcmp("-123", buffer) == 0, "Error with \"-123\" \"%s\"\n", buffer);
 192
 193     ret = p_sscanf("-321", "%[0-9-]", buffer);
 194     ok( ret == 1, "Error with format \"%s\"\n", "%[0-9-]");
 195     ok( strcmp("-321", buffer) == 0, "Error with \"-321\" \"%s\"\n", buffer);
 196
 197     ret = p_sscanf("-4123", "%[1-2-4]", buffer);
 198     ok( ret == 1, "Error with format \"%s\"\n", "%[1-2-4]");
 199     ok( strcmp("-412", buffer) == 0, "Error with \"-412\" \"%s\"\n", buffer);
 200
 201     ret = p_sscanf("-456123", "%[1-2-45-6]", buffer);
 202     ok( ret == 1, "Error with format \"%s\"\n", "%[1-2-45-6]");
 203     ok( strcmp("-45612", buffer) == 0, "Error with \"-45612\" \"%s\"\n", buffer);
 204
 205     buffer1[0] = 'b';
 206     ret = p_sscanf("a","%s%s", buffer, buffer1);
 207     ok( ret == 1, "expected 1, got %u\n", ret);
 208     ok( buffer[0] == 'a', "buffer[0] = '%c'\n", buffer[0]);
 209     ok( buffer[1] == '\0', "buffer[1] = '%c'\n", buffer[1]);
 210     ok( buffer1[0] == 'b', "buffer1[0] = '%c'\n", buffer1[0]);
 211
 212     /* check digits */
 213     ret = p_sprintf(buffer,"%d:%d:%d",hour,min,sec);
 214     ok( ret == 8, "expected 8, got %u\n", ret);
 215     ret = p_sscanf(buffer,"%d%n",&number,&number_so_far);
 216     ok(ret == 1 , "problem with format arg \"%%d%%n\"\n");
 217     ok(number == hour,"Read wrong arg %d instead of %d\n",number, hour);
 218     ok(number_so_far == 2,"Read wrong arg for \"%%n\" %d instead of 2\n",number_so_far);
 219
 220     ret = p_sscanf(buffer+2,"%*c%n",&number_so_far);
 221     ok(ret == 0 , "problem with format arg \"%%*c%%n\"\n");
 222     ok(number_so_far == 1,"Read wrong arg for \"%%n\" %d instead of 2\n",number_so_far);
 223
 224     result = 0xdeadbeef;
 225     strcpy(buffer,"12345678");
 226     ret = p_sscanf(buffer, "%hd", &result);
 227     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 228     ok(result == 0xdead614e, "Wrong number read (%x)\n", result);
 229
 230     result = 0xdeadbeef;
 231     strcpy(buffer,"12345678");
 232     ret = p_sscanf(buffer, "%02hd", &result);
 233     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 234     ok(result == 0xdead000c, "Wrong number read (%x)\n", result);
 235
 236     result = 0xdeadbeef;
 237     strcpy(buffer,"12345678");
 238     ret = p_sscanf(buffer, "%h02d", &result);
 239     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 240     ok(result == 0xdead000c, "Wrong number read (%x)\n", result);
 241
 242     result = 0xdeadbeef;
 243     strcpy(buffer,"12345678");
 244     ret = p_sscanf(buffer, "%000h02d", &result);
 245     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 246     ok(result == 0xdead000c, "Wrong number read (%x)\n", result);
 247
 248     result = 0xdeadbeef;
 249     strcpy(buffer,"12345678");
 250     ret = p_sscanf(buffer, "%2h0d", &result);
 251     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 252     ok(result == 0xdead614e, "Wrong number read (%x)\n", result);
 253
 254     result = 0xdeadbeef;
 255     ret = p_sscanf(buffer, "%hhd", &result);
 256     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 257     ok(result == 0xbc614e, "Wrong number read (%x)\n", result);
 258
 259     strcpy(buffer,"12345678901234");
 260     ret = p_sscanf(buffer, "%lld", &result64);
 261     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 262     ret = p_sprintf(buffer1, "%lld", result64);
 263     ok(ret==14 || broken(ret==10), "sprintf returned %d\n", ret);
 264     if(ret == 14)
 265         ok(!strcmp(buffer, buffer1), "got %s, expected %s\n", buffer1, buffer);
 266
 267     /* Check %i according to bug 1878 */
 268     strcpy(buffer,"123");
 269     ret = p_sscanf(buffer, "%i", &result);
 270     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 271     ok(result == 123, "Wrong number read\n");
 272     result = 0;
 273     ret = p_sscanf("-1", "%i", &result);
 274     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
 275     ok(result == -1, "Read %d, expected -1\n", result);
 276     ret = p_sscanf(buffer, "%d", &result);
 277     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 278     ok(result == 123, "Wrong number read\n");
 279     result = 0;
 280     ret = p_sscanf("-1", "%d", &result);
 281     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
 282     ok(result == -1, "Read %d, expected -1\n", result);
 283
 284     /* Check %i for octal and hexadecimal input */
 285     result = 0;
 286     strcpy(buffer,"017");
 287     ret = p_sscanf(buffer, "%i", &result);
 288     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 289     ok(result == 15, "Wrong number read\n");
 290     result = 0;
 291     strcpy(buffer,"0x17");
 292     ret = p_sscanf(buffer, "%i", &result);
 293     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 294     ok(result == 23, "Wrong number read\n");
 295
 296     /* %o */
 297     result = 0;
 298     ret = p_sscanf("-1", "%o", &result);
 299     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
 300     ok(result == -1, "Read %d, expected -1\n", result);
 301
 302     /* %u */
 303     result = 0;
 304     ret = p_sscanf("-1", "%u", &result);
 305     ok(ret == 1, "Wrong number of arguments read: %d (expected 1)\n", ret);
 306     ok(result == -1, "Read %d, expected -1\n", result);
 307
 308     /* Check %c */
 309     strcpy(buffer,"a");
 310     c = 0x55;
 311     ret = p_sscanf(buffer, "%c", &c);
 312     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 313     ok(c == 'a', "Field incorrect: '%c'\n", c);
 314
 315     strcpy(buffer," a");
 316     c = 0x55;
 317     ret = p_sscanf(buffer, "%c", &c);
 318     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 319     ok(c == ' ', "Field incorrect: '%c'\n", c);
 320
 321     strcpy(buffer,"18:59");
 322     c = 0x55;
 323     ret = p_sscanf(buffer, "%d:%d%c", &hour, &min, &c);
 324     ok(ret == 2, "Wrong number of arguments read: %d\n", ret);
 325     ok(hour == 18, "Field 1 incorrect: %d\n", hour);
 326     ok(min == 59, "Field 2 incorrect: %d\n", min);
 327     ok(c == 0x55, "Field 3 incorrect: 0x%02x\n", c);
 328
 329     /* Check %n (also whitespace in format strings and %s) */
 330     buffer[0]=0; buffer1[0]=0;
 331     ret = p_sscanf("abc   def", "%s %n%s", buffer, &number_so_far, buffer1);
 332     ok(strcmp(buffer, "abc")==0, "First %%s read incorrectly: %s\n", buffer);
 333     ok(strcmp(buffer1,"def")==0, "Second %%s read incorrectly: %s\n", buffer1);
 334     ok(number_so_far==6, "%%n yielded wrong result: %d\n", number_so_far);
 335     ok(ret == 2, "%%n shouldn't count as a conversion: %d\n", ret);
 336
 337     /* Check where %n matches to EOF in buffer */
 338     strcpy(buffer, "3:45");
 339     ret = p_sscanf(buffer, "%d:%d%n", &hour, &min, &number_so_far);
 340     ok(ret == 2, "Wrong number of arguments read: %d\n", ret);
 341     ok(number_so_far == 4, "%%n yielded wrong result: %d\n", number_so_far);
 342
 343     buffer[0] = 0;
 344     buffer1[0] = 0;
 345     ret = p_sscanf("test=value\xda", "%[^=] = %[^;]", buffer, buffer1);
 346     ok(ret == 2, "got %d\n", ret);
 347     ok(!strcmp(buffer, "test"), "buf %s\n", buffer);
 348     ok(!strcmp(buffer1, "value\xda"), "buf %s\n", buffer1);
 349
 350     ret = p_sscanf("\x81\x82test", "\x81%\x82%s", buffer);
 351     ok(ret == 1, "got %d\n", ret);
 352     ok(!strcmp(buffer, "test"), "buf = %s\n", buffer);
 353 }
 354
 355 static void test_sscanf_s(void)
 356 {
 357     int (WINAPIV *psscanf_s)(const char*,const char*,...);
 358     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
 359     int i, ret;
 360     char buf[100];
 361
 362     psscanf_s = (void*)GetProcAddress(hmod, "sscanf_s");
 363     if(!psscanf_s) {
 364         win_skip("sscanf_s not available\n");
 365         return;
 366     }
 367
 368     ret = psscanf_s("123", "%d", &i);
 369     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 370     ok(i == 123, "i = %d\n", i);
 371
 372     ret = psscanf_s("123", "%s", buf, 100);
 373     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 374     ok(!strcmp("123", buf), "buf = %s\n", buf);
 375
 376     ret = psscanf_s("123", "%s", buf, 3);
 377     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
 378     ok(buf[0]=='\0', "buf = %s\n", buf);
 379
 380     memset(buf, 'a', sizeof(buf));
 381     ret = psscanf_s("123", "%3c", buf, 2);
 382     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
 383     ok(buf[0]=='\0', "buf = %s\n", buf);
 384     ok(buf[1]=='2', "buf[1] = %d\n", buf[1]);
 385     ok(buf[2]=='a', "buf[2] = %d\n", buf[2]);
 386
 387     buf[3] = 'a';
 388     buf[4] = 0;
 389     ret = psscanf_s("123", "%3c", buf, 3);
 390     ok(!strcmp("123a", buf), "buf = %s\n", buf);
 391
 392     i = 1;
 393     ret = psscanf_s("123 123", "%s %d", buf, 2, &i);
 394     ok(ret == 0, "Wrong number of arguments read: %d\n", ret);
 395     ok(i==1, "i = %d\n", i);
 396
 397     i = 1;
 398     ret = psscanf_s("123 123", "%d %s", &i, buf, 2);
 399     ok(ret == 1, "Wrong number of arguments read: %d\n", ret);
 400     ok(i==123, "i = %d\n", i);
 401 }
 402
 403 static void test_swscanf( void )
 404 {
 405     wchar_t buffer[100], results[100];
 406     int result, ret;
 407     WCHAR c;
 408
 409     /* check WEOF */
 410     /* WEOF is an unsigned short -1 but swscanf returns int
 411        so it should be sign-extended */
 412     buffer[0] = 0;
 413     ret = swscanf(buffer, L"%d", &result);
 414     /* msvcrt returns 0 but should return -1 (later versions do) */
 415     ok( ret == (short)WEOF || broken(ret == 0),
 416         "swscanf returns %x instead of %x\n", ret, WEOF );
 417
 418     ret = swscanf(L" \t\n\n", L"%s", results);
 419     /* sscanf returns EOF under this case, but swscanf does not return WEOF */
 420     ok( ret == 0, "ret = %d\n", ret );
 421
 422     buffer[0] = 'a';
 423     buffer[1] = 0x1234;
 424     buffer[2] = 0x1234;
 425     buffer[3] = 'b';
 426     ret = swscanf(buffer, L"a\x1234%\x1234%c", &c);
 427     ok(ret == 1, "swscanf returned %d\n", ret);
 428     ok(c == 'b', "c = %x\n", c);
 429 }
 430
 431 static void test_swscanf_s(void)
 432 {
 433     int (WINAPIV *pswscanf_s)(const wchar_t*,const wchar_t*,...);
 434     HMODULE hmod = GetModuleHandleA("msvcrt.dll");
 435     wchar_t buf[2], out[2];
 436     int ret;
 437
 438     pswscanf_s = (void*)GetProcAddress(hmod, "swscanf_s");
 439     if(!pswscanf_s) {
 440         win_skip("swscanf_s not available\n");
 441         return;
 442     }
 443
 444     buf[0] = 'a';
 445     buf[1] = '1';
 446     out[1] = 'b';
 447     ret = pswscanf_s(buf, L"%c", out, 1);
 448     ok(ret == 1, "swscanf_s returned %d\n", ret);
 449     ok(out[0] == 'a', "out[0] = %x\n", out[0]);
 450     ok(out[1] == 'b', "out[1] = %x\n", out[1]);
 451
 452     ret = pswscanf_s(buf, L"%[a-z]", out, 1);
 453     ok(!ret, "swscanf_s returned %d\n", ret);
 454
 455     ret = pswscanf_s(buf, L"%[a-z]", out, 2);
 456     ok(ret == 1, "swscanf_s returned %d\n", ret);
 457     ok(out[0] == 'a', "out[0] = %x\n", out[0]);
 458     ok(!out[1], "out[1] = %x\n", out[1]);
 459 }
 460
 461 START_TEST(scanf)
 462 {
 463     test_fscanf();
 464     test_sscanf();
 465     test_sscanf_s();
 466     test_swscanf();
 467     test_swscanf_s();
 468 }