1/* Tests of fseek and fseeko.
2 Copyright (C) 2000-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 <error.h>
20#include <errno.h>
21#include <stdio.h>
22#include <stdlib.h>
23#include <string.h>
24#include <unistd.h>
25#include <time.h>
26#include <sys/stat.h>
27
28
29static int
30do_test (void)
31{
32 const char *tmpdir;
33 char *fname;
34 int fd;
35 FILE *fp;
36 const char outstr[] = "hello world!\n";
37 char strbuf[sizeof outstr];
38 char buf[200];
39 struct stat64 st1;
40 struct stat64 st2;
41 int result = 0;
42
43 tmpdir = getenv ("TMPDIR");
44 if (tmpdir == NULL || tmpdir[0] == '\0')
45 tmpdir = "/tmp";
46
47 asprintf (ptr: &fname, fmt: "%s/tst-fseek.XXXXXX", tmpdir);
48 if (fname == NULL)
49 error (EXIT_FAILURE, errno, format: "cannot generate name for temporary file");
50
51 /* Create a temporary file. */
52 fd = mkstemp (template: fname);
53 if (fd == -1)
54 error (EXIT_FAILURE, errno, format: "cannot open temporary file");
55
56 fp = fdopen (fd, "w+");
57 if (fp == NULL)
58 error (EXIT_FAILURE, errno, format: "cannot get FILE for temporary file");
59
60 setbuffer (stream: fp, buf: strbuf, size: sizeof (outstr) -1);
61
62 if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
63 {
64 printf (format: "%d: write error\n", __LINE__);
65 result = 1;
66 goto out;
67 }
68
69 /* The EOF flag must be reset. */
70 if (fgetc (stream: fp) != EOF)
71 {
72 printf (format: "%d: managed to read at end of file\n", __LINE__);
73 result = 1;
74 }
75 else if (! feof (stream: fp))
76 {
77 printf (format: "%d: EOF flag not set\n", __LINE__);
78 result = 1;
79 }
80 if (fseek (fp, 0, SEEK_CUR) != 0)
81 {
82 printf (format: "%d: fseek(fp, 0, SEEK_CUR) failed\n", __LINE__);
83 result = 1;
84 }
85 else if (feof (stream: fp))
86 {
87 printf (format: "%d: fseek() didn't reset EOF flag\n", __LINE__);
88 result = 1;
89 }
90
91 /* Do the same for fseeko(). */
92 if (fgetc (stream: fp) != EOF)
93 {
94 printf (format: "%d: managed to read at end of file\n", __LINE__);
95 result = 1;
96 }
97 else if (! feof (stream: fp))
98 {
99 printf (format: "%d: EOF flag not set\n", __LINE__);
100 result = 1;
101 }
102 if (fseeko (stream: fp, off: 0, SEEK_CUR) != 0)
103 {
104 printf (format: "%d: fseek(fp, 0, SEEK_CUR) failed\n", __LINE__);
105 result = 1;
106 }
107 else if (feof (stream: fp))
108 {
109 printf (format: "%d: fseek() didn't reset EOF flag\n", __LINE__);
110 result = 1;
111 }
112
113 /* Go back to the beginning of the file: absolute. */
114 if (fseek (fp, 0, SEEK_SET) != 0)
115 {
116 printf (format: "%d: fseek(fp, 0, SEEK_SET) failed\n", __LINE__);
117 result = 1;
118 }
119 else if (fflush (fp) != 0)
120 {
121 printf (format: "%d: fflush() failed\n", __LINE__);
122 result = 1;
123 }
124 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
125 {
126 printf (format: "%d: lseek() returned different position\n", __LINE__);
127 result = 1;
128 }
129 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
130 {
131 printf (format: "%d: fread() failed\n", __LINE__);
132 result = 1;
133 }
134 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
135 {
136 printf (format: "%d: content after fseek(,,SEEK_SET) wrong\n", __LINE__);
137 result = 1;
138 }
139
140 /* Now with fseeko. */
141 if (fseeko (stream: fp, off: 0, SEEK_SET) != 0)
142 {
143 printf (format: "%d: fseeko(fp, 0, SEEK_SET) failed\n", __LINE__);
144 result = 1;
145 }
146 else if (fflush (fp) != 0)
147 {
148 printf (format: "%d: fflush() failed\n", __LINE__);
149 result = 1;
150 }
151 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
152 {
153 printf (format: "%d: lseek() returned different position\n", __LINE__);
154 result = 1;
155 }
156 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
157 {
158 printf (format: "%d: fread() failed\n", __LINE__);
159 result = 1;
160 }
161 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
162 {
163 printf (format: "%d: content after fseeko(,,SEEK_SET) wrong\n", __LINE__);
164 result = 1;
165 }
166
167 /* Go back to the beginning of the file: relative. */
168 if (fseek (fp, -((int) sizeof (outstr) - 1), SEEK_CUR) != 0)
169 {
170 printf (format: "%d: fseek(fp, 0, SEEK_SET) failed\n", __LINE__);
171 result = 1;
172 }
173 else if (fflush (fp) != 0)
174 {
175 printf (format: "%d: fflush() failed\n", __LINE__);
176 result = 1;
177 }
178 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
179 {
180 printf (format: "%d: lseek() returned different position\n", __LINE__);
181 result = 1;
182 }
183 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
184 {
185 printf (format: "%d: fread() failed\n", __LINE__);
186 result = 1;
187 }
188 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
189 {
190 printf (format: "%d: content after fseek(,,SEEK_SET) wrong\n", __LINE__);
191 result = 1;
192 }
193
194 /* Now with fseeko. */
195 if (fseeko (stream: fp, off: -((int) sizeof (outstr) - 1), SEEK_CUR) != 0)
196 {
197 printf (format: "%d: fseeko(fp, 0, SEEK_SET) failed\n", __LINE__);
198 result = 1;
199 }
200 else if (fflush (fp) != 0)
201 {
202 printf (format: "%d: fflush() failed\n", __LINE__);
203 result = 1;
204 }
205 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
206 {
207 printf (format: "%d: lseek() returned different position\n", __LINE__);
208 result = 1;
209 }
210 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
211 {
212 printf (format: "%d: fread() failed\n", __LINE__);
213 result = 1;
214 }
215 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
216 {
217 printf (format: "%d: content after fseeko(,,SEEK_SET) wrong\n", __LINE__);
218 result = 1;
219 }
220
221 /* Go back to the beginning of the file: from the end. */
222 if (fseek (fp, -((int) sizeof (outstr) - 1), SEEK_END) != 0)
223 {
224 printf (format: "%d: fseek(fp, 0, SEEK_SET) failed\n", __LINE__);
225 result = 1;
226 }
227 else if (fflush (fp) != 0)
228 {
229 printf (format: "%d: fflush() failed\n", __LINE__);
230 result = 1;
231 }
232 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
233 {
234 printf (format: "%d: lseek() returned different position\n", __LINE__);
235 result = 1;
236 }
237 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
238 {
239 printf (format: "%d: fread() failed\n", __LINE__);
240 result = 1;
241 }
242 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
243 {
244 printf (format: "%d: content after fseek(,,SEEK_SET) wrong\n", __LINE__);
245 result = 1;
246 }
247
248 /* Now with fseeko. */
249 if (fseeko (stream: fp, off: -((int) sizeof (outstr) - 1), SEEK_END) != 0)
250 {
251 printf (format: "%d: fseeko(fp, 0, SEEK_SET) failed\n", __LINE__);
252 result = 1;
253 }
254 else if (fflush (fp) != 0)
255 {
256 printf (format: "%d: fflush() failed\n", __LINE__);
257 result = 1;
258 }
259 else if (lseek (fd: fd, offset: 0, SEEK_CUR) != 0)
260 {
261 printf (format: "%d: lseek() returned different position\n", __LINE__);
262 result = 1;
263 }
264 else if (fread (ptr: buf, size: sizeof (outstr) - 1, n: 1, stream: fp) != 1)
265 {
266 printf (format: "%d: fread() failed\n", __LINE__);
267 result = 1;
268 }
269 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
270 {
271 printf (format: "%d: content after fseeko(,,SEEK_SET) wrong\n", __LINE__);
272 result = 1;
273 }
274
275 if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
276 {
277 printf (format: "%d: write error 2\n", __LINE__);
278 result = 1;
279 goto out;
280 }
281
282 if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
283 {
284 printf (format: "%d: write error 3\n", __LINE__);
285 result = 1;
286 goto out;
287 }
288
289 if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
290 {
291 printf (format: "%d: write error 4\n", __LINE__);
292 result = 1;
293 goto out;
294 }
295
296 if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
297 {
298 printf (format: "%d: write error 5\n", __LINE__);
299 result = 1;
300 goto out;
301 }
302
303 if (fputc (c: '1', stream: fp) == EOF || fputc (c: '2', stream: fp) == EOF)
304 {
305 printf (format: "%d: cannot add characters at the end\n", __LINE__);
306 result = 1;
307 goto out;
308 }
309
310 /* Check the access time. */
311 if (fstat64 (fd: fd, buf: &st1) < 0)
312 {
313 printf (format: "%d: fstat64() before fseeko() failed\n\n", __LINE__);
314 result = 1;
315 }
316 else
317 {
318 sleep (seconds: 1);
319
320 if (fseek (fp, -(2 + 2 * (sizeof (outstr) - 1)), SEEK_CUR) != 0)
321 {
322 printf (format: "%d: fseek() after write characters failed\n", __LINE__);
323 result = 1;
324 goto out;
325 }
326 else
327 {
328
329 time_t t;
330 /* Make sure the timestamp actually can be different. */
331 sleep (seconds: 1);
332 t = time (NULL);
333
334 if (fstat64 (fd: fd, buf: &st2) < 0)
335 {
336 printf (format: "%d: fstat64() after fseeko() failed\n\n", __LINE__);
337 result = 1;
338 }
339 if (st1.st_ctime >= t)
340 {
341 printf (format: "%d: st_ctime not updated\n", __LINE__);
342 result = 1;
343 }
344 if (st1.st_mtime >= t)
345 {
346 printf (format: "%d: st_mtime not updated\n", __LINE__);
347 result = 1;
348 }
349 if (st1.st_ctime >= st2.st_ctime)
350 {
351 printf (format: "%d: st_ctime not changed\n", __LINE__);
352 result = 1;
353 }
354 if (st1.st_mtime >= st2.st_mtime)
355 {
356 printf (format: "%d: st_mtime not changed\n", __LINE__);
357 result = 1;
358 }
359 }
360 }
361
362 if (fread (ptr: buf, size: 1, n: 2 + 2 * (sizeof (outstr) - 1), stream: fp)
363 != 2 + 2 * (sizeof (outstr) - 1))
364 {
365 printf (format: "%d: reading 2 records plus bits failed\n", __LINE__);
366 result = 1;
367 }
368 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0
369 || memcmp (&buf[sizeof (outstr) - 1], outstr,
370 sizeof (outstr) - 1) != 0
371 || buf[2 * (sizeof (outstr) - 1)] != '1'
372 || buf[2 * (sizeof (outstr) - 1) + 1] != '2')
373 {
374 printf (format: "%d: reading records failed\n", __LINE__);
375 result = 1;
376 }
377 else if (ungetc ('9', fp) == EOF)
378 {
379 printf (format: "%d: ungetc() failed\n", __LINE__);
380 result = 1;
381 }
382 else if (fseek (fp, -(2 + 2 * (sizeof (outstr) - 1)), SEEK_END) != 0)
383 {
384 printf (format: "%d: fseek after ungetc failed\n", __LINE__);
385 result = 1;
386 }
387 else if (fread (ptr: buf, size: 1, n: 2 + 2 * (sizeof (outstr) - 1), stream: fp)
388 != 2 + 2 * (sizeof (outstr) - 1))
389 {
390 printf (format: "%d: reading 2 records plus bits failed\n", __LINE__);
391 result = 1;
392 }
393 else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0
394 || memcmp (&buf[sizeof (outstr) - 1], outstr,
395 sizeof (outstr) - 1) != 0
396 || buf[2 * (sizeof (outstr) - 1)] != '1')
397 {
398 printf (format: "%d: reading records for the second time failed\n", __LINE__);
399 result = 1;
400 }
401 else if (buf[2 * (sizeof (outstr) - 1) + 1] == '9')
402 {
403 printf (format: "%d: unget character not ignored\n", __LINE__);
404 result = 1;
405 }
406 else if (buf[2 * (sizeof (outstr) - 1) + 1] != '2')
407 {
408 printf (format: "%d: unget somehow changed character\n", __LINE__);
409 result = 1;
410 }
411
412 fclose (fp);
413
414 fp = fopen (fname, "r");
415 if (fp == NULL)
416 {
417 printf (format: "%d: fopen() failed\n\n", __LINE__);
418 result = 1;
419 }
420 else if (fstat64 (fd: fileno (fp), buf: &st1) < 0)
421 {
422 printf (format: "%d: fstat64() before fseeko() failed\n\n", __LINE__);
423 result = 1;
424 }
425 else if (fseeko (stream: fp, off: 0, SEEK_END) != 0)
426 {
427 printf (format: "%d: fseeko(fp, 0, SEEK_END) failed\n", __LINE__);
428 result = 1;
429 }
430 else if (ftello (stream: fp) != st1.st_size)
431 {
432 printf (format: "%d: fstat64 st_size %zd ftello %zd\n", __LINE__,
433 (size_t) st1.st_size, (size_t) ftello (stream: fp));
434 result = 1;
435 }
436 else
437 printf (format: "%d: SEEK_END works\n", __LINE__);
438 if (fp != NULL)
439 fclose (fp);
440
441 fp = fopen (fname, "r");
442 if (fp == NULL)
443 {
444 printf (format: "%d: fopen() failed\n\n", __LINE__);
445 result = 1;
446 }
447 else if (fstat64 (fd: fileno (fp), buf: &st1) < 0)
448 {
449 printf (format: "%d: fstat64() before fgetc() failed\n\n", __LINE__);
450 result = 1;
451 }
452 else if (fgetc (stream: fp) == EOF)
453 {
454 printf (format: "%d: fgetc() before fseeko() failed\n\n", __LINE__);
455 result = 1;
456 }
457 else if (fseeko (stream: fp, off: 0, SEEK_END) != 0)
458 {
459 printf (format: "%d: fseeko(fp, 0, SEEK_END) failed\n", __LINE__);
460 result = 1;
461 }
462 else if (ftello (stream: fp) != st1.st_size)
463 {
464 printf (format: "%d: fstat64 st_size %zd ftello %zd\n", __LINE__,
465 (size_t) st1.st_size, (size_t) ftello (stream: fp));
466 result = 1;
467 }
468 else
469 printf (format: "%d: SEEK_END works\n", __LINE__);
470 if (fp != NULL)
471 fclose (fp);
472
473 out:
474 unlink (name: fname);
475
476 return result;
477}
478
479#define TEST_FUNCTION do_test ()
480#include "../test-skeleton.c"
481

source code of glibc/stdio-common/tst-fseek.c