| Absolute File Name: | /home/opencoverage/opencoverage/guest-scripts/coreutils/src/gnulib/lib/fclose.c |
| Source code | Switch to Preprocessed file |
| Line | Source | Count | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 1 | /* fclose replacement. | - | ||||||||||||
| 2 | Copyright (C) 2008-2018 Free Software Foundation, Inc. | - | ||||||||||||
| 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 of the License, or | - | ||||||||||||
| 7 | (at your option) 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 | - | ||||||||||||
| 15 | along with this program. If not, see <https://www.gnu.org/licenses/>. */ | - | ||||||||||||
| 16 | - | |||||||||||||
| 17 | #include <config.h> | - | ||||||||||||
| 18 | - | |||||||||||||
| 19 | /* Specification. */ | - | ||||||||||||
| 20 | #include <stdio.h> | - | ||||||||||||
| 21 | - | |||||||||||||
| 22 | #include <errno.h> | - | ||||||||||||
| 23 | #include <unistd.h> | - | ||||||||||||
| 24 | - | |||||||||||||
| 25 | #include "freading.h" | - | ||||||||||||
| 26 | #if HAVE_MSVC_INVALID_PARAMETER_HANDLER | - | ||||||||||||
| 27 | # include "msvc-inval.h" | - | ||||||||||||
| 28 | #endif | - | ||||||||||||
| 29 | - | |||||||||||||
| 30 | #undef fclose | - | ||||||||||||
| 31 | - | |||||||||||||
| 32 | #if HAVE_MSVC_INVALID_PARAMETER_HANDLER | - | ||||||||||||
| 33 | static int | - | ||||||||||||
| 34 | fclose_nothrow (FILE *fp) | - | ||||||||||||
| 35 | { | - | ||||||||||||
| 36 | int result; | - | ||||||||||||
| 37 | - | |||||||||||||
| 38 | TRY_MSVC_INVAL | - | ||||||||||||
| 39 | { | - | ||||||||||||
| 40 | result = fclose (fp); | - | ||||||||||||
| 41 | } | - | ||||||||||||
| 42 | CATCH_MSVC_INVAL | - | ||||||||||||
| 43 | { | - | ||||||||||||
| 44 | result = EOF; | - | ||||||||||||
| 45 | errno = EBADF; | - | ||||||||||||
| 46 | } | - | ||||||||||||
| 47 | DONE_MSVC_INVAL; | - | ||||||||||||
| 48 | - | |||||||||||||
| 49 | return result; | - | ||||||||||||
| 50 | } | - | ||||||||||||
| 51 | #else | - | ||||||||||||
| 52 | # define fclose_nothrow fclose | - | ||||||||||||
| 53 | #endif | - | ||||||||||||
| 54 | - | |||||||||||||
| 55 | /* Override fclose() to call the overridden fflush() or close(). */ | - | ||||||||||||
| 56 | - | |||||||||||||
| 57 | int | - | ||||||||||||
| 58 | rpl_fclose (FILE *fp) | - | ||||||||||||
| 59 | { | - | ||||||||||||
| 60 | int saved_errno = 0; | - | ||||||||||||
| 61 | int fd; | - | ||||||||||||
| 62 | int result = 0; | - | ||||||||||||
| 63 | - | |||||||||||||
| 64 | /* Don't change behavior on memstreams. */ | - | ||||||||||||
| 65 | fd = fileno (fp); | - | ||||||||||||
| 66 | if (fd < 0)
| 0-90762 | ||||||||||||
| 67 | return fclose_nothrow (fp); never executed: return fclose (fp); | 0 | ||||||||||||
| 68 | - | |||||||||||||
| 69 | /* We only need to flush the file if it is not reading or if it is | - | ||||||||||||
| 70 | seekable. This only guarantees the file position of input files | - | ||||||||||||
| 71 | if the fflush module is also in use. */ | - | ||||||||||||
| 72 | if ((!freading (fp) || lseek (fileno (fp), 0, SEEK_CUR) != -1)
| 3204-79246 | ||||||||||||
| 73 | && fflush (fp))
| 4-87554 | ||||||||||||
| 74 | saved_errno = errno; executed 4 times by 1 test: saved_errno = (*__errno_location ()) ;Executed by:
| 4 | ||||||||||||
| 75 | - | |||||||||||||
| 76 | /* fclose() calls close(), but we need to also invoke all hooks that our | - | ||||||||||||
| 77 | overridden close() function invokes. See lib/close.c. */ | - | ||||||||||||
| 78 | #if WINDOWS_SOCKETS | - | ||||||||||||
| 79 | /* Call the overridden close(), then the original fclose(). | - | ||||||||||||
| 80 | Note about multithread-safety: There is a race condition where some | - | ||||||||||||
| 81 | other thread could open fd between our close and fclose. */ | - | ||||||||||||
| 82 | if (close (fd) < 0 && saved_errno == 0) | - | ||||||||||||
| 83 | saved_errno = errno; | - | ||||||||||||
| 84 | - | |||||||||||||
| 85 | fclose_nothrow (fp); /* will fail with errno = EBADF, | - | ||||||||||||
| 86 | if we did not lose a race */ | - | ||||||||||||
| 87 | - | |||||||||||||
| 88 | #else /* !WINDOWS_SOCKETS */ | - | ||||||||||||
| 89 | /* Call fclose() and invoke all hooks of the overridden close(). */ | - | ||||||||||||
| 90 | - | |||||||||||||
| 91 | # if REPLACE_FCHDIR | - | ||||||||||||
| 92 | /* Note about multithread-safety: There is a race condition here as well. | - | ||||||||||||
| 93 | Some other thread could open fd between our calls to fclose and | - | ||||||||||||
| 94 | _gl_unregister_fd. */ | - | ||||||||||||
| 95 | result = fclose_nothrow (fp); | - | ||||||||||||
| 96 | if (result == 0) | - | ||||||||||||
| 97 | _gl_unregister_fd (fd); | - | ||||||||||||
| 98 | # else | - | ||||||||||||
| 99 | /* No race condition here. */ | - | ||||||||||||
| 100 | result = fclose_nothrow (fp); | - | ||||||||||||
| 101 | # endif | - | ||||||||||||
| 102 | - | |||||||||||||
| 103 | #endif /* !WINDOWS_SOCKETS */ | - | ||||||||||||
| 104 | - | |||||||||||||
| 105 | if (saved_errno != 0)
| 4-90758 | ||||||||||||
| 106 | { | - | ||||||||||||
| 107 | errno = saved_errno; | - | ||||||||||||
| 108 | result = EOF; | - | ||||||||||||
| 109 | } executed 4 times by 1 test: end of blockExecuted by:
| 4 | ||||||||||||
| 110 | - | |||||||||||||
| 111 | return result; executed 90762 times by 106 tests: return result;Executed by:
| 90762 | ||||||||||||
| 112 | } | - | ||||||||||||
| Source code | Switch to Preprocessed file |