1 /* -*- buffer-read-only: t -*- vi: set ro: */
2 /* DO NOT EDIT! GENERATED AUTOMATICALLY! */
3 /* Duplicate an open file descriptor to a specified file descriptor.
5 Copyright (C) 1999, 2004-2007, 2009-2014 Free Software Foundation, Inc.
7 This program is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20 /* written by Paul Eggert */
34 # if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__
36 /* Get declarations of the native Windows API functions. */
37 # define WIN32_LEAN_AND_MEAN
40 # include "msvc-inval.h"
42 /* Get _get_osfhandle. */
43 # include "msvc-nothrow.h"
46 ms_windows_dup2 (int fd, int desired_fd)
50 /* If fd is closed, mingw hangs on dup2 (fd, fd). If fd is open,
51 dup2 (fd, fd) returns 0, but all further attempts to use fd in
52 future dup2 calls will hang. */
55 if ((HANDLE) _get_osfhandle (fd) == INVALID_HANDLE_VALUE)
63 /* Wine 1.0.1 return 0 when desired_fd is negative but not -1:
64 http://bugs.winehq.org/show_bug.cgi?id=21289 */
73 result = dup2 (fd, desired_fd);
88 # define dup2 ms_windows_dup2
93 rpl_dup2 (int fd, int desired_fd)
98 /* On Linux kernels 2.6.26-2.6.29, dup2 (fd, fd) returns -EBADF.
99 On Cygwin 1.5.x, dup2 (1, 1) returns 0.
100 On Cygwin 1.7.17, dup2 (1, -1) dumps core.
101 On Cygwin 1.7.25, dup2 (1, 256) can dump core.
102 On Haiku, dup2 (fd, fd) mistakenly clears FD_CLOEXEC. */
103 # if HAVE_SETDTABLESIZE
104 setdtablesize (desired_fd + 1);
108 if (fd == desired_fd)
109 return fcntl (fd, F_GETFL) == -1 ? -1 : fd;
112 result = dup2 (fd, desired_fd);
114 /* Correct an errno value on FreeBSD 6.1 and Cygwin 1.5.x. */
115 if (result == -1 && errno == EMFILE)
118 if (fd != desired_fd && result != -1)
119 result = _gl_register_dup (fd, result);
124 #else /* !HAVE_DUP2 */
126 /* On older platforms, dup2 did not exist. */
130 dupfd (int fd, int desired_fd)
132 int duplicated_fd = dup (fd);
133 if (duplicated_fd < 0 || duplicated_fd == desired_fd)
134 return duplicated_fd;
137 int r = dupfd (fd, desired_fd);
139 close (duplicated_fd);
147 dup2 (int fd, int desired_fd)
149 int result = fcntl (fd, F_GETFL) < 0 ? -1 : fd;
150 if (result == -1 || fd == desired_fd)
154 result = fcntl (fd, F_DUPFD, desired_fd);
157 result = _gl_register_dup (fd, result);
160 result = dupfd (fd, desired_fd);
162 if (result == -1 && (errno == EMFILE || errno == EINVAL))
166 #endif /* !HAVE_DUP2 */