closein.c

Absolute File Name:

/home/opencoverage/opencoverage/guest-scripts/coreutils/src/gnulib/lib/closein.c

Line

Source

Count

/* Close standard input, rewinding seekable stdin if necessary.

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

the Free Software Foundation; either version 3 of the License, or

(at your option) any later version.

This program is distributed in the hope that it will be useful,

but WITHOUT ANY WARRANTY; without even the implied warranty of

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

GNU General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program. If not, see <https://www.gnu.org/licenses/>. */

#include <config.h>

#include "closein.h"

#include <errno.h>

#include <stdbool.h>

#include <stdio.h>

#include <unistd.h>

#include "gettext.h"

#define _(msgid) gettext (msgid)

#include "close-stream.h"

#include "closeout.h"

#include "error.h"

#include "exitfail.h"

#include "freadahead.h"

#include "quotearg.h"

static const char *file_name;

/* Set the file name to be reported in the event an error is detected

on stdin by close_stdin. See also close_stdout_set_file_name, if

an error is detected when closing stdout. */

void

close_stdin_set_file_name (const char *file)

{

file_name = file;

}

never executed: end of block

/* Close standard input, rewinding any unused input if stdin is

seekable. On error, issue a diagnostic and _exit with status

'exit_failure'. Then call close_stdout.

Most programs can get by with close_stdout. close_stdin is only

needed when a program wants to guarantee that partially read input

from seekable stdin is not consumed, for any subsequent clients.

For example, POSIX requires that these two commands behave alike:

(sed -ne 1q; cat) < file

tail -n +2 file

Since close_stdin is commonly registered via 'atexit', POSIX

and the C standard both say that it should not call 'exit',

because the behavior is undefined if 'exit' is called more than

once. So it calls '_exit' instead of 'exit'. If close_stdin

is registered via atexit before other functions are registered,

the other functions can act before this _exit is invoked.

Applications that use close_stdout should flush any streams other

than stdin, stdout, and stderr before exiting, since the call to

_exit will bypass other buffer flushing. Applications should be

flushing and closing other streams anyway, to check for I/O errors.

Also, applications should not use tmpfile, since _exit can bypass

the removal of these files.

It's important to detect such failures and exit nonzero because many

tools (most notably 'make' and other build-management systems) depend

on being able to detect failure in other tools via their exit status. */

void

close_stdin (void)

{

bool fail = false;

/* There is no need to flush stdin if we can determine quickly that stdin's

input buffer is empty; in this case we know that if stdin is seekable,

(fseeko (stdin, 0, SEEK_CUR), ftello (stdin))

== lseek (0, 0, SEEK_CUR). */

if (freadahead (stdin) > 0)

freadahead ( stdin ) > 0	Description
TRUE	evaluated 2 times by 1 test Evaluated by: rm
FALSE	evaluated 2962 times by 5 tests Evaluated by: cp ginstall ln mv rm

2-2962

{

/* Only attempt flush if stdin is seekable, as fflush is entitled to

fail on non-seekable streams. */

if (fseeko (stdin, 0, SEEK_CUR) == 0 && fflush (stdin) != 0)

rpl_fseeko ( s... , 0, 1 ) == 0	Description
TRUE	evaluated 2 times by 1 test Evaluated by: rm
FALSE	never evaluated

rpl_fflush ( stdin ) != 0	Description
TRUE	never evaluated
FALSE	evaluated 2 times by 1 test Evaluated by: rm

0-2

fail = true;

never executed: fail = 1 ;

}

executed 2 times by 1 test: end of block

Executed by:

if (close_stream (stdin) != 0)

close_stream ( stdin ) != 0	Description
TRUE	never evaluated
FALSE	evaluated 2964 times by 5 tests Evaluated by: cp ginstall ln mv rm

0-2964

fail = true;

never executed: fail = 1 ;

if (fail)

fail	Description
TRUE	never evaluated
FALSE	evaluated 2964 times by 5 tests Evaluated by: cp ginstall ln mv rm

0-2964

{

/* Report failure, but defer exit until after closing stdout,

since the failure report should still be flushed. */

100

char const *close_error = _("error closing file");

101

if (file_name)

file_name	Description
TRUE	never evaluated
FALSE	never evaluated

102

error (0, errno, "%s: %s", quotearg_colon (file_name),

never executed: error (0, (*__errno_location ()) , "%s: %s", quotearg_colon (file_name), close_error);

103

close_error);

never executed: error (0, (*__errno_location ()) , "%s: %s", quotearg_colon (file_name), close_error);

104

else

105

error (0, errno, "%s", close_error);

never executed: error (0, (*__errno_location ()) , "%s", close_error);

}

close_stdout ();

if (fail)

fail	Description
TRUE	never evaluated
FALSE	evaluated 2964 times by 5 tests Evaluated by: cp ginstall ln mv rm

0-2964

111

_exit (exit_failure);

never executed: _exit (exit_failure);

112

}

executed 2964 times by 5 tests: end of block

Executed by:

cp
ginstall
ln
mv
rm

2964

Generated by Squish Coco 4.1.2