vfs_vnops.c revision 1.17 1 /* $NetBSD: vfs_vnops.c,v 1.17 1994/12/13 21:52:45 mycroft Exp $ */
2
3 /*
4 * Copyright (c) 1982, 1986, 1989, 1993
5 * The Regents of the University of California. All rights reserved.
6 * (c) UNIX System Laboratories, Inc.
7 * All or some portions of this file are derived from material licensed
8 * to the University of California by American Telephone and Telegraph
9 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
10 * the permission of UNIX System Laboratories, Inc.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. All advertising materials mentioning features or use of this software
21 * must display the following acknowledgement:
22 * This product includes software developed by the University of
23 * California, Berkeley and its contributors.
24 * 4. Neither the name of the University nor the names of its contributors
25 * may be used to endorse or promote products derived from this software
26 * without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * SUCH DAMAGE.
39 *
40 * @(#)vfs_vnops.c 8.5 (Berkeley) 12/8/94
41 */
42
43 #include <sys/param.h>
44 #include <sys/systm.h>
45 #include <sys/kernel.h>
46 #include <sys/file.h>
47 #include <sys/stat.h>
48 #include <sys/buf.h>
49 #include <sys/proc.h>
50 #include <sys/mount.h>
51 #include <sys/namei.h>
52 #include <sys/vnode.h>
53 #include <sys/ioctl.h>
54 #include <sys/tty.h>
55
56 #include <vm/vm.h>
57
58 struct fileops vnops =
59 { vn_read, vn_write, vn_ioctl, vn_select, vn_closefile };
60
61 /*
62 * Common code for vnode open operations.
63 * Check permissions, and call the VOP_OPEN or VOP_CREATE routine.
64 */
65 vn_open(ndp, fmode, cmode, fp)
66 register struct nameidata *ndp;
67 int fmode, cmode;
68 struct file *fp;
69 {
70 register struct vnode *vp;
71 register struct proc *p = ndp->ni_cnd.cn_proc;
72 register struct ucred *cred = p->p_ucred;
73 struct vattr vat;
74 struct vattr *vap = &vat;
75 int error;
76
77 if (fmode & O_CREAT) {
78 ndp->ni_cnd.cn_nameiop = CREATE;
79 ndp->ni_cnd.cn_flags = LOCKPARENT | LOCKLEAF;
80 if ((fmode & O_EXCL) == 0)
81 ndp->ni_cnd.cn_flags |= FOLLOW;
82 if (error = namei(ndp))
83 return (error);
84 if (ndp->ni_vp == NULL) {
85 VATTR_NULL(vap);
86 vap->va_type = VREG;
87 vap->va_mode = cmode;
88 VOP_LEASE(ndp->ni_dvp, p, cred, LEASE_WRITE);
89 if (error = VOP_CREATE(ndp->ni_dvp, &ndp->ni_vp,
90 &ndp->ni_cnd, vap))
91 return (error);
92 fmode &= ~O_TRUNC;
93 vp = ndp->ni_vp;
94 } else {
95 VOP_ABORTOP(ndp->ni_dvp, &ndp->ni_cnd);
96 if (ndp->ni_dvp == ndp->ni_vp)
97 vrele(ndp->ni_dvp);
98 else
99 vput(ndp->ni_dvp);
100 ndp->ni_dvp = NULL;
101 vp = ndp->ni_vp;
102 if (fmode & O_EXCL) {
103 error = EEXIST;
104 goto bad;
105 }
106 fmode &= ~O_CREAT;
107 }
108 } else {
109 ndp->ni_cnd.cn_nameiop = LOOKUP;
110 ndp->ni_cnd.cn_flags = FOLLOW | LOCKLEAF;
111 if (error = namei(ndp))
112 return (error);
113 vp = ndp->ni_vp;
114 }
115 if (vp->v_type == VSOCK) {
116 error = EOPNOTSUPP;
117 goto bad;
118 }
119 if ((fmode & O_CREAT) == 0) {
120 if (fmode & FREAD) {
121 if (error = VOP_ACCESS(vp, VREAD, cred, p))
122 goto bad;
123 }
124 if (fmode & (FWRITE | O_TRUNC)) {
125 if (vp->v_type == VDIR) {
126 error = EISDIR;
127 goto bad;
128 }
129 if ((error = vn_writechk(vp)) ||
130 (error = VOP_ACCESS(vp, VWRITE, cred, p)))
131 goto bad;
132 }
133 }
134 if (fmode & O_TRUNC) {
135 VOP_UNLOCK(vp); /* XXX */
136 VOP_LEASE(vp, p, cred, LEASE_WRITE);
137 VOP_LOCK(vp); /* XXX */
138 VATTR_NULL(vap);
139 vap->va_size = 0;
140 if (error = VOP_SETATTR(vp, vap, cred, p))
141 goto bad;
142 }
143 if (error = VOP_OPEN(vp, fmode, cred, p, fp))
144 goto bad;
145 if (fmode & FWRITE)
146 vp->v_writecount++;
147 return (0);
148 bad:
149 vput(vp);
150 return (error);
151 }
152
153 /*
154 * Check for write permissions on the specified vnode.
155 * The read-only status of the file system is checked.
156 * Also, prototype text segments cannot be written.
157 */
158 vn_writechk(vp)
159 register struct vnode *vp;
160 {
161
162 /*
163 * Disallow write attempts on read-only file systems;
164 * unless the file is a socket or a block or character
165 * device resident on the file system.
166 */
167 if (vp->v_mount->mnt_flag & MNT_RDONLY) {
168 switch (vp->v_type) {
169 case VREG: case VDIR: case VLNK:
170 return (EROFS);
171 }
172 }
173 /*
174 * If there's shared text associated with
175 * the vnode, try to free it up once. If
176 * we fail, we can't allow writing.
177 */
178 if ((vp->v_flag & VTEXT) && !vnode_pager_uncache(vp))
179 return (ETXTBSY);
180 return (0);
181 }
182
183 /*
184 * Vnode close call
185 */
186 vn_close(vp, flags, cred, p)
187 register struct vnode *vp;
188 int flags;
189 struct ucred *cred;
190 struct proc *p;
191 {
192 int error;
193
194 if (flags & FWRITE)
195 vp->v_writecount--;
196 error = VOP_CLOSE(vp, flags, cred, p);
197 vrele(vp);
198 return (error);
199 }
200
201 /*
202 * Package up an I/O request on a vnode into a uio and do it.
203 */
204 vn_rdwr(rw, vp, base, len, offset, segflg, ioflg, cred, aresid, p)
205 enum uio_rw rw;
206 struct vnode *vp;
207 caddr_t base;
208 int len;
209 off_t offset;
210 enum uio_seg segflg;
211 int ioflg;
212 struct ucred *cred;
213 int *aresid;
214 struct proc *p;
215 {
216 struct uio auio;
217 struct iovec aiov;
218 int error;
219
220 if ((ioflg & IO_NODELOCKED) == 0)
221 VOP_LOCK(vp);
222 auio.uio_iov = &aiov;
223 auio.uio_iovcnt = 1;
224 aiov.iov_base = base;
225 aiov.iov_len = len;
226 auio.uio_resid = len;
227 auio.uio_offset = offset;
228 auio.uio_segflg = segflg;
229 auio.uio_rw = rw;
230 auio.uio_procp = p;
231 if (rw == UIO_READ) {
232 error = VOP_READ(vp, &auio, ioflg, cred);
233 } else {
234 error = VOP_WRITE(vp, &auio, ioflg, cred);
235 }
236 if (aresid)
237 *aresid = auio.uio_resid;
238 else
239 if (auio.uio_resid && error == 0)
240 error = EIO;
241 if ((ioflg & IO_NODELOCKED) == 0)
242 VOP_UNLOCK(vp);
243 return (error);
244 }
245
246 /*
247 * File table vnode read routine.
248 */
249 vn_read(fp, uio, cred)
250 struct file *fp;
251 struct uio *uio;
252 struct ucred *cred;
253 {
254 register struct vnode *vp = (struct vnode *)fp->f_data;
255 int count, error;
256
257 VOP_LEASE(vp, uio->uio_procp, cred, LEASE_READ);
258 VOP_LOCK(vp);
259 uio->uio_offset = fp->f_offset;
260 count = uio->uio_resid;
261 error = VOP_READ(vp, uio, (fp->f_flag & FNONBLOCK) ? IO_NDELAY : 0,
262 cred);
263 fp->f_offset += count - uio->uio_resid;
264 VOP_UNLOCK(vp);
265 return (error);
266 }
267
268 /*
269 * File table vnode write routine.
270 */
271 vn_write(fp, uio, cred)
272 struct file *fp;
273 struct uio *uio;
274 struct ucred *cred;
275 {
276 register struct vnode *vp = (struct vnode *)fp->f_data;
277 int count, error, ioflag = IO_UNIT;
278
279 if (vp->v_type == VREG && (fp->f_flag & O_APPEND))
280 ioflag |= IO_APPEND;
281 if (fp->f_flag & FNONBLOCK)
282 ioflag |= IO_NDELAY;
283 VOP_LEASE(vp, uio->uio_procp, cred, LEASE_WRITE);
284 VOP_LOCK(vp);
285 uio->uio_offset = fp->f_offset;
286 count = uio->uio_resid;
287 error = VOP_WRITE(vp, uio, ioflag, cred);
288 if (ioflag & IO_APPEND)
289 fp->f_offset = uio->uio_offset;
290 else
291 fp->f_offset += count - uio->uio_resid;
292 VOP_UNLOCK(vp);
293 return (error);
294 }
295
296 /*
297 * File table vnode stat routine.
298 */
299 vn_stat(vp, sb, p)
300 struct vnode *vp;
301 register struct stat *sb;
302 struct proc *p;
303 {
304 struct vattr vattr;
305 register struct vattr *vap;
306 int error;
307 u_short mode;
308
309 vap = &vattr;
310 error = VOP_GETATTR(vp, vap, p->p_ucred, p);
311 if (error)
312 return (error);
313 /*
314 * Copy from vattr table
315 */
316 sb->st_dev = vap->va_fsid;
317 sb->st_ino = vap->va_fileid;
318 mode = vap->va_mode;
319 switch (vp->v_type) {
320 case VREG:
321 mode |= S_IFREG;
322 break;
323 case VDIR:
324 mode |= S_IFDIR;
325 break;
326 case VBLK:
327 mode |= S_IFBLK;
328 break;
329 case VCHR:
330 mode |= S_IFCHR;
331 break;
332 case VLNK:
333 mode |= S_IFLNK;
334 break;
335 case VSOCK:
336 mode |= S_IFSOCK;
337 break;
338 case VFIFO:
339 mode |= S_IFIFO;
340 break;
341 default:
342 return (EBADF);
343 };
344 sb->st_mode = mode;
345 sb->st_nlink = vap->va_nlink;
346 sb->st_uid = vap->va_uid;
347 sb->st_gid = vap->va_gid;
348 sb->st_rdev = vap->va_rdev;
349 sb->st_size = vap->va_size;
350 sb->st_atimespec = vap->va_atime;
351 sb->st_mtimespec = vap->va_mtime;
352 sb->st_ctimespec = vap->va_ctime;
353 sb->st_blksize = vap->va_blocksize;
354 sb->st_flags = vap->va_flags;
355 sb->st_gen = vap->va_gen;
356 sb->st_blocks = vap->va_bytes / S_BLKSIZE;
357 return (0);
358 }
359
360 /*
361 * File table vnode ioctl routine.
362 */
363 vn_ioctl(fp, com, data, p)
364 struct file *fp;
365 u_long com;
366 caddr_t data;
367 struct proc *p;
368 {
369 register struct vnode *vp = ((struct vnode *)fp->f_data);
370 struct vattr vattr;
371 int error;
372
373 switch (vp->v_type) {
374
375 case VREG:
376 case VDIR:
377 if (com == FIONREAD) {
378 if (error = VOP_GETATTR(vp, &vattr, p->p_ucred, p))
379 return (error);
380 *(int *)data = vattr.va_size - fp->f_offset;
381 return (0);
382 }
383 if (com == FIONBIO || com == FIOASYNC) /* XXX */
384 return (0); /* XXX */
385 /* fall into ... */
386
387 default:
388 return (ENOTTY);
389
390 case VFIFO:
391 case VCHR:
392 case VBLK:
393 error = VOP_IOCTL(vp, com, data, fp->f_flag, p->p_ucred, p);
394 if (error == 0 && com == TIOCSCTTY) {
395 if (p->p_session->s_ttyvp)
396 vrele(p->p_session->s_ttyvp);
397 p->p_session->s_ttyvp = vp;
398 VREF(vp);
399 }
400 return (error);
401 }
402 }
403
404 /*
405 * File table vnode select routine.
406 */
407 vn_select(fp, which, p)
408 struct file *fp;
409 int which;
410 struct proc *p;
411 {
412
413 return (VOP_SELECT(((struct vnode *)fp->f_data), which, fp->f_flag,
414 fp->f_cred, p));
415 }
416
417 /*
418 * File table vnode close routine.
419 */
420 vn_closefile(fp, p)
421 struct file *fp;
422 struct proc *p;
423 {
424
425 return (vn_close(((struct vnode *)fp->f_data), fp->f_flag,
426 fp->f_cred, p));
427 }
428