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 2004 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 #pragma ident "%Z%%M% %I% %E% SMI" 28 29 /* 30 * fdopendir -- C library extension routine 31 * 32 * We use lmalloc()/lfree() rather than malloc()/free() in 33 * order to allow opendir()/readdir()/closedir() to be called 34 * while holding internal libc locks. 35 */ 36 37 #pragma weak fdopendir = _fdopendir 38 39 #include "synonyms.h" 40 #include <mtlib.h> 41 #include <sys/types.h> 42 #include <dirent.h> 43 #include <sys/stat.h> 44 #include <fcntl.h> 45 #include <stdlib.h> 46 #include <unistd.h> 47 #include <errno.h> 48 #include "libc.h" 49 50 extern int __fcntl(int fd, int cmd, intptr_t arg); 51 52 DIR * 53 fdopendir(int fd) 54 { 55 DIR *dirp = lmalloc(sizeof (DIR)); 56 void *buf = lmalloc(DIRBUF); 57 int error = 0; 58 struct stat64 sbuf; 59 60 if (dirp == NULL || buf == NULL) 61 goto fail; 62 /* 63 * POSIX mandated behavior 64 * close on exec if using file descriptor 65 */ 66 if (__fcntl(fd, F_SETFD, FD_CLOEXEC) < 0) 67 goto fail; 68 if (fstat64(fd, &sbuf) < 0) 69 goto fail; 70 if ((sbuf.st_mode & S_IFMT) != S_IFDIR) { 71 error = ENOTDIR; 72 goto fail; 73 } 74 dirp->dd_buf = buf; 75 dirp->dd_fd = fd; 76 dirp->dd_loc = dirp->dd_size = 0; 77 return (dirp); 78 79 fail: 80 if (dirp != NULL) 81 lfree(dirp, sizeof (DIR)); 82 if (buf != NULL) 83 lfree(buf, DIRBUF); 84 if (error) 85 errno = error; 86 return (NULL); 87 } 88