pd.if.org Git - pdclib.old/blob - fscan_sources.incl

   1     FILE * general = fopen( "scanf_testdata_general", "wb+" );
   2     TESTCASE( general != NULL );
   3     TESTCASE( fwrite( "12345678901\0003-5+7\0009\3772 4 6 8 0\3771 \011 5%%  0", 1, 40, general ) == 40 );
   4     rewind( general );
   5
   6     FILE * decimal = fopen( "scanf_testdata_decimal", "wb+" );
   7     TESTCASE( decimal != NULL );
   8     TESTCASE( fwrite( "-0 +0 -128 +127 +255 -32768 +32767 +65535\n"
   9                       "-2147483648 +2147483647 +4294967295\n"
  10                       "-9223372036854775808 +9223372036854775807\n"
  11                       "+18446744073709551615\n", 1, 142, decimal ) == 142 );
  12     rewind( decimal );
  13
  14     FILE * hexadecimal = fopen( "scanf_testdata_hexadecimal", "wb+" );
  15     TESTCASE( hexadecimal != NULL );
  16     TESTCASE( fwrite( "-0x0 -0x000 -0x7f 0x80 0xff -0x7fff 0x8000\n"
  17                       "0xffff -0x7fffffff 0x80000000 0xffffffff\n"
  18                       "-0x7fffffffffffffff 0x8000000000000000\n"
  19                       "0xffffffffffffffff\n", 1, 142, hexadecimal ) == 142 );
  20     rewind( hexadecimal );
  21
  22     FILE * octal = fopen( "scanf_testdata_octal", "wb+" );
  23     TESTCASE( octal != NULL );
  24     TESTCASE( fwrite( "+0000 -0000 +0177 +0377 -0377 +077777 +0177777\n"
  25                       "-0177777 +017777777777 +037777777777\n"
  26                       "-037777777777 +0777777777777777777777\n"
  27                       "+01777777777777777777777\n"
  28                       "-01777777777777777777777\n", 1, 172, octal ) == 172 );
  29     rewind( octal );
  30
  31     FILE * alpha = fopen( "scanf_testdata_alpha", "wb+" );
  32     TESTCASE( alpha != NULL );
  33     TESTCASE( fwrite( "abcdefgh-ijklmnop[qrs%uvw]xyz", 1, 29, alpha ) == 29 );
  34     rewind( alpha );
  35
  36     FILE * special = fopen( "scanf_testdata_special", "wb+" );
  37     TESTCASE( special != NULL );
  38     TESTCASE( fwrite( "-0xz\n", 1, 5, special ) == 5 );
  39     rewind( special );
  40
  41
  42 /* fscan */
  43 #define TESTSCAN( result, count, source, offset, ... ) \
  44     do \
  45     { \
  46         int n = -1; \
  47         TESTCASE( fseek( source, offset, SEEK_SET ) == 0 ); \
  48         int res = SCANFUNC( source, __VA_ARGS__ ); \
  49         if ( res != result ) \
  50         { \
  51             rc += 1; \
  52             printf( "FAILED: " __FILE__ ", line %d - expected result %d, got %d\n", __LINE__, result, res ); \
  53         } \
  54         if ( n != count ) \
  55         { \
  56             rc += 1; \
  57             printf( "FAILED: " __FILE__ ", line %d - expected count %d, got %d\n", __LINE__, count, n ); \
  58         } \
  59     } while ( 0 )
  60
  61 #define SCAN( format )           format "%n",              &n
  62 #define SCANPARMS( format, ... ) format "%n", __VA_ARGS__, &n
  63
  64 #define _PDCLIB_FSCAN
  65