summaryrefslogtreecommitdiff
blob: 5ddd63446bb75f81273d7adcc44b63b65349aea9 (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
105
106
107
108
109
110
111
112
113
114
115
116
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <wchar.h>


static const struct
{
  const char *enc;
  const char *data;
  size_t datalen;
  const wchar_t *expected;
  size_t expectedlen;
} tests[] =
  {
    { "UCS-4LE", "a\0\0\0b\0\0\0", 8, L"ab", 2 },
    { "UCS-4BE", "\0\0\0a\0\0\0b", 8, L"ab", 2 },
  };
#define ntests (sizeof (tests) / sizeof (tests[0]))


static int do_test (void);
#define TEST_FUNCTION do_test ()

static void prepare (void);
#define PREPARE(argc, argv) prepare ();

#include "../test-skeleton.c"


static int fd;
static char *tmpname;


static void
prepare (void)
{
  fd = create_temp_file ("tst-fopenloc2", &tmpname);
  if (fd == -1)
    {
      puts ("cannot open temp file");
      exit (1);
    }
}


static int
do_test (void)
{
  for (int i = 0; i < ntests; ++i)
    {
      if (ftruncate (fd, 0) != 0)
	{
	  printf ("ftruncate in round %d failed\n", i + 1);
	  return 1;
	}

      if (TEMP_FAILURE_RETRY (write (fd, tests[i].data, tests[i].datalen))
	  != tests[i].datalen)
	{
	  printf ("write in round %d failed\n", i + 1);
	  return 1;
	}

      if (lseek (fd, 0, SEEK_SET) != 0)
	{
	  printf ("lseek in round %d failed\n", i + 1);
	  return 1;
	}

      char *ccs;
      if (asprintf (&ccs, "r,ccs=%s", tests[i].enc) == -1)
	{
	  printf ("asprintf in round %d failed\n", i + 1);
	  return 1;
	}

      FILE *fp = fopen (tmpname, ccs);
      if (fp == NULL)
	{
	  printf ("fopen in round %d failed\n", i + 1);
	  return 1;
	}

#define LINELEN 100
      wchar_t line[LINELEN];
      if (fgetws (line, LINELEN, fp) != line)
	{
	  printf ("fgetws in round %d failed\n", i + 1);
	  return 1;
	}

      if (wcslen (line) != tests[i].expectedlen)
	{
	  printf ("round %d: expected length %zu, got length %zu\n",
		  i + 1, tests[i].expectedlen, wcslen (line));
	  return 1;
	}

      if (wcscmp (tests[i].expected, line) != 0)
	{
	  printf ("round %d: expected L\"%ls\", got L\"%ls\"\n",
		  i + 1, tests[i].expected, line);
	  return 1;
	}

      fclose (fp);

      free (ccs);
    }

  close (fd);

  return 0;
}