ufs.c revision 1.33 1 1.33 fvdl /* $NetBSD: ufs.c,v 1.33 2003/04/02 10:39:34 fvdl Exp $ */
2 1.8 cgd
3 1.1 brezak /*-
4 1.1 brezak * Copyright (c) 1993
5 1.1 brezak * The Regents of the University of California. All rights reserved.
6 1.1 brezak *
7 1.1 brezak * This code is derived from software contributed to Berkeley by
8 1.1 brezak * The Mach Operating System project at Carnegie-Mellon University.
9 1.1 brezak *
10 1.1 brezak * Redistribution and use in source and binary forms, with or without
11 1.1 brezak * modification, are permitted provided that the following conditions
12 1.1 brezak * are met:
13 1.1 brezak * 1. Redistributions of source code must retain the above copyright
14 1.1 brezak * notice, this list of conditions and the following disclaimer.
15 1.1 brezak * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 brezak * notice, this list of conditions and the following disclaimer in the
17 1.1 brezak * documentation and/or other materials provided with the distribution.
18 1.1 brezak * 3. All advertising materials mentioning features or use of this software
19 1.1 brezak * must display the following acknowledgement:
20 1.1 brezak * This product includes software developed by the University of
21 1.1 brezak * California, Berkeley and its contributors.
22 1.1 brezak * 4. Neither the name of the University nor the names of its contributors
23 1.1 brezak * may be used to endorse or promote products derived from this software
24 1.1 brezak * without specific prior written permission.
25 1.1 brezak *
26 1.1 brezak * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 1.1 brezak * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 1.1 brezak * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 1.1 brezak * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 1.1 brezak * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 1.1 brezak * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 1.1 brezak * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 1.1 brezak * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 1.1 brezak * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 1.1 brezak * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 1.1 brezak * SUCH DAMAGE.
37 1.22 simonb *
38 1.1 brezak *
39 1.1 brezak * Copyright (c) 1990, 1991 Carnegie Mellon University
40 1.1 brezak * All Rights Reserved.
41 1.1 brezak *
42 1.1 brezak * Author: David Golub
43 1.22 simonb *
44 1.1 brezak * Permission to use, copy, modify and distribute this software and its
45 1.1 brezak * documentation is hereby granted, provided that both the copyright
46 1.1 brezak * notice and this permission notice appear in all copies of the
47 1.1 brezak * software, derivative works or modified versions, and any portions
48 1.1 brezak * thereof, and that both notices appear in supporting documentation.
49 1.22 simonb *
50 1.1 brezak * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
51 1.1 brezak * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
52 1.1 brezak * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
53 1.22 simonb *
54 1.1 brezak * Carnegie Mellon requests users of this software to return to
55 1.22 simonb *
56 1.1 brezak * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
57 1.1 brezak * School of Computer Science
58 1.1 brezak * Carnegie Mellon University
59 1.1 brezak * Pittsburgh PA 15213-3890
60 1.22 simonb *
61 1.1 brezak * any improvements or extensions that they make and grant Carnegie the
62 1.1 brezak * rights to redistribute these changes.
63 1.27 cgd */
64 1.27 cgd
65 1.27 cgd /*
66 1.27 cgd * XXX NOTE: ufs.c (FFS) and lfs.c (LFS) should eventually use much common
67 1.27 cgd * XXX code. until then, the two files should be easily diffable.
68 1.1 brezak */
69 1.1 brezak
70 1.1 brezak /*
71 1.1 brezak * Stand-alone file reading package.
72 1.1 brezak */
73 1.1 brezak
74 1.1 brezak #include <sys/param.h>
75 1.1 brezak #include <sys/time.h>
76 1.1 brezak #include <ufs/ufs/dinode.h>
77 1.1 brezak #include <ufs/ufs/dir.h>
78 1.20 ross #include <ufs/ffs/fs.h>
79 1.29 thorpej #ifdef _STANDALONE
80 1.29 thorpej #include <lib/libkern/libkern.h>
81 1.29 thorpej #else
82 1.29 thorpej #include <string.h>
83 1.29 thorpej #endif
84 1.2 glass
85 1.1 brezak #include "stand.h"
86 1.21 pk #include "ufs.h"
87 1.23 cgd
88 1.23 cgd #if defined(LIBSA_FS_SINGLECOMPONENT) && !defined(LIBSA_NO_FS_SYMLINK)
89 1.23 cgd #define LIBSA_NO_FS_SYMLINK
90 1.25 simonb #endif
91 1.25 simonb #if defined(COMPAT_UFS) && defined(LIBSA_NO_COMPAT_UFS)
92 1.25 simonb #undef COMPAT_UFS
93 1.23 cgd #endif
94 1.23 cgd
95 1.33 fvdl union dinode {
96 1.33 fvdl struct ufs1_dinode dp1;
97 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
98 1.33 fvdl struct ufs2_dinode dp2;
99 1.33 fvdl #endif
100 1.33 fvdl };
101 1.33 fvdl
102 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
103 1.33 fvdl #define DIP(d,field) (is_ufs2 ? d.dp2.di_##field : d.dp1.di_##field)
104 1.33 fvdl #else
105 1.33 fvdl #define DIP(d,field) d.dp1.di_##field
106 1.33 fvdl #endif
107 1.23 cgd
108 1.1 brezak /*
109 1.1 brezak * In-core open file.
110 1.1 brezak */
111 1.1 brezak struct file {
112 1.1 brezak off_t f_seekp; /* seek pointer */
113 1.1 brezak struct fs *f_fs; /* pointer to super-block */
114 1.33 fvdl union dinode f_di; /* copy of on-disk inode */
115 1.23 cgd unsigned int f_nindir[NIADDR];
116 1.1 brezak /* number of blocks mapped by
117 1.1 brezak indirect block at level i */
118 1.1 brezak char *f_blk[NIADDR]; /* buffer for indirect block at
119 1.1 brezak level i */
120 1.13 cgd size_t f_blksize[NIADDR];
121 1.1 brezak /* size of buffer */
122 1.1 brezak daddr_t f_blkno[NIADDR];/* disk address of block in buffer */
123 1.1 brezak char *f_buf; /* buffer for data block */
124 1.13 cgd size_t f_buf_size; /* size of data block */
125 1.1 brezak daddr_t f_buf_blkno; /* block number of data block */
126 1.1 brezak };
127 1.1 brezak
128 1.13 cgd static int read_inode __P((ino_t, struct open_file *));
129 1.13 cgd static int block_map __P((struct open_file *, daddr_t, daddr_t *));
130 1.13 cgd static int buf_read_file __P((struct open_file *, char **, size_t *));
131 1.13 cgd static int search_directory __P((char *, struct open_file *, ino_t *));
132 1.13 cgd static void ffs_oldfscompat __P((struct fs *));
133 1.33 fvdl
134 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
135 1.33 fvdl static int is_ufs2;
136 1.33 fvdl static int ffs_find_superblock __P((struct open_file *, struct fs *));
137 1.7 brezak #endif
138 1.7 brezak
139 1.1 brezak /*
140 1.1 brezak * Read a new inode into a file structure.
141 1.1 brezak */
142 1.1 brezak static int
143 1.1 brezak read_inode(inumber, f)
144 1.1 brezak ino_t inumber;
145 1.1 brezak struct open_file *f;
146 1.1 brezak {
147 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
148 1.30 augustss struct fs *fs = fp->f_fs;
149 1.1 brezak char *buf;
150 1.13 cgd size_t rsize;
151 1.1 brezak int rc;
152 1.1 brezak
153 1.1 brezak /*
154 1.1 brezak * Read inode and save it.
155 1.1 brezak */
156 1.1 brezak buf = alloc(fs->fs_bsize);
157 1.23 cgd #if !defined(LIBSA_NO_TWIDDLE)
158 1.11 mycroft twiddle();
159 1.23 cgd #endif
160 1.23 cgd rc = DEV_STRATEGY(f->f_dev)(f->f_devdata, F_READ,
161 1.13 cgd fsbtodb(fs, ino_to_fsba(fs, inumber)), fs->fs_bsize,
162 1.13 cgd buf, &rsize);
163 1.1 brezak if (rc)
164 1.1 brezak goto out;
165 1.1 brezak if (rsize != fs->fs_bsize) {
166 1.1 brezak rc = EIO;
167 1.1 brezak goto out;
168 1.1 brezak }
169 1.1 brezak
170 1.1 brezak {
171 1.33 fvdl struct ufs1_dinode *dp1;
172 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
173 1.33 fvdl struct ufs2_dinode *dp2;
174 1.33 fvdl
175 1.33 fvdl if (is_ufs2) {
176 1.33 fvdl dp2 = (struct ufs2_dinode *)buf;
177 1.33 fvdl fp->f_di.dp2 = dp2[ino_to_fsbo(fs, inumber)];
178 1.33 fvdl } else
179 1.33 fvdl #endif
180 1.33 fvdl {
181 1.33 fvdl dp1 = (struct ufs1_dinode *)buf;
182 1.33 fvdl fp->f_di.dp1 = dp1[ino_to_fsbo(fs, inumber)];
183 1.33 fvdl }
184 1.1 brezak }
185 1.1 brezak
186 1.1 brezak /*
187 1.1 brezak * Clear out the old buffers
188 1.1 brezak */
189 1.1 brezak {
190 1.30 augustss int level;
191 1.1 brezak
192 1.1 brezak for (level = 0; level < NIADDR; level++)
193 1.1 brezak fp->f_blkno[level] = -1;
194 1.1 brezak fp->f_buf_blkno = -1;
195 1.1 brezak }
196 1.1 brezak out:
197 1.1 brezak free(buf, fs->fs_bsize);
198 1.22 simonb return (rc);
199 1.1 brezak }
200 1.1 brezak
201 1.1 brezak /*
202 1.1 brezak * Given an offset in a file, find the disk block number that
203 1.1 brezak * contains that block.
204 1.1 brezak */
205 1.1 brezak static int
206 1.1 brezak block_map(f, file_block, disk_block_p)
207 1.1 brezak struct open_file *f;
208 1.1 brezak daddr_t file_block;
209 1.1 brezak daddr_t *disk_block_p; /* out */
210 1.1 brezak {
211 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
212 1.30 augustss struct fs *fs = fp->f_fs;
213 1.1 brezak int level;
214 1.1 brezak int idx;
215 1.1 brezak daddr_t ind_block_num;
216 1.33 fvdl int32_t *ind_p32 = NULL;
217 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
218 1.33 fvdl int64_t *ind_p64 = NULL;
219 1.33 fvdl #endif
220 1.1 brezak int rc;
221 1.1 brezak
222 1.1 brezak /*
223 1.1 brezak * Index structure of an inode:
224 1.1 brezak *
225 1.1 brezak * di_db[0..NDADDR-1] hold block numbers for blocks
226 1.1 brezak * 0..NDADDR-1
227 1.1 brezak *
228 1.1 brezak * di_ib[0] index block 0 is the single indirect block
229 1.1 brezak * holds block numbers for blocks
230 1.1 brezak * NDADDR .. NDADDR + NINDIR(fs)-1
231 1.1 brezak *
232 1.1 brezak * di_ib[1] index block 1 is the double indirect block
233 1.1 brezak * holds block numbers for INDEX blocks for blocks
234 1.1 brezak * NDADDR + NINDIR(fs) ..
235 1.1 brezak * NDADDR + NINDIR(fs) + NINDIR(fs)**2 - 1
236 1.1 brezak *
237 1.1 brezak * di_ib[2] index block 2 is the triple indirect block
238 1.1 brezak * holds block numbers for double-indirect
239 1.1 brezak * blocks for blocks
240 1.1 brezak * NDADDR + NINDIR(fs) + NINDIR(fs)**2 ..
241 1.1 brezak * NDADDR + NINDIR(fs) + NINDIR(fs)**2
242 1.1 brezak * + NINDIR(fs)**3 - 1
243 1.1 brezak */
244 1.1 brezak
245 1.1 brezak if (file_block < NDADDR) {
246 1.1 brezak /* Direct block. */
247 1.33 fvdl *disk_block_p = DIP(fp->f_di, db[file_block]);
248 1.1 brezak return (0);
249 1.1 brezak }
250 1.1 brezak
251 1.1 brezak file_block -= NDADDR;
252 1.1 brezak
253 1.1 brezak /*
254 1.1 brezak * nindir[0] = NINDIR
255 1.1 brezak * nindir[1] = NINDIR**2
256 1.1 brezak * nindir[2] = NINDIR**3
257 1.1 brezak * etc
258 1.1 brezak */
259 1.1 brezak for (level = 0; level < NIADDR; level++) {
260 1.1 brezak if (file_block < fp->f_nindir[level])
261 1.1 brezak break;
262 1.1 brezak file_block -= fp->f_nindir[level];
263 1.1 brezak }
264 1.1 brezak if (level == NIADDR) {
265 1.1 brezak /* Block number too high */
266 1.1 brezak return (EFBIG);
267 1.1 brezak }
268 1.1 brezak
269 1.33 fvdl ind_block_num = DIP(fp->f_di, ib[level]);
270 1.1 brezak
271 1.1 brezak for (; level >= 0; level--) {
272 1.1 brezak if (ind_block_num == 0) {
273 1.1 brezak *disk_block_p = 0; /* missing */
274 1.1 brezak return (0);
275 1.1 brezak }
276 1.1 brezak
277 1.1 brezak if (fp->f_blkno[level] != ind_block_num) {
278 1.1 brezak if (fp->f_blk[level] == (char *)0)
279 1.1 brezak fp->f_blk[level] =
280 1.1 brezak alloc(fs->fs_bsize);
281 1.23 cgd #if !defined(LIBSA_NO_TWIDDLE)
282 1.11 mycroft twiddle();
283 1.23 cgd #endif
284 1.23 cgd rc = DEV_STRATEGY(f->f_dev)(f->f_devdata, F_READ,
285 1.1 brezak fsbtodb(fp->f_fs, ind_block_num),
286 1.1 brezak fs->fs_bsize,
287 1.1 brezak fp->f_blk[level],
288 1.13 cgd &fp->f_blksize[level]);
289 1.1 brezak if (rc)
290 1.1 brezak return (rc);
291 1.1 brezak if (fp->f_blksize[level] != fs->fs_bsize)
292 1.1 brezak return (EIO);
293 1.1 brezak fp->f_blkno[level] = ind_block_num;
294 1.1 brezak }
295 1.1 brezak
296 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
297 1.33 fvdl if (is_ufs2)
298 1.33 fvdl ind_p64 = (int64_t *)fp->f_blk[level];
299 1.33 fvdl else
300 1.33 fvdl #endif
301 1.33 fvdl ind_p32 = (int32_t *)fp->f_blk[level];
302 1.1 brezak
303 1.1 brezak if (level > 0) {
304 1.1 brezak idx = file_block / fp->f_nindir[level - 1];
305 1.1 brezak file_block %= fp->f_nindir[level - 1];
306 1.1 brezak } else
307 1.1 brezak idx = file_block;
308 1.1 brezak
309 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
310 1.33 fvdl if (is_ufs2)
311 1.33 fvdl ind_block_num = ind_p64[idx];
312 1.33 fvdl else
313 1.33 fvdl #endif
314 1.33 fvdl ind_block_num = ind_p32[idx];
315 1.1 brezak }
316 1.1 brezak
317 1.1 brezak *disk_block_p = ind_block_num;
318 1.1 brezak
319 1.1 brezak return (0);
320 1.1 brezak }
321 1.1 brezak
322 1.1 brezak /*
323 1.1 brezak * Read a portion of a file into an internal buffer. Return
324 1.1 brezak * the location in the buffer and the amount in the buffer.
325 1.1 brezak */
326 1.1 brezak static int
327 1.1 brezak buf_read_file(f, buf_p, size_p)
328 1.1 brezak struct open_file *f;
329 1.1 brezak char **buf_p; /* out */
330 1.13 cgd size_t *size_p; /* out */
331 1.1 brezak {
332 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
333 1.30 augustss struct fs *fs = fp->f_fs;
334 1.1 brezak long off;
335 1.30 augustss daddr_t file_block;
336 1.1 brezak daddr_t disk_block;
337 1.13 cgd size_t block_size;
338 1.1 brezak int rc;
339 1.1 brezak
340 1.1 brezak off = blkoff(fs, fp->f_seekp);
341 1.1 brezak file_block = lblkno(fs, fp->f_seekp);
342 1.33 fvdl block_size = sblksize(fs, DIP(fp->f_di, size), file_block);
343 1.1 brezak
344 1.1 brezak if (file_block != fp->f_buf_blkno) {
345 1.1 brezak rc = block_map(f, file_block, &disk_block);
346 1.1 brezak if (rc)
347 1.1 brezak return (rc);
348 1.1 brezak
349 1.1 brezak if (fp->f_buf == (char *)0)
350 1.1 brezak fp->f_buf = alloc(fs->fs_bsize);
351 1.1 brezak
352 1.1 brezak if (disk_block == 0) {
353 1.1 brezak bzero(fp->f_buf, block_size);
354 1.1 brezak fp->f_buf_size = block_size;
355 1.1 brezak } else {
356 1.23 cgd #if !defined(LIBSA_NO_TWIDDLE)
357 1.11 mycroft twiddle();
358 1.23 cgd #endif
359 1.23 cgd rc = DEV_STRATEGY(f->f_dev)(f->f_devdata, F_READ,
360 1.1 brezak fsbtodb(fs, disk_block),
361 1.1 brezak block_size, fp->f_buf, &fp->f_buf_size);
362 1.1 brezak if (rc)
363 1.1 brezak return (rc);
364 1.1 brezak }
365 1.1 brezak
366 1.1 brezak fp->f_buf_blkno = file_block;
367 1.1 brezak }
368 1.1 brezak
369 1.1 brezak /*
370 1.1 brezak * Return address of byte in buffer corresponding to
371 1.1 brezak * offset, and size of remainder of buffer after that
372 1.1 brezak * byte.
373 1.1 brezak */
374 1.1 brezak *buf_p = fp->f_buf + off;
375 1.1 brezak *size_p = block_size - off;
376 1.1 brezak
377 1.1 brezak /*
378 1.1 brezak * But truncate buffer at end of file.
379 1.1 brezak */
380 1.33 fvdl if (*size_p > DIP(fp->f_di, size) - fp->f_seekp)
381 1.33 fvdl *size_p = DIP(fp->f_di, size) - fp->f_seekp;
382 1.1 brezak
383 1.1 brezak return (0);
384 1.1 brezak }
385 1.1 brezak
386 1.1 brezak /*
387 1.1 brezak * Search a directory for a name and return its
388 1.1 brezak * i_number.
389 1.1 brezak */
390 1.1 brezak static int
391 1.1 brezak search_directory(name, f, inumber_p)
392 1.1 brezak char *name;
393 1.1 brezak struct open_file *f;
394 1.1 brezak ino_t *inumber_p; /* out */
395 1.1 brezak {
396 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
397 1.30 augustss struct direct *dp;
398 1.1 brezak struct direct *edp;
399 1.1 brezak char *buf;
400 1.13 cgd size_t buf_size;
401 1.1 brezak int namlen, length;
402 1.1 brezak int rc;
403 1.1 brezak
404 1.1 brezak length = strlen(name);
405 1.1 brezak
406 1.1 brezak fp->f_seekp = 0;
407 1.33 fvdl while (fp->f_seekp < DIP(fp->f_di, size)) {
408 1.1 brezak rc = buf_read_file(f, &buf, &buf_size);
409 1.1 brezak if (rc)
410 1.1 brezak return (rc);
411 1.1 brezak
412 1.1 brezak dp = (struct direct *)buf;
413 1.1 brezak edp = (struct direct *)(buf + buf_size);
414 1.1 brezak while (dp < edp) {
415 1.1 brezak if (dp->d_ino == (ino_t)0)
416 1.1 brezak goto next;
417 1.1 brezak #if BYTE_ORDER == LITTLE_ENDIAN
418 1.1 brezak if (fp->f_fs->fs_maxsymlinklen <= 0)
419 1.1 brezak namlen = dp->d_type;
420 1.1 brezak else
421 1.1 brezak #endif
422 1.1 brezak namlen = dp->d_namlen;
423 1.1 brezak if (namlen == length &&
424 1.1 brezak !strcmp(name, dp->d_name)) {
425 1.1 brezak /* found entry */
426 1.1 brezak *inumber_p = dp->d_ino;
427 1.1 brezak return (0);
428 1.1 brezak }
429 1.1 brezak next:
430 1.1 brezak dp = (struct direct *)((char *)dp + dp->d_reclen);
431 1.1 brezak }
432 1.1 brezak fp->f_seekp += buf_size;
433 1.1 brezak }
434 1.1 brezak return (ENOENT);
435 1.1 brezak }
436 1.1 brezak
437 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
438 1.33 fvdl
439 1.33 fvdl daddr_t sblock_try[] = SBLOCKSEARCH;
440 1.33 fvdl
441 1.33 fvdl static int
442 1.33 fvdl ffs_find_superblock(f, fs)
443 1.33 fvdl struct open_file *f;
444 1.33 fvdl struct fs *fs;
445 1.33 fvdl {
446 1.33 fvdl int i, rc;
447 1.33 fvdl size_t buf_size;
448 1.33 fvdl
449 1.33 fvdl for (i = 0; sblock_try[i] != -1; i++) {
450 1.33 fvdl rc = DEV_STRATEGY(f->f_dev)(f->f_devdata, F_READ,
451 1.33 fvdl sblock_try[i] / DEV_BSIZE, SBLOCKSIZE, (char *)fs,
452 1.33 fvdl &buf_size);
453 1.33 fvdl if (rc != 0 || buf_size != SBLOCKSIZE)
454 1.33 fvdl return rc;
455 1.33 fvdl if (fs->fs_magic == FS_UFS1_MAGIC) {
456 1.33 fvdl is_ufs2 = 0;
457 1.33 fvdl return 0;
458 1.33 fvdl }
459 1.33 fvdl if (fs->fs_magic == FS_UFS2_MAGIC) {
460 1.33 fvdl is_ufs2 = 1;
461 1.33 fvdl return 0;
462 1.33 fvdl }
463 1.33 fvdl }
464 1.33 fvdl return EINVAL;
465 1.33 fvdl }
466 1.33 fvdl
467 1.33 fvdl #endif
468 1.33 fvdl
469 1.1 brezak /*
470 1.1 brezak * Open a file.
471 1.1 brezak */
472 1.1 brezak int
473 1.1 brezak ufs_open(path, f)
474 1.1 brezak char *path;
475 1.1 brezak struct open_file *f;
476 1.1 brezak {
477 1.23 cgd #ifndef LIBSA_FS_SINGLECOMPONENT
478 1.30 augustss char *cp, *ncp;
479 1.30 augustss int c;
480 1.23 cgd #endif
481 1.23 cgd ino_t inumber;
482 1.1 brezak struct file *fp;
483 1.1 brezak struct fs *fs;
484 1.10 ws int rc;
485 1.23 cgd #ifndef LIBSA_NO_FS_SYMLINK
486 1.23 cgd ino_t parent_inumber;
487 1.10 ws int nlinks = 0;
488 1.1 brezak char namebuf[MAXPATHLEN+1];
489 1.9 pk char *buf = NULL;
490 1.22 simonb #endif
491 1.33 fvdl #ifndef LIBSA_SUPPORT_UFS2
492 1.33 fvdl size_t buf_size;
493 1.33 fvdl #endif
494 1.1 brezak
495 1.1 brezak /* allocate file system specific data structure */
496 1.1 brezak fp = alloc(sizeof(struct file));
497 1.1 brezak bzero(fp, sizeof(struct file));
498 1.1 brezak f->f_fsdata = (void *)fp;
499 1.1 brezak
500 1.1 brezak /* allocate space and read super block */
501 1.33 fvdl fs = alloc(SBLOCKSIZE);
502 1.1 brezak fp->f_fs = fs;
503 1.23 cgd #if !defined(LIBSA_NO_TWIDDLE)
504 1.11 mycroft twiddle();
505 1.23 cgd #endif
506 1.33 fvdl
507 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
508 1.33 fvdl rc = ffs_find_superblock(f, fs);
509 1.33 fvdl if (rc)
510 1.33 fvdl goto out;
511 1.33 fvdl #else
512 1.23 cgd rc = DEV_STRATEGY(f->f_dev)(f->f_devdata, F_READ,
513 1.33 fvdl SBLOCK_UFS1 / DEV_BSIZE, SBLOCKSIZE, (char *)fs, &buf_size);
514 1.1 brezak if (rc)
515 1.1 brezak goto out;
516 1.33 fvdl if (buf_size != SBLOCKSIZE || fs->fs_magic != FS_UFS1_MAGIC) {
517 1.33 fvdl rc = EINVAL;
518 1.33 fvdl goto out;
519 1.33 fvdl }
520 1.33 fvdl #endif
521 1.1 brezak
522 1.33 fvdl ffs_oldfscompat(fs);
523 1.33 fvdl
524 1.33 fvdl if (fs->fs_bsize > MAXBSIZE || fs->fs_bsize < sizeof(struct fs)) {
525 1.1 brezak rc = EINVAL;
526 1.1 brezak goto out;
527 1.1 brezak }
528 1.1 brezak
529 1.1 brezak /*
530 1.1 brezak * Calculate indirect block levels.
531 1.1 brezak */
532 1.1 brezak {
533 1.30 augustss int mult;
534 1.30 augustss int level;
535 1.1 brezak
536 1.1 brezak mult = 1;
537 1.1 brezak for (level = 0; level < NIADDR; level++) {
538 1.1 brezak mult *= NINDIR(fs);
539 1.1 brezak fp->f_nindir[level] = mult;
540 1.1 brezak }
541 1.1 brezak }
542 1.1 brezak
543 1.1 brezak inumber = ROOTINO;
544 1.1 brezak if ((rc = read_inode(inumber, f)) != 0)
545 1.1 brezak goto out;
546 1.1 brezak
547 1.23 cgd #ifndef LIBSA_FS_SINGLECOMPONENT
548 1.1 brezak cp = path;
549 1.1 brezak while (*cp) {
550 1.1 brezak
551 1.1 brezak /*
552 1.1 brezak * Remove extra separators
553 1.1 brezak */
554 1.1 brezak while (*cp == '/')
555 1.1 brezak cp++;
556 1.1 brezak if (*cp == '\0')
557 1.1 brezak break;
558 1.1 brezak
559 1.1 brezak /*
560 1.1 brezak * Check that current node is a directory.
561 1.1 brezak */
562 1.33 fvdl if ((DIP(fp->f_di, mode) & IFMT) != IFDIR) {
563 1.1 brezak rc = ENOTDIR;
564 1.1 brezak goto out;
565 1.1 brezak }
566 1.1 brezak
567 1.1 brezak /*
568 1.1 brezak * Get next component of path name.
569 1.1 brezak */
570 1.1 brezak {
571 1.30 augustss int len = 0;
572 1.1 brezak
573 1.1 brezak ncp = cp;
574 1.1 brezak while ((c = *cp) != '\0' && c != '/') {
575 1.1 brezak if (++len > MAXNAMLEN) {
576 1.1 brezak rc = ENOENT;
577 1.1 brezak goto out;
578 1.1 brezak }
579 1.1 brezak cp++;
580 1.1 brezak }
581 1.1 brezak *cp = '\0';
582 1.1 brezak }
583 1.1 brezak
584 1.1 brezak /*
585 1.1 brezak * Look up component in current directory.
586 1.1 brezak * Save directory inumber in case we find a
587 1.1 brezak * symbolic link.
588 1.1 brezak */
589 1.23 cgd #ifndef LIBSA_NO_FS_SYMLINK
590 1.1 brezak parent_inumber = inumber;
591 1.23 cgd #endif
592 1.1 brezak rc = search_directory(ncp, f, &inumber);
593 1.1 brezak *cp = c;
594 1.1 brezak if (rc)
595 1.1 brezak goto out;
596 1.1 brezak
597 1.1 brezak /*
598 1.1 brezak * Open next component.
599 1.1 brezak */
600 1.1 brezak if ((rc = read_inode(inumber, f)) != 0)
601 1.1 brezak goto out;
602 1.1 brezak
603 1.23 cgd #ifndef LIBSA_NO_FS_SYMLINK
604 1.1 brezak /*
605 1.1 brezak * Check for symbolic link.
606 1.1 brezak */
607 1.33 fvdl if ((DIP(fp->f_di, mode) & IFMT) == IFLNK) {
608 1.33 fvdl int link_len = DIP(fp->f_di, size);
609 1.10 ws int len;
610 1.10 ws
611 1.10 ws len = strlen(cp);
612 1.1 brezak
613 1.10 ws if (link_len + len > MAXPATHLEN ||
614 1.10 ws ++nlinks > MAXSYMLINKS) {
615 1.1 brezak rc = ENOENT;
616 1.1 brezak goto out;
617 1.1 brezak }
618 1.1 brezak
619 1.10 ws bcopy(cp, &namebuf[link_len], len + 1);
620 1.1 brezak
621 1.9 pk if (link_len < fs->fs_maxsymlinklen) {
622 1.33 fvdl #ifdef LIBSA_SUPPORT_UFS2
623 1.33 fvdl if (is_ufs2)
624 1.33 fvdl bcopy(fp->f_di.dp2.di_db, namebuf,
625 1.33 fvdl (unsigned) link_len);
626 1.33 fvdl else
627 1.33 fvdl #endif
628 1.33 fvdl bcopy(fp->f_di.dp1.di_db, namebuf,
629 1.33 fvdl (unsigned) link_len);
630 1.1 brezak } else {
631 1.1 brezak /*
632 1.1 brezak * Read file for symbolic link
633 1.1 brezak */
634 1.13 cgd size_t buf_size;
635 1.10 ws daddr_t disk_block;
636 1.30 augustss struct fs *fs = fp->f_fs;
637 1.9 pk
638 1.9 pk if (!buf)
639 1.10 ws buf = alloc(fs->fs_bsize);
640 1.10 ws rc = block_map(f, (daddr_t)0, &disk_block);
641 1.9 pk if (rc)
642 1.9 pk goto out;
643 1.22 simonb
644 1.23 cgd #if !defined(LIBSA_NO_TWIDDLE)
645 1.11 mycroft twiddle();
646 1.23 cgd #endif
647 1.23 cgd rc = DEV_STRATEGY(f->f_dev)(f->f_devdata,
648 1.10 ws F_READ, fsbtodb(fs, disk_block),
649 1.9 pk fs->fs_bsize, buf, &buf_size);
650 1.1 brezak if (rc)
651 1.1 brezak goto out;
652 1.1 brezak
653 1.1 brezak bcopy((char *)buf, namebuf, (unsigned)link_len);
654 1.1 brezak }
655 1.1 brezak
656 1.1 brezak /*
657 1.1 brezak * If relative pathname, restart at parent directory.
658 1.1 brezak * If absolute pathname, restart at root.
659 1.1 brezak */
660 1.1 brezak cp = namebuf;
661 1.1 brezak if (*cp != '/')
662 1.1 brezak inumber = parent_inumber;
663 1.1 brezak else
664 1.1 brezak inumber = (ino_t)ROOTINO;
665 1.1 brezak
666 1.9 pk if ((rc = read_inode(inumber, f)) != 0)
667 1.1 brezak goto out;
668 1.1 brezak }
669 1.23 cgd #endif /* !LIBSA_NO_FS_SYMLINK */
670 1.1 brezak }
671 1.1 brezak
672 1.1 brezak /*
673 1.1 brezak * Found terminal component.
674 1.1 brezak */
675 1.1 brezak rc = 0;
676 1.23 cgd
677 1.23 cgd #else /* !LIBSA_FS_SINGLECOMPONENT */
678 1.23 cgd
679 1.23 cgd /* look up component in the current (root) directory */
680 1.23 cgd rc = search_directory(path, f, &inumber);
681 1.23 cgd if (rc)
682 1.23 cgd goto out;
683 1.23 cgd
684 1.23 cgd /* open it */
685 1.23 cgd rc = read_inode(inumber, f);
686 1.23 cgd
687 1.23 cgd #endif /* !LIBSA_FS_SINGLECOMPONENT */
688 1.26 cgd
689 1.26 cgd fp->f_seekp = 0; /* reset seek pointer */
690 1.23 cgd
691 1.1 brezak out:
692 1.23 cgd #ifndef LIBSA_NO_FS_SYMLINK
693 1.9 pk if (buf)
694 1.9 pk free(buf, fs->fs_bsize);
695 1.22 simonb #endif
696 1.16 ws if (rc) {
697 1.17 cgd if (fp->f_buf)
698 1.17 cgd free(fp->f_buf, fp->f_fs->fs_bsize);
699 1.33 fvdl free(fp->f_fs, SBLOCKSIZE);
700 1.1 brezak free(fp, sizeof(struct file));
701 1.16 ws }
702 1.1 brezak return (rc);
703 1.1 brezak }
704 1.1 brezak
705 1.23 cgd #ifndef LIBSA_NO_FS_CLOSE
706 1.1 brezak int
707 1.1 brezak ufs_close(f)
708 1.1 brezak struct open_file *f;
709 1.1 brezak {
710 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
711 1.1 brezak int level;
712 1.1 brezak
713 1.1 brezak f->f_fsdata = (void *)0;
714 1.1 brezak if (fp == (struct file *)0)
715 1.1 brezak return (0);
716 1.1 brezak
717 1.1 brezak for (level = 0; level < NIADDR; level++) {
718 1.1 brezak if (fp->f_blk[level])
719 1.1 brezak free(fp->f_blk[level], fp->f_fs->fs_bsize);
720 1.1 brezak }
721 1.1 brezak if (fp->f_buf)
722 1.1 brezak free(fp->f_buf, fp->f_fs->fs_bsize);
723 1.33 fvdl free(fp->f_fs, SBLOCKSIZE);
724 1.1 brezak free(fp, sizeof(struct file));
725 1.1 brezak return (0);
726 1.1 brezak }
727 1.23 cgd #endif /* !LIBSA_NO_FS_CLOSE */
728 1.1 brezak
729 1.1 brezak /*
730 1.1 brezak * Copy a portion of a file into kernel memory.
731 1.1 brezak * Cross block boundaries when necessary.
732 1.1 brezak */
733 1.1 brezak int
734 1.1 brezak ufs_read(f, start, size, resid)
735 1.1 brezak struct open_file *f;
736 1.12 pk void *start;
737 1.12 pk size_t size;
738 1.12 pk size_t *resid; /* out */
739 1.1 brezak {
740 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
741 1.30 augustss size_t csize;
742 1.1 brezak char *buf;
743 1.13 cgd size_t buf_size;
744 1.1 brezak int rc = 0;
745 1.30 augustss char *addr = start;
746 1.1 brezak
747 1.1 brezak while (size != 0) {
748 1.33 fvdl if (fp->f_seekp >= DIP(fp->f_di, size))
749 1.1 brezak break;
750 1.1 brezak
751 1.1 brezak rc = buf_read_file(f, &buf, &buf_size);
752 1.1 brezak if (rc)
753 1.1 brezak break;
754 1.1 brezak
755 1.1 brezak csize = size;
756 1.1 brezak if (csize > buf_size)
757 1.1 brezak csize = buf_size;
758 1.1 brezak
759 1.12 pk bcopy(buf, addr, csize);
760 1.1 brezak
761 1.1 brezak fp->f_seekp += csize;
762 1.12 pk addr += csize;
763 1.1 brezak size -= csize;
764 1.1 brezak }
765 1.1 brezak if (resid)
766 1.1 brezak *resid = size;
767 1.1 brezak return (rc);
768 1.1 brezak }
769 1.1 brezak
770 1.1 brezak /*
771 1.1 brezak * Not implemented.
772 1.1 brezak */
773 1.23 cgd #ifndef LIBSA_NO_FS_WRITE
774 1.1 brezak int
775 1.1 brezak ufs_write(f, start, size, resid)
776 1.1 brezak struct open_file *f;
777 1.12 pk void *start;
778 1.12 pk size_t size;
779 1.12 pk size_t *resid; /* out */
780 1.1 brezak {
781 1.1 brezak
782 1.1 brezak return (EROFS);
783 1.1 brezak }
784 1.23 cgd #endif /* !LIBSA_NO_FS_WRITE */
785 1.1 brezak
786 1.23 cgd #ifndef LIBSA_NO_FS_SEEK
787 1.1 brezak off_t
788 1.1 brezak ufs_seek(f, offset, where)
789 1.1 brezak struct open_file *f;
790 1.1 brezak off_t offset;
791 1.1 brezak int where;
792 1.1 brezak {
793 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
794 1.1 brezak
795 1.1 brezak switch (where) {
796 1.1 brezak case SEEK_SET:
797 1.1 brezak fp->f_seekp = offset;
798 1.1 brezak break;
799 1.1 brezak case SEEK_CUR:
800 1.1 brezak fp->f_seekp += offset;
801 1.1 brezak break;
802 1.1 brezak case SEEK_END:
803 1.33 fvdl fp->f_seekp = DIP(fp->f_di, size) - offset;
804 1.1 brezak break;
805 1.1 brezak default:
806 1.1 brezak return (-1);
807 1.1 brezak }
808 1.1 brezak return (fp->f_seekp);
809 1.1 brezak }
810 1.23 cgd #endif /* !LIBSA_NO_FS_SEEK */
811 1.1 brezak
812 1.1 brezak int
813 1.1 brezak ufs_stat(f, sb)
814 1.1 brezak struct open_file *f;
815 1.1 brezak struct stat *sb;
816 1.1 brezak {
817 1.30 augustss struct file *fp = (struct file *)f->f_fsdata;
818 1.1 brezak
819 1.1 brezak /* only important stuff */
820 1.33 fvdl sb->st_mode = DIP(fp->f_di, mode);
821 1.33 fvdl sb->st_uid = DIP(fp->f_di, uid);
822 1.33 fvdl sb->st_gid = DIP(fp->f_di, gid);
823 1.33 fvdl sb->st_size = DIP(fp->f_di, size);
824 1.4 pk return (0);
825 1.4 pk }
826 1.4 pk
827 1.4 pk /*
828 1.4 pk * Sanity checks for old file systems.
829 1.4 pk *
830 1.4 pk * XXX - goes away some day.
831 1.4 pk */
832 1.13 cgd static void
833 1.4 pk ffs_oldfscompat(fs)
834 1.4 pk struct fs *fs;
835 1.4 pk {
836 1.4 pk int i;
837 1.4 pk
838 1.33 fvdl if (fs->fs_magic == FS_UFS1_MAGIC && fs->fs_size != fs->fs_old_size) {
839 1.33 fvdl fs->fs_maxbsize = fs->fs_bsize;
840 1.33 fvdl fs->fs_time = fs->fs_old_time;
841 1.33 fvdl fs->fs_size = fs->fs_old_size;
842 1.33 fvdl fs->fs_dsize = fs->fs_old_dsize;
843 1.33 fvdl fs->fs_csaddr = fs->fs_old_csaddr;
844 1.33 fvdl fs->fs_cstotal.cs_ndir = fs->fs_old_cstotal.cs_ndir;
845 1.33 fvdl fs->fs_cstotal.cs_nbfree = fs->fs_old_cstotal.cs_nbfree;
846 1.33 fvdl fs->fs_cstotal.cs_nifree = fs->fs_old_cstotal.cs_nifree;
847 1.33 fvdl fs->fs_cstotal.cs_nffree = fs->fs_old_cstotal.cs_nffree;
848 1.33 fvdl }
849 1.33 fvdl #ifdef COMPAT_UFS
850 1.33 fvdl if (fs->fs_magic == FS_UFS1_MAGIC &&
851 1.33 fvdl fs->fs_old_inodefmt < FS_44INODEFMT) {
852 1.33 fvdl quad_t sizepb = fs->fs_bsize;
853 1.33 fvdl fs->fs_maxfilesize = fs->fs_bsize * NDADDR - 1;
854 1.33 fvdl for (i = 0; i < NIADDR; i++) {
855 1.33 fvdl sizepb *= NINDIR(fs);
856 1.33 fvdl fs->fs_maxfilesize += sizepb;
857 1.33 fvdl }
858 1.33 fvdl fs->fs_qbmask = ~fs->fs_bmask;
859 1.33 fvdl fs->fs_qfmask = ~fs->fs_fmask;
860 1.33 fvdl }
861 1.33 fvdl #endif
862 1.1 brezak }
863