libio/bug-wfflush.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82

/* Test program for bug in wide streams.  */

#include <stdio.h>
#include <wchar.h>

static void do_prepare (void);
#define PREPARE(argc, argv) do_prepare ()
static int do_test (void);
#define TEST_FUNCTION do_test ()
#include <test-skeleton.c>

static char *temp_file;

static void
do_prepare (void)
{
  int fd = create_temp_file ("bug-ungetc.", &temp_file);
  if (fd == -1)
    {
      printf ("cannot create temporary file: %m\n");
      exit (1);
    }
  write (fd, "1!", 2);
  close (fd);
}

static int
do_test (void)
{
  FILE *f = fopen (temp_file, "r+");

  if (f == NULL)
    {
      printf ("fopen: %m\n");
      return 1;
    }

  fpos_t pos;
  if (fgetpos (f, &pos) != 0)
    {
      printf ("fgetpos: %m\n");
      return 1;
    }

#define L_(s) L##s
  //#define fwscanf fscanf
  //#define fwprintf fprintf

  int i;
  if (fwscanf (f, L_("%d!"), &i) != 1)
    {
      printf ("fwscanf failed\n");
      return 1;
    }

  if (fsetpos (f, &pos) != 0)
    {
      printf ("fsetpos: %m\n");
      return 1;
    }

  if (fwprintf (f, L_("1!")) < 2)
    {
      printf ("fwprintf: %m\n");
      return 1;
    }

  if (fflush (f) != 0)
    {
      printf ("fflush: %m\n");
      return 1;
    }

  if (fclose (f) != 0)
    {
      printf ("fclose: %m\n");
      return 1;
    }

  puts ("Test succeeded.");
  return 0;
}