OLD | NEW |
| (Empty) |
1 /* | |
2 Unix SMB/CIFS implementation. | |
3 | |
4 Copyright (C) Andrew Tridgell 2005 | |
5 | |
6 ** NOTE! The following LGPL license applies to the replace | |
7 ** library. This does NOT imply that all of Samba is released | |
8 ** under the LGPL | |
9 | |
10 This library is free software; you can redistribute it and/or | |
11 modify it under the terms of the GNU Lesser General Public | |
12 License as published by the Free Software Foundation; either | |
13 version 3 of the License, or (at your option) any later version. | |
14 | |
15 This library is distributed in the hope that it will be useful, | |
16 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
18 Lesser General Public License for more details. | |
19 | |
20 You should have received a copy of the GNU Lesser General Public | |
21 License along with this library; if not, see <http://www.gnu.org/licenses/>. | |
22 */ | |
23 /* | |
24 a replacement for opendir/readdir/telldir/seekdir/closedir for BSD systems | |
25 | |
26 This is needed because the existing directory handling in FreeBSD | |
27 and OpenBSD (and possibly NetBSD) doesn't correctly handle unlink() | |
28 on files in a directory where telldir() has been used. On a block | |
29 boundary it will occasionally miss a file when seekdir() is used to | |
30 return to a position previously recorded with telldir(). | |
31 | |
32 This also fixes a severe performance and memory usage problem with | |
33 telldir() on BSD systems. Each call to telldir() in BSD adds an | |
34 entry to a linked list, and those entries are cleaned up on | |
35 closedir(). This means with a large directory closedir() can take an | |
36 arbitrary amount of time, causing network timeouts as millions of | |
37 telldir() entries are freed | |
38 | |
39 Note! This replacement code is not portable. It relies on getdents() | |
40 always leaving the file descriptor at a seek offset that is a | |
41 multiple of DIR_BUF_SIZE. If the code detects that this doesn't | |
42 happen then it will abort(). It also does not handle directories | |
43 with offsets larger than can be stored in a long, | |
44 | |
45 This code is available under other free software licenses as | |
46 well. Contact the author. | |
47 */ | |
48 | |
49 #include <stdlib.h> | |
50 #include <sys/stat.h> | |
51 #include <unistd.h> | |
52 #include <sys/types.h> | |
53 #include <errno.h> | |
54 #include <fcntl.h> | |
55 #include <dirent.h> | |
56 | |
57 #define DIR_BUF_BITS 9 | |
58 #define DIR_BUF_SIZE (1<<DIR_BUF_BITS) | |
59 | |
60 struct dir_buf { | |
61 int fd; | |
62 int nbytes, ofs; | |
63 off_t seekpos; | |
64 char buf[DIR_BUF_SIZE]; | |
65 }; | |
66 | |
67 DIR *opendir(const char *dname) | |
68 { | |
69 struct dir_buf *d; | |
70 struct stat sb; | |
71 d = malloc(sizeof(*d)); | |
72 if (d == NULL) { | |
73 errno = ENOMEM; | |
74 return NULL; | |
75 } | |
76 d->fd = open(dname, O_RDONLY); | |
77 if (d->fd == -1) { | |
78 free(d); | |
79 return NULL; | |
80 } | |
81 if (fstat(d->fd, &sb) < 0) { | |
82 close(d->fd); | |
83 free(d); | |
84 return NULL; | |
85 } | |
86 if (!S_ISDIR(sb.st_mode)) { | |
87 close(d->fd); | |
88 free(d); | |
89 errno = ENOTDIR; | |
90 return NULL; | |
91 } | |
92 d->ofs = 0; | |
93 d->seekpos = 0; | |
94 d->nbytes = 0; | |
95 return (DIR *)d; | |
96 } | |
97 | |
98 struct dirent *readdir(DIR *dir) | |
99 { | |
100 struct dir_buf *d = (struct dir_buf *)dir; | |
101 struct dirent *de; | |
102 | |
103 if (d->ofs >= d->nbytes) { | |
104 d->seekpos = lseek(d->fd, 0, SEEK_CUR); | |
105 d->nbytes = getdents(d->fd, d->buf, DIR_BUF_SIZE); | |
106 d->ofs = 0; | |
107 } | |
108 if (d->ofs >= d->nbytes) { | |
109 return NULL; | |
110 } | |
111 de = (struct dirent *)&d->buf[d->ofs]; | |
112 d->ofs += de->d_reclen; | |
113 return de; | |
114 } | |
115 | |
116 long telldir(DIR *dir) | |
117 { | |
118 struct dir_buf *d = (struct dir_buf *)dir; | |
119 if (d->ofs >= d->nbytes) { | |
120 d->seekpos = lseek(d->fd, 0, SEEK_CUR); | |
121 d->ofs = 0; | |
122 d->nbytes = 0; | |
123 } | |
124 /* this relies on seekpos always being a multiple of | |
125 DIR_BUF_SIZE. Is that always true on BSD systems? */ | |
126 if (d->seekpos & (DIR_BUF_SIZE-1)) { | |
127 abort(); | |
128 } | |
129 return d->seekpos + d->ofs; | |
130 } | |
131 | |
132 void seekdir(DIR *dir, long ofs) | |
133 { | |
134 struct dir_buf *d = (struct dir_buf *)dir; | |
135 d->seekpos = lseek(d->fd, ofs & ~(DIR_BUF_SIZE-1), SEEK_SET); | |
136 d->nbytes = getdents(d->fd, d->buf, DIR_BUF_SIZE); | |
137 d->ofs = 0; | |
138 while (d->ofs < (ofs & (DIR_BUF_SIZE-1))) { | |
139 if (readdir(dir) == NULL) break; | |
140 } | |
141 } | |
142 | |
143 void rewinddir(DIR *dir) | |
144 { | |
145 seekdir(dir, 0); | |
146 } | |
147 | |
148 int closedir(DIR *dir) | |
149 { | |
150 struct dir_buf *d = (struct dir_buf *)dir; | |
151 int r = close(d->fd); | |
152 if (r != 0) { | |
153 return r; | |
154 } | |
155 free(d); | |
156 return 0; | |
157 } | |
158 | |
159 #ifndef dirfd | |
160 /* darn, this is a macro on some systems. */ | |
161 int dirfd(DIR *dir) | |
162 { | |
163 struct dir_buf *d = (struct dir_buf *)dir; | |
164 return d->fd; | |
165 } | |
166 #endif | |
OLD | NEW |