2002-03-25 Roland McGrath <roland@frob.com>
[platform/upstream/glibc.git] / hurd / getdport.c
1 /* Copyright (C) 1991, 1992, 1994, 1995, 1997 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 Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the 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    Lesser General Public License for more details.
13
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
18
19 #include <hurd.h>
20
21 /* This is initialized in dtable.c when that gets linked in.
22    If dtable.c is not linked in, it will be zero.  */
23 static file_t (*_default_hurd_getdport_fn) (int fd) = 0;
24 weak_alias (_default_hurd_getdport_fn, _hurd_getdport_fn)
25
26 file_t
27 __getdport (int fd)
28 {
29   if (_hurd_getdport_fn)
30     /* dtable.c has defined the function to fetch a port from the real file
31        descriptor table.  */
32     return (*_hurd_getdport_fn) (fd);
33
34   /* getdport is the only use of file descriptors,
35      so we don't bother allocating a real table.  */
36
37   if (_hurd_init_dtable == NULL)
38     /* Never had a descriptor table.  */
39     return EBADF;
40
41   if (fd < 0 || (unsigned int) fd > _hurd_init_dtablesize ||
42       _hurd_init_dtable[fd] == MACH_PORT_NULL)
43     {
44       errno = EBADF;
45       return MACH_PORT_NULL;
46     }
47   else
48     {
49       __mach_port_mod_refs (__mach_task_self (), _hurd_init_dtable[fd],
50                             MACH_PORT_RIGHT_SEND, 1);
51       return _hurd_init_dtable[fd];
52     }
53 }
54
55 weak_alias (__getdport, getdport)