1  /* Test program for bug in wide streams.  */
       2  
       3  #include <stdio.h>
       4  #include <wchar.h>
       5  
       6  #include <support/xunistd.h>
       7  
       8  static void do_prepare (void);
       9  #define PREPARE(argc, argv) do_prepare ()
      10  static int do_test (void);
      11  #define TEST_FUNCTION do_test ()
      12  #include <test-skeleton.c>
      13  
      14  static char *temp_file;
      15  
      16  static void
      17  do_prepare (void)
      18  {
      19    int fd = create_temp_file ("bug-ungetc.", &temp_file);
      20    if (fd == -1)
      21      {
      22        printf ("cannot create temporary file: %m\n");
      23        exit (1);
      24      }
      25    xwrite (fd, "1!", 2);
      26    close (fd);
      27  }
      28  
      29  static int
      30  do_test (void)
      31  {
      32    FILE *f = fopen (temp_file, "r+");
      33  
      34    if (f == NULL)
      35      {
      36        printf ("fopen: %m\n");
      37        return 1;
      38      }
      39  
      40  #define L_(s) L##s
      41    //#define fwscanf fscanf
      42    //#define fwprintf fprintf
      43  
      44    int i;
      45    if (fwscanf (f, L_("%d!"), &i) != 1)
      46      {
      47        printf ("fwscanf failed\n");
      48        return 1;
      49      }
      50  
      51    rewind (f);
      52    if (ferror (f))
      53      {
      54        printf ("rewind: %m\n");
      55        return 1;
      56      }
      57  
      58    if (fputws (L_("1!"), f) == EOF)
      59      {
      60        printf ("fputws: %m\n");
      61        return 1;
      62      }
      63  
      64    if (fflush (f) != 0)
      65      {
      66        printf ("fflush: %m\n");
      67        return 1;
      68      }
      69  
      70    if (fclose (f) != 0)
      71      {
      72        printf ("fclose: %m\n");
      73        return 1;
      74      }
      75  
      76    puts ("Test succeeded.");
      77    return 0;
      78  }