1/* Verify that fseek/ftell combination works for wide chars.
2 Copyright (C) 2012-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19#include <stdio.h>
20#include <stdlib.h>
21#include <locale.h>
22#include <errno.h>
23#include <wchar.h>
24#include <unistd.h>
25#include <string.h>
26
27#include <support/temp_file.h>
28
29static int
30do_seek_end (FILE *fp)
31{
32 long save;
33
34 if (fputws (ws: L"abc\n", stream: fp) == -1)
35 {
36 printf (format: "do_seek_end: fputws: %s\n", strerror (errno));
37 return 1;
38 }
39
40 save = ftell (stream: fp);
41 rewind (fp);
42
43 if (fseek (fp, 0, SEEK_END) == -1)
44 {
45 printf (format: "do_seek_end: fseek: %s\n", strerror (errno));
46 return 1;
47 }
48
49 if (save != ftell (stream: fp))
50 {
51 printf (format: "save = %ld, ftell = %ld\n", save, ftell (stream: fp));
52 return 1;
53 }
54
55 return 0;
56}
57
58int
59do_seek_set (FILE *fp)
60{
61 long save1, save2;
62
63 if (fputws (ws: L"ゅう\n", stream: fp) == -1)
64 {
65 printf (format: "seek_set: fputws(1): %s\n", strerror (errno));
66 return 1;
67 }
68
69 save1 = ftell (stream: fp);
70
71 if (fputws (ws: L"ゅう\n", stream: fp) == -1)
72 {
73 printf (format: "seek_set: fputws(2): %s\n", strerror (errno));
74 return 1;
75 }
76
77 save2 = ftell (stream: fp);
78
79 if (fputws (ws: L"ゅう\n", stream: fp) == -1)
80 {
81 printf (format: "seek_set: fputws(3): %s\n", strerror (errno));
82 return 1;
83 }
84
85 if (fseek (fp, save1, SEEK_SET) == -1)
86 {
87 printf (format: "seek_set: fseek(1): %s\n", strerror (errno));
88 return 1;
89 }
90
91 if (save1 != ftell (stream: fp))
92 {
93 printf (format: "save1 = %ld, ftell = %ld\n", save1, ftell (stream: fp));
94 return 1;
95 }
96
97 if (fseek (fp, save2, SEEK_SET) == -1)
98 {
99 printf (format: "seek_set: fseek(2): %s\n", strerror (errno));
100 return 1;
101 }
102
103 if (save2 != ftell (stream: fp))
104 {
105 printf (format: "save2 = %ld, ftell = %ld\n", save2, ftell (stream: fp));
106 return 1;
107 }
108
109 return 0;
110}
111
112static int
113do_test (void)
114{
115 if (setlocale (LC_ALL, "ja_JP.UTF-8") == NULL)
116 {
117 printf (format: "Cannot set ja_JP.UTF-8 locale.\n");
118 exit (1);
119 }
120
121 /* Retain messages in English. */
122 if (setlocale (LC_MESSAGES, "en_US.ISO-8859-1") == NULL)
123 {
124 printf (format: "Cannot set LC_MESSAGES to en_US.ISO-8859-1 locale.\n");
125 exit (1);
126 }
127
128 int ret = 0;
129 char *filename;
130 int fd = create_temp_file (base: "tst-fseek.out", filename: &filename);
131
132 if (fd == -1)
133 return 1;
134
135 FILE *fp = fdopen (fd, "w+");
136 if (fp == NULL)
137 {
138 printf (format: "seek_set: fopen: %s\n", strerror (errno));
139 close (fd: fd);
140 return 1;
141 }
142
143 if (do_seek_set (fp))
144 {
145 printf (format: "SEEK_SET test failed\n");
146 ret = 1;
147 }
148
149 /* Reopen the file. */
150 fclose (fp);
151 fp = fopen (filename, "w+");
152 if (fp == NULL)
153 {
154 printf (format: "seek_end: fopen: %s\n", strerror (errno));
155 return 1;
156 }
157
158 if (do_seek_end (fp))
159 {
160 printf (format: "SEEK_END test failed\n");
161 ret = 1;
162 }
163
164 fclose (fp);
165
166 return ret;
167}
168
169#include <support/test-driver.c>
170

source code of glibc/libio/tst-fseek.c