aboutsummaryrefslogtreecommitdiff
path: root/stdio-common/tst-fseek.c
diff options
context:
space:
mode:
Diffstat (limited to 'stdio-common/tst-fseek.c')
-rw-r--r--stdio-common/tst-fseek.c425
1 files changed, 425 insertions, 0 deletions
diff --git a/stdio-common/tst-fseek.c b/stdio-common/tst-fseek.c
new file mode 100644
index 0000000000..0bfedf6866
--- /dev/null
+++ b/stdio-common/tst-fseek.c
@@ -0,0 +1,425 @@
+/* Tests of fseek and fseeko.
+ Copyright (C) 2000 Free Software Foundation, Inc.
+ This file is part of the GNU C Library.
+ Contributed by Ulrich Drepper <drepper@redhat.com>, 2000.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public License as
+ published by the Free Software Foundation; either version 2 of the
+ License, or (at your option) any later version.
+
+ The GNU C Library is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public
+ License along with the GNU C Library; see the file COPYING.LIB. If not,
+ write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ Boston, MA 02111-1307, USA. */
+
+#include <error.h>
+#include <errno.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include <sys/stat.h>
+
+
+int
+main (void)
+{
+ const char *tmpdir;
+ char *fname;
+ int fd;
+ FILE *fp;
+ const char outstr[] = "hello world!\n";
+ char strbuf[sizeof outstr];
+ char buf[200];
+ struct stat64 st1;
+ struct stat64 st2;
+ int result = 0;
+
+ tmpdir = getenv ("TMPDIR");
+ if (tmpdir == NULL || tmpdir[0] == '\0')
+ tmpdir = "/tmp";
+
+ asprintf (&fname, "%s/tst-fseek.XXXXXX", tmpdir);
+ if (fname == NULL)
+ error (EXIT_FAILURE, errno, "cannot generate name for temporary file");
+
+ /* Create a temporary file. */
+ fd = mkstemp (fname);
+ if (fd == -1)
+ error (EXIT_FAILURE, errno, "cannot open temporary file");
+
+ fp = fdopen (fd, "w+");
+ if (fp == NULL)
+ error (EXIT_FAILURE, errno, "cannot get FILE for temporary file");
+
+ setbuffer (fp, strbuf, sizeof (outstr) -1);
+
+ if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("write error");
+ result = 1;
+ goto out;
+ }
+
+ /* The EOF flag must be reset. */
+ if (fgetc (fp) != EOF)
+ {
+ puts ("managed to read at end of file");
+ result = 1;
+ }
+ else if (! feof (fp))
+ {
+ puts ("EOF flag not set");
+ result = 1;
+ }
+ if (fseek (fp, 0, SEEK_CUR) != 0)
+ {
+ puts ("fseek(fp, 0, SEEK_CUR) failed");
+ result = 1;
+ }
+ else if (feof (fp))
+ {
+ puts ("fseek() didn't reset EOF flag");
+ result = 1;
+ }
+
+ /* Do the same for fseeko(). */
+#ifdef USE_IN_LIBIO
+ if (fgetc (fp) != EOF)
+ {
+ puts ("managed to read at end of file");
+ result = 1;
+ }
+ else if (! feof (fp))
+ {
+ puts ("EOF flag not set");
+ result = 1;
+ }
+ if (fseeko (fp, 0, SEEK_CUR) != 0)
+ {
+ puts ("fseek(fp, 0, SEEK_CUR) failed");
+ result = 1;
+ }
+ else if (feof (fp))
+ {
+ puts ("fseek() didn't reset EOF flag");
+ result = 1;
+ }
+#endif
+
+ /* Go back to the beginning of the file: absolute. */
+ if (fseek (fp, 0, SEEK_SET) != 0)
+ {
+ puts ("fseek(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseek(,,SEEK_SET) wrong");
+ result = 1;
+ }
+
+#ifdef USE_IN_LIBIO
+ /* Now with fseeko. */
+ if (fseeko (fp, 0, SEEK_SET) != 0)
+ {
+ puts ("fseeko(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseeko(,,SEEK_SET) wrong");
+ result = 1;
+ }
+#endif
+
+ /* Go back to the beginning of the file: relative. */
+ if (fseek (fp, -(sizeof (outstr) - 1), SEEK_CUR) != 0)
+ {
+ puts ("fseek(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseek(,,SEEK_SET) wrong");
+ result = 1;
+ }
+
+#ifdef USE_IN_LIBIO
+ /* Now with fseeko. */
+ if (fseeko (fp, -(sizeof (outstr) - 1), SEEK_CUR) != 0)
+ {
+ puts ("fseeko(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseeko(,,SEEK_SET) wrong");
+ result = 1;
+ }
+#endif
+
+ /* Go back to the beginning of the file: from the end. */
+ if (fseek (fp, -(sizeof (outstr) - 1), SEEK_END) != 0)
+ {
+ puts ("fseek(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseek(,,SEEK_SET) wrong");
+ result = 1;
+ }
+
+#ifdef USE_IN_LIBIO
+ /* Now with fseeko. */
+ if (fseeko (fp, -(sizeof (outstr) - 1), SEEK_END) != 0)
+ {
+ puts ("fseeko(fp, 0, SEEK_SET) failed");
+ result = 1;
+ }
+ else if (fflush (fp) != 0)
+ {
+ puts ("fflush() failed");
+ result = 1;
+ }
+ else if (lseek (fd, 0, SEEK_CUR) != 0)
+ {
+ puts ("lseek() returned different position");
+ result = 1;
+ }
+ else if (fread (buf, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("fread() failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0)
+ {
+ puts ("content after fseeko(,,SEEK_SET) wrong");
+ result = 1;
+ }
+#endif
+
+ if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("write error 2");
+ result = 1;
+ goto out;
+ }
+
+ if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("write error 3");
+ result = 1;
+ goto out;
+ }
+
+ if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("write error 4");
+ result = 1;
+ goto out;
+ }
+
+ if (fwrite (outstr, sizeof (outstr) - 1, 1, fp) != 1)
+ {
+ puts ("write error 5");
+ result = 1;
+ goto out;
+ }
+
+ if (fputc ('1', fp) == EOF || fputc ('2', fp) == EOF)
+ {
+ puts ("cannot add characters at the end");
+ result = 1;
+ goto out;
+ }
+
+ /* Check the access time. */
+ if (fstat64 (fd, &st1) < 0)
+ {
+ puts ("fstat64() before fseeko() failed\n");
+ result = 1;
+ }
+ else
+ {
+ sleep (1);
+
+ if (fseek (fp, -(2 + 2 * (sizeof (outstr) - 1)), SEEK_CUR) != 0)
+ {
+ puts ("fseek() after write characters failed");
+ result = 1;
+ goto out;
+ }
+ else
+ {
+
+ time_t t;
+ /* Make sure the timestamp actually can be different. */
+ sleep (1);
+ t = time (NULL);
+
+ if (fstat64 (fd, &st2) < 0)
+ {
+ puts ("fstat64() after fseeko() failed\n");
+ result = 1;
+ }
+ if (st1.st_ctime >= t)
+ {
+ puts ("st_ctime not updated");
+ result = 1;
+ }
+ if (st1.st_mtime >= t)
+ {
+ puts ("st_mtime not updated");
+ result = 1;
+ }
+ if (st1.st_ctime >= st2.st_ctime)
+ {
+ puts ("st_ctime not changed");
+ result = 1;
+ }
+ if (st1.st_mtime >= st2.st_mtime)
+ {
+ puts ("st_mtime not changed");
+ result = 1;
+ }
+ }
+ }
+
+ if (fread (buf, 1, 2 + 2 * (sizeof (outstr) - 1), fp)
+ != 2 + 2 * (sizeof (outstr) - 1))
+ {
+ puts ("reading 2 records plus bits failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0
+ || memcmp (&buf[sizeof (outstr) - 1], outstr,
+ sizeof (outstr) - 1) != 0
+ || buf[2 * (sizeof (outstr) - 1)] != '1'
+ || buf[2 * (sizeof (outstr) - 1) + 1] != '2')
+ {
+ puts ("reading records failed");
+ result = 1;
+ }
+ else if (ungetc ('9', fp) == EOF)
+ {
+ puts ("ungetc() failed");
+ result = 1;
+ }
+ else if (fseek (fp, -(2 + 2 * (sizeof (outstr) - 1)), SEEK_END) != 0)
+ {
+ puts ("fseek after ungetc failed");
+ result = 1;
+ }
+ else if (fread (buf, 1, 2 + 2 * (sizeof (outstr) - 1), fp)
+ != 2 + 2 * (sizeof (outstr) - 1))
+ {
+ puts ("reading 2 records plus bits failed");
+ result = 1;
+ }
+ else if (memcmp (buf, outstr, sizeof (outstr) - 1) != 0
+ || memcmp (&buf[sizeof (outstr) - 1], outstr,
+ sizeof (outstr) - 1) != 0
+ || buf[2 * (sizeof (outstr) - 1)] != '1')
+ {
+ puts ("reading records for the second time failed");
+ result = 1;
+ }
+ else if (buf[2 * (sizeof (outstr) - 1) + 1] == '9')
+ {
+ puts ("unget character not ignored");
+ result = 1;
+ }
+ else if (buf[2 * (sizeof (outstr) - 1) + 1] != '2')
+ {
+ puts ("unget somehow changed character");
+ result = 1;
+ }
+
+ out:
+ unlink (fname);
+
+ return result;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-15 09:49:01 +0000