diff options
Diffstat (limited to 'stdio-common/tst-fseek.c')
| -rw-r--r-- | stdio-common/tst-fseek.c | 425 |
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; +} |