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

   1     FILE * general = fopen( "testing/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( "testing/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( "testing/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, 146, hexadecimal ) == 146 );
  20     rewind( hexadecimal );
  21
  22     FILE * octal = fopen( "testing/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( "testing/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 #ifndef REGTEST
  37     FILE * special = fopen( "testing/scanf_testdata_special", "wb+" );
  38     TESTCASE( special != NULL );
  39     TESTCASE( fwrite( "-0xz\n", 1, 5, special ) == 5 );
  40     rewind( special );
  41 #endif
  42
  43
  44 /* fscan */
  45 #define TESTSCAN( result, count, source, offset, ... ) \
  46     do \
  47     { \
  48         int n = -1; \
  49         TESTCASE( fseek( source, offset, SEEK_SET ) == 0 ); \
  50         int res = SCANFUNC( source, __VA_ARGS__ ); \
  51         if ( res != result ) \
  52         { \
  53             rc += 1; \
  54             printf( "FAILED: " __FILE__ ", line %d - expected result %d, got %d\n", __LINE__, result, res ); \
  55         } \
  56         if ( n != count ) \
  57         { \
  58             rc += 1; \
  59             printf( "FAILED: " __FILE__ ", line %d - expected count %d, got %d\n", __LINE__, count, n ); \
  60         } \
  61     } while ( 0 )
  62
  63 #define SCAN( format )           format "%n",              &n
  64 #define SCANPARMS( format, ... ) format "%n", __VA_ARGS__, &n
  65
  66 #define _PDCLIB_FSCAN
  67