X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=tests%2Ftest-freading.c;h=7ca26ed6579af3d44ed3b2adf2e5c0557d25df76;hb=1276a2c5f24c0c932426aca9c899fa524d2443f2;hp=d429a7cf5bb6e374d8afe33a238b9b2cafc951d4;hpb=57fdfd3f8ec62b105c53bcdf6f127c35c7fe7391;p=gnulib.git diff --git a/tests/test-freading.c b/tests/test-freading.c index d429a7cf5..7ca26ed65 100644 --- a/tests/test-freading.c +++ b/tests/test-freading.c @@ -1,5 +1,5 @@ /* Test of freading() function. - Copyright (C) 2007 Free Software Foundation, Inc. + Copyright (C) 2007-2014 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -18,64 +18,47 @@ #include +/* None of the files accessed by this test are large, so disable the + fseek link warning if we are not using the gnulib fseek module. */ +#define _GL_NO_LARGE_FILES #include "freading.h" #include -#include -#define ASSERT(expr) \ - do \ - { \ - if (!(expr)) \ - { \ - fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \ - abort (); \ - } \ - } \ - while (0) +#include "macros.h" #define TESTFILE "t-freading.tmp" int -main () +main (void) { FILE *fp; /* Create a file with some contents. Write-only file is never reading. */ fp = fopen (TESTFILE, "w"); - if (fp == NULL) - goto skip; + ASSERT (fp); ASSERT (!freading (fp)); - if (fwrite ("foobarsh", 1, 8, fp) < 8) - goto skip; + ASSERT (fwrite ("foobarsh", 1, 8, fp) == 8); ASSERT (!freading (fp)); - if (fclose (fp)) - goto skip; + ASSERT (fclose (fp) == 0); /* Open it in read-only mode. Read-only file is always reading. */ fp = fopen (TESTFILE, "r"); - if (fp == NULL) - goto skip; + ASSERT (fp); ASSERT (freading (fp)); - if (fgetc (fp) != 'f') - goto skip; + ASSERT (fgetc (fp) == 'f'); ASSERT (freading (fp)); - if (fseek (fp, 2, SEEK_CUR)) - goto skip; + ASSERT (fseek (fp, 2, SEEK_CUR) == 0); ASSERT (freading (fp)); - if (fgetc (fp) != 'b') - goto skip; + ASSERT (fgetc (fp) == 'b'); ASSERT (freading (fp)); fflush (fp); ASSERT (freading (fp)); - if (fgetc (fp) != 'a') - goto skip; + ASSERT (fgetc (fp) == 'a'); ASSERT (freading (fp)); - if (fseek (fp, 0, SEEK_END)) - goto skip; + ASSERT (fseek (fp, 0, SEEK_END) == 0); ASSERT (freading (fp)); - if (fclose (fp)) - goto skip; + ASSERT (fclose (fp) == 0); /* Open it in read-write mode. POSIX requires a reposition (fseek, fsetpos, rewind) or EOF when transitioning from read to write; @@ -84,33 +67,25 @@ main () at EOF. */ /* First a scenario with only fgetc, fseek, fputc. */ fp = fopen (TESTFILE, "r+"); - if (fp == NULL) - goto skip; + ASSERT (fp); ASSERT (!freading (fp)); - if (fgetc (fp) != 'f') - goto skip; + ASSERT (fgetc (fp) == 'f'); ASSERT (freading (fp)); - if (fseek (fp, 2, SEEK_CUR)) - goto skip; + ASSERT (fseek (fp, 2, SEEK_CUR) == 0); /* freading (fp) is undefined here, but fwriting (fp) is false. */ - if (fgetc (fp) != 'b') - goto skip; + ASSERT (fgetc (fp) == 'b'); ASSERT (freading (fp)); /* This fseek call is necessary when switching from reading to writing. See the description of fopen(), ISO C 99 7.19.5.3.(6). */ - if (fseek (fp, 0, SEEK_CUR) != 0) - goto skip; + ASSERT (fseek (fp, 0, SEEK_CUR) == 0); /* freading (fp) is undefined here, but fwriting (fp) is false. */ - if (fputc ('x', fp) != 'x') - goto skip; + ASSERT (fputc ('x', fp) == 'x'); ASSERT (!freading (fp)); - if (fseek (fp, 0, SEEK_END)) - goto skip; + ASSERT (fseek (fp, 0, SEEK_END) == 0); /* freading (fp) is undefined here, because on some implementations (e.g. glibc) fseek causes a buffer to be read. fwriting (fp) is undefined as well. */ - if (fclose (fp)) - goto skip; + ASSERT (fclose (fp) == 0); /* Open it in read-write mode. POSIX requires a reposition (fseek, fsetpos, rewind) or EOF when transitioning from read to write; @@ -119,53 +94,37 @@ main () at EOF. */ /* Here a scenario that includes fflush. */ fp = fopen (TESTFILE, "r+"); - if (fp == NULL) - goto skip; + ASSERT (fp); ASSERT (!freading (fp)); - if (fgetc (fp) != 'f') - goto skip; + ASSERT (fgetc (fp) == 'f'); ASSERT (freading (fp)); - if (fseek (fp, 2, SEEK_CUR)) - goto skip; + ASSERT (fseek (fp, 2, SEEK_CUR) == 0); /* freading (fp) is undefined here, but fwriting (fp) is false. */ - if (fgetc (fp) != 'b') - goto skip; + ASSERT (fgetc (fp) == 'b'); ASSERT (freading (fp)); fflush (fp); /* freading (fp) is undefined here, but fwriting (fp) is false. */ - if (fgetc (fp) != 'x') - goto skip; + ASSERT (fgetc (fp) == 'x'); ASSERT (freading (fp)); /* This fseek call is necessary when switching from reading to writing. See the description of fopen(), ISO C 99 7.19.5.3.(6). */ - if (fseek (fp, 0, SEEK_CUR) != 0) - goto skip; + ASSERT (fseek (fp, 0, SEEK_CUR) == 0); /* freading (fp) is undefined here, but fwriting (fp) is false. */ - if (fputc ('z', fp) != 'z') - goto skip; + ASSERT (fputc ('z', fp) == 'z'); ASSERT (!freading (fp)); - if (fseek (fp, 0, SEEK_END)) - goto skip; + ASSERT (fseek (fp, 0, SEEK_END) == 0); /* freading (fp) is undefined here, because on some implementations (e.g. glibc) fseek causes a buffer to be read. fwriting (fp) is undefined as well. */ - if (fclose (fp)) - goto skip; + ASSERT (fclose (fp) == 0); /* Open it in append mode. Write-only file is never reading. */ fp = fopen (TESTFILE, "a"); - if (fp == NULL) - goto skip; + ASSERT (fp); ASSERT (!freading (fp)); - if (fwrite ("bla", 1, 3, fp) < 3) - goto skip; + ASSERT (fwrite ("bla", 1, 3, fp) == 3); ASSERT (!freading (fp)); - if (fclose (fp)) - goto skip; - + ASSERT (fclose (fp) == 0); + ASSERT (remove (TESTFILE) == 0); return 0; - - skip: - fprintf (stderr, "Skipping test: file operations failed.\n"); - return 77; }