update from main archive 970121
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / getdents.c
1 /* Copyright (C) 1993, 1995, 1996, 1997 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Library General Public License as
6    published by the Free Software Foundation; either version 2 of the
7    License, or (at your option) any later version.
8
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Library General Public License for more details.
13
14    You should have received a copy of the GNU Library General Public
15    License along with the GNU C Library; see the file COPYING.LIB.  If not,
16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17    Boston, MA 02111-1307, USA.  */
18
19 #include <alloca.h>
20 #include <dirent.h>
21 #include <stddef.h>
22 #include <string.h>
23 #include <unistd.h>
24 #include <sys/param.h>
25 #include <sys/types.h>
26
27 #include <linux/posix_types.h>
28
29 #define offsetof(TYPE, MEMBER) ((size_t) &((TYPE *)0)->MEMBER)
30
31
32 extern int __getdents __P ((int fd, char *buf, size_t nbytes));
33
34 /* For Linux we need a special version of this file since the
35    definition of `struct dirent' is not the same for the kernel and
36    the libc.  There is one additional field which might be introduced
37    in the kernel structure in the future.
38
39    He is the kernel definition of `struct dirent' as of 2.1.20:  */
40
41 struct kernel_dirent
42   {
43     long int d_ino;
44     __kernel_off_t d_off;
45     unsigned short int d_reclen;
46     char d_name[256];
47   };
48
49
50 /* The problem here is that we cannot simply read the next NBYTES
51    bytes.  We need to take the additional field into account.  We use
52    some heuristic.  Assume the directory contains names with at least
53    3 characters we can compute a maximum number of entries which fit
54    in the buffer.  Taking this number allows us to specify a correct
55    number of bytes to read.  If we should be wrong, we can reset the
56    file descriptor.  */
57 ssize_t
58 __getdirentries (fd, buf, nbytes, basep)
59      int fd;
60      char *buf;
61      size_t nbytes;
62      off_t *basep;
63 {
64   off_t base = __lseek (fd, (off_t) 0, SEEK_CUR);
65   size_t red_nbytes;
66   struct kernel_dirent *skdp, *kdp;
67   struct dirent *dp;
68   int retval;
69
70   red_nbytes = nbytes - (nbytes / (offsetof (struct dirent, d_name) + 3));
71
72   dp = (struct dirent *) buf;
73   skdp = kdp = __alloca (red_nbytes);
74
75   retval = __getdents (fd, (char *) kdp, red_nbytes);
76
77   while ((char *) kdp < (char *) skdp + retval)
78     {
79       const size_t size_diff = MAX (offsetof (struct dirent, d_name)
80                                     - offsetof (struct kernel_dirent, d_name),
81                                     __alignof__ (struct dirent));
82       dp->d_ino = kdp->d_ino;
83       dp->d_off = kdp->d_off;
84       dp->d_reclen = kdp->d_reclen + size_diff;
85       dp->d_type = DT_UNKNOWN;
86       memcpy (dp->d_name, kdp->d_name,
87               kdp->d_reclen - offsetof (struct kernel_dirent, d_name));
88
89       dp = (struct dirent *) (((char *) dp) + dp->d_reclen);
90       kdp = (struct kernel_dirent *) (((char *) kdp) + kdp->d_reclen);
91
92       if ((char *) dp >= buf + nbytes)
93         {
94           /* Our heuristic failed.  We read too many entries.  Reset
95              the stream.  */
96           off_t used = ((char *) kdp - (char *) buf) - (nbytes - red_nbytes);
97           base = __lseek (fd, retval - used, SEEK_CUR);
98         }
99     }
100
101   if (basep)
102     *basep = base;
103
104   return (char *) dp - buf;
105 }
106
107 weak_alias (__getdirentries, getdirentries)