opendir.c revision 1.3 1 1.3 tsutsui /* $NetBSD: opendir.c,v 1.3 2001/06/15 17:26:51 tsutsui Exp $ */
2 1.1 gwr
3 1.1 gwr /*
4 1.1 gwr * Copyright (c) 1983, 1993
5 1.1 gwr * The Regents of the University of California. All rights reserved.
6 1.1 gwr *
7 1.1 gwr * Redistribution and use in source and binary forms, with or without
8 1.1 gwr * modification, are permitted provided that the following conditions
9 1.1 gwr * are met:
10 1.1 gwr * 1. Redistributions of source code must retain the above copyright
11 1.1 gwr * notice, this list of conditions and the following disclaimer.
12 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 gwr * notice, this list of conditions and the following disclaimer in the
14 1.1 gwr * documentation and/or other materials provided with the distribution.
15 1.1 gwr * 3. All advertising materials mentioning features or use of this software
16 1.1 gwr * must display the following acknowledgement:
17 1.1 gwr * This product includes software developed by the University of
18 1.1 gwr * California, Berkeley and its contributors.
19 1.1 gwr * 4. Neither the name of the University nor the names of its contributors
20 1.1 gwr * may be used to endorse or promote products derived from this software
21 1.1 gwr * without specific prior written permission.
22 1.1 gwr *
23 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 gwr * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 gwr * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 gwr * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 gwr * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 gwr * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 gwr * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 gwr * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 gwr * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 gwr * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 gwr * SUCH DAMAGE.
34 1.1 gwr */
35 1.1 gwr
36 1.3 tsutsui #include <sys/cdefs.h>
37 1.3 tsutsui
38 1.3 tsutsui #ifdef __weak_alias
39 1.3 tsutsui #define opendir _opendir
40 1.3 tsutsui #endif
41 1.3 tsutsui
42 1.1 gwr #include <sys/param.h>
43 1.1 gwr #include <sys/mount.h>
44 1.1 gwr #include <sys/stat.h>
45 1.1 gwr
46 1.1 gwr #include <dirent.h>
47 1.1 gwr #include <errno.h>
48 1.1 gwr #include <fcntl.h>
49 1.1 gwr #include <stdlib.h>
50 1.1 gwr #include <string.h>
51 1.1 gwr #include <unistd.h>
52 1.3 tsutsui
53 1.3 tsutsui #ifdef __weak_alias
54 1.3 tsutsui __weak_alias(opendir,_opendir)
55 1.3 tsutsui #endif
56 1.1 gwr
57 1.1 gwr /*
58 1.1 gwr * Open a directory.
59 1.1 gwr */
60 1.1 gwr DIR *
61 1.1 gwr opendir(name)
62 1.1 gwr const char *name;
63 1.1 gwr {
64 1.1 gwr DIR *dirp;
65 1.1 gwr int fd;
66 1.1 gwr struct stat sb;
67 1.1 gwr
68 1.1 gwr if ((fd = open(name, O_RDONLY | O_NONBLOCK)) == -1)
69 1.1 gwr return (NULL);
70 1.1 gwr if (fstat(fd, &sb) || !S_ISDIR(sb.st_mode)) {
71 1.1 gwr errno = ENOTDIR;
72 1.1 gwr close(fd);
73 1.1 gwr return (NULL);
74 1.1 gwr }
75 1.1 gwr if (fcntl(fd, F_SETFD, FD_CLOEXEC) == -1 ||
76 1.1 gwr (dirp = (DIR *)malloc(sizeof(DIR))) == NULL) {
77 1.1 gwr close(fd);
78 1.1 gwr return (NULL);
79 1.1 gwr }
80 1.1 gwr
81 1.1 gwr /*
82 1.1 gwr * Determine whether this directory is the top of a union stack.
83 1.1 gwr * (Never is on a ramdisk)
84 1.1 gwr */
85 1.1 gwr {
86 1.1 gwr dirp->dd_len = DIRBLKSIZ;
87 1.1 gwr dirp->dd_buf = malloc((size_t)dirp->dd_len);
88 1.1 gwr if (dirp->dd_buf == NULL) {
89 1.1 gwr free(dirp);
90 1.1 gwr close (fd);
91 1.1 gwr return (NULL);
92 1.1 gwr }
93 1.1 gwr dirp->dd_seek = 0;
94 1.1 gwr }
95 1.1 gwr
96 1.1 gwr dirp->dd_loc = 0;
97 1.1 gwr dirp->dd_fd = fd;
98 1.1 gwr dirp->dd_flags = DTF_HIDEW;
99 1.1 gwr
100 1.1 gwr /*
101 1.1 gwr * Set up seek point for rewinddir.
102 1.1 gwr */
103 1.1 gwr dirp->dd_rewind = telldir(dirp);
104 1.1 gwr
105 1.1 gwr return (dirp);
106 1.1 gwr }
107