1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright (c) 1995, by Sun Microsystems, Inc.
24 * All rights reserved.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 #include <sys/param.h>
30 #include <sys/stat.h>
31 #include <dirent.h>
32 #include <errno.h>
33 #include <fcntl.h>
34
35 /*
36 * open a directory.
37 */
38 DIR *
opendir(name)39 opendir(name)
40 char *name;
41 {
42 register DIR *dirp;
43 register int fd;
44 struct stat sb;
45 extern int errno;
46 extern char *malloc();
47 extern int open(), close(), fstat();
48
49 if ((fd = open(name, O_RDONLY | O_NDELAY)) == -1)
50 return (NULL);
51 if (fstat(fd, &sb) == -1) {
52 (void) close(fd);
53 return (NULL);
54 }
55 if ((sb.st_mode & S_IFMT) != S_IFDIR) {
56 errno = ENOTDIR;
57 (void) close(fd);
58 return (NULL);
59 }
60 if (((dirp = (DIR *)malloc(sizeof(DIR))) == NULL) ||
61 ((dirp->dd_buf = malloc(sb.st_blksize)) == NULL)) {
62 if (dirp)
63 free(dirp);
64 (void) close(fd);
65 return (NULL);
66 }
67 dirp->dd_fd = fd;
68 dirp->dd_loc = 0;
69 dirp->dd_size = 0;
70 dirp->dd_bsize = sb.st_blksize;
71 dirp->dd_off = 0;
72 (void) fcntl(fd, F_SETFD, FD_CLOEXEC);
73 return (dirp);
74 }
75