133 lines
2.7 KiB
C
133 lines
2.7 KiB
C
// BZ #12724
|
|
|
|
static void do_prepare (void);
|
|
#define PREPARE(argc, argv) do_prepare ()
|
|
static int do_test (void);
|
|
#define TEST_FUNCTION do_test()
|
|
#include "../test-skeleton.c"
|
|
|
|
|
|
static int fd;
|
|
|
|
|
|
static void
|
|
do_prepare (void)
|
|
{
|
|
fd = create_temp_file ("bug-fclose1.", NULL);
|
|
if (fd == -1)
|
|
{
|
|
printf ("cannot create temporary file: %m\n");
|
|
exit (1);
|
|
}
|
|
}
|
|
|
|
|
|
static int
|
|
do_test (void)
|
|
{
|
|
static const char pattern[] = "hello world";
|
|
|
|
/* Prepare a seekable file. */
|
|
if (write (fd, pattern, sizeof pattern) != sizeof pattern)
|
|
{
|
|
printf ("cannot write pattern: %m\n");
|
|
return 1;
|
|
}
|
|
if (lseek (fd, 1, SEEK_SET) != 1)
|
|
{
|
|
printf ("cannot seek after write: %m\n");
|
|
return 1;
|
|
}
|
|
|
|
/* Create an output stream visiting the file; when it is closed, all
|
|
other file descriptors visiting the file must see the new file
|
|
position. */
|
|
int fd2 = dup (fd);
|
|
if (fd2 < 0)
|
|
{
|
|
printf ("cannot duplicate descriptor for writing: %m\n");
|
|
return 1;
|
|
}
|
|
FILE *f = fdopen (fd2, "w");
|
|
if (f == NULL)
|
|
{
|
|
printf ("first fdopen failed: %m\n");
|
|
return 1;
|
|
}
|
|
if (fputc (pattern[1], f) != pattern[1])
|
|
{
|
|
printf ("fputc failed: %m\n");
|
|
return 1;
|
|
}
|
|
if (fclose (f) != 0)
|
|
{
|
|
printf ("first fclose failed: %m\n");
|
|
return 1;
|
|
}
|
|
errno = 0;
|
|
if (lseek (fd2, 0, SEEK_CUR) != -1)
|
|
{
|
|
printf ("lseek after fclose after write did not fail\n");
|
|
return 1;
|
|
}
|
|
if (errno != EBADF)
|
|
{
|
|
printf ("lseek after fclose after write did not fail with EBADF: %m\n");
|
|
return 1;
|
|
}
|
|
off_t o = lseek (fd, 0, SEEK_CUR);
|
|
if (o != 2)
|
|
{
|
|
printf ("\
|
|
lseek on original descriptor after first fclose returned %ld, expected 2\n",
|
|
(long int) o);
|
|
return 1;
|
|
}
|
|
|
|
/* Likewise for an input stream. */
|
|
fd2 = dup (fd);
|
|
if (fd2 < 0)
|
|
{
|
|
printf ("cannot duplicate descriptor for reading: %m\n");
|
|
return 1;
|
|
}
|
|
f = fdopen (fd2, "r");
|
|
if (f == NULL)
|
|
{
|
|
printf ("second fdopen failed: %m\n");
|
|
return 1;
|
|
}
|
|
char c = fgetc (f);
|
|
if (c != pattern[2])
|
|
{
|
|
printf ("getc returned %c, expected %c\n", c, pattern[2]);
|
|
return 1;
|
|
}
|
|
if (fclose (f) != 0)
|
|
{
|
|
printf ("second fclose failed: %m\n");
|
|
return 1;
|
|
}
|
|
errno = 0;
|
|
if (lseek (fd2, 0, SEEK_CUR) != -1)
|
|
{
|
|
printf ("lseek after fclose after read did not fail\n");
|
|
return 1;
|
|
}
|
|
if (errno != EBADF)
|
|
{
|
|
printf ("lseek after fclose after read did not fail with EBADF: %m\n");
|
|
return 1;
|
|
}
|
|
o = lseek (fd, 0, SEEK_CUR);
|
|
if (o != 3)
|
|
{
|
|
printf ("\
|
|
lseek on original descriptor after second fclose returned %ld, expected 3\n",
|
|
(long int) o);
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|