Fix ldbl-96 scalblnl underflowing results (bug 17803).
[glibc.git] / sysdeps / mach / hurd / fdopendir.c
blob33c9d6b97096b9855fe42c4dc6571c56931f4d09
1 /* Open a directory stream from a file descriptor. Hurd version.
2 Copyright (C) 2005-2015 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library 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 GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 #include <dirent.h>
20 #include <errno.h>
21 #include <hurd.h>
22 #include <hurd/fd.h>
23 #include <fcntl.h>
25 DIR *_hurd_fd_opendir (struct hurd_fd *d); /* opendir.c */
27 /* Open a directory stream on FD. */
28 DIR *
29 __fdopendir (int fd)
31 struct hurd_fd *d = _hurd_fd_get (fd);
33 if (d == NULL)
35 errno = EBADF;
36 return NULL;
39 /* Ensure that it's a directory. */
40 error_t err = HURD_FD_PORT_USE
41 (d, ({
42 file_t dir = __file_name_lookup_under (port, "/",
43 O_DIRECTORY | O_NOTRANS, 0);;
44 if (dir != MACH_PORT_NULL)
45 __mach_port_deallocate (__mach_task_self (), dir);
46 dir != MACH_PORT_NULL ? 0 : errno;
47 }));
49 if (err)
51 errno = err;
52 return NULL;
55 return _hurd_fd_opendir (d);
57 weak_alias (__fdopendir, fdopendir)