summaryrefslogtreecommitdiff
blob: dfff70f1f9bdd9ba06dd85fd996bfad2cf3e603e (plain)
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
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
/* Test case by Yoshito Kawada <KAWADA@jp.ibm.com>.  */
#include <errno.h>
#include <error.h>
#include <fcntl.h>
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <wchar.h>

int
main (int argc, char *argv[])
{
  int a = 3;
  int fd;
  char name[] = "/tmp/wprintf.out.XXXXXX";
  FILE *fp;
  char buf[100];
  size_t len;
  int res = 0;

  fd = mkstemp (name);
  if (fd == -1)
    error (EXIT_FAILURE, errno, "cannot open temporary file");

  unlink (name);

  setlocale (LC_ALL, "en_US.UTF-8");

  fp = fdopen (dup (fd), "w");
  if (fp == NULL)
    error (EXIT_FAILURE, errno, "fdopen(,\"w\")");

  fwprintf (fp, L"test start");
  fwprintf (fp, L" int %d\n", a);

  /* String with precision.  */
  fwprintf (fp, L"1[%6.3s]\n", argv[1]);

  fclose (fp);

  fp = fdopen (dup (fd), "a");
  if (fp == NULL)
    error (EXIT_FAILURE, errno, "fdopen(,\"a\")");

  setvbuf (fp, NULL, _IONBF, 0);

  /* fwprintf to unbuffered stream.   */
  fwprintf (fp, L"hello.\n");

  fclose (fp);


  /* Now read it back in.  This time using multibyte functions.  */
  lseek (fd, SEEK_SET, 0);
  fp = fdopen (fd, "r");
  if (fp == NULL)
    error (EXIT_FAILURE, errno, "fdopen(,\"r\")");

  if (fgets (buf, sizeof buf, fp) != buf)
    error (EXIT_FAILURE, errno, "first fgets");
  len = strlen (buf);
  if (buf[len - 1] == '\n')
    --len;
  else
    {
      puts ("newline missing after first line");
      res = 1;
    }
  printf ("1st line: \"%.*s\" -> %s\n", (int) len, buf,
	  strncmp (buf, "test start int 3", len) == 0 ? "OK" : "FAIL");
  res |= strncmp (buf, "test start int 3", len) != 0;

  if (fgets (buf, sizeof buf, fp) != buf)
    error (EXIT_FAILURE, errno, "second fgets");
  len = strlen (buf);
  if (buf[len - 1] == '\n')
    --len;
  else
    {
      puts ("newline missing after second line");
      res = 1;
    }
  printf ("2nd line: \"%.*s\" -> %s\n", (int) len, buf,
	  strncmp (buf, "1[   Som]", len) == 0 ? "OK" : "FAIL");
  res |= strncmp (buf, "1[   Som]", len) != 0;

  if (fgets (buf, sizeof buf, fp) != buf)
    error (EXIT_FAILURE, errno, "third fgets");
  len = strlen (buf);
  if (buf[len - 1] == '\n')
    --len;
  else
    {
      puts ("newline missing after third line");
      res = 1;
    }
  printf ("3rd line: \"%.*s\" -> %s\n", (int) len, buf,
	  strncmp (buf, "hello.", len) == 0 ? "OK" : "FAIL");
  res |= strncmp (buf, "hello.", len) != 0;

  return res;
}