xref: /original-bsd/sys/ufs/lfs/lfs_vnops.c (revision 3b6250d9)
1 /*
2  * Copyright (c) 1986, 1989, 1991 Regents of the University of California.
3  * All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  *
7  *	@(#)lfs_vnops.c	7.83 (Berkeley) 06/04/92
8  */
9 
10 #include <sys/param.h>
11 #include <sys/systm.h>
12 #include <sys/namei.h>
13 #include <sys/resourcevar.h>
14 #include <sys/kernel.h>
15 #include <sys/file.h>
16 #include <sys/stat.h>
17 #include <sys/buf.h>
18 #include <sys/proc.h>
19 #include <sys/conf.h>
20 #include <sys/mount.h>
21 #include <sys/vnode.h>
22 #include <sys/specdev.h>
23 #include <sys/fifo.h>
24 #include <sys/malloc.h>
25 
26 #include <vm/vm.h>
27 
28 #include <ufs/ufs/quota.h>
29 #include <ufs/ufs/inode.h>
30 #include <ufs/ufs/dir.h>
31 #include <ufs/ufs/ufs_extern.h>
32 
33 #include <ufs/lfs/lfs.h>
34 #include <ufs/lfs/lfs_extern.h>
35 
36 /* Global vfs data structures for lfs. */
37 int (**lfs_vnodeop_p)();
38 struct vnodeopv_entry_desc lfs_vnodeop_entries[] = {
39 	{ &vop_default_desc, vn_default_error },
40 	{ &vop_lookup_desc, ufs_lookup },		/* lookup */
41 	{ &vop_create_desc, ufs_create },		/* create */
42 	{ &vop_mknod_desc, ufs_mknod },		/* mknod */
43 	{ &vop_open_desc, ufs_open },		/* open */
44 	{ &vop_close_desc, ufs_close },		/* close */
45 	{ &vop_access_desc, ufs_access },		/* access */
46 	{ &vop_getattr_desc, ufs_getattr },		/* getattr */
47 	{ &vop_setattr_desc, ufs_setattr },		/* setattr */
48 	{ &vop_read_desc, lfs_read },		/* read */
49 	{ &vop_write_desc, lfs_write },		/* write */
50 	{ &vop_ioctl_desc, ufs_ioctl },		/* ioctl */
51 	{ &vop_select_desc, ufs_select },		/* select */
52 	{ &vop_mmap_desc, ufs_mmap },		/* mmap */
53 	{ &vop_fsync_desc, lfs_fsync },		/* fsync */
54 	{ &vop_seek_desc, ufs_seek },		/* seek */
55 	{ &vop_remove_desc, ufs_remove },		/* remove */
56 	{ &vop_link_desc, ufs_link },		/* link */
57 	{ &vop_rename_desc, ufs_rename },		/* rename */
58 	{ &vop_mkdir_desc, ufs_mkdir },		/* mkdir */
59 	{ &vop_rmdir_desc, ufs_rmdir },		/* rmdir */
60 	{ &vop_symlink_desc, ufs_symlink },		/* symlink */
61 	{ &vop_readdir_desc, ufs_readdir },		/* readdir */
62 	{ &vop_readlink_desc, ufs_readlink },		/* readlink */
63 	{ &vop_abortop_desc, ufs_abortop },		/* abortop */
64 	{ &vop_inactive_desc, lfs_inactive },		/* inactive */
65 	{ &vop_reclaim_desc, ufs_reclaim },		/* reclaim */
66 	{ &vop_lock_desc, ufs_lock },		/* lock */
67 	{ &vop_unlock_desc, ufs_unlock },		/* unlock */
68 	{ &vop_bmap_desc, lfs_bmap },		/* bmap */
69 	{ &vop_strategy_desc, ufs_strategy },		/* strategy */
70 	{ &vop_print_desc, ufs_print },		/* print */
71 	{ &vop_islocked_desc, ufs_islocked },		/* islocked */
72 	{ &vop_advlock_desc, ufs_advlock },		/* advlock */
73 	{ &vop_blkatoff_desc, lfs_blkatoff },		/* blkatoff */
74 	{ &vop_vget_desc, lfs_vget },		/* vget */
75 	{ &vop_valloc_desc, lfs_valloc },		/* valloc */
76 	{ &vop_vfree_desc, lfs_vfree },		/* vfree */
77 	{ &vop_truncate_desc, lfs_truncate },		/* truncate */
78 	{ &vop_update_desc, lfs_update },		/* update */
79 	{ &vop_bwrite_desc, lfs_bwrite },		/* bwrite */
80 	{ (struct vnodeop_desc*)NULL, (int(*)())NULL }
81 };
82 struct vnodeopv_desc lfs_vnodeop_opv_desc =
83 	{ &lfs_vnodeop_p, lfs_vnodeop_entries };
84 
85 int (**lfs_specop_p)();
86 struct vnodeopv_entry_desc lfs_specop_entries[] = {
87 	{ &vop_default_desc, vn_default_error },
88 	{ &vop_lookup_desc, spec_lookup },		/* lookup */
89 	{ &vop_create_desc, spec_create },		/* create */
90 	{ &vop_mknod_desc, spec_mknod },		/* mknod */
91 	{ &vop_open_desc, spec_open },		/* open */
92 	{ &vop_close_desc, ufsspec_close },		/* close */
93 	{ &vop_access_desc, ufs_access },		/* access */
94 	{ &vop_getattr_desc, ufs_getattr },		/* getattr */
95 	{ &vop_setattr_desc, ufs_setattr },		/* setattr */
96 	{ &vop_read_desc, ufsspec_read },		/* read */
97 	{ &vop_write_desc, ufsspec_write },		/* write */
98 	{ &vop_ioctl_desc, spec_ioctl },		/* ioctl */
99 	{ &vop_select_desc, spec_select },		/* select */
100 	{ &vop_mmap_desc, spec_mmap },		/* mmap */
101 	{ &vop_fsync_desc, spec_fsync },		/* fsync */
102 	{ &vop_seek_desc, spec_seek },		/* seek */
103 	{ &vop_remove_desc, spec_remove },		/* remove */
104 	{ &vop_link_desc, spec_link },		/* link */
105 	{ &vop_rename_desc, spec_rename },		/* rename */
106 	{ &vop_mkdir_desc, spec_mkdir },		/* mkdir */
107 	{ &vop_rmdir_desc, spec_rmdir },		/* rmdir */
108 	{ &vop_symlink_desc, spec_symlink },		/* symlink */
109 	{ &vop_readdir_desc, spec_readdir },		/* readdir */
110 	{ &vop_readlink_desc, spec_readlink },		/* readlink */
111 	{ &vop_abortop_desc, spec_abortop },		/* abortop */
112 	{ &vop_inactive_desc, lfs_inactive },		/* inactive */
113 	{ &vop_reclaim_desc, ufs_reclaim },		/* reclaim */
114 	{ &vop_lock_desc, ufs_lock },		/* lock */
115 	{ &vop_unlock_desc, ufs_unlock },		/* unlock */
116 	{ &vop_bmap_desc, spec_bmap },		/* bmap */
117 	{ &vop_strategy_desc, spec_strategy },		/* strategy */
118 	{ &vop_print_desc, ufs_print },		/* print */
119 	{ &vop_islocked_desc, ufs_islocked },		/* islocked */
120 	{ &vop_advlock_desc, spec_advlock },		/* advlock */
121 	{ &vop_blkatoff_desc, spec_blkatoff },		/* blkatoff */
122 	{ &vop_vget_desc, spec_vget },		/* vget */
123 	{ &vop_valloc_desc, spec_valloc },		/* valloc */
124 	{ &vop_vfree_desc, spec_vfree },		/* vfree */
125 	{ &vop_truncate_desc, spec_truncate },		/* truncate */
126 	{ &vop_update_desc, lfs_update },		/* update */
127 	{ &vop_bwrite_desc, lfs_bwrite },		/* bwrite */
128 	{ (struct vnodeop_desc*)NULL, (int(*)())NULL }
129 };
130 struct vnodeopv_desc lfs_specop_opv_desc =
131 	{ &lfs_specop_p, lfs_specop_entries };
132 
133 #ifdef FIFO
134 int (**lfs_fifoop_p)();
135 struct vnodeopv_entry_desc lfs_fifoop_entries[] = {
136 	{ &vop_default_desc, vn_default_error },
137 	{ &vop_lookup_desc, fifo_lookup },		/* lookup */
138 	{ &vop_create_desc, fifo_create },		/* create */
139 	{ &vop_mknod_desc, fifo_mknod },		/* mknod */
140 	{ &vop_open_desc, fifo_open },		/* open */
141 	{ &vop_close_desc, ufsfifo_close },		/* close */
142 	{ &vop_access_desc, ufs_access },		/* access */
143 	{ &vop_getattr_desc, ufs_getattr },		/* getattr */
144 	{ &vop_setattr_desc, ufs_setattr },		/* setattr */
145 	{ &vop_read_desc, ufsfifo_read },		/* read */
146 	{ &vop_write_desc, ufsfifo_write },		/* write */
147 	{ &vop_ioctl_desc, fifo_ioctl },		/* ioctl */
148 	{ &vop_select_desc, fifo_select },		/* select */
149 	{ &vop_mmap_desc, fifo_mmap },		/* mmap */
150 	{ &vop_fsync_desc, fifo_fsync },		/* fsync */
151 	{ &vop_seek_desc, fifo_seek },		/* seek */
152 	{ &vop_remove_desc, fifo_remove },		/* remove */
153 	{ &vop_link_desc, fifo_link },		/* link */
154 	{ &vop_rename_desc, fifo_rename },		/* rename */
155 	{ &vop_mkdir_desc, fifo_mkdir },		/* mkdir */
156 	{ &vop_rmdir_desc, fifo_rmdir },		/* rmdir */
157 	{ &vop_symlink_desc, fifo_symlink },		/* symlink */
158 	{ &vop_readdir_desc, fifo_readdir },		/* readdir */
159 	{ &vop_readlink_desc, fifo_readlink },		/* readlink */
160 	{ &vop_abortop_desc, fifo_abortop },		/* abortop */
161 	{ &vop_inactive_desc, lfs_inactive },		/* inactive */
162 	{ &vop_reclaim_desc, ufs_reclaim },		/* reclaim */
163 	{ &vop_lock_desc, ufs_lock },		/* lock */
164 	{ &vop_unlock_desc, ufs_unlock },		/* unlock */
165 	{ &vop_bmap_desc, fifo_bmap },		/* bmap */
166 	{ &vop_strategy_desc, fifo_strategy },		/* strategy */
167 	{ &vop_print_desc, ufs_print },		/* print */
168 	{ &vop_islocked_desc, ufs_islocked },		/* islocked */
169 	{ &vop_advlock_desc, fifo_advlock },		/* advlock */
170 	{ &vop_blkatoff_desc, fifo_blkatoff },		/* blkatoff */
171 	{ &vop_vget_desc, fifo_vget },		/* vget */
172 	{ &vop_valloc_desc, fifo_valloc },		/* valloc */
173 	{ &vop_vfree_desc, fifo_vfree },		/* vfree */
174 	{ &vop_truncate_desc, fifo_truncate },		/* truncate */
175 	{ &vop_update_desc, lfs_update },		/* update */
176 	{ &vop_bwrite_desc, lfs_bwrite },		/* bwrite */
177 	{ (struct vnodeop_desc*)NULL, (int(*)())NULL }
178 };
179 struct vnodeopv_desc lfs_fifoop_opv_desc =
180 	{ &lfs_fifoop_p, lfs_fifoop_entries };
181 #endif /* FIFO */
182 
183 /*
184  * Vnode op for reading.
185  */
186 /* ARGSUSED */
187 lfs_read (ap)
188 	struct vop_read_args *ap;
189 {
190 	register struct uio *uio = ap->a_uio;
191 	register struct inode *ip = VTOI(ap->a_vp);
192 	register struct lfs *fs;				/* LFS */
193 	struct buf *bp;
194 	daddr_t lbn, bn, rablock;
195 	int size, error = 0;
196 	long n, on, type;
197 	off_t diff;
198 
199 #ifdef VERBOSE
200 	printf("lfs_read: ino %d\n", ip->i_number);
201 #endif
202 #ifdef DIAGNOSTIC
203 	if (uio->uio_rw != UIO_READ)
204 		panic("ufs_read mode");
205 	type = ip->i_mode & IFMT;
206 	if (type != IFDIR && type != IFREG && type != IFLNK)
207 		panic("ufs_read type");
208 #endif
209 	if (uio->uio_resid == 0)
210 		return (0);
211 	if (uio->uio_offset < 0)
212 		return (EINVAL);
213 	ip->i_flag |= IACC;
214 
215 	fs = ip->i_lfs;						/* LFS */
216 	do {
217 		lbn = lblkno(fs, uio->uio_offset);
218 		on = blkoff(fs, uio->uio_offset);
219 		n = MIN((unsigned)(fs->lfs_bsize - on), uio->uio_resid);
220 		diff = ip->i_size - uio->uio_offset;
221 		if (diff <= 0)
222 			return (0);
223 		if (diff < n)
224 			n = diff;
225 		size = blksize(fs);				/* LFS */
226 		rablock = lbn + 1;
227 		if (ap->a_vp->v_lastr + 1 == lbn &&
228 		    lblktosize(fs, rablock) < ip->i_size)
229 			error = breadn(ITOV(ip), lbn, size, &rablock,
230 				&size, 1, NOCRED, &bp);
231 		else
232 			error = bread(ITOV(ip), lbn, size, NOCRED, &bp);
233 		ap->a_vp->v_lastr = lbn;
234 		n = MIN(n, size - bp->b_resid);
235 		if (error) {
236 			brelse(bp);
237 			return (error);
238 		}
239 		error = uiomove(bp->b_un.b_addr + on, (int)n, uio);
240 		if (n + on == fs->lfs_bsize || uio->uio_offset == ip->i_size)
241 			bp->b_flags |= B_AGE;
242 		brelse(bp);
243 	} while (error == 0 && uio->uio_resid > 0 && n != 0);
244 	return (error);
245 }
246 
247 /*
248  * Vnode op for writing.
249  */
250 lfs_write (ap)
251 	struct vop_write_args *ap;
252 {
253 	USES_VOP_TRUNCATE;
254 	USES_VOP_UPDATE;
255 	register struct vnode *vp = ap->a_vp;
256 	struct proc *p = ap->a_uio->uio_procp;
257 	register struct inode *ip = VTOI(vp);
258 	register struct lfs *fs;
259 	struct buf *bp;
260 	daddr_t lbn;
261 	off_t osize;
262 	int n, on, flags, newblock;
263 	int size, resid, error = 0;
264 
265 #ifdef VERBOSE
266 	printf("lfs_write ino %d\n", ip->i_number);
267 #endif
268 #ifdef DIAGNOSTIC
269 	if (ap->a_uio->uio_rw != UIO_WRITE)
270 		panic("lfs_write mode");
271 #endif
272 	switch (vp->v_type) {
273 	case VREG:
274 		if (ap->a_ioflag & IO_APPEND)
275 			ap->a_uio->uio_offset = ip->i_size;
276 		/* fall through */
277 	case VLNK:
278 		break;
279 
280 	case VDIR:
281 		/* XXX This may not be correct for LFS. */
282 		if ((ap->a_ioflag & IO_SYNC) == 0)
283 			panic("lfs_write nonsync dir write");
284 		break;
285 
286 	default:
287 		panic("lfs_write type");
288 	}
289 	if (ap->a_uio->uio_offset < 0)
290 		return (EINVAL);
291 	if (ap->a_uio->uio_resid == 0)
292 		return (0);
293 	/*
294 	 * Maybe this should be above the vnode op call, but so long as
295 	 * file servers have no limits, i don't think it matters
296 	 */
297 	if (vp->v_type == VREG && p &&
298 	    ap->a_uio->uio_offset + ap->a_uio->uio_resid >
299 	      p->p_rlimit[RLIMIT_FSIZE].rlim_cur) {
300 		psignal(p, SIGXFSZ);
301 		return (EFBIG);
302 	}
303 	resid = ap->a_uio->uio_resid;
304 	osize = ip->i_size;
305 	fs = ip->i_lfs;						/* LFS */
306 	flags = 0;
307 #ifdef NOTLFS
308 	if (ap->a_ioflag & IO_SYNC)
309 		flags = B_SYNC;
310 #endif
311 	do {
312 		lbn = lblkno(fs, ap->a_uio->uio_offset);
313 		on = blkoff(fs, ap->a_uio->uio_offset);
314 		n = MIN((unsigned)(fs->lfs_bsize - on), ap->a_uio->uio_resid);
315 		if (error = lfs_balloc(vp, n, lbn, &bp))
316 			break;
317 		if (ap->a_uio->uio_offset + n > ip->i_size) {
318 			ip->i_size = ap->a_uio->uio_offset + n;
319 			vnode_pager_setsize(vp, (u_long)ip->i_size);
320 		}
321 		size = blksize(fs);
322 		(void) vnode_pager_uncache(vp);
323 		n = MIN(n, size - bp->b_resid);
324 		error = uiomove(bp->b_un.b_addr + on, n, ap->a_uio);
325 #ifdef NOTLFS							/* LFS */
326 		if (ap->a_ioflag & IO_SYNC)
327 			(void) bwrite(bp);
328 		else if (n + on == fs->fs_bsize) {
329 			bp->b_flags |= B_AGE;
330 			bawrite(bp);
331 		} else
332 			bdwrite(bp);
333 		ip->i_flag |= IUPD|ICHG;
334 #else
335 		/* XXX This doesn't handle IO_SYNC. */
336 		LFS_UBWRITE(bp);
337 #endif
338 		if (ap->a_cred->cr_uid != 0)
339 			ip->i_mode &= ~(ISUID|ISGID);
340 	} while (error == 0 && ap->a_uio->uio_resid > 0 && n != 0);
341 	if (error && (ap->a_ioflag & IO_UNIT)) {
342 		(void)VOP_TRUNCATE(vp, osize, ap->a_ioflag & IO_SYNC, ap->a_cred);
343 		ap->a_uio->uio_offset -= resid - ap->a_uio->uio_resid;
344 		ap->a_uio->uio_resid = resid;
345 	}
346 	if (!error && (ap->a_ioflag & IO_SYNC))
347 		error = VOP_UPDATE(vp, &time, &time, 1);
348 	return (error);
349 }
350 
351 /*
352  * Synch an open file.
353  */
354 /* ARGSUSED */
355 lfs_fsync (ap)
356 	struct vop_fsync_args *ap;
357 {
358 	USES_VOP_UPDATE;
359 	struct inode *ip;
360 
361 #ifdef VERBOSE
362 	printf("lfs_fsync\n");
363 #endif
364 	ip = VTOI(ap->a_vp);
365 	if (ap->a_fflags & FWRITE)
366 		ip->i_flag |= ICHG;
367 	return (VOP_UPDATE(ap->a_vp, &time, &time, ap->a_waitfor == MNT_WAIT));
368 }
369 
370 /*
371  * Last reference to an inode, write the inode out and if necessary,
372  * truncate and deallocate the file.
373  */
374 int
375 lfs_inactive (ap)
376 	struct vop_inactive_args *ap;
377 {
378 	USES_VOP_TRUNCATE;
379 	USES_VOP_UPDATE;
380 	USES_VOP_VFREE;
381 	extern int prtactive;
382 	register struct inode *ip;
383 	int mode, error;
384 
385 #ifdef VERBOSE
386 	printf("lfs_inactive\n");
387 #endif
388 	if (prtactive && ap->a_vp->v_usecount != 0)
389 		vprint("lfs_inactive: pushing active", ap->a_vp);
390 
391 	/* Get rid of inodes related to stale file handles. */
392 	ip = VTOI(ap->a_vp);
393 	if (ip->i_mode == 0) {
394 		if ((ap->a_vp->v_flag & VXLOCK) == 0)
395 			vgone(ap->a_vp);
396 		return (0);
397 	}
398 
399 	error = 0;
400 	ILOCK(ip);
401 	if (ip->i_nlink <= 0 && (ap->a_vp->v_mount->mnt_flag & MNT_RDONLY) == 0) {
402 #ifdef QUOTA
403 		if (!getinoquota(ip))
404 			(void)chkiq(ip, -1, NOCRED, 0);
405 #endif
406 		error = VOP_TRUNCATE(ap->a_vp, (off_t)0, 0, NOCRED);
407 		mode = ip->i_mode;
408 		ip->i_mode = 0;
409 		ip->i_rdev = 0;
410 		ip->i_flag |= IUPD|ICHG;
411 		VOP_VFREE(ap->a_vp, ip->i_number, mode);
412 	}
413 	if (ip->i_flag&(IUPD|IACC|ICHG|IMOD))
414 		VOP_UPDATE(ap->a_vp, &time, &time, 0);
415 	IUNLOCK(ip);
416 	ip->i_flag = 0;
417 	/*
418 	 * If we are done with the inode, reclaim it
419 	 * so that it can be reused immediately.
420 	 */
421 	if (ap->a_vp->v_usecount == 0 && ip->i_mode == 0)
422 		vgone(ap->a_vp);
423 	return (error);
424 }
425