Home | History | Annotate | Line # | Download | only in gen
readdir.c revision 1.12
      1  1.12  christos /*	$NetBSD: readdir.c,v 1.12 1998/11/13 12:31:51 christos Exp $	*/
      2   1.5       cgd 
      3   1.1       cgd /*
      4   1.2       jtc  * Copyright (c) 1983, 1993
      5   1.2       jtc  *	The Regents of the University of California.  All rights reserved.
      6   1.1       cgd  *
      7   1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8   1.1       cgd  * modification, are permitted provided that the following conditions
      9   1.1       cgd  * are met:
     10   1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11   1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12   1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14   1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15   1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     16   1.1       cgd  *    must display the following acknowledgement:
     17   1.1       cgd  *	This product includes software developed by the University of
     18   1.1       cgd  *	California, Berkeley and its contributors.
     19   1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     20   1.1       cgd  *    may be used to endorse or promote products derived from this software
     21   1.1       cgd  *    without specific prior written permission.
     22   1.1       cgd  *
     23   1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24   1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25   1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26   1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27   1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28   1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29   1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30   1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31   1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32   1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33   1.1       cgd  * SUCH DAMAGE.
     34   1.1       cgd  */
     35   1.1       cgd 
     36   1.6  christos #include <sys/cdefs.h>
     37   1.1       cgd #if defined(LIBC_SCCS) && !defined(lint)
     38   1.5       cgd #if 0
     39   1.5       cgd static char sccsid[] = "@(#)readdir.c	8.3 (Berkeley) 9/29/94";
     40   1.5       cgd #else
     41  1.12  christos __RCSID("$NetBSD: readdir.c,v 1.12 1998/11/13 12:31:51 christos Exp $");
     42   1.5       cgd #endif
     43   1.1       cgd #endif /* LIBC_SCCS and not lint */
     44   1.1       cgd 
     45   1.7       jtc #include "namespace.h"
     46   1.1       cgd #include <sys/param.h>
     47   1.8      fvdl #include <unistd.h>
     48   1.1       cgd #include <dirent.h>
     49   1.7       jtc 
     50   1.7       jtc #ifdef __weak_alias
     51   1.7       jtc __weak_alias(readdir,_readdir);
     52   1.7       jtc #endif
     53   1.1       cgd 
     54   1.1       cgd /*
     55   1.1       cgd  * get next entry in a directory.
     56   1.1       cgd  */
     57   1.1       cgd struct dirent *
     58   1.1       cgd readdir(dirp)
     59  1.10     perry 	DIR *dirp;
     60   1.1       cgd {
     61  1.10     perry 	struct dirent *dp;
     62   1.1       cgd 
     63   1.1       cgd 	for (;;) {
     64   1.4   mycroft 		if (dirp->dd_loc >= dirp->dd_size) {
     65   1.4   mycroft 			if (dirp->dd_flags & __DTF_READALL)
     66   1.4   mycroft 				return (NULL);
     67   1.4   mycroft 			dirp->dd_loc = 0;
     68   1.4   mycroft 		}
     69   1.4   mycroft 		if (dirp->dd_loc == 0 && !(dirp->dd_flags & __DTF_READALL)) {
     70  1.11     perry 			dirp->dd_seek = lseek(dirp->dd_fd, (off_t)0, SEEK_CUR);
     71   1.8      fvdl 			dirp->dd_size = getdents(dirp->dd_fd,
     72  1.11     perry 			    dirp->dd_buf, (size_t)dirp->dd_len);
     73   1.1       cgd 			if (dirp->dd_size <= 0)
     74   1.4   mycroft 				return (NULL);
     75   1.1       cgd 		}
     76  1.12  christos 		dp = (struct dirent *)
     77  1.12  christos 		    (void *)(dirp->dd_buf + (size_t)dirp->dd_loc);
     78   1.3       cgd 		if ((long)dp & 03)	/* bogus pointer check */
     79   1.4   mycroft 			return (NULL);
     80  1.12  christos 		/* d_reclen is unsigned; no need to compare it <= 0 */
     81  1.12  christos 		if (dp->d_reclen > dirp->dd_len + 1 - dirp->dd_loc)
     82   1.4   mycroft 			return (NULL);
     83   1.1       cgd 		dirp->dd_loc += dp->d_reclen;
     84   1.1       cgd 		if (dp->d_ino == 0)
     85   1.4   mycroft 			continue;
     86   1.4   mycroft 		if (dp->d_type == DT_WHT && (dirp->dd_flags & DTF_HIDEW))
     87   1.1       cgd 			continue;
     88   1.1       cgd 		return (dp);
     89   1.1       cgd 	}
     90   1.1       cgd }
     91