|
Packit |
6c4009 |
/* Copyright (C) 1993-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
As a special exception, if you link the code in this file with
|
|
Packit |
6c4009 |
files compiled with a GNU compiler to produce an executable,
|
|
Packit |
6c4009 |
that does not cause the resulting executable to be covered by
|
|
Packit |
6c4009 |
the GNU Lesser General Public License. This exception does not
|
|
Packit |
6c4009 |
however invalidate any other reasons why the executable file
|
|
Packit |
6c4009 |
might be covered by the GNU Lesser General Public License.
|
|
Packit |
6c4009 |
This exception applies to code released by its copyright holders
|
|
Packit |
6c4009 |
in files containing the exception. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include "libioP.h"
|
|
Packit |
6c4009 |
#include "stdio.h"
|
|
Packit |
6c4009 |
#include <fcntl.h>
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
#include <unistd.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <shlib-compat.h>
|
|
Packit |
6c4009 |
#include <fd_to_filename.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <kernel-features.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
FILE *
|
|
Packit |
6c4009 |
freopen (const char *filename, const char *mode, FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
FILE *result;
|
|
Packit |
6c4009 |
CHECK_FILE (fp, NULL);
|
|
Packit |
6c4009 |
if (!(fp->_flags & _IO_IS_FILEBUF))
|
|
Packit |
6c4009 |
return NULL;
|
|
Packit |
6c4009 |
_IO_acquire_lock (fp);
|
|
Packit |
6c4009 |
int fd = _IO_fileno (fp);
|
|
Packit |
6c4009 |
const char *gfilename = (filename == NULL && fd >= 0
|
|
Packit |
6c4009 |
? fd_to_filename (fd) : filename);
|
|
Packit |
6c4009 |
fp->_flags2 |= _IO_FLAGS2_NOCLOSE;
|
|
Packit |
6c4009 |
#if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_1)
|
|
Packit |
6c4009 |
if (&_IO_stdin_used == NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* If the shared C library is used by the application binary which
|
|
Packit |
6c4009 |
was linked against the older version of libio, we just use the
|
|
Packit |
6c4009 |
older one even for internal use to avoid trouble since a pointer
|
|
Packit |
6c4009 |
to the old libio may be passed into shared C library and wind
|
|
Packit |
6c4009 |
up here. */
|
|
Packit |
6c4009 |
_IO_old_file_close_it (fp);
|
|
Packit |
6c4009 |
_IO_JUMPS_FILE_plus (fp) = &_IO_old_file_jumps;
|
|
Packit |
6c4009 |
result = _IO_old_file_fopen (fp, gfilename, mode);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
#endif
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
_IO_file_close_it (fp);
|
|
Packit |
6c4009 |
_IO_JUMPS_FILE_plus (fp) = &_IO_file_jumps;
|
|
Packit |
6c4009 |
if (_IO_vtable_offset (fp) == 0 && fp->_wide_data != NULL)
|
|
Packit |
6c4009 |
fp->_wide_data->_wide_vtable = &_IO_wfile_jumps;
|
|
Packit |
6c4009 |
result = _IO_file_fopen (fp, gfilename, mode, 1);
|
|
Packit |
6c4009 |
if (result != NULL)
|
|
Packit |
6c4009 |
result = __fopen_maybe_mmap (result);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fp->_flags2 &= ~_IO_FLAGS2_NOCLOSE;
|
|
Packit |
6c4009 |
if (result != NULL)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* unbound stream orientation */
|
|
Packit |
6c4009 |
result->_mode = 0;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fd != -1 && _IO_fileno (result) != fd)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* At this point we have both file descriptors already allocated,
|
|
Packit |
6c4009 |
so __dup3 will not fail with EBADF, EINVAL, or EMFILE. But
|
|
Packit |
6c4009 |
we still need to check for EINVAL and, due Linux internal
|
|
Packit |
6c4009 |
implementation, EBUSY. It is because on how it internally opens
|
|
Packit |
6c4009 |
the file by splitting the buffer allocation operation and VFS
|
|
Packit |
6c4009 |
opening (a dup operation may run when a file is still pending
|
|
Packit |
6c4009 |
'install' on VFS). */
|
|
Packit |
6c4009 |
if (__dup3 (_IO_fileno (result), fd,
|
|
Packit |
6c4009 |
(result->_flags2 & _IO_FLAGS2_CLOEXEC) != 0
|
|
Packit |
6c4009 |
? O_CLOEXEC : 0) == -1)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
_IO_file_close_it (result);
|
|
Packit |
6c4009 |
result = NULL;
|
|
Packit |
6c4009 |
goto end;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
__close (_IO_fileno (result));
|
|
Packit |
6c4009 |
_IO_fileno (result) = fd;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (fd != -1)
|
|
Packit |
6c4009 |
__close (fd);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
end:
|
|
Packit |
6c4009 |
if (filename == NULL)
|
|
Packit |
6c4009 |
free ((char *) gfilename);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
_IO_release_lock (fp);
|
|
Packit |
6c4009 |
return result;
|
|
Packit |
6c4009 |
}
|