Blame src/regression/ftello-unflushed-append.c
|
Szabolcs Nagy |
05f04e |
// commit 3af2edee150484940916eba1984f78c3b965dd05 2014-02-07
|
|
Szabolcs Nagy |
05f04e |
// fix ftello result for append streams with unflushed output
|
|
Szabolcs Nagy |
05f04e |
#include <errno.h>
|
|
Szabolcs Nagy |
05f04e |
#include <fcntl.h>
|
|
Szabolcs Nagy |
05f04e |
#include <stdio.h>
|
|
Szabolcs Nagy |
05f04e |
#include <stdlib.h>
|
|
Szabolcs Nagy |
05f04e |
#include <string.h>
|
|
Szabolcs Nagy |
05f04e |
#include <unistd.h>
|
|
Szabolcs Nagy |
05f04e |
#include "test.h"
|
|
Szabolcs Nagy |
05f04e |
|
|
Szabolcs Nagy |
05f04e |
#define ASSERT(c) do { \
|
|
Szabolcs Nagy |
05f04e |
errno = 0; \
|
|
Szabolcs Nagy |
05f04e |
if (!(c)) \
|
|
Szabolcs Nagy |
05f04e |
t_error("%s failed (errno: %s)\n", #c, strerror(errno)); \
|
|
Szabolcs Nagy |
05f04e |
} while(0)
|
|
Szabolcs Nagy |
05f04e |
|
|
Szabolcs Nagy |
05f04e |
int main(void)
|
|
Szabolcs Nagy |
05f04e |
{
|
|
Szabolcs Nagy |
05f04e |
char tmp[] = "/tmp/testsuite-XXXXXX";
|
|
Szabolcs Nagy |
05f04e |
int fd;
|
|
Szabolcs Nagy |
05f04e |
FILE *f;
|
|
Szabolcs Nagy |
05f04e |
off_t off;
|
|
Szabolcs Nagy |
05f04e |
|
|
Szabolcs Nagy |
05f04e |
ASSERT((fd = mkstemp(tmp)) > 2);
|
|
Szabolcs Nagy |
05f04e |
ASSERT(write(fd, "abcd", 4) == 4);
|
|
Szabolcs Nagy |
05f04e |
ASSERT(close(fd) == 0);
|
|
Szabolcs Nagy |
05f04e |
|
|
Szabolcs Nagy |
05f04e |
ASSERT((fd = open(tmp, O_WRONLY)) > 2);
|
|
Szabolcs Nagy |
05f04e |
ASSERT(f = fdopen(fd, "a"));
|
|
Szabolcs Nagy |
05f04e |
if (f) {
|
|
Szabolcs Nagy |
05f04e |
ASSERT(fwrite("efg", 1, 3, f) == 3);
|
|
Szabolcs Nagy |
05f04e |
ASSERT((off = ftello(f)) != -1);
|
|
Szabolcs Nagy |
05f04e |
if (off != 7)
|
|
Szabolcs Nagy |
05f04e |
t_error("ftello is broken before flush: got %lld, want 7\n", (long long)off);
|
|
Szabolcs Nagy |
05f04e |
ASSERT(fflush(f) == 0);
|
|
Szabolcs Nagy |
05f04e |
ASSERT((off = ftello(f)) != -1);
|
|
Szabolcs Nagy |
05f04e |
if (off != 7)
|
|
Szabolcs Nagy |
05f04e |
t_error("ftello is broken after flush: got %lld, want 7\n", (long long)off);
|
|
Szabolcs Nagy |
05f04e |
ASSERT(fclose(f) == 0);
|
|
Szabolcs Nagy |
05f04e |
}
|
|
Szabolcs Nagy |
05f04e |
if (fd > 2)
|
|
Szabolcs Nagy |
05f04e |
ASSERT(unlink(tmp) == 0);
|
|
Szabolcs Nagy |
05f04e |
return t_status;
|
|
Szabolcs Nagy |
05f04e |
}
|