Mercurial > gnulib
annotate tests/test-fgetc.c @ 40196:e63f5d3edab5
relocatable-prog: Update documentation.
* doc/relocatable-maint.texi (Supporting Relocation): Update to match
the recent changes.
| author | Bruno Haible <bruno@clisp.org> |
|---|---|
| date | Sun, 24 Feb 2019 01:49:15 +0100 |
| parents | b06060465f09 |
| children |
| rev | line source |
|---|---|
| 15714 | 1 /* Test of fgetc() function. |
|
40057
b06060465f09
maint: Run 'make update-copyright'
Paul Eggert <eggert@cs.ucla.edu>
parents:
19484
diff
changeset
|
2 Copyright (C) 2011-2019 Free Software Foundation, Inc. |
| 15714 | 3 |
| 4 This program is free software; you can redistribute it and/or modify | |
| 5 it under the terms of the GNU General Public License as published by | |
| 6 the Free Software Foundation; either version 3, or (at your option) | |
| 7 any later version. | |
| 8 | |
| 9 This program is distributed in the hope that it will be useful, | |
| 10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 12 GNU General Public License for more details. | |
| 13 | |
| 14 You should have received a copy of the GNU General Public License | |
| 19190 | 15 along with this program; if not, see <https://www.gnu.org/licenses/>. */ |
| 15714 | 16 |
| 17 #include <config.h> | |
| 18 | |
| 19 #include <stdio.h> | |
| 20 | |
| 21 #include "signature.h" | |
| 22 SIGNATURE_CHECK (fgetc, int, (FILE *)); | |
| 23 | |
| 24 #include <errno.h> | |
| 25 #include <fcntl.h> | |
| 26 #include <unistd.h> | |
| 27 | |
|
18883
19886582ca8d
Implement a way to opt out from MSVC support.
Bruno Haible <bruno@clisp.org>
parents:
18626
diff
changeset
|
28 #if HAVE_MSVC_INVALID_PARAMETER_HANDLER |
|
19886582ca8d
Implement a way to opt out from MSVC support.
Bruno Haible <bruno@clisp.org>
parents:
18626
diff
changeset
|
29 # include "msvc-inval.h" |
|
19886582ca8d
Implement a way to opt out from MSVC support.
Bruno Haible <bruno@clisp.org>
parents:
18626
diff
changeset
|
30 #endif |
|
15795
dd52b68a488b
fputc, fwrite tests: Avoid test failure on MSVC.
Bruno Haible <bruno@clisp.org>
parents:
15770
diff
changeset
|
31 |
| 15714 | 32 #include "macros.h" |
| 33 | |
| 34 int | |
| 35 main (int argc, char **argv) | |
| 36 { | |
| 37 const char *filename = "test-fgetc.txt"; | |
| 38 | |
|
15796
22a143e3638f
fgetc, fputc, fread, fwrite tests: Fix link error.
Bruno Haible <bruno@clisp.org>
parents:
15795
diff
changeset
|
39 /* We don't have an fgetc() function that installs an invalid parameter |
|
15795
dd52b68a488b
fputc, fwrite tests: Avoid test failure on MSVC.
Bruno Haible <bruno@clisp.org>
parents:
15770
diff
changeset
|
40 handler so far. So install that handler here, explicitly. */ |
|
15796
22a143e3638f
fgetc, fputc, fread, fwrite tests: Fix link error.
Bruno Haible <bruno@clisp.org>
parents:
15795
diff
changeset
|
41 #if HAVE_MSVC_INVALID_PARAMETER_HANDLER \ |
|
22a143e3638f
fgetc, fputc, fread, fwrite tests: Fix link error.
Bruno Haible <bruno@clisp.org>
parents:
15795
diff
changeset
|
42 && MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING |
|
15795
dd52b68a488b
fputc, fwrite tests: Avoid test failure on MSVC.
Bruno Haible <bruno@clisp.org>
parents:
15770
diff
changeset
|
43 gl_msvc_inval_ensure_handler (); |
|
dd52b68a488b
fputc, fwrite tests: Avoid test failure on MSVC.
Bruno Haible <bruno@clisp.org>
parents:
15770
diff
changeset
|
44 #endif |
|
dd52b68a488b
fputc, fwrite tests: Avoid test failure on MSVC.
Bruno Haible <bruno@clisp.org>
parents:
15770
diff
changeset
|
45 |
| 15714 | 46 /* Prepare a file. */ |
| 47 { | |
| 48 const char text[] = "hello world"; | |
| 49 int fd = open (filename, O_RDWR | O_CREAT | O_TRUNC, 0600); | |
| 50 ASSERT (fd >= 0); | |
| 51 ASSERT (write (fd, text, sizeof (text)) == sizeof (text)); | |
| 52 ASSERT (close (fd) == 0); | |
| 53 } | |
| 54 | |
| 55 /* Test that fgetc() sets errno if someone else closes the stream | |
| 56 fd behind the back of stdio. */ | |
| 57 { | |
| 58 FILE *fp = fopen (filename, "r"); | |
| 59 ASSERT (fp != NULL); | |
| 60 ASSERT (close (fileno (fp)) == 0); | |
| 61 errno = 0; | |
| 62 ASSERT (fgetc (fp) == EOF); | |
| 63 ASSERT (errno == EBADF); | |
|
15770
e01dbf6f2e44
Enhance fgetc, fputc tests.
Bruno Haible <bruno@clisp.org>
parents:
15714
diff
changeset
|
64 ASSERT (ferror (fp)); |
| 15714 | 65 fclose (fp); |
| 66 } | |
| 67 | |
| 68 /* Test that fgetc() sets errno if the stream was constructed with | |
| 69 an invalid file descriptor. */ | |
| 70 { | |
| 71 FILE *fp = fdopen (-1, "r"); | |
| 72 if (fp != NULL) | |
| 73 { | |
| 74 errno = 0; | |
| 75 ASSERT (fgetc (fp) == EOF); | |
| 76 ASSERT (errno == EBADF); | |
|
15770
e01dbf6f2e44
Enhance fgetc, fputc tests.
Bruno Haible <bruno@clisp.org>
parents:
15714
diff
changeset
|
77 ASSERT (ferror (fp)); |
| 15714 | 78 fclose (fp); |
| 79 } | |
| 80 } | |
| 81 { | |
|
17292
3a09cc104f4c
tests: don't assume fd 99 is closed
Paul Eggert <eggert@cs.ucla.edu>
parents:
17249
diff
changeset
|
82 FILE *fp; |
|
3a09cc104f4c
tests: don't assume fd 99 is closed
Paul Eggert <eggert@cs.ucla.edu>
parents:
17249
diff
changeset
|
83 close (99); |
|
3a09cc104f4c
tests: don't assume fd 99 is closed
Paul Eggert <eggert@cs.ucla.edu>
parents:
17249
diff
changeset
|
84 fp = fdopen (99, "r"); |
| 15714 | 85 if (fp != NULL) |
| 86 { | |
| 87 errno = 0; | |
| 88 ASSERT (fgetc (fp) == EOF); | |
| 89 ASSERT (errno == EBADF); | |
|
15770
e01dbf6f2e44
Enhance fgetc, fputc tests.
Bruno Haible <bruno@clisp.org>
parents:
15714
diff
changeset
|
90 ASSERT (ferror (fp)); |
| 15714 | 91 fclose (fp); |
| 92 } | |
| 93 } | |
| 94 | |
| 95 /* Clean up. */ | |
| 96 unlink (filename); | |
| 97 | |
| 98 return 0; | |
| 99 } |