stdio-common/scanf13.c

   1 #include <locale.h>
   2 #include <stdio.h>
   3 #include <stdlib.h>
   4 #include <string.h>
   5 #include <wchar.h>
   6
   7 int
   8 main (void)
   9 {
  10   char *sp1, *sp2, *sp3, *sp4;
  11   wchar_t *lsp1, *lsp2, *lsp3, *lsp4;
  12   int result = 0;
  13   char buf[2048+64];
  14   size_t i;
  15
  16 #define FAIL() \
  17   do {                                                  \
  18     result = 1;                                         \
  19     printf ("test at line %d failed\n", __LINE__);      \
  20   } while (0)
  21
  22   setlocale (LC_ALL, "de_DE.UTF-8");
  23   if (sscanf ("A  \xc3\x84-\t\t\xc3\x84-abcdefbcd\t\xc3\x84-B",
  24               "A%ms%10ms%4m[bcd]%4mcB", &sp1, &sp2, &sp3, &sp4) != 4)
  25     FAIL ();
  26   else
  27     {
  28       if (strcmp (sp1, "\xc3\x84-") != 0)
  29         FAIL ();
  30       free (sp1);
  31       if (strcmp (sp2, "\xc3\x84-abcdefb") != 0)
  32         FAIL ();
  33       free (sp2);
  34       if (strcmp (sp3, "cd") != 0)
  35         FAIL ();
  36       free (sp3);
  37       if (memcmp (sp4, "\t\xc3\x84-", 4) != 0)
  38         FAIL ();
  39       free (sp4);
  40     }
  41
  42   if (sscanf ("A  \xc3\x84-\t\t\xc3\x84-abcdefbcd\t\xc3\x84-BB",
  43               "A%mS%10mls%4ml[bcd]%4mCB", &lsp1, &lsp2, &lsp3, &lsp4) != 4)
  44     FAIL ();
  45   else
  46     {
  47       if (wcscmp (lsp1, L"\xc4-") != 0)
  48         FAIL ();
  49       free (lsp1);
  50       if (wcscmp (lsp2, L"\xc4-abcdefbc") != 0)
  51         FAIL ();
  52       free (lsp2);
  53       if (wcscmp (lsp3, L"d") != 0)
  54         FAIL ();
  55       free (lsp3);
  56       if (memcmp (lsp4, L"\t\xc4-B", 4 * sizeof (wchar_t)) != 0)
  57         FAIL ();
  58       free (lsp4);
  59     }
  60
  61   memset (buf, '/', sizeof (buf));
  62   buf[0] = '\t';
  63   buf[1] = ' ';
  64   buf[2] = 0xc3;
  65   buf[3] = 0x84;
  66   buf[2048] = 0xc3;
  67   buf[2049] = 0x84;
  68   buf[2058] = '\t';
  69   buf[2059] = 'a';
  70   if (sscanf (buf, "%ms%mc", &sp1, &sp2) != 2)
  71     FAIL ();
  72   else
  73     {
  74       if (sp1[0] != '\xc3' || sp1[1] != '\x84'
  75           || sp1[2046] != '\xc3' || sp1[2047] != '\x84'
  76           || sp1[2056] != '\0')
  77         FAIL ();
  78       sp1[2046] = '/';
  79       sp1[2047] = '/';
  80       for (i = 2; i < 2056; i++)
  81         if (sp1[i] != '/')
  82           FAIL ();
  83       free (sp1);
  84       if (sp2[0] != '\t')
  85         FAIL ();
  86       free (sp2);
  87     }
  88   if (sscanf (buf, "%2048ms%mc", &sp3, &sp4) != 2)
  89     FAIL ();
  90   else
  91     {
  92       if (sp3[0] != '\xc3' || sp3[1] != '\x84'
  93           || sp3[2046] != '\xc3' || sp3[2047] != '\x84'
  94           || sp3[2048] != '\0')
  95         FAIL ();
  96       for (i = 2; i < 2046; i++)
  97         if (sp3[i] != '/')
  98           FAIL ();
  99       free (sp3);
 100       if (sp4[0] != '/')
 101         FAIL ();
 102       free (sp4);
 103     }
 104   if (sscanf (buf, "%4mc%1500m[dr/]%548m[abc/d]%3mc", &sp1, &sp2, &sp3, &sp4)
 105       != 4)
 106     FAIL ();
 107   else
 108     {
 109       if (memcmp (sp1, "\t \xc3\x84", 4) != 0)
 110         FAIL ();
 111       free (sp1);
 112       for (i = 0; i < 1500; i++)
 113         if (sp2[i] != '/')
 114           FAIL ();
 115       if (sp2[1500] != '\0')
 116         FAIL ();
 117       free (sp2);
 118       for (i = 0; i < 544; i++)
 119         if (sp3[i] != '/')
 120           FAIL ();
 121       if (sp3[544] != '\0')
 122         FAIL ();
 123       free (sp3);
 124       if (memcmp (sp4, "\xc3\x84/", 3) != 0)
 125         FAIL ();
 126       free (sp4);
 127     }
 128   if (sscanf (buf, "%mS%mC", &lsp1, &lsp2) != 2)
 129     FAIL ();
 130   else
 131     {
 132       if (lsp1[0] != L'\xc4' || lsp1[2045] != L'\xc4'
 133           || lsp1[2054] != L'\0')
 134         FAIL ();
 135       lsp1[2045] = L'/';
 136       for (i = 1; i < 2054; i++)
 137         if (lsp1[i] != L'/')
 138           FAIL ();
 139       free (lsp1);
 140       if (lsp2[0] != L'\t')
 141         FAIL ();
 142       free (lsp2);
 143     }
 144   if (sscanf (buf, "%2048mls%mlc", &lsp3, &lsp4) != 2)
 145     FAIL ();
 146   else
 147     {
 148       if (lsp3[0] != L'\xc4' || lsp3[2045] != L'\xc4'
 149           || lsp3[2048] != L'\0')
 150         FAIL ();
 151       lsp3[2045] = L'/';
 152       for (i = 1; i < 2048; i++)
 153         if (lsp3[i] != L'/')
 154           FAIL ();
 155       free (lsp3);
 156       if (lsp4[0] != L'/')
 157         FAIL ();
 158       free (lsp4);
 159     }
 160   if (sscanf (buf, "%4mC%1500ml[dr/]%548ml[abc/d]%3mlc",
 161               &lsp1, &lsp2, &lsp3, &lsp4) != 4)
 162     FAIL ();
 163   else
 164     {
 165       if (memcmp (lsp1, L"\t \xc4/", 4 * sizeof (wchar_t)) != 0)
 166         FAIL ();
 167       free (lsp1);
 168       for (i = 0; i < 1500; i++)
 169         if (lsp2[i] != L'/')
 170           FAIL ();
 171       if (lsp2[1500] != L'\0')
 172         FAIL ();
 173       free (lsp2);
 174       for (i = 0; i < 543; i++)
 175         if (lsp3[i] != L'/')
 176           FAIL ();
 177       if (lsp3[543] != L'\0')
 178         FAIL ();
 179       free (lsp3);
 180       if (memcmp (lsp4, L"\xc4//", 3 * sizeof (wchar_t)) != 0)
 181         FAIL ();
 182       free (lsp4);
 183     }
 184
 185   return result;
 186 }