1 /* Copyright (C) 1993-2022 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, see
16    <https://www.gnu.org/licenses/>.  */
17 
18 #include <errno.h>
19 #include <limits.h>
20 #include <stddef.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <dirent.h>
24 #include <fcntl.h>
25 #include <sys/types.h>
26 #include <sys/stat.h>
27 #include <unistd.h>
28 #include <stdio.h>
29 #include <hurd.h>
30 #include <hurd/fd.h>
31 #include <not-cancel.h>
32 #include "dirstream.h"
33 
34 
35 /* Open a directory stream on a file descriptor in Hurd internal form.
36    We do no checking here on the descriptor.  */
37 DIR *
_hurd_fd_opendir(struct hurd_fd * d)38 _hurd_fd_opendir (struct hurd_fd *d)
39 {
40   DIR *dirp;
41 
42   if (d == NULL)
43     {
44       errno = EBADF;
45       return NULL;
46     }
47 
48   dirp = (DIR *) malloc (sizeof (DIR));
49   if (dirp == NULL)
50     return NULL;
51 
52   /* Set the descriptor to close on exec. */
53   HURD_CRITICAL_BEGIN;
54   __spin_lock (&d->port.lock);
55   d->flags |= FD_CLOEXEC;
56   __spin_unlock (&d->port.lock);
57   HURD_CRITICAL_END;
58 
59   dirp->__fd = d;
60   dirp->__data = dirp->__ptr = NULL;
61   dirp->__entry_data = dirp->__entry_ptr = 0;
62   dirp->__allocation = 0;
63   dirp->__size = 0;
64 
65   __libc_lock_init (dirp->__lock);
66 
67   return dirp;
68 }
69 
70 
71 DIR *
__opendirat(int dfd,const char * name)72 __opendirat (int dfd, const char *name)
73 {
74   if (name[0] == '\0')
75     {
76       /* POSIX.1-1990 says an empty name gets ENOENT;
77 	 but `open' might like it fine.  */
78       __set_errno (ENOENT);
79       return NULL;
80     }
81 
82   int flags = O_RDONLY | O_NONBLOCK | O_DIRECTORY | O_CLOEXEC;
83   int fd;
84 #if IS_IN (rtld)
85   assert (dfd == AT_FDCWD);
86   fd = __open_nocancel (name, flags);
87 #else
88   fd = __openat_nocancel (dfd, name, flags);
89 #endif
90   if (fd < 0)
91     return NULL;
92 
93   /* Extract the pointer to the descriptor structure.  */
94   DIR *dirp = _hurd_fd_opendir (_hurd_fd_get (fd));
95   if (dirp == NULL)
96     __close (fd);
97 
98   return dirp;
99 }
100 
101 
102 /* Open a directory stream on NAME.  */
103 DIR *
__opendir(const char * name)104 __opendir (const char *name)
105 {
106 #if 0 /* TODO.  */
107   return __opendirat (AT_FDCWD, name);
108 #else
109   if (name[0] == '\0')
110     {
111       /* POSIX.1-1990 says an empty name gets ENOENT;
112 	 but `open' might like it fine.  */
113       __set_errno (ENOENT);
114       return NULL;
115     }
116 
117   int fd = __open (name, O_RDONLY | O_NONBLOCK | O_DIRECTORY);
118   if (fd < 0)
119     return NULL;
120 
121   /* Extract the pointer to the descriptor structure.  */
122   DIR *dirp = _hurd_fd_opendir (_hurd_fd_get (fd));
123   if (dirp == NULL)
124     __close (fd);
125 
126   return dirp;
127 #endif
128 }
129 weak_alias (__opendir, opendir)
130