xref: /original-bsd/sys/ufs/lfs/lfs_vnops.c (revision 68d9582f)
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.84 (Berkeley) 06/17/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, lfs_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, lfs_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 	register struct uio *uio = ap->a_uio;
257 	struct proc *p = uio->uio_procp;
258 	register struct inode *ip = VTOI(vp);
259 	register struct lfs *fs;
260 	register ioflag = ap->a_ioflag;
261 	struct buf *bp;
262 	daddr_t lbn;
263 	off_t osize;
264 	int n, on, flags, newblock;
265 	int size, resid, error = 0;
266 
267 #ifdef VERBOSE
268 	printf("lfs_write ino %d\n", ip->i_number);
269 #endif
270 #ifdef DIAGNOSTIC
271 	if (uio->uio_rw != UIO_WRITE)
272 		panic("lfs_write mode");
273 #endif
274 	switch (vp->v_type) {
275 	case VREG:
276 		if (ioflag & IO_APPEND)
277 			uio->uio_offset = ip->i_size;
278 		/* fall through */
279 	case VLNK:
280 		break;
281 
282 	case VDIR:
283 		/* XXX This may not be correct for LFS. */
284 		if ((ioflag & IO_SYNC) == 0)
285 			panic("lfs_write nonsync dir write");
286 		break;
287 
288 	default:
289 		panic("lfs_write type");
290 	}
291 	if (uio->uio_offset < 0)
292 		return (EINVAL);
293 	if (uio->uio_resid == 0)
294 		return (0);
295 	/*
296 	 * Maybe this should be above the vnode op call, but so long as
297 	 * file servers have no limits, i don't think it matters
298 	 */
299 	if (vp->v_type == VREG && p &&
300 	    uio->uio_offset + uio->uio_resid >
301 	      p->p_rlimit[RLIMIT_FSIZE].rlim_cur) {
302 		psignal(p, SIGXFSZ);
303 		return (EFBIG);
304 	}
305 	resid = uio->uio_resid;
306 	osize = ip->i_size;
307 	fs = ip->i_lfs;						/* LFS */
308 	flags = 0;
309 #ifdef NOTLFS
310 	if (ioflag & IO_SYNC)
311 		flags = B_SYNC;
312 #endif
313 	do {
314 		lbn = lblkno(fs, uio->uio_offset);
315 		on = blkoff(fs, uio->uio_offset);
316 		n = MIN((unsigned)(fs->lfs_bsize - on), uio->uio_resid);
317 		if (error = lfs_balloc(vp, n, lbn, &bp))
318 			break;
319 		if (uio->uio_offset + n > ip->i_size) {
320 			ip->i_size = uio->uio_offset + n;
321 			vnode_pager_setsize(vp, (u_long)ip->i_size);
322 		}
323 		size = blksize(fs);
324 		(void) vnode_pager_uncache(vp);
325 		n = MIN(n, size - bp->b_resid);
326 		error = uiomove(bp->b_un.b_addr + on, n, uio);
327 #ifdef NOTLFS							/* LFS */
328 		if (ioflag & IO_SYNC)
329 			(void) bwrite(bp);
330 		else if (n + on == fs->fs_bsize) {
331 			bp->b_flags |= B_AGE;
332 			bawrite(bp);
333 		} else
334 			bdwrite(bp);
335 		ip->i_flag |= IUPD|ICHG;
336 #else
337 		/* XXX This doesn't handle IO_SYNC. */
338 		LFS_UBWRITE(bp);
339 #endif
340 		if (ap->a_cred->cr_uid != 0)
341 			ip->i_mode &= ~(ISUID|ISGID);
342 	} while (error == 0 && uio->uio_resid > 0 && n != 0);
343 	if (error && (ioflag & IO_UNIT)) {
344 		(void)VOP_TRUNCATE(vp, osize, ioflag & IO_SYNC, ap->a_cred);
345 		uio->uio_offset -= resid - uio->uio_resid;
346 		uio->uio_resid = resid;
347 	}
348 	if (!error && (ioflag & IO_SYNC))
349 		error = VOP_UPDATE(vp, &time, &time, 1);
350 	return (error);
351 }
352 
353 /*
354  * Synch an open file.
355  */
356 /* ARGSUSED */
357 lfs_fsync(ap)
358 	struct vop_fsync_args *ap;
359 {
360 	USES_VOP_UPDATE;
361 	struct inode *ip;
362 
363 #ifdef VERBOSE
364 	printf("lfs_fsync\n");
365 #endif
366 	ip = VTOI(ap->a_vp);
367 	if (ap->a_fflags & FWRITE)
368 		ip->i_flag |= ICHG;
369 	return (VOP_UPDATE(ap->a_vp, &time, &time, ap->a_waitfor == MNT_WAIT));
370 }
371 
372 /*
373  * Last reference to an inode, write the inode out and if necessary,
374  * truncate and deallocate the file.
375  */
376 int
377 lfs_inactive(ap)
378 	struct vop_inactive_args *ap;
379 {
380 	USES_VOP_TRUNCATE;
381 	USES_VOP_UPDATE;
382 	USES_VOP_VFREE;
383 	extern int prtactive;
384 	register struct vnode *vp = ap->a_vp;
385 	register struct inode *ip;
386 	int mode, error;
387 
388 #ifdef VERBOSE
389 	printf("lfs_inactive\n");
390 #endif
391 	if (prtactive && vp->v_usecount != 0)
392 		vprint("lfs_inactive: pushing active", vp);
393 
394 	/* Get rid of inodes related to stale file handles. */
395 	ip = VTOI(vp);
396 	if (ip->i_mode == 0) {
397 		if ((vp->v_flag & VXLOCK) == 0)
398 			vgone(vp);
399 		return (0);
400 	}
401 
402 	error = 0;
403 	ILOCK(ip);
404 	if (ip->i_nlink <= 0 && (vp->v_mount->mnt_flag & MNT_RDONLY) == 0) {
405 #ifdef QUOTA
406 		if (!getinoquota(ip))
407 			(void)chkiq(ip, -1, NOCRED, 0);
408 #endif
409 		error = VOP_TRUNCATE(vp, (off_t)0, 0, NOCRED);
410 		mode = ip->i_mode;
411 		ip->i_mode = 0;
412 		ip->i_rdev = 0;
413 		ip->i_flag |= IUPD|ICHG;
414 		VOP_VFREE(vp, ip->i_number, mode);
415 	}
416 	if (ip->i_flag&(IUPD|IACC|ICHG|IMOD))
417 		VOP_UPDATE(vp, &time, &time, 0);
418 	IUNLOCK(ip);
419 	ip->i_flag = 0;
420 	/*
421 	 * If we are done with the inode, reclaim it
422 	 * so that it can be reused immediately.
423 	 */
424 	if (vp->v_usecount == 0 && ip->i_mode == 0)
425 		vgone(vp);
426 	return (error);
427 }
428