1 /* Duplicate an open file descriptor to a specified file descriptor.
3 Copyright (C) 1999, 2004-2007, 2009-2011 Free Software Foundation, Inc.
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
18 /* written by Paul Eggert */
28 #if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__
29 /* Get declarations of the Win32 API functions. */
30 # define WIN32_LEAN_AND_MEAN
34 #include "msvc-inval.h"
40 # if HAVE_MSVC_INVALID_PARAMETER_HANDLER
42 dup2_nothrow (int fd, int desired_fd)
48 result = dup2 (fd, desired_fd);
60 # define dup2_nothrow dup2
64 rpl_dup2 (int fd, int desired_fd)
67 # if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__
68 /* If fd is closed, mingw hangs on dup2 (fd, fd). If fd is open,
69 dup2 (fd, fd) returns 0, but all further attempts to use fd in
70 future dup2 calls will hang. */
77 handle = (HANDLE) _get_osfhandle (fd);
81 handle = INVALID_HANDLE_VALUE;
85 if (handle == INVALID_HANDLE_VALUE)
92 /* Wine 1.0.1 return 0 when desired_fd is negative but not -1:
93 http://bugs.winehq.org/show_bug.cgi?id=21289 */
99 # elif !defined __linux__
100 /* On Haiku, dup2 (fd, fd) mistakenly clears FD_CLOEXEC. */
101 if (fd == desired_fd)
102 return fcntl (fd, F_GETFL) == -1 ? -1 : fd;
105 result = dup2_nothrow (fd, desired_fd);
108 /* Correct a Linux return value.
109 <http://git.kernel.org/?p=linux/kernel/git/stable/linux-2.6.30.y.git;a=commitdiff;h=2b79bc4f7ebbd5af3c8b867968f9f15602d5f802>
111 if (fd == desired_fd && result == (unsigned int) -EBADF)
119 /* Correct a cygwin 1.5.x errno value. */
120 else if (result == -1 && errno == EMFILE)
123 if (fd != desired_fd && result != -1)
124 result = _gl_register_dup (fd, result);
129 #else /* !HAVE_DUP2 */
131 /* On older platforms, dup2 did not exist. */
135 dupfd (int fd, int desired_fd)
137 int duplicated_fd = dup (fd);
138 if (duplicated_fd < 0 || duplicated_fd == desired_fd)
139 return duplicated_fd;
142 int r = dupfd (fd, desired_fd);
144 close (duplicated_fd);
152 dup2 (int fd, int desired_fd)
154 int result = fcntl (fd, F_GETFL) < 0 ? -1 : fd;
155 if (result == -1 || fd == desired_fd)
159 result = fcntl (fd, F_DUPFD, desired_fd);
162 result = _gl_register_dup (fd, result);
165 result = dupfd (fd, desired_fd);
167 if (result == -1 && (errno == EMFILE || errno == EINVAL))
171 #endif /* !HAVE_DUP2 */