xref: /titanic_50/usr/src/lib/libbc/libc/gen/common/opendir.c (revision 3db86aab554edbb4244c8d1a1c90f152eee768af)
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 *
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