1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 2001 Dag-Erling Coïdan Smørgrav 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer 12 * in this position and unchanged. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. The name of the author may not be used to endorse or promote products 17 * derived from this software without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 */ 30 31 #include <sys/cdefs.h> 32 __FBSDID("$FreeBSD$"); 33 34 #include "opt_pseudofs.h" 35 36 #include <sys/param.h> 37 #include <sys/kernel.h> 38 #include <sys/systm.h> 39 #include <sys/ctype.h> 40 #include <sys/dirent.h> 41 #include <sys/fcntl.h> 42 #include <sys/limits.h> 43 #include <sys/lock.h> 44 #include <sys/malloc.h> 45 #include <sys/mount.h> 46 #include <sys/mutex.h> 47 #include <sys/namei.h> 48 #include <sys/proc.h> 49 #include <sys/sbuf.h> 50 #include <sys/sx.h> 51 #include <sys/sysctl.h> 52 #include <sys/vnode.h> 53 54 #include <fs/pseudofs/pseudofs.h> 55 #include <fs/pseudofs/pseudofs_internal.h> 56 57 #define KASSERT_PN_IS_DIR(pn) \ 58 KASSERT((pn)->pn_type == pfstype_root || \ 59 (pn)->pn_type == pfstype_dir || \ 60 (pn)->pn_type == pfstype_procdir, \ 61 ("%s(): VDIR vnode refers to non-directory pfs_node", __func__)) 62 63 #define KASSERT_PN_IS_FILE(pn) \ 64 KASSERT((pn)->pn_type == pfstype_file, \ 65 ("%s(): VREG vnode refers to non-file pfs_node", __func__)) 66 67 #define KASSERT_PN_IS_LINK(pn) \ 68 KASSERT((pn)->pn_type == pfstype_symlink, \ 69 ("%s(): VLNK vnode refers to non-link pfs_node", __func__)) 70 71 /* 72 * Returns the fileno, adjusted for target pid 73 */ 74 static uint32_t 75 pn_fileno(struct pfs_node *pn, pid_t pid) 76 { 77 78 KASSERT(pn->pn_fileno > 0, 79 ("%s(): no fileno allocated", __func__)); 80 if (pid != NO_PID) 81 return (pn->pn_fileno * NO_PID + pid); 82 return (pn->pn_fileno); 83 } 84 85 /* 86 * Returns non-zero if given file is visible to given thread. 87 */ 88 static int 89 pfs_visible_proc(struct thread *td, struct pfs_node *pn, struct proc *proc) 90 { 91 int visible; 92 93 if (proc == NULL) 94 return (0); 95 96 PROC_LOCK_ASSERT(proc, MA_OWNED); 97 98 visible = ((proc->p_flag & P_WEXIT) == 0); 99 if (visible) 100 visible = (p_cansee(td, proc) == 0); 101 if (visible && pn->pn_vis != NULL) 102 visible = pn_vis(td, proc, pn); 103 if (!visible) 104 return (0); 105 return (1); 106 } 107 108 static int 109 pfs_visible(struct thread *td, struct pfs_node *pn, pid_t pid, 110 struct proc **p) 111 { 112 struct proc *proc; 113 114 PFS_TRACE(("%s (pid: %d, req: %d)", 115 pn->pn_name, pid, td->td_proc->p_pid)); 116 117 if (p) 118 *p = NULL; 119 if (pid == NO_PID) 120 PFS_RETURN (1); 121 proc = pfind(pid); 122 if (proc == NULL) 123 PFS_RETURN (0); 124 if (pfs_visible_proc(td, pn, proc)) { 125 if (p) 126 *p = proc; 127 else 128 PROC_UNLOCK(proc); 129 PFS_RETURN (1); 130 } 131 PROC_UNLOCK(proc); 132 PFS_RETURN (0); 133 } 134 135 /* 136 * Verify permissions 137 */ 138 static int 139 pfs_access(struct vop_access_args *va) 140 { 141 struct vnode *vn = va->a_vp; 142 struct pfs_vdata *pvd = vn->v_data; 143 struct vattr vattr; 144 int error; 145 146 PFS_TRACE(("%s", pvd->pvd_pn->pn_name)); 147 (void)pvd; 148 149 error = VOP_GETATTR(vn, &vattr, va->a_cred); 150 if (error) 151 PFS_RETURN (error); 152 error = vaccess(vn->v_type, vattr.va_mode, vattr.va_uid, 153 vattr.va_gid, va->a_accmode, va->a_cred, NULL); 154 PFS_RETURN (error); 155 } 156 157 /* 158 * Close a file or directory 159 */ 160 static int 161 pfs_close(struct vop_close_args *va) 162 { 163 struct vnode *vn = va->a_vp; 164 struct pfs_vdata *pvd = vn->v_data; 165 struct pfs_node *pn = pvd->pvd_pn; 166 struct proc *proc; 167 int error; 168 169 PFS_TRACE(("%s", pn->pn_name)); 170 pfs_assert_not_owned(pn); 171 172 /* 173 * Do nothing unless this is the last close and the node has a 174 * last-close handler. 175 */ 176 if (vrefcnt(vn) > 1 || pn->pn_close == NULL) 177 PFS_RETURN (0); 178 179 if (pvd->pvd_pid != NO_PID) { 180 proc = pfind(pvd->pvd_pid); 181 } else { 182 proc = NULL; 183 } 184 185 error = pn_close(va->a_td, proc, pn); 186 187 if (proc != NULL) 188 PROC_UNLOCK(proc); 189 190 PFS_RETURN (error); 191 } 192 193 /* 194 * Get file attributes 195 */ 196 static int 197 pfs_getattr(struct vop_getattr_args *va) 198 { 199 struct vnode *vn = va->a_vp; 200 struct pfs_vdata *pvd = vn->v_data; 201 struct pfs_node *pn = pvd->pvd_pn; 202 struct vattr *vap = va->a_vap; 203 struct proc *proc; 204 int error = 0; 205 206 PFS_TRACE(("%s", pn->pn_name)); 207 pfs_assert_not_owned(pn); 208 209 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) 210 PFS_RETURN (ENOENT); 211 212 vap->va_type = vn->v_type; 213 vap->va_fileid = pn_fileno(pn, pvd->pvd_pid); 214 vap->va_flags = 0; 215 vap->va_blocksize = PAGE_SIZE; 216 vap->va_bytes = vap->va_size = 0; 217 vap->va_filerev = 0; 218 vap->va_fsid = vn->v_mount->mnt_stat.f_fsid.val[0]; 219 vap->va_nlink = 1; 220 nanotime(&vap->va_ctime); 221 vap->va_atime = vap->va_mtime = vap->va_ctime; 222 223 switch (pn->pn_type) { 224 case pfstype_procdir: 225 case pfstype_root: 226 case pfstype_dir: 227 #if 0 228 pfs_lock(pn); 229 /* compute link count */ 230 pfs_unlock(pn); 231 #endif 232 vap->va_mode = 0555; 233 break; 234 case pfstype_file: 235 case pfstype_symlink: 236 vap->va_mode = 0444; 237 break; 238 default: 239 printf("shouldn't be here!\n"); 240 vap->va_mode = 0; 241 break; 242 } 243 244 if (proc != NULL) { 245 vap->va_uid = proc->p_ucred->cr_ruid; 246 vap->va_gid = proc->p_ucred->cr_rgid; 247 } else { 248 vap->va_uid = 0; 249 vap->va_gid = 0; 250 } 251 252 if (pn->pn_attr != NULL) 253 error = pn_attr(curthread, proc, pn, vap); 254 255 if(proc != NULL) 256 PROC_UNLOCK(proc); 257 258 PFS_RETURN (error); 259 } 260 261 /* 262 * Perform an ioctl 263 */ 264 static int 265 pfs_ioctl(struct vop_ioctl_args *va) 266 { 267 struct vnode *vn; 268 struct pfs_vdata *pvd; 269 struct pfs_node *pn; 270 struct proc *proc; 271 int error; 272 273 vn = va->a_vp; 274 vn_lock(vn, LK_SHARED | LK_RETRY); 275 if (vn->v_iflag & VI_DOOMED) { 276 VOP_UNLOCK(vn, 0); 277 return (EBADF); 278 } 279 pvd = vn->v_data; 280 pn = pvd->pvd_pn; 281 282 PFS_TRACE(("%s: %lx", pn->pn_name, va->a_command)); 283 pfs_assert_not_owned(pn); 284 285 if (vn->v_type != VREG) { 286 VOP_UNLOCK(vn, 0); 287 PFS_RETURN (EINVAL); 288 } 289 KASSERT_PN_IS_FILE(pn); 290 291 if (pn->pn_ioctl == NULL) { 292 VOP_UNLOCK(vn, 0); 293 PFS_RETURN (ENOTTY); 294 } 295 296 /* 297 * This is necessary because process' privileges may 298 * have changed since the open() call. 299 */ 300 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) { 301 VOP_UNLOCK(vn, 0); 302 PFS_RETURN (EIO); 303 } 304 305 error = pn_ioctl(curthread, proc, pn, va->a_command, va->a_data); 306 307 if (proc != NULL) 308 PROC_UNLOCK(proc); 309 310 VOP_UNLOCK(vn, 0); 311 PFS_RETURN (error); 312 } 313 314 /* 315 * Perform getextattr 316 */ 317 static int 318 pfs_getextattr(struct vop_getextattr_args *va) 319 { 320 struct vnode *vn = va->a_vp; 321 struct pfs_vdata *pvd = vn->v_data; 322 struct pfs_node *pn = pvd->pvd_pn; 323 struct proc *proc; 324 int error; 325 326 PFS_TRACE(("%s", pn->pn_name)); 327 pfs_assert_not_owned(pn); 328 329 /* 330 * This is necessary because either process' privileges may 331 * have changed since the open() call. 332 */ 333 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) 334 PFS_RETURN (EIO); 335 336 if (pn->pn_getextattr == NULL) 337 error = EOPNOTSUPP; 338 else 339 error = pn_getextattr(curthread, proc, pn, 340 va->a_attrnamespace, va->a_name, va->a_uio, 341 va->a_size, va->a_cred); 342 343 if (proc != NULL) 344 PROC_UNLOCK(proc); 345 346 PFS_RETURN (error); 347 } 348 349 /* 350 * Convert a vnode to its component name 351 */ 352 static int 353 pfs_vptocnp(struct vop_vptocnp_args *ap) 354 { 355 struct vnode *vp = ap->a_vp; 356 struct vnode **dvp = ap->a_vpp; 357 struct pfs_vdata *pvd = vp->v_data; 358 struct pfs_node *pd = pvd->pvd_pn; 359 struct pfs_node *pn; 360 struct mount *mp; 361 char *buf = ap->a_buf; 362 int *buflen = ap->a_buflen; 363 char pidbuf[PFS_NAMELEN]; 364 pid_t pid = pvd->pvd_pid; 365 int len, i, error, locked; 366 367 i = *buflen; 368 error = 0; 369 370 pfs_lock(pd); 371 372 if (vp->v_type == VDIR && pd->pn_type == pfstype_root) { 373 *dvp = vp; 374 vhold(*dvp); 375 pfs_unlock(pd); 376 PFS_RETURN (0); 377 } else if (vp->v_type == VDIR && pd->pn_type == pfstype_procdir) { 378 len = snprintf(pidbuf, sizeof(pidbuf), "%d", pid); 379 i -= len; 380 if (i < 0) { 381 error = ENOMEM; 382 goto failed; 383 } 384 bcopy(pidbuf, buf + i, len); 385 } else { 386 len = strlen(pd->pn_name); 387 i -= len; 388 if (i < 0) { 389 error = ENOMEM; 390 goto failed; 391 } 392 bcopy(pd->pn_name, buf + i, len); 393 } 394 395 pn = pd->pn_parent; 396 pfs_unlock(pd); 397 398 mp = vp->v_mount; 399 error = vfs_busy(mp, 0); 400 if (error) 401 return (error); 402 403 /* 404 * vp is held by caller. 405 */ 406 locked = VOP_ISLOCKED(vp); 407 VOP_UNLOCK(vp, 0); 408 409 error = pfs_vncache_alloc(mp, dvp, pn, pid); 410 if (error) { 411 vn_lock(vp, locked | LK_RETRY); 412 vfs_unbusy(mp); 413 PFS_RETURN(error); 414 } 415 416 *buflen = i; 417 VOP_UNLOCK(*dvp, 0); 418 vn_lock(vp, locked | LK_RETRY); 419 vfs_unbusy(mp); 420 421 PFS_RETURN (0); 422 failed: 423 pfs_unlock(pd); 424 PFS_RETURN(error); 425 } 426 427 /* 428 * Look up a file or directory 429 */ 430 static int 431 pfs_lookup(struct vop_cachedlookup_args *va) 432 { 433 struct vnode *vn = va->a_dvp; 434 struct vnode **vpp = va->a_vpp; 435 struct componentname *cnp = va->a_cnp; 436 struct pfs_vdata *pvd = vn->v_data; 437 struct pfs_node *pd = pvd->pvd_pn; 438 struct pfs_node *pn, *pdn = NULL; 439 struct mount *mp; 440 pid_t pid = pvd->pvd_pid; 441 char *pname; 442 int error, i, namelen, visible; 443 444 PFS_TRACE(("%.*s", (int)cnp->cn_namelen, cnp->cn_nameptr)); 445 pfs_assert_not_owned(pd); 446 447 if (vn->v_type != VDIR) 448 PFS_RETURN (ENOTDIR); 449 KASSERT_PN_IS_DIR(pd); 450 451 error = VOP_ACCESS(vn, VEXEC, cnp->cn_cred, cnp->cn_thread); 452 if (error) 453 PFS_RETURN (error); 454 455 /* 456 * Don't support DELETE or RENAME. CREATE is supported so 457 * that O_CREAT will work, but the lookup will still fail if 458 * the file does not exist. 459 */ 460 if ((cnp->cn_flags & ISLASTCN) && 461 (cnp->cn_nameiop == DELETE || cnp->cn_nameiop == RENAME)) 462 PFS_RETURN (EOPNOTSUPP); 463 464 /* shortcut: check if the name is too long */ 465 if (cnp->cn_namelen >= PFS_NAMELEN) 466 PFS_RETURN (ENOENT); 467 468 /* check that parent directory is visible... */ 469 if (!pfs_visible(curthread, pd, pvd->pvd_pid, NULL)) 470 PFS_RETURN (ENOENT); 471 472 /* self */ 473 namelen = cnp->cn_namelen; 474 pname = cnp->cn_nameptr; 475 if (namelen == 1 && pname[0] == '.') { 476 pn = pd; 477 *vpp = vn; 478 VREF(vn); 479 PFS_RETURN (0); 480 } 481 482 mp = vn->v_mount; 483 484 /* parent */ 485 if (cnp->cn_flags & ISDOTDOT) { 486 if (pd->pn_type == pfstype_root) 487 PFS_RETURN (EIO); 488 error = vfs_busy(mp, MBF_NOWAIT); 489 if (error != 0) { 490 vfs_ref(mp); 491 VOP_UNLOCK(vn, 0); 492 error = vfs_busy(mp, 0); 493 vn_lock(vn, LK_EXCLUSIVE | LK_RETRY); 494 vfs_rel(mp); 495 if (error != 0) 496 PFS_RETURN(ENOENT); 497 if (vn->v_iflag & VI_DOOMED) { 498 vfs_unbusy(mp); 499 PFS_RETURN(ENOENT); 500 } 501 } 502 VOP_UNLOCK(vn, 0); 503 KASSERT(pd->pn_parent != NULL, 504 ("%s(): non-root directory has no parent", __func__)); 505 /* 506 * This one is tricky. Descendents of procdir nodes 507 * inherit their parent's process affinity, but 508 * there's no easy reverse mapping. For simplicity, 509 * we assume that if this node is a procdir, its 510 * parent isn't (which is correct as long as 511 * descendents of procdir nodes are never procdir 512 * nodes themselves) 513 */ 514 if (pd->pn_type == pfstype_procdir) 515 pid = NO_PID; 516 pfs_lock(pd); 517 pn = pd->pn_parent; 518 pfs_unlock(pd); 519 goto got_pnode; 520 } 521 522 pfs_lock(pd); 523 524 /* named node */ 525 for (pn = pd->pn_nodes; pn != NULL; pn = pn->pn_next) 526 if (pn->pn_type == pfstype_procdir) 527 pdn = pn; 528 else if (pn->pn_name[namelen] == '\0' && 529 bcmp(pname, pn->pn_name, namelen) == 0) { 530 pfs_unlock(pd); 531 goto got_pnode; 532 } 533 534 /* process dependent node */ 535 if ((pn = pdn) != NULL) { 536 pid = 0; 537 for (pid = 0, i = 0; i < namelen && isdigit(pname[i]); ++i) 538 if ((pid = pid * 10 + pname[i] - '0') > PID_MAX) 539 break; 540 if (i == cnp->cn_namelen) { 541 pfs_unlock(pd); 542 goto got_pnode; 543 } 544 } 545 546 pfs_unlock(pd); 547 548 PFS_RETURN (ENOENT); 549 550 got_pnode: 551 pfs_assert_not_owned(pd); 552 pfs_assert_not_owned(pn); 553 visible = pfs_visible(curthread, pn, pid, NULL); 554 if (!visible) { 555 error = ENOENT; 556 goto failed; 557 } 558 559 error = pfs_vncache_alloc(mp, vpp, pn, pid); 560 if (error) 561 goto failed; 562 563 if (cnp->cn_flags & ISDOTDOT) { 564 vfs_unbusy(mp); 565 vn_lock(vn, LK_EXCLUSIVE | LK_RETRY); 566 if (vn->v_iflag & VI_DOOMED) { 567 vput(*vpp); 568 *vpp = NULL; 569 PFS_RETURN(ENOENT); 570 } 571 } 572 if (cnp->cn_flags & MAKEENTRY && !(vn->v_iflag & VI_DOOMED)) 573 cache_enter(vn, *vpp, cnp); 574 PFS_RETURN (0); 575 failed: 576 if (cnp->cn_flags & ISDOTDOT) { 577 vfs_unbusy(mp); 578 vn_lock(vn, LK_EXCLUSIVE | LK_RETRY); 579 *vpp = NULL; 580 } 581 PFS_RETURN(error); 582 } 583 584 /* 585 * Open a file or directory. 586 */ 587 static int 588 pfs_open(struct vop_open_args *va) 589 { 590 struct vnode *vn = va->a_vp; 591 struct pfs_vdata *pvd = vn->v_data; 592 struct pfs_node *pn = pvd->pvd_pn; 593 int mode = va->a_mode; 594 595 PFS_TRACE(("%s (mode 0x%x)", pn->pn_name, mode)); 596 pfs_assert_not_owned(pn); 597 598 /* check if the requested mode is permitted */ 599 if (((mode & FREAD) && !(mode & PFS_RD)) || 600 ((mode & FWRITE) && !(mode & PFS_WR))) 601 PFS_RETURN (EPERM); 602 603 /* we don't support locking */ 604 if ((mode & O_SHLOCK) || (mode & O_EXLOCK)) 605 PFS_RETURN (EOPNOTSUPP); 606 607 PFS_RETURN (0); 608 } 609 610 /* 611 * Read from a file 612 */ 613 static int 614 pfs_read(struct vop_read_args *va) 615 { 616 struct vnode *vn = va->a_vp; 617 struct pfs_vdata *pvd = vn->v_data; 618 struct pfs_node *pn = pvd->pvd_pn; 619 struct uio *uio = va->a_uio; 620 struct proc *proc; 621 struct sbuf *sb = NULL; 622 int error, locked; 623 off_t buflen; 624 625 PFS_TRACE(("%s", pn->pn_name)); 626 pfs_assert_not_owned(pn); 627 628 if (vn->v_type != VREG) 629 PFS_RETURN (EINVAL); 630 KASSERT_PN_IS_FILE(pn); 631 632 if (!(pn->pn_flags & PFS_RD)) 633 PFS_RETURN (EBADF); 634 635 if (pn->pn_fill == NULL) 636 PFS_RETURN (EIO); 637 638 /* 639 * This is necessary because either process' privileges may 640 * have changed since the open() call. 641 */ 642 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) 643 PFS_RETURN (EIO); 644 if (proc != NULL) { 645 _PHOLD(proc); 646 PROC_UNLOCK(proc); 647 } 648 649 vhold(vn); 650 locked = VOP_ISLOCKED(vn); 651 VOP_UNLOCK(vn, 0); 652 653 if (pn->pn_flags & PFS_RAWRD) { 654 PFS_TRACE(("%zd resid", uio->uio_resid)); 655 error = pn_fill(curthread, proc, pn, NULL, uio); 656 PFS_TRACE(("%zd resid", uio->uio_resid)); 657 goto ret; 658 } 659 660 if (uio->uio_resid < 0 || uio->uio_offset < 0 || 661 uio->uio_resid > OFF_MAX - uio->uio_offset) { 662 error = EINVAL; 663 goto ret; 664 } 665 buflen = uio->uio_offset + uio->uio_resid; 666 if (buflen > MAXPHYS) 667 buflen = MAXPHYS; 668 669 sb = sbuf_new(sb, NULL, buflen + 1, 0); 670 if (sb == NULL) { 671 error = EIO; 672 goto ret; 673 } 674 675 error = pn_fill(curthread, proc, pn, sb, uio); 676 677 if (error) { 678 sbuf_delete(sb); 679 goto ret; 680 } 681 682 /* 683 * XXX: If the buffer overflowed, sbuf_len() will not return 684 * the data length. Then just use the full length because an 685 * overflowed sbuf must be full. 686 */ 687 if (sbuf_finish(sb) == 0) 688 buflen = sbuf_len(sb); 689 error = uiomove_frombuf(sbuf_data(sb), buflen, uio); 690 sbuf_delete(sb); 691 ret: 692 vn_lock(vn, locked | LK_RETRY); 693 vdrop(vn); 694 if (proc != NULL) 695 PRELE(proc); 696 PFS_RETURN (error); 697 } 698 699 /* 700 * Iterate through directory entries 701 */ 702 static int 703 pfs_iterate(struct thread *td, struct proc *proc, struct pfs_node *pd, 704 struct pfs_node **pn, struct proc **p) 705 { 706 int visible; 707 708 sx_assert(&allproc_lock, SX_SLOCKED); 709 pfs_assert_owned(pd); 710 again: 711 if (*pn == NULL) { 712 /* first node */ 713 *pn = pd->pn_nodes; 714 } else if ((*pn)->pn_type != pfstype_procdir) { 715 /* next node */ 716 *pn = (*pn)->pn_next; 717 } 718 if (*pn != NULL && (*pn)->pn_type == pfstype_procdir) { 719 /* next process */ 720 if (*p == NULL) 721 *p = LIST_FIRST(&allproc); 722 else 723 *p = LIST_NEXT(*p, p_list); 724 /* out of processes: next node */ 725 if (*p == NULL) 726 *pn = (*pn)->pn_next; 727 else 728 PROC_LOCK(*p); 729 } 730 731 if ((*pn) == NULL) 732 return (-1); 733 734 if (*p != NULL) { 735 visible = pfs_visible_proc(td, *pn, *p); 736 PROC_UNLOCK(*p); 737 } else if (proc != NULL) { 738 visible = pfs_visible_proc(td, *pn, proc); 739 } else { 740 visible = 1; 741 } 742 if (!visible) 743 goto again; 744 745 return (0); 746 } 747 748 /* Directory entry list */ 749 struct pfsentry { 750 STAILQ_ENTRY(pfsentry) link; 751 struct dirent entry; 752 }; 753 STAILQ_HEAD(pfsdirentlist, pfsentry); 754 755 /* 756 * Return directory entries. 757 */ 758 static int 759 pfs_readdir(struct vop_readdir_args *va) 760 { 761 struct vnode *vn = va->a_vp; 762 struct pfs_vdata *pvd = vn->v_data; 763 struct pfs_node *pd = pvd->pvd_pn; 764 pid_t pid = pvd->pvd_pid; 765 struct proc *p, *proc; 766 struct pfs_node *pn; 767 struct uio *uio; 768 struct pfsentry *pfsent, *pfsent2; 769 struct pfsdirentlist lst; 770 off_t offset; 771 int error, i, resid; 772 773 STAILQ_INIT(&lst); 774 error = 0; 775 KASSERT(pd->pn_info == vn->v_mount->mnt_data, 776 ("%s(): pn_info does not match mountpoint", __func__)); 777 PFS_TRACE(("%s pid %lu", pd->pn_name, (unsigned long)pid)); 778 pfs_assert_not_owned(pd); 779 780 if (vn->v_type != VDIR) 781 PFS_RETURN (ENOTDIR); 782 KASSERT_PN_IS_DIR(pd); 783 uio = va->a_uio; 784 785 /* only allow reading entire entries */ 786 offset = uio->uio_offset; 787 resid = uio->uio_resid; 788 if (offset < 0 || offset % PFS_DELEN != 0 || 789 (resid && resid < PFS_DELEN)) 790 PFS_RETURN (EINVAL); 791 if (resid == 0) 792 PFS_RETURN (0); 793 794 sx_slock(&allproc_lock); 795 pfs_lock(pd); 796 797 /* check if the directory is visible to the caller */ 798 if (!pfs_visible(curthread, pd, pid, &proc)) { 799 sx_sunlock(&allproc_lock); 800 pfs_unlock(pd); 801 PFS_RETURN (ENOENT); 802 } 803 KASSERT(pid == NO_PID || proc != NULL, 804 ("%s(): no process for pid %lu", __func__, (unsigned long)pid)); 805 806 /* skip unwanted entries */ 807 for (pn = NULL, p = NULL; offset > 0; offset -= PFS_DELEN) { 808 if (pfs_iterate(curthread, proc, pd, &pn, &p) == -1) { 809 /* nothing left... */ 810 if (proc != NULL) 811 PROC_UNLOCK(proc); 812 pfs_unlock(pd); 813 sx_sunlock(&allproc_lock); 814 PFS_RETURN (0); 815 } 816 } 817 818 /* fill in entries */ 819 while (pfs_iterate(curthread, proc, pd, &pn, &p) != -1 && 820 resid >= PFS_DELEN) { 821 if ((pfsent = malloc(sizeof(struct pfsentry), M_IOV, 822 M_NOWAIT | M_ZERO)) == NULL) { 823 error = ENOMEM; 824 break; 825 } 826 pfsent->entry.d_reclen = PFS_DELEN; 827 pfsent->entry.d_fileno = pn_fileno(pn, pid); 828 /* PFS_DELEN was picked to fit PFS_NAMLEN */ 829 for (i = 0; i < PFS_NAMELEN - 1 && pn->pn_name[i] != '\0'; ++i) 830 pfsent->entry.d_name[i] = pn->pn_name[i]; 831 pfsent->entry.d_namlen = i; 832 /* NOTE: d_off is the offset of the *next* entry. */ 833 pfsent->entry.d_off = offset + PFS_DELEN; 834 switch (pn->pn_type) { 835 case pfstype_procdir: 836 KASSERT(p != NULL, 837 ("reached procdir node with p == NULL")); 838 pfsent->entry.d_namlen = snprintf(pfsent->entry.d_name, 839 PFS_NAMELEN, "%d", p->p_pid); 840 /* fall through */ 841 case pfstype_root: 842 case pfstype_dir: 843 case pfstype_this: 844 case pfstype_parent: 845 pfsent->entry.d_type = DT_DIR; 846 break; 847 case pfstype_file: 848 pfsent->entry.d_type = DT_REG; 849 break; 850 case pfstype_symlink: 851 pfsent->entry.d_type = DT_LNK; 852 break; 853 default: 854 panic("%s has unexpected node type: %d", pn->pn_name, pn->pn_type); 855 } 856 PFS_TRACE(("%s", pfsent->entry.d_name)); 857 dirent_terminate(&pfsent->entry); 858 STAILQ_INSERT_TAIL(&lst, pfsent, link); 859 offset += PFS_DELEN; 860 resid -= PFS_DELEN; 861 } 862 if (proc != NULL) 863 PROC_UNLOCK(proc); 864 pfs_unlock(pd); 865 sx_sunlock(&allproc_lock); 866 i = 0; 867 STAILQ_FOREACH_SAFE(pfsent, &lst, link, pfsent2) { 868 if (error == 0) 869 error = uiomove(&pfsent->entry, PFS_DELEN, uio); 870 free(pfsent, M_IOV); 871 i++; 872 } 873 PFS_TRACE(("%ju bytes", (uintmax_t)(i * PFS_DELEN))); 874 PFS_RETURN (error); 875 } 876 877 /* 878 * Read a symbolic link 879 */ 880 static int 881 pfs_readlink(struct vop_readlink_args *va) 882 { 883 struct vnode *vn = va->a_vp; 884 struct pfs_vdata *pvd = vn->v_data; 885 struct pfs_node *pn = pvd->pvd_pn; 886 struct uio *uio = va->a_uio; 887 struct proc *proc = NULL; 888 char buf[PATH_MAX]; 889 struct sbuf sb; 890 int error, locked; 891 892 PFS_TRACE(("%s", pn->pn_name)); 893 pfs_assert_not_owned(pn); 894 895 if (vn->v_type != VLNK) 896 PFS_RETURN (EINVAL); 897 KASSERT_PN_IS_LINK(pn); 898 899 if (pn->pn_fill == NULL) 900 PFS_RETURN (EIO); 901 902 if (pvd->pvd_pid != NO_PID) { 903 if ((proc = pfind(pvd->pvd_pid)) == NULL) 904 PFS_RETURN (EIO); 905 if (proc->p_flag & P_WEXIT) { 906 PROC_UNLOCK(proc); 907 PFS_RETURN (EIO); 908 } 909 _PHOLD(proc); 910 PROC_UNLOCK(proc); 911 } 912 vhold(vn); 913 locked = VOP_ISLOCKED(vn); 914 VOP_UNLOCK(vn, 0); 915 916 /* sbuf_new() can't fail with a static buffer */ 917 sbuf_new(&sb, buf, sizeof buf, 0); 918 919 error = pn_fill(curthread, proc, pn, &sb, NULL); 920 921 if (proc != NULL) 922 PRELE(proc); 923 vn_lock(vn, locked | LK_RETRY); 924 vdrop(vn); 925 926 if (error) { 927 sbuf_delete(&sb); 928 PFS_RETURN (error); 929 } 930 931 if (sbuf_finish(&sb) != 0) { 932 sbuf_delete(&sb); 933 PFS_RETURN (ENAMETOOLONG); 934 } 935 936 error = uiomove_frombuf(sbuf_data(&sb), sbuf_len(&sb), uio); 937 sbuf_delete(&sb); 938 PFS_RETURN (error); 939 } 940 941 /* 942 * Reclaim a vnode 943 */ 944 static int 945 pfs_reclaim(struct vop_reclaim_args *va) 946 { 947 struct vnode *vn = va->a_vp; 948 struct pfs_vdata *pvd = vn->v_data; 949 struct pfs_node *pn = pvd->pvd_pn; 950 951 PFS_TRACE(("%s", pn->pn_name)); 952 pfs_assert_not_owned(pn); 953 954 return (pfs_vncache_free(va->a_vp)); 955 } 956 957 /* 958 * Set attributes 959 */ 960 static int 961 pfs_setattr(struct vop_setattr_args *va) 962 { 963 struct vnode *vn = va->a_vp; 964 struct pfs_vdata *pvd = vn->v_data; 965 struct pfs_node *pn = pvd->pvd_pn; 966 967 PFS_TRACE(("%s", pn->pn_name)); 968 pfs_assert_not_owned(pn); 969 970 PFS_RETURN (EOPNOTSUPP); 971 } 972 973 /* 974 * Write to a file 975 */ 976 static int 977 pfs_write(struct vop_write_args *va) 978 { 979 struct vnode *vn = va->a_vp; 980 struct pfs_vdata *pvd = vn->v_data; 981 struct pfs_node *pn = pvd->pvd_pn; 982 struct uio *uio = va->a_uio; 983 struct proc *proc; 984 struct sbuf sb; 985 int error; 986 987 PFS_TRACE(("%s", pn->pn_name)); 988 pfs_assert_not_owned(pn); 989 990 if (vn->v_type != VREG) 991 PFS_RETURN (EINVAL); 992 KASSERT_PN_IS_FILE(pn); 993 994 if (!(pn->pn_flags & PFS_WR)) 995 PFS_RETURN (EBADF); 996 997 if (pn->pn_fill == NULL) 998 PFS_RETURN (EIO); 999 1000 /* 1001 * This is necessary because either process' privileges may 1002 * have changed since the open() call. 1003 */ 1004 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) 1005 PFS_RETURN (EIO); 1006 if (proc != NULL) { 1007 _PHOLD(proc); 1008 PROC_UNLOCK(proc); 1009 } 1010 1011 if (pn->pn_flags & PFS_RAWWR) { 1012 error = pn_fill(curthread, proc, pn, NULL, uio); 1013 if (proc != NULL) 1014 PRELE(proc); 1015 PFS_RETURN (error); 1016 } 1017 1018 sbuf_uionew(&sb, uio, &error); 1019 if (error) { 1020 if (proc != NULL) 1021 PRELE(proc); 1022 PFS_RETURN (error); 1023 } 1024 1025 error = pn_fill(curthread, proc, pn, &sb, uio); 1026 1027 sbuf_delete(&sb); 1028 if (proc != NULL) 1029 PRELE(proc); 1030 PFS_RETURN (error); 1031 } 1032 1033 /* 1034 * Vnode operations 1035 */ 1036 struct vop_vector pfs_vnodeops = { 1037 .vop_default = &default_vnodeops, 1038 1039 .vop_access = pfs_access, 1040 .vop_cachedlookup = pfs_lookup, 1041 .vop_close = pfs_close, 1042 .vop_create = VOP_EOPNOTSUPP, 1043 .vop_getattr = pfs_getattr, 1044 .vop_getextattr = pfs_getextattr, 1045 .vop_ioctl = pfs_ioctl, 1046 .vop_link = VOP_EOPNOTSUPP, 1047 .vop_lookup = vfs_cache_lookup, 1048 .vop_mkdir = VOP_EOPNOTSUPP, 1049 .vop_mknod = VOP_EOPNOTSUPP, 1050 .vop_open = pfs_open, 1051 .vop_read = pfs_read, 1052 .vop_readdir = pfs_readdir, 1053 .vop_readlink = pfs_readlink, 1054 .vop_reclaim = pfs_reclaim, 1055 .vop_remove = VOP_EOPNOTSUPP, 1056 .vop_rename = VOP_EOPNOTSUPP, 1057 .vop_rmdir = VOP_EOPNOTSUPP, 1058 .vop_setattr = pfs_setattr, 1059 .vop_symlink = VOP_EOPNOTSUPP, 1060 .vop_vptocnp = pfs_vptocnp, 1061 .vop_write = pfs_write, 1062 /* XXX I've probably forgotten a few that need VOP_EOPNOTSUPP */ 1063 }; 1064