1 /* $NetBSD: sysvbfs_vfsops.c,v 1.28 2009/04/09 09:56:30 pooka Exp $ */ 2 3 /*- 4 * Copyright (c) 2004 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by UCHIYAMA Yasushi. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 __KERNEL_RCSID(0, "$NetBSD: sysvbfs_vfsops.c,v 1.28 2009/04/09 09:56:30 pooka Exp $"); 34 35 #include <sys/types.h> 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/pool.h> 39 #include <sys/time.h> 40 #include <sys/ucred.h> 41 #include <sys/mount.h> 42 #include <sys/disklabel.h> 43 #include <sys/fcntl.h> 44 #include <sys/malloc.h> 45 #include <sys/kauth.h> 46 #include <sys/proc.h> 47 48 /* v-node */ 49 #include <sys/namei.h> 50 #include <sys/vnode.h> 51 /* devsw */ 52 #include <sys/conf.h> 53 54 #include <fs/sysvbfs/sysvbfs.h> /* external interface */ 55 #include <fs/sysvbfs/bfs.h> /* internal interface */ 56 57 #ifdef SYSVBFS_VNOPS_DEBUG 58 #define DPRINTF(fmt, args...) printf(fmt, ##args) 59 #else 60 #define DPRINTF(arg...) ((void)0) 61 #endif 62 63 MALLOC_JUSTDEFINE(M_SYSVBFS_VFS, "sysvbfs vfs", "sysvbfs vfs structures"); 64 65 struct pool sysvbfs_node_pool; 66 67 int sysvbfs_mountfs(struct vnode *, struct mount *, struct lwp *); 68 69 int 70 sysvbfs_mount(struct mount *mp, const char *path, void *data, size_t *data_len) 71 { 72 struct lwp *l = curlwp; 73 struct nameidata nd; 74 struct sysvbfs_args *args = data; 75 struct sysvbfs_mount *bmp = NULL; 76 struct vnode *devvp = NULL; 77 int error; 78 bool update; 79 80 DPRINTF("%s: mnt_flag=%x\n", __func__, mp->mnt_flag); 81 82 if (*data_len < sizeof *args) 83 return EINVAL; 84 85 if (mp->mnt_flag & MNT_GETARGS) { 86 if ((bmp = (void *)mp->mnt_data) == NULL) 87 return EIO; 88 args->fspec = NULL; 89 *data_len = sizeof *args; 90 return 0; 91 } 92 93 94 DPRINTF("%s: args->fspec=%s\n", __func__, args->fspec); 95 update = mp->mnt_flag & MNT_UPDATE; 96 if (args->fspec == NULL) { 97 /* nothing to do. */ 98 return EINVAL; 99 } 100 101 if (args->fspec != NULL) { 102 /* Look up the name and verify that it's sane. */ 103 NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, args->fspec); 104 if ((error = namei(&nd)) != 0) 105 return (error); 106 devvp = nd.ni_vp; 107 108 if (!update) { 109 /* 110 * Be sure this is a valid block device 111 */ 112 if (devvp->v_type != VBLK) 113 error = ENOTBLK; 114 else if (bdevsw_lookup(devvp->v_rdev) == NULL) 115 error = ENXIO; 116 } else { 117 /* 118 * Be sure we're still naming the same device 119 * used for our initial mount 120 */ 121 if (devvp != bmp->devvp) 122 error = EINVAL; 123 } 124 } 125 126 /* 127 * If mount by non-root, then verify that user has necessary 128 * permissions on the device. 129 */ 130 if (error == 0 && kauth_authorize_generic(l->l_cred, 131 KAUTH_GENERIC_ISSUSER, NULL)) { 132 int accessmode = VREAD; 133 if (update ? 134 (mp->mnt_iflag & IMNT_WANTRDWR) != 0 : 135 (mp->mnt_flag & MNT_RDONLY) == 0) 136 accessmode |= VWRITE; 137 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 138 error = VOP_ACCESS(devvp, accessmode, l->l_cred); 139 VOP_UNLOCK(devvp, 0); 140 } 141 142 if (error) { 143 vrele(devvp); 144 return error; 145 } 146 147 if (!update) { 148 if ((error = sysvbfs_mountfs(devvp, mp, l)) != 0) { 149 vrele(devvp); 150 return error; 151 } 152 } else if (mp->mnt_flag & MNT_RDONLY) { 153 /* XXX: r/w -> read only */ 154 } 155 156 return set_statvfs_info(path, UIO_USERSPACE, args->fspec, UIO_USERSPACE, 157 mp->mnt_op->vfs_name, mp, l); 158 } 159 160 int 161 sysvbfs_mountfs(struct vnode *devvp, struct mount *mp, struct lwp *l) 162 { 163 kauth_cred_t cred = l->l_cred; 164 struct sysvbfs_mount *bmp; 165 struct partinfo dpart; 166 int error, oflags; 167 168 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY); 169 error = vinvalbuf(devvp, V_SAVE, cred, l, 0, 0); 170 VOP_UNLOCK(devvp, 0); 171 if (error) 172 return error; 173 174 /* Open block device */ 175 oflags = FREAD; 176 if ((mp->mnt_flag & MNT_RDONLY) == 0) 177 oflags |= FWRITE; 178 if ((error = VOP_OPEN(devvp, oflags, NOCRED)) != 0) 179 return error; 180 181 /* Get partition information */ 182 if ((error = VOP_IOCTL(devvp, DIOCGPART, &dpart, FREAD, cred)) != 0) { 183 VOP_CLOSE(devvp, oflags, NOCRED); 184 return error; 185 } 186 187 bmp = malloc(sizeof(struct sysvbfs_mount), M_SYSVBFS_VFS, M_WAITOK); 188 if (bmp == NULL) { 189 VOP_CLOSE(devvp, oflags, NOCRED); 190 return ENOMEM; 191 } 192 bmp->devvp = devvp; 193 bmp->mountp = mp; 194 if ((error = sysvbfs_bfs_init(&bmp->bfs, devvp)) != 0) { 195 VOP_CLOSE(devvp, oflags, NOCRED); 196 free(bmp, M_SYSVBFS_VFS); 197 return error; 198 } 199 LIST_INIT(&bmp->bnode_head); 200 201 mp->mnt_data = bmp; 202 mp->mnt_stat.f_fsidx.__fsid_val[0] = (long)devvp->v_rdev; 203 mp->mnt_stat.f_fsidx.__fsid_val[1] = makefstype(MOUNT_SYSVBFS); 204 mp->mnt_stat.f_fsid = mp->mnt_stat.f_fsidx.__fsid_val[0]; 205 mp->mnt_flag |= MNT_LOCAL; 206 mp->mnt_dev_bshift = BFS_BSHIFT; 207 mp->mnt_fs_bshift = BFS_BSHIFT; 208 209 DPRINTF("fstype=%d dtype=%d bsize=%d\n", dpart.part->p_fstype, 210 dpart.disklab->d_type, dpart.disklab->d_secsize); 211 212 return 0; 213 } 214 215 int 216 sysvbfs_start(struct mount *mp, int flags) 217 { 218 219 DPRINTF("%s:\n", __func__); 220 /* Nothing to do. */ 221 return 0; 222 } 223 224 int 225 sysvbfs_unmount(struct mount *mp, int mntflags) 226 { 227 struct sysvbfs_mount *bmp = (void *)mp->mnt_data; 228 int error; 229 230 DPRINTF("%s: %p\n", __func__, bmp); 231 232 if ((error = vflush(mp, NULLVP, 233 mntflags & MNT_FORCE ? FORCECLOSE : 0)) != 0) 234 return error; 235 236 vn_lock(bmp->devvp, LK_EXCLUSIVE | LK_RETRY); 237 error = VOP_CLOSE(bmp->devvp, FREAD, NOCRED); 238 vput(bmp->devvp); 239 240 sysvbfs_bfs_fini(bmp->bfs); 241 242 free(bmp, M_SYSVBFS_VFS); 243 mp->mnt_data = NULL; 244 mp->mnt_flag &= ~MNT_LOCAL; 245 246 return 0; 247 } 248 249 int 250 sysvbfs_root(struct mount *mp, struct vnode **vpp) 251 { 252 struct vnode *vp; 253 int error; 254 255 DPRINTF("%s:\n", __func__); 256 if ((error = VFS_VGET(mp, BFS_ROOT_INODE, &vp)) != 0) 257 return error; 258 *vpp = vp; 259 260 return 0; 261 } 262 263 int 264 sysvbfs_statvfs(struct mount *mp, struct statvfs *f) 265 { 266 struct sysvbfs_mount *bmp = mp->mnt_data; 267 struct bfs *bfs = bmp->bfs; 268 int free_block; 269 size_t data_block; 270 271 data_block = (bfs->data_end - bfs->data_start) >> BFS_BSHIFT; 272 if (bfs_inode_alloc(bfs, 0, 0, &free_block) != 0) 273 free_block = 0; 274 else 275 free_block = (bfs->data_end >> BFS_BSHIFT) - free_block; 276 277 DPRINTF("%s: %d %d %d\n", __func__, bfs->data_start, 278 bfs->data_end, free_block); 279 280 f->f_bsize = BFS_BSIZE; 281 f->f_frsize = BFS_BSIZE; 282 f->f_iosize = BFS_BSIZE; 283 f->f_blocks = data_block; 284 f->f_bfree = free_block; 285 f->f_bavail = f->f_bfree; 286 f->f_bresvd = 0; 287 f->f_files = bfs->n_inode; 288 f->f_ffree = bfs->max_inode - f->f_files; 289 f->f_favail = f->f_ffree; 290 f->f_fresvd = 0; 291 copy_statvfs_info(f, mp); 292 293 return 0; 294 } 295 296 int 297 sysvbfs_sync(struct mount *mp, int waitfor, kauth_cred_t cred) 298 { 299 struct sysvbfs_mount *bmp = mp->mnt_data; 300 struct sysvbfs_node *bnode; 301 struct vnode *v; 302 int err, error; 303 304 DPRINTF("%s:\n", __func__); 305 error = 0; 306 mutex_enter(&mntvnode_lock); 307 for (bnode = LIST_FIRST(&bmp->bnode_head); bnode != NULL; 308 bnode = LIST_NEXT(bnode, link)) { 309 v = bnode->vnode; 310 mutex_enter(&v->v_interlock); 311 mutex_exit(&mntvnode_lock); 312 err = vget(v, LK_EXCLUSIVE | LK_NOWAIT | LK_INTERLOCK); 313 if (err == 0) { 314 err = VOP_FSYNC(v, cred, FSYNC_WAIT, 0, 0); 315 vput(v); 316 } 317 if (err != 0) 318 error = err; 319 mutex_enter(&mntvnode_lock); 320 } 321 mutex_exit(&mntvnode_lock); 322 323 return error; 324 } 325 326 int 327 sysvbfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp) 328 { 329 struct sysvbfs_mount *bmp = mp->mnt_data; 330 struct bfs *bfs = bmp->bfs; 331 struct vnode *vp; 332 struct sysvbfs_node *bnode; 333 struct bfs_inode *inode; 334 int error; 335 336 DPRINTF("%s: i-node=%lld\n", __func__, (long long)ino); 337 /* Lookup requested i-node */ 338 if (!bfs_inode_lookup(bfs, ino, &inode)) { 339 DPRINTF("bfs_inode_lookup failed.\n"); 340 return ENOENT; 341 } 342 343 retry: 344 mutex_enter(&mntvnode_lock); 345 for (bnode = LIST_FIRST(&bmp->bnode_head); bnode != NULL; 346 bnode = LIST_NEXT(bnode, link)) { 347 if (bnode->inode->number == ino) { 348 vp = bnode->vnode; 349 mutex_enter(&vp->v_interlock); 350 mutex_exit(&mntvnode_lock); 351 if (vget(vp, LK_EXCLUSIVE|LK_RETRY|LK_INTERLOCK) == 0) { 352 *vpp = vp; 353 return 0; 354 } else { 355 goto retry; 356 } 357 } 358 } 359 mutex_exit(&mntvnode_lock); 360 361 /* Allocate v-node. */ 362 if ((error = getnewvnode(VT_SYSVBFS, mp, sysvbfs_vnodeop_p, &vp)) != 363 0) { 364 DPRINTF("%s: getnewvnode error.\n", __func__); 365 return error; 366 } 367 /* Lock vnode here */ 368 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY); 369 370 /* Allocate i-node */ 371 vp->v_data = pool_get(&sysvbfs_node_pool, PR_WAITOK); 372 memset(vp->v_data, 0, sizeof(struct sysvbfs_node)); 373 bnode = vp->v_data; 374 mutex_enter(&mntvnode_lock); 375 LIST_INSERT_HEAD(&bmp->bnode_head, bnode, link); 376 mutex_exit(&mntvnode_lock); 377 bnode->vnode = vp; 378 bnode->bmp = bmp; 379 bnode->inode = inode; 380 bnode->lockf = NULL; /* advlock */ 381 382 if (ino == BFS_ROOT_INODE) { /* BFS is flat filesystem */ 383 vp->v_type = VDIR; 384 vp->v_vflag |= VV_ROOT; 385 } else { 386 vp->v_type = VREG; 387 } 388 389 genfs_node_init(vp, &sysvbfs_genfsops); 390 uvm_vnp_setsize(vp, bfs_file_size(inode)); 391 *vpp = vp; 392 393 return 0; 394 } 395 396 int 397 sysvbfs_fhtovp(struct mount *mp, struct fid *fid, struct vnode **vpp) 398 { 399 400 DPRINTF("%s:\n", __func__); 401 /* notyet */ 402 return EOPNOTSUPP; 403 } 404 405 int 406 sysvbfs_vptofh(struct vnode *vpp, struct fid *fid, size_t *fh_size) 407 { 408 409 DPRINTF("%s:\n", __func__); 410 /* notyet */ 411 return EOPNOTSUPP; 412 } 413 414 MALLOC_DECLARE(M_BFS); 415 MALLOC_DECLARE(M_SYSVBFS_VNODE); 416 417 void 418 sysvbfs_init(void) 419 { 420 421 DPRINTF("%s:\n", __func__); 422 malloc_type_attach(M_SYSVBFS_VFS); 423 malloc_type_attach(M_BFS); 424 malloc_type_attach(M_SYSVBFS_VNODE); 425 pool_init(&sysvbfs_node_pool, sizeof(struct sysvbfs_node), 0, 0, 0, 426 "sysvbfs_node_pool", &pool_allocator_nointr, IPL_NONE); 427 } 428 429 void 430 sysvbfs_reinit(void) 431 { 432 433 /* Nothing to do. */ 434 DPRINTF("%s:\n", __func__); 435 } 436 437 void 438 sysvbfs_done(void) 439 { 440 441 DPRINTF("%s:\n", __func__); 442 pool_destroy(&sysvbfs_node_pool); 443 malloc_type_detach(M_BFS); 444 malloc_type_detach(M_SYSVBFS_VFS); 445 malloc_type_detach(M_SYSVBFS_VNODE); 446 } 447 448 int 449 sysvbfs_gop_alloc(struct vnode *vp, off_t off, off_t len, int flags, 450 kauth_cred_t cred) 451 { 452 453 return 0; 454 } 455