Mon Jun 24 19:57:01 1996 Roland McGrath <roland@delasyd.gnu.ai.mit.edu>
[kopensolaris-gnu/glibc.git] / sysdeps / posix / dup2.c
1 /* Copyright (C) 1991, 1992, 1993, 1995 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library 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 GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <ansidecl.h>
20 #include <errno.h>
21 #include <fcntl.h>
22 #include <limits.h>
23 #include <unistd.h>
24
25
26 /* Duplicate FD to FD2, closing the old FD2 and making FD2 be
27    open the same file as FD is.  Return FD2 or -1.  */
28 int
29 DEFUN(__dup2, (fd, fd2), int fd AND int fd2)
30 {
31   int save;
32
33   if (fd2 < 0
34 #ifdef OPEN_MAX
35       || fd2 >= OPEN_MAX
36 #endif
37 )
38     {
39       errno = EBADF;
40       return -1;
41     }
42
43   /* Check if FD is kosher.  */
44   if (fcntl (fd, F_GETFL) < 0)
45     return -1;
46
47   if (fd == fd2)
48     return fd2;
49
50   /* This is not atomic.  */
51
52   save = errno;
53   (void) close (fd2);
54   errno = save;
55
56   return fcntl (fd, F_DUPFD, fd2);
57 }
58
59 weak_alias (__dup2, dup2)