2 * Copyright (c) 2001 Dag-Erling Coïdan Smørgrav
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer
10 * in this position and unchanged.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
32 #include "opt_pseudofs.h"
34 #include <sys/param.h>
35 #include <sys/kernel.h>
36 #include <sys/systm.h>
37 #include <sys/ctype.h>
38 #include <sys/dirent.h>
39 #include <sys/fcntl.h>
40 #include <sys/limits.h>
42 #include <sys/malloc.h>
43 #include <sys/mount.h>
44 #include <sys/mutex.h>
45 #include <sys/namei.h>
49 #include <sys/sysctl.h>
50 #include <sys/vnode.h>
52 #include <fs/pseudofs/pseudofs.h>
53 #include <fs/pseudofs/pseudofs_internal.h>
55 #define KASSERT_PN_IS_DIR(pn) \
56 KASSERT((pn)->pn_type == pfstype_root || \
57 (pn)->pn_type == pfstype_dir || \
58 (pn)->pn_type == pfstype_procdir, \
59 ("%s(): VDIR vnode refers to non-directory pfs_node", __func__))
61 #define KASSERT_PN_IS_FILE(pn) \
62 KASSERT((pn)->pn_type == pfstype_file, \
63 ("%s(): VREG vnode refers to non-file pfs_node", __func__))
65 #define KASSERT_PN_IS_LINK(pn) \
66 KASSERT((pn)->pn_type == pfstype_symlink, \
67 ("%s(): VLNK vnode refers to non-link pfs_node", __func__))
70 * Returns the fileno, adjusted for target pid
73 pn_fileno(struct pfs_node *pn, pid_t pid)
76 KASSERT(pn->pn_fileno > 0,
77 ("%s(): no fileno allocated", __func__));
79 return (pn->pn_fileno * NO_PID + pid);
80 return (pn->pn_fileno);
84 * Returns non-zero if given file is visible to given thread.
87 pfs_visible_proc(struct thread *td, struct pfs_node *pn, struct proc *proc)
94 PROC_LOCK_ASSERT(proc, MA_OWNED);
96 visible = ((proc->p_flag & P_WEXIT) == 0);
98 visible = (p_cansee(td, proc) == 0);
99 if (visible && pn->pn_vis != NULL)
100 visible = pn_vis(td, proc, pn);
107 pfs_visible(struct thread *td, struct pfs_node *pn, pid_t pid, struct proc **p)
111 PFS_TRACE(("%s (pid: %d, req: %d)",
112 pn->pn_name, pid, td->td_proc->p_pid));
118 if ((proc = pfind(pid)) == NULL)
120 if (pfs_visible_proc(td, pn, proc)) {
135 pfs_access(struct vop_access_args *va)
137 struct vnode *vn = va->a_vp;
138 struct pfs_vdata *pvd = vn->v_data;
142 PFS_TRACE(("%s", pvd->pvd_pn->pn_name));
145 error = VOP_GETATTR(vn, &vattr, va->a_cred);
148 error = vaccess(vn->v_type, vattr.va_mode, vattr.va_uid,
149 vattr.va_gid, va->a_accmode, va->a_cred, NULL);
154 * Close a file or directory
157 pfs_close(struct vop_close_args *va)
159 struct vnode *vn = va->a_vp;
160 struct pfs_vdata *pvd = vn->v_data;
161 struct pfs_node *pn = pvd->pvd_pn;
165 PFS_TRACE(("%s", pn->pn_name));
166 pfs_assert_not_owned(pn);
169 * Do nothing unless this is the last close and the node has a
170 * last-close handler.
172 if (vrefcnt(vn) > 1 || pn->pn_close == NULL)
175 if (pvd->pvd_pid != NO_PID) {
176 proc = pfind(pvd->pvd_pid);
181 error = pn_close(va->a_td, proc, pn);
190 * Get file attributes
193 pfs_getattr(struct vop_getattr_args *va)
195 struct vnode *vn = va->a_vp;
196 struct pfs_vdata *pvd = vn->v_data;
197 struct pfs_node *pn = pvd->pvd_pn;
198 struct vattr *vap = va->a_vap;
202 PFS_TRACE(("%s", pn->pn_name));
203 pfs_assert_not_owned(pn);
205 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc))
208 vap->va_type = vn->v_type;
209 vap->va_fileid = pn_fileno(pn, pvd->pvd_pid);
211 vap->va_blocksize = PAGE_SIZE;
212 vap->va_bytes = vap->va_size = 0;
214 vap->va_fsid = vn->v_mount->mnt_stat.f_fsid.val[0];
216 nanotime(&vap->va_ctime);
217 vap->va_atime = vap->va_mtime = vap->va_ctime;
219 switch (pn->pn_type) {
220 case pfstype_procdir:
225 /* compute link count */
231 case pfstype_symlink:
235 printf("shouldn't be here!\n");
241 vap->va_uid = proc->p_ucred->cr_ruid;
242 vap->va_gid = proc->p_ucred->cr_rgid;
248 if (pn->pn_attr != NULL)
249 error = pn_attr(curthread, proc, pn, vap);
261 pfs_ioctl(struct vop_ioctl_args *va)
264 struct pfs_vdata *pvd;
270 vn_lock(vn, LK_SHARED | LK_RETRY);
271 if (vn->v_iflag & VI_DOOMED) {
278 PFS_TRACE(("%s: %lx", pn->pn_name, va->a_command));
279 pfs_assert_not_owned(pn);
281 if (vn->v_type != VREG) {
285 KASSERT_PN_IS_FILE(pn);
287 if (pn->pn_ioctl == NULL) {
293 * This is necessary because process' privileges may
294 * have changed since the open() call.
296 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc)) {
301 error = pn_ioctl(curthread, proc, pn, va->a_command, va->a_data);
314 pfs_getextattr(struct vop_getextattr_args *va)
316 struct vnode *vn = va->a_vp;
317 struct pfs_vdata *pvd = vn->v_data;
318 struct pfs_node *pn = pvd->pvd_pn;
322 PFS_TRACE(("%s", pn->pn_name));
323 pfs_assert_not_owned(pn);
326 * This is necessary because either process' privileges may
327 * have changed since the open() call.
329 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc))
332 if (pn->pn_getextattr == NULL)
335 error = pn_getextattr(curthread, proc, pn,
336 va->a_attrnamespace, va->a_name, va->a_uio,
337 va->a_size, va->a_cred);
346 * Convert a vnode to its component name
349 pfs_vptocnp(struct vop_vptocnp_args *ap)
351 struct vnode *vp = ap->a_vp;
352 struct vnode **dvp = ap->a_vpp;
353 struct pfs_vdata *pvd = vp->v_data;
354 struct pfs_node *pd = pvd->pvd_pn;
357 char *buf = ap->a_buf;
358 int *buflen = ap->a_buflen;
359 char pidbuf[PFS_NAMELEN];
360 pid_t pid = pvd->pvd_pid;
361 int len, i, error, locked;
368 if (vp->v_type == VDIR && pd->pn_type == pfstype_root) {
373 } else if (vp->v_type == VDIR && pd->pn_type == pfstype_procdir) {
374 len = snprintf(pidbuf, sizeof(pidbuf), "%d", pid);
380 bcopy(pidbuf, buf + i, len);
382 len = strlen(pd->pn_name);
388 bcopy(pd->pn_name, buf + i, len);
395 error = vfs_busy(mp, 0);
400 * vp is held by caller.
402 locked = VOP_ISLOCKED(vp);
405 error = pfs_vncache_alloc(mp, dvp, pn, pid);
407 vn_lock(vp, locked | LK_RETRY);
415 vn_lock(vp, locked | LK_RETRY);
425 * Look up a file or directory
428 pfs_lookup(struct vop_cachedlookup_args *va)
430 struct vnode *vn = va->a_dvp;
431 struct vnode **vpp = va->a_vpp;
432 struct componentname *cnp = va->a_cnp;
433 struct pfs_vdata *pvd = vn->v_data;
434 struct pfs_node *pd = pvd->pvd_pn;
435 struct pfs_node *pn, *pdn = NULL;
436 pid_t pid = pvd->pvd_pid;
438 int error, i, namelen, visible;
440 PFS_TRACE(("%.*s", (int)cnp->cn_namelen, cnp->cn_nameptr));
441 pfs_assert_not_owned(pd);
443 if (vn->v_type != VDIR)
444 PFS_RETURN (ENOTDIR);
445 KASSERT_PN_IS_DIR(pd);
447 error = VOP_ACCESS(vn, VEXEC, cnp->cn_cred, cnp->cn_thread);
452 * Don't support DELETE or RENAME. CREATE is supported so
453 * that O_CREAT will work, but the lookup will still fail if
454 * the file does not exist.
456 if ((cnp->cn_flags & ISLASTCN) &&
457 (cnp->cn_nameiop == DELETE || cnp->cn_nameiop == RENAME))
458 PFS_RETURN (EOPNOTSUPP);
460 /* shortcut: check if the name is too long */
461 if (cnp->cn_namelen >= PFS_NAMELEN)
464 /* check that parent directory is visible... */
465 if (!pfs_visible(curthread, pd, pvd->pvd_pid, NULL))
469 namelen = cnp->cn_namelen;
470 pname = cnp->cn_nameptr;
471 if (namelen == 1 && pname[0] == '.') {
479 if (cnp->cn_flags & ISDOTDOT) {
480 if (pd->pn_type == pfstype_root)
483 KASSERT(pd->pn_parent != NULL,
484 ("%s(): non-root directory has no parent", __func__));
486 * This one is tricky. Descendents of procdir nodes
487 * inherit their parent's process affinity, but
488 * there's no easy reverse mapping. For simplicity,
489 * we assume that if this node is a procdir, its
490 * parent isn't (which is correct as long as
491 * descendents of procdir nodes are never procdir
494 if (pd->pn_type == pfstype_procdir)
505 for (pn = pd->pn_nodes; pn != NULL; pn = pn->pn_next)
506 if (pn->pn_type == pfstype_procdir)
508 else if (pn->pn_name[namelen] == '\0' &&
509 bcmp(pname, pn->pn_name, namelen) == 0) {
514 /* process dependent node */
515 if ((pn = pdn) != NULL) {
517 for (pid = 0, i = 0; i < namelen && isdigit(pname[i]); ++i)
518 if ((pid = pid * 10 + pname[i] - '0') > PID_MAX)
520 if (i == cnp->cn_namelen) {
531 pfs_assert_not_owned(pd);
532 pfs_assert_not_owned(pn);
533 visible = pfs_visible(curthread, pn, pid, NULL);
539 error = pfs_vncache_alloc(vn->v_mount, vpp, pn, pid);
543 if (cnp->cn_flags & ISDOTDOT)
544 vn_lock(vn, LK_EXCLUSIVE|LK_RETRY);
545 if (cnp->cn_flags & MAKEENTRY && !(vn->v_iflag & VI_DOOMED))
546 cache_enter(vn, *vpp, cnp);
549 if (cnp->cn_flags & ISDOTDOT)
550 vn_lock(vn, LK_EXCLUSIVE|LK_RETRY);
555 * Open a file or directory.
558 pfs_open(struct vop_open_args *va)
560 struct vnode *vn = va->a_vp;
561 struct pfs_vdata *pvd = vn->v_data;
562 struct pfs_node *pn = pvd->pvd_pn;
563 int mode = va->a_mode;
565 PFS_TRACE(("%s (mode 0x%x)", pn->pn_name, mode));
566 pfs_assert_not_owned(pn);
568 /* check if the requested mode is permitted */
569 if (((mode & FREAD) && !(mode & PFS_RD)) ||
570 ((mode & FWRITE) && !(mode & PFS_WR)))
573 /* we don't support locking */
574 if ((mode & O_SHLOCK) || (mode & O_EXLOCK))
575 PFS_RETURN (EOPNOTSUPP);
584 pfs_read(struct vop_read_args *va)
586 struct vnode *vn = va->a_vp;
587 struct pfs_vdata *pvd = vn->v_data;
588 struct pfs_node *pn = pvd->pvd_pn;
589 struct uio *uio = va->a_uio;
591 struct sbuf *sb = NULL;
593 unsigned int buflen, offset, resid;
595 PFS_TRACE(("%s", pn->pn_name));
596 pfs_assert_not_owned(pn);
598 if (vn->v_type != VREG)
600 KASSERT_PN_IS_FILE(pn);
602 if (!(pn->pn_flags & PFS_RD))
605 if (pn->pn_fill == NULL)
609 * This is necessary because either process' privileges may
610 * have changed since the open() call.
612 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc))
620 locked = VOP_ISLOCKED(vn);
623 if (pn->pn_flags & PFS_RAWRD) {
624 PFS_TRACE(("%zd resid", uio->uio_resid));
625 error = pn_fill(curthread, proc, pn, NULL, uio);
626 PFS_TRACE(("%zd resid", uio->uio_resid));
630 /* beaucoup sanity checks so we don't ask for bogus allocation */
631 if (uio->uio_offset < 0 || uio->uio_resid < 0 ||
632 (offset = uio->uio_offset) != uio->uio_offset ||
633 (resid = uio->uio_resid) != uio->uio_resid ||
634 (buflen = offset + resid + 1) < offset || buflen > INT_MAX) {
638 if (buflen > MAXPHYS + 1)
639 buflen = MAXPHYS + 1;
641 sb = sbuf_new(sb, NULL, buflen, 0);
647 error = pn_fill(curthread, proc, pn, sb, uio);
655 error = uiomove_frombuf(sbuf_data(sb), sbuf_len(sb), uio);
658 vn_lock(vn, locked | LK_RETRY);
666 * Iterate through directory entries
669 pfs_iterate(struct thread *td, struct proc *proc, struct pfs_node *pd,
670 struct pfs_node **pn, struct proc **p)
674 sx_assert(&allproc_lock, SX_SLOCKED);
675 pfs_assert_owned(pd);
680 } else if ((*pn)->pn_type != pfstype_procdir) {
682 *pn = (*pn)->pn_next;
684 if (*pn != NULL && (*pn)->pn_type == pfstype_procdir) {
687 *p = LIST_FIRST(&allproc);
689 *p = LIST_NEXT(*p, p_list);
690 /* out of processes: next node */
692 *pn = (*pn)->pn_next;
701 visible = pfs_visible_proc(td, *pn, *p);
703 } else if (proc != NULL) {
704 visible = pfs_visible_proc(td, *pn, proc);
714 /* Directory entry list */
716 STAILQ_ENTRY(pfsentry) link;
719 STAILQ_HEAD(pfsdirentlist, pfsentry);
722 * Return directory entries.
725 pfs_readdir(struct vop_readdir_args *va)
727 struct vnode *vn = va->a_vp;
728 struct pfs_vdata *pvd = vn->v_data;
729 struct pfs_node *pd = pvd->pvd_pn;
730 pid_t pid = pvd->pvd_pid;
731 struct proc *p, *proc;
734 struct pfsentry *pfsent, *pfsent2;
735 struct pfsdirentlist lst;
741 KASSERT(pd->pn_info == vn->v_mount->mnt_data,
742 ("%s(): pn_info does not match mountpoint", __func__));
743 PFS_TRACE(("%s pid %lu", pd->pn_name, (unsigned long)pid));
744 pfs_assert_not_owned(pd);
746 if (vn->v_type != VDIR)
747 PFS_RETURN (ENOTDIR);
748 KASSERT_PN_IS_DIR(pd);
751 /* only allow reading entire entries */
752 offset = uio->uio_offset;
753 resid = uio->uio_resid;
754 if (offset < 0 || offset % PFS_DELEN != 0 ||
755 (resid && resid < PFS_DELEN))
760 sx_slock(&allproc_lock);
763 /* check if the directory is visible to the caller */
764 if (!pfs_visible(curthread, pd, pid, &proc)) {
765 sx_sunlock(&allproc_lock);
769 KASSERT(pid == NO_PID || proc != NULL,
770 ("%s(): no process for pid %lu", __func__, (unsigned long)pid));
772 /* skip unwanted entries */
773 for (pn = NULL, p = NULL; offset > 0; offset -= PFS_DELEN) {
774 if (pfs_iterate(curthread, proc, pd, &pn, &p) == -1) {
775 /* nothing left... */
779 sx_sunlock(&allproc_lock);
784 /* fill in entries */
785 while (pfs_iterate(curthread, proc, pd, &pn, &p) != -1 &&
786 resid >= PFS_DELEN) {
787 if ((pfsent = malloc(sizeof(struct pfsentry), M_IOV,
788 M_NOWAIT | M_ZERO)) == NULL) {
792 pfsent->entry.d_reclen = PFS_DELEN;
793 pfsent->entry.d_fileno = pn_fileno(pn, pid);
794 /* PFS_DELEN was picked to fit PFS_NAMLEN */
795 for (i = 0; i < PFS_NAMELEN - 1 && pn->pn_name[i] != '\0'; ++i)
796 pfsent->entry.d_name[i] = pn->pn_name[i];
797 pfsent->entry.d_name[i] = 0;
798 pfsent->entry.d_namlen = i;
799 switch (pn->pn_type) {
800 case pfstype_procdir:
802 ("reached procdir node with p == NULL"));
803 pfsent->entry.d_namlen = snprintf(pfsent->entry.d_name,
804 PFS_NAMELEN, "%d", p->p_pid);
810 pfsent->entry.d_type = DT_DIR;
813 pfsent->entry.d_type = DT_REG;
815 case pfstype_symlink:
816 pfsent->entry.d_type = DT_LNK;
819 panic("%s has unexpected node type: %d", pn->pn_name, pn->pn_type);
821 PFS_TRACE(("%s", pfsent->entry.d_name));
822 STAILQ_INSERT_TAIL(&lst, pfsent, link);
829 sx_sunlock(&allproc_lock);
831 STAILQ_FOREACH_SAFE(pfsent, &lst, link, pfsent2) {
833 error = uiomove(&pfsent->entry, PFS_DELEN, uio);
837 PFS_TRACE(("%d bytes", i * PFS_DELEN));
842 * Read a symbolic link
845 pfs_readlink(struct vop_readlink_args *va)
847 struct vnode *vn = va->a_vp;
848 struct pfs_vdata *pvd = vn->v_data;
849 struct pfs_node *pn = pvd->pvd_pn;
850 struct uio *uio = va->a_uio;
851 struct proc *proc = NULL;
856 PFS_TRACE(("%s", pn->pn_name));
857 pfs_assert_not_owned(pn);
859 if (vn->v_type != VLNK)
861 KASSERT_PN_IS_LINK(pn);
863 if (pn->pn_fill == NULL)
866 if (pvd->pvd_pid != NO_PID) {
867 if ((proc = pfind(pvd->pvd_pid)) == NULL)
869 if (proc->p_flag & P_WEXIT) {
877 locked = VOP_ISLOCKED(vn);
880 /* sbuf_new() can't fail with a static buffer */
881 sbuf_new(&sb, buf, sizeof buf, 0);
883 error = pn_fill(curthread, proc, pn, &sb, NULL);
887 vn_lock(vn, locked | LK_RETRY);
895 if (sbuf_finish(&sb) != 0) {
897 PFS_RETURN (ENAMETOOLONG);
900 error = uiomove_frombuf(sbuf_data(&sb), sbuf_len(&sb), uio);
909 pfs_reclaim(struct vop_reclaim_args *va)
911 struct vnode *vn = va->a_vp;
912 struct pfs_vdata *pvd = vn->v_data;
913 struct pfs_node *pn = pvd->pvd_pn;
915 PFS_TRACE(("%s", pn->pn_name));
916 pfs_assert_not_owned(pn);
918 return (pfs_vncache_free(va->a_vp));
925 pfs_setattr(struct vop_setattr_args *va)
927 struct vnode *vn = va->a_vp;
928 struct pfs_vdata *pvd = vn->v_data;
929 struct pfs_node *pn = pvd->pvd_pn;
931 PFS_TRACE(("%s", pn->pn_name));
932 pfs_assert_not_owned(pn);
934 PFS_RETURN (EOPNOTSUPP);
941 pfs_write(struct vop_write_args *va)
943 struct vnode *vn = va->a_vp;
944 struct pfs_vdata *pvd = vn->v_data;
945 struct pfs_node *pn = pvd->pvd_pn;
946 struct uio *uio = va->a_uio;
951 PFS_TRACE(("%s", pn->pn_name));
952 pfs_assert_not_owned(pn);
954 if (vn->v_type != VREG)
956 KASSERT_PN_IS_FILE(pn);
958 if (!(pn->pn_flags & PFS_WR))
961 if (pn->pn_fill == NULL)
965 * This is necessary because either process' privileges may
966 * have changed since the open() call.
968 if (!pfs_visible(curthread, pn, pvd->pvd_pid, &proc))
975 if (pn->pn_flags & PFS_RAWWR) {
976 error = pn_fill(curthread, proc, pn, NULL, uio);
982 sbuf_uionew(&sb, uio, &error);
989 error = pn_fill(curthread, proc, pn, &sb, uio);
1000 struct vop_vector pfs_vnodeops = {
1001 .vop_default = &default_vnodeops,
1003 .vop_access = pfs_access,
1004 .vop_cachedlookup = pfs_lookup,
1005 .vop_close = pfs_close,
1006 .vop_create = VOP_EOPNOTSUPP,
1007 .vop_getattr = pfs_getattr,
1008 .vop_getextattr = pfs_getextattr,
1009 .vop_ioctl = pfs_ioctl,
1010 .vop_link = VOP_EOPNOTSUPP,
1011 .vop_lookup = vfs_cache_lookup,
1012 .vop_mkdir = VOP_EOPNOTSUPP,
1013 .vop_mknod = VOP_EOPNOTSUPP,
1014 .vop_open = pfs_open,
1015 .vop_read = pfs_read,
1016 .vop_readdir = pfs_readdir,
1017 .vop_readlink = pfs_readlink,
1018 .vop_reclaim = pfs_reclaim,
1019 .vop_remove = VOP_EOPNOTSUPP,
1020 .vop_rename = VOP_EOPNOTSUPP,
1021 .vop_rmdir = VOP_EOPNOTSUPP,
1022 .vop_setattr = pfs_setattr,
1023 .vop_symlink = VOP_EOPNOTSUPP,
1024 .vop_vptocnp = pfs_vptocnp,
1025 .vop_write = pfs_write,
1026 /* XXX I've probably forgotten a few that need VOP_EOPNOTSUPP */