Home | History | Annotate | Line # | Download | only in procfs
procfs_vnops.c revision 1.137
      1  1.137  christos /*	$NetBSD: procfs_vnops.c,v 1.137 2006/10/29 22:35:35 christos Exp $	*/
      2   1.24       cgd 
      3    1.1        pk /*
      4   1.53      fvdl  * Copyright (c) 1993, 1995
      5   1.21   mycroft  *	The Regents of the University of California.  All rights reserved.
      6    1.2        pk  *
      7    1.9       cgd  * This code is derived from software contributed to Berkeley by
      8    1.9       cgd  * Jan-Simon Pendry.
      9    1.9       cgd  *
     10    1.2        pk  * Redistribution and use in source and binary forms, with or without
     11    1.2        pk  * modification, are permitted provided that the following conditions
     12    1.2        pk  * are met:
     13    1.2        pk  * 1. Redistributions of source code must retain the above copyright
     14    1.2        pk  *    notice, this list of conditions and the following disclaimer.
     15    1.2        pk  * 2. Redistributions in binary form must reproduce the above copyright
     16    1.2        pk  *    notice, this list of conditions and the following disclaimer in the
     17    1.2        pk  *    documentation and/or other materials provided with the distribution.
     18  1.107       agc  * 3. Neither the name of the University nor the names of its contributors
     19  1.107       agc  *    may be used to endorse or promote products derived from this software
     20  1.107       agc  *    without specific prior written permission.
     21  1.107       agc  *
     22  1.107       agc  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23  1.107       agc  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  1.107       agc  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  1.107       agc  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26  1.107       agc  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  1.107       agc  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  1.107       agc  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  1.107       agc  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  1.107       agc  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  1.107       agc  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  1.107       agc  * SUCH DAMAGE.
     33  1.107       agc  *
     34  1.107       agc  *	@(#)procfs_vnops.c	8.18 (Berkeley) 5/21/95
     35  1.107       agc  */
     36  1.107       agc 
     37  1.107       agc /*
     38  1.107       agc  * Copyright (c) 1993 Jan-Simon Pendry
     39  1.107       agc  *
     40  1.107       agc  * This code is derived from software contributed to Berkeley by
     41  1.107       agc  * Jan-Simon Pendry.
     42  1.107       agc  *
     43  1.107       agc  * Redistribution and use in source and binary forms, with or without
     44  1.107       agc  * modification, are permitted provided that the following conditions
     45  1.107       agc  * are met:
     46  1.107       agc  * 1. Redistributions of source code must retain the above copyright
     47  1.107       agc  *    notice, this list of conditions and the following disclaimer.
     48  1.107       agc  * 2. Redistributions in binary form must reproduce the above copyright
     49  1.107       agc  *    notice, this list of conditions and the following disclaimer in the
     50  1.107       agc  *    documentation and/or other materials provided with the distribution.
     51    1.2        pk  * 3. All advertising materials mentioning features or use of this software
     52    1.2        pk  *    must display the following acknowledgement:
     53    1.9       cgd  *	This product includes software developed by the University of
     54    1.9       cgd  *	California, Berkeley and its contributors.
     55    1.9       cgd  * 4. Neither the name of the University nor the names of its contributors
     56    1.9       cgd  *    may be used to endorse or promote products derived from this software
     57    1.9       cgd  *    without specific prior written permission.
     58    1.9       cgd  *
     59    1.9       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     60    1.9       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     61    1.9       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     62    1.9       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     63    1.9       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     64    1.9       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     65    1.9       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     66    1.9       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     67    1.9       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     68    1.9       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     69    1.9       cgd  * SUCH DAMAGE.
     70    1.2        pk  *
     71   1.53      fvdl  *	@(#)procfs_vnops.c	8.18 (Berkeley) 5/21/95
     72    1.2        pk  */
     73    1.2        pk 
     74    1.2        pk /*
     75    1.9       cgd  * procfs vnode interface
     76    1.1        pk  */
     77   1.85     lukem 
     78   1.85     lukem #include <sys/cdefs.h>
     79  1.137  christos __KERNEL_RCSID(0, "$NetBSD: procfs_vnops.c,v 1.137 2006/10/29 22:35:35 christos Exp $");
     80    1.1        pk 
     81    1.8   mycroft #include <sys/param.h>
     82    1.8   mycroft #include <sys/systm.h>
     83    1.8   mycroft #include <sys/time.h>
     84    1.8   mycroft #include <sys/kernel.h>
     85    1.8   mycroft #include <sys/file.h>
     86   1.91  christos #include <sys/filedesc.h>
     87    1.8   mycroft #include <sys/proc.h>
     88    1.8   mycroft #include <sys/vnode.h>
     89    1.8   mycroft #include <sys/namei.h>
     90    1.9       cgd #include <sys/malloc.h>
     91   1.76      fvdl #include <sys/mount.h>
     92   1.21   mycroft #include <sys/dirent.h>
     93    1.8   mycroft #include <sys/resourcevar.h>
     94   1.48   mycroft #include <sys/stat.h>
     95   1.89   thorpej #include <sys/ptrace.h>
     96  1.125      elad #include <sys/sysctl.h> /* XXX for curtain */
     97  1.130      elad #include <sys/kauth.h>
     98   1.48   mycroft 
     99   1.71       mrg #include <uvm/uvm_extern.h>	/* for PAGE_SIZE */
    100   1.48   mycroft 
    101   1.21   mycroft #include <machine/reg.h>
    102   1.41   mycroft 
    103   1.41   mycroft #include <miscfs/genfs/genfs.h>
    104    1.9       cgd #include <miscfs/procfs/procfs.h>
    105   1.11       cgd 
    106    1.9       cgd /*
    107    1.9       cgd  * Vnode Operations.
    108    1.9       cgd  *
    109    1.9       cgd  */
    110    1.1        pk 
    111  1.128  christos static int procfs_validfile_linux(struct lwp *, struct mount *);
    112  1.117      yamt static int procfs_root_readdir_callback(struct proc *, void *);
    113  1.128  christos static struct vnode *procfs_dir(pfstype, struct lwp *, struct proc *,
    114  1.126    atatat 				char **, char *, int);
    115   1.74        tv 
    116    1.1        pk /*
    117    1.9       cgd  * This is a list of the valid names in the
    118    1.9       cgd  * process-specific sub-directories.  It is
    119    1.9       cgd  * used in procfs_lookup and procfs_readdir
    120    1.9       cgd  */
    121   1.97  jdolecek static const struct proc_target {
    122   1.32   mycroft 	u_char	pt_type;
    123   1.32   mycroft 	u_char	pt_namlen;
    124   1.97  jdolecek 	const char	*pt_name;
    125   1.32   mycroft 	pfstype	pt_pfstype;
    126  1.128  christos 	int	(*pt_valid)(struct lwp *, struct mount *);
    127   1.32   mycroft } proc_targets[] = {
    128    1.9       cgd #define N(s) sizeof(s)-1, s
    129   1.32   mycroft 	/*	  name		type		validp */
    130  1.136  christos 	{ DT_DIR, N("."),	PFSproc,	NULL },
    131  1.136  christos 	{ DT_DIR, N(".."),	PFSroot,	NULL },
    132  1.109     darcy 	{ DT_DIR, N("fd"),	PFSfd,		NULL },
    133  1.136  christos 	{ DT_REG, N("file"),	PFSfile,	procfs_validfile },
    134  1.109     darcy 	{ DT_REG, N("mem"),	PFSmem,		NULL },
    135  1.136  christos 	{ DT_REG, N("regs"),	PFSregs,	procfs_validregs },
    136  1.109     darcy 	{ DT_REG, N("fpregs"),	PFSfpregs,	procfs_validfpregs },
    137  1.109     darcy 	{ DT_REG, N("ctl"),	PFSctl,		NULL },
    138  1.136  christos 	{ DT_REG, N("stat"),	PFSstat,	procfs_validfile_linux },
    139  1.109     darcy 	{ DT_REG, N("status"),	PFSstatus,	NULL },
    140  1.136  christos 	{ DT_REG, N("note"),	PFSnote,	NULL },
    141  1.109     darcy 	{ DT_REG, N("notepg"),	PFSnotepg,	NULL },
    142  1.109     darcy 	{ DT_REG, N("map"),	PFSmap,		procfs_validmap },
    143  1.136  christos 	{ DT_REG, N("maps"),	PFSmaps,	procfs_validmap },
    144  1.109     darcy 	{ DT_REG, N("cmdline"), PFScmdline,	NULL },
    145  1.136  christos 	{ DT_REG, N("exe"),	PFSexe,		procfs_validfile_linux },
    146  1.126    atatat 	{ DT_LNK, N("cwd"),	PFScwd,		NULL },
    147  1.126    atatat 	{ DT_LNK, N("root"),	PFSchroot,	NULL },
    148  1.137  christos 	{ DT_LNK, N("emul"),	PFSemul,	NULL },
    149   1.86   thorpej #ifdef __HAVE_PROCFS_MACHDEP
    150   1.86   thorpej 	PROCFS_MACHDEP_NODETYPE_DEFNS
    151   1.86   thorpej #endif
    152    1.9       cgd #undef N
    153    1.1        pk };
    154   1.97  jdolecek static const int nproc_targets = sizeof(proc_targets) / sizeof(proc_targets[0]);
    155    1.1        pk 
    156   1.76      fvdl /*
    157   1.76      fvdl  * List of files in the root directory. Note: the validate function will
    158   1.76      fvdl  * be called with p == NULL for these ones.
    159   1.76      fvdl  */
    160   1.97  jdolecek static const struct proc_target proc_root_targets[] = {
    161   1.76      fvdl #define N(s) sizeof(s)-1, s
    162   1.76      fvdl 	/*	  name		    type	    validp */
    163  1.109     darcy 	{ DT_REG, N("meminfo"),     PFSmeminfo,        procfs_validfile_linux },
    164  1.109     darcy 	{ DT_REG, N("cpuinfo"),     PFScpuinfo,        procfs_validfile_linux },
    165  1.109     darcy 	{ DT_REG, N("uptime"),      PFSuptime,         procfs_validfile_linux },
    166  1.114  jdolecek 	{ DT_REG, N("mounts"),	    PFSmounts,	       procfs_validfile_linux },
    167  1.134      manu 	{ DT_REG, N("devices"),     PFSdevices,        procfs_validfile_linux },
    168   1.76      fvdl #undef N
    169   1.76      fvdl };
    170   1.97  jdolecek static const int nproc_root_targets =
    171   1.76      fvdl     sizeof(proc_root_targets) / sizeof(proc_root_targets[0]);
    172   1.76      fvdl 
    173  1.124   xtraeme int	procfs_lookup(void *);
    174   1.96  jdolecek #define	procfs_create	genfs_eopnotsupp
    175   1.96  jdolecek #define	procfs_mknod	genfs_eopnotsupp
    176  1.124   xtraeme int	procfs_open(void *);
    177  1.124   xtraeme int	procfs_close(void *);
    178  1.124   xtraeme int	procfs_access(void *);
    179  1.124   xtraeme int	procfs_getattr(void *);
    180  1.124   xtraeme int	procfs_setattr(void *);
    181   1.37  christos #define	procfs_read	procfs_rw
    182   1.37  christos #define	procfs_write	procfs_rw
    183   1.65  wrstuden #define	procfs_fcntl	genfs_fcntl
    184   1.57  matthias #define	procfs_ioctl	genfs_enoioctl
    185   1.42   mycroft #define	procfs_poll	genfs_poll
    186   1.53      fvdl #define procfs_revoke	genfs_revoke
    187   1.41   mycroft #define	procfs_fsync	genfs_nullop
    188   1.41   mycroft #define	procfs_seek	genfs_nullop
    189   1.96  jdolecek #define	procfs_remove	genfs_eopnotsupp
    190  1.124   xtraeme int	procfs_link(void *);
    191   1.96  jdolecek #define	procfs_rename	genfs_eopnotsupp
    192   1.96  jdolecek #define	procfs_mkdir	genfs_eopnotsupp
    193   1.96  jdolecek #define	procfs_rmdir	genfs_eopnotsupp
    194  1.124   xtraeme int	procfs_symlink(void *);
    195  1.124   xtraeme int	procfs_readdir(void *);
    196  1.124   xtraeme int	procfs_readlink(void *);
    197   1.41   mycroft #define	procfs_abortop	genfs_abortop
    198  1.124   xtraeme int	procfs_inactive(void *);
    199  1.124   xtraeme int	procfs_reclaim(void *);
    200   1.62  wrstuden #define	procfs_lock	genfs_lock
    201   1.62  wrstuden #define	procfs_unlock	genfs_unlock
    202   1.82       chs #define	procfs_bmap	genfs_badop
    203   1.41   mycroft #define	procfs_strategy	genfs_badop
    204  1.124   xtraeme int	procfs_print(void *);
    205  1.124   xtraeme int	procfs_pathconf(void *);
    206   1.62  wrstuden #define	procfs_islocked	genfs_islocked
    207   1.58    kleink #define	procfs_advlock	genfs_einval
    208   1.41   mycroft #define	procfs_bwrite	genfs_eopnotsupp
    209   1.87       chs #define procfs_putpages	genfs_null_putpages
    210   1.37  christos 
    211  1.124   xtraeme static int atoi(const char *, size_t);
    212   1.37  christos 
    213   1.37  christos /*
    214   1.37  christos  * procfs vnode operations.
    215   1.37  christos  */
    216  1.124   xtraeme int (**procfs_vnodeop_p)(void *);
    217   1.77  jdolecek const struct vnodeopv_entry_desc procfs_vnodeop_entries[] = {
    218   1.37  christos 	{ &vop_default_desc, vn_default_error },
    219   1.37  christos 	{ &vop_lookup_desc, procfs_lookup },		/* lookup */
    220   1.37  christos 	{ &vop_create_desc, procfs_create },		/* create */
    221   1.37  christos 	{ &vop_mknod_desc, procfs_mknod },		/* mknod */
    222   1.37  christos 	{ &vop_open_desc, procfs_open },		/* open */
    223   1.37  christos 	{ &vop_close_desc, procfs_close },		/* close */
    224   1.37  christos 	{ &vop_access_desc, procfs_access },		/* access */
    225   1.37  christos 	{ &vop_getattr_desc, procfs_getattr },		/* getattr */
    226   1.37  christos 	{ &vop_setattr_desc, procfs_setattr },		/* setattr */
    227   1.37  christos 	{ &vop_read_desc, procfs_read },		/* read */
    228   1.37  christos 	{ &vop_write_desc, procfs_write },		/* write */
    229   1.65  wrstuden 	{ &vop_fcntl_desc, procfs_fcntl },		/* fcntl */
    230   1.37  christos 	{ &vop_ioctl_desc, procfs_ioctl },		/* ioctl */
    231   1.42   mycroft 	{ &vop_poll_desc, procfs_poll },		/* poll */
    232   1.53      fvdl 	{ &vop_revoke_desc, procfs_revoke },		/* revoke */
    233   1.37  christos 	{ &vop_fsync_desc, procfs_fsync },		/* fsync */
    234   1.37  christos 	{ &vop_seek_desc, procfs_seek },		/* seek */
    235   1.37  christos 	{ &vop_remove_desc, procfs_remove },		/* remove */
    236   1.37  christos 	{ &vop_link_desc, procfs_link },		/* link */
    237   1.37  christos 	{ &vop_rename_desc, procfs_rename },		/* rename */
    238   1.37  christos 	{ &vop_mkdir_desc, procfs_mkdir },		/* mkdir */
    239   1.37  christos 	{ &vop_rmdir_desc, procfs_rmdir },		/* rmdir */
    240   1.37  christos 	{ &vop_symlink_desc, procfs_symlink },		/* symlink */
    241   1.37  christos 	{ &vop_readdir_desc, procfs_readdir },		/* readdir */
    242   1.37  christos 	{ &vop_readlink_desc, procfs_readlink },	/* readlink */
    243   1.37  christos 	{ &vop_abortop_desc, procfs_abortop },		/* abortop */
    244   1.37  christos 	{ &vop_inactive_desc, procfs_inactive },	/* inactive */
    245   1.37  christos 	{ &vop_reclaim_desc, procfs_reclaim },		/* reclaim */
    246   1.37  christos 	{ &vop_lock_desc, procfs_lock },		/* lock */
    247   1.37  christos 	{ &vop_unlock_desc, procfs_unlock },		/* unlock */
    248   1.37  christos 	{ &vop_bmap_desc, procfs_bmap },		/* bmap */
    249   1.37  christos 	{ &vop_strategy_desc, procfs_strategy },	/* strategy */
    250   1.37  christos 	{ &vop_print_desc, procfs_print },		/* print */
    251   1.37  christos 	{ &vop_islocked_desc, procfs_islocked },	/* islocked */
    252   1.37  christos 	{ &vop_pathconf_desc, procfs_pathconf },	/* pathconf */
    253   1.37  christos 	{ &vop_advlock_desc, procfs_advlock },		/* advlock */
    254   1.87       chs 	{ &vop_putpages_desc, procfs_putpages },	/* putpages */
    255   1.82       chs 	{ NULL, NULL }
    256   1.37  christos };
    257   1.77  jdolecek const struct vnodeopv_desc procfs_vnodeop_opv_desc =
    258   1.37  christos 	{ &procfs_vnodeop_p, procfs_vnodeop_entries };
    259   1.37  christos /*
    260    1.9       cgd  * set things up for doing i/o on
    261    1.9       cgd  * the pfsnode (vp).  (vp) is locked
    262    1.9       cgd  * on entry, and should be left locked
    263    1.9       cgd  * on exit.
    264    1.1        pk  *
    265    1.9       cgd  * for procfs we don't need to do anything
    266    1.9       cgd  * in particular for i/o.  all that is done
    267    1.9       cgd  * is to support exclusive open on process
    268    1.9       cgd  * memory images.
    269    1.1        pk  */
    270   1.37  christos int
    271   1.37  christos procfs_open(v)
    272   1.37  christos 	void *v;
    273   1.37  christos {
    274   1.22   mycroft 	struct vop_open_args /* {
    275   1.22   mycroft 		struct vnode *a_vp;
    276   1.22   mycroft 		int  a_mode;
    277  1.130      elad 		kauth_cred_t a_cred;
    278  1.128  christos 		struct lwp *a_l;
    279   1.37  christos 	} */ *ap = v;
    280   1.21   mycroft 	struct pfsnode *pfs = VTOPFS(ap->a_vp);
    281  1.128  christos 	struct lwp *l1;
    282  1.128  christos 	struct proc *p2;
    283   1.88  christos 	int error;
    284   1.50   thorpej 
    285  1.128  christos 	l1 = ap->a_l;				/* tracer */
    286   1.51   thorpej 	p2 = PFIND(pfs->pfs_pid);		/* traced */
    287   1.50   thorpej 
    288   1.50   thorpej 	if (p2 == NULL)
    289   1.50   thorpej 		return (ENOENT);		/* was ESRCH, jsp */
    290    1.9       cgd 
    291    1.9       cgd 	switch (pfs->pfs_type) {
    292  1.109     darcy 	case PFSmem:
    293   1.37  christos 		if (((pfs->pfs_flags & FWRITE) && (ap->a_mode & O_EXCL)) ||
    294   1.37  christos 		    ((pfs->pfs_flags & O_EXCL) && (ap->a_mode & FWRITE)))
    295    1.9       cgd 			return (EBUSY);
    296   1.50   thorpej 
    297  1.128  christos 		if ((error = process_checkioperm(l1, p2)) != 0)
    298   1.88  christos 			return (error);
    299    1.1        pk 
    300   1.21   mycroft 		if (ap->a_mode & FWRITE)
    301   1.21   mycroft 			pfs->pfs_flags = ap->a_mode & (FWRITE|O_EXCL);
    302    1.1        pk 
    303    1.9       cgd 		return (0);
    304    1.1        pk 
    305    1.9       cgd 	default:
    306    1.9       cgd 		break;
    307    1.9       cgd 	}
    308    1.1        pk 
    309    1.9       cgd 	return (0);
    310    1.1        pk }
    311    1.1        pk 
    312    1.1        pk /*
    313    1.9       cgd  * close the pfsnode (vp) after doing i/o.
    314    1.9       cgd  * (vp) is not locked on entry or exit.
    315    1.9       cgd  *
    316    1.9       cgd  * nothing to do for procfs other than undo
    317    1.9       cgd  * any exclusive open flag (see _open above).
    318    1.1        pk  */
    319   1.37  christos int
    320   1.37  christos procfs_close(v)
    321   1.37  christos 	void *v;
    322   1.37  christos {
    323   1.22   mycroft 	struct vop_close_args /* {
    324   1.22   mycroft 		struct vnode *a_vp;
    325   1.22   mycroft 		int  a_fflag;
    326  1.130      elad 		kauth_cred_t a_cred;
    327  1.128  christos 		struct lwp *a_l;
    328   1.37  christos 	} */ *ap = v;
    329   1.21   mycroft 	struct pfsnode *pfs = VTOPFS(ap->a_vp);
    330    1.1        pk 
    331    1.9       cgd 	switch (pfs->pfs_type) {
    332  1.109     darcy 	case PFSmem:
    333   1.21   mycroft 		if ((ap->a_fflag & FWRITE) && (pfs->pfs_flags & O_EXCL))
    334    1.9       cgd 			pfs->pfs_flags &= ~(FWRITE|O_EXCL);
    335    1.9       cgd 		break;
    336   1.46   mycroft 
    337   1.46   mycroft 	default:
    338   1.37  christos 		break;
    339    1.9       cgd 	}
    340    1.1        pk 
    341    1.1        pk 	return (0);
    342    1.1        pk }
    343    1.1        pk 
    344    1.1        pk /*
    345    1.9       cgd  * _inactive is called when the pfsnode
    346    1.9       cgd  * is vrele'd and the reference count goes
    347    1.9       cgd  * to zero.  (vp) will be on the vnode free
    348    1.9       cgd  * list, so to get it back vget() must be
    349    1.9       cgd  * used.
    350    1.9       cgd  *
    351    1.9       cgd  * for procfs, check if the process is still
    352    1.9       cgd  * alive and if it isn't then just throw away
    353    1.9       cgd  * the vnode by calling vgone().  this may
    354    1.9       cgd  * be overkill and a waste of time since the
    355    1.9       cgd  * chances are that the process will still be
    356    1.9       cgd  * there and PFIND is not free.
    357    1.9       cgd  *
    358   1.62  wrstuden  * (vp) is locked on entry, but must be unlocked on exit.
    359    1.1        pk  */
    360   1.37  christos int
    361   1.37  christos procfs_inactive(v)
    362   1.37  christos 	void *v;
    363   1.37  christos {
    364   1.22   mycroft 	struct vop_inactive_args /* {
    365   1.22   mycroft 		struct vnode *a_vp;
    366   1.53      fvdl 		struct proc *a_p;
    367   1.37  christos 	} */ *ap = v;
    368  1.122  christos 	struct vnode *vp = ap->a_vp;
    369  1.122  christos 	struct pfsnode *pfs = VTOPFS(vp);
    370    1.1        pk 
    371  1.122  christos 	VOP_UNLOCK(vp, 0);
    372  1.122  christos 	if (PFIND(pfs->pfs_pid) == NULL && (vp->v_flag & VXLOCK) == 0)
    373  1.122  christos 		vgone(vp);
    374    1.5        pk 
    375    1.9       cgd 	return (0);
    376    1.1        pk }
    377    1.1        pk 
    378    1.1        pk /*
    379    1.9       cgd  * _reclaim is called when getnewvnode()
    380    1.9       cgd  * wants to make use of an entry on the vnode
    381    1.9       cgd  * free list.  at this time the filesystem needs
    382    1.9       cgd  * to free any private data and remove the node
    383    1.9       cgd  * from any private lists.
    384    1.1        pk  */
    385   1.37  christos int
    386   1.37  christos procfs_reclaim(v)
    387   1.37  christos 	void *v;
    388   1.37  christos {
    389   1.22   mycroft 	struct vop_reclaim_args /* {
    390   1.22   mycroft 		struct vnode *a_vp;
    391   1.37  christos 	} */ *ap = v;
    392   1.21   mycroft 
    393   1.21   mycroft 	return (procfs_freevp(ap->a_vp));
    394   1.21   mycroft }
    395   1.21   mycroft 
    396   1.21   mycroft /*
    397   1.21   mycroft  * Return POSIX pathconf information applicable to special devices.
    398   1.21   mycroft  */
    399   1.37  christos int
    400   1.37  christos procfs_pathconf(v)
    401   1.37  christos 	void *v;
    402   1.37  christos {
    403   1.21   mycroft 	struct vop_pathconf_args /* {
    404   1.21   mycroft 		struct vnode *a_vp;
    405   1.21   mycroft 		int a_name;
    406   1.26       cgd 		register_t *a_retval;
    407   1.37  christos 	} */ *ap = v;
    408    1.1        pk 
    409   1.21   mycroft 	switch (ap->a_name) {
    410   1.21   mycroft 	case _PC_LINK_MAX:
    411   1.21   mycroft 		*ap->a_retval = LINK_MAX;
    412   1.21   mycroft 		return (0);
    413   1.21   mycroft 	case _PC_MAX_CANON:
    414   1.21   mycroft 		*ap->a_retval = MAX_CANON;
    415   1.21   mycroft 		return (0);
    416   1.21   mycroft 	case _PC_MAX_INPUT:
    417   1.21   mycroft 		*ap->a_retval = MAX_INPUT;
    418   1.21   mycroft 		return (0);
    419   1.21   mycroft 	case _PC_PIPE_BUF:
    420   1.21   mycroft 		*ap->a_retval = PIPE_BUF;
    421   1.21   mycroft 		return (0);
    422   1.21   mycroft 	case _PC_CHOWN_RESTRICTED:
    423   1.21   mycroft 		*ap->a_retval = 1;
    424   1.21   mycroft 		return (0);
    425   1.21   mycroft 	case _PC_VDISABLE:
    426   1.21   mycroft 		*ap->a_retval = _POSIX_VDISABLE;
    427   1.55    kleink 		return (0);
    428   1.55    kleink 	case _PC_SYNC_IO:
    429   1.55    kleink 		*ap->a_retval = 1;
    430   1.21   mycroft 		return (0);
    431   1.21   mycroft 	default:
    432   1.21   mycroft 		return (EINVAL);
    433   1.21   mycroft 	}
    434   1.21   mycroft 	/* NOTREACHED */
    435    1.1        pk }
    436    1.1        pk 
    437    1.1        pk /*
    438    1.9       cgd  * _print is used for debugging.
    439    1.9       cgd  * just print a readable description
    440    1.9       cgd  * of (vp).
    441    1.1        pk  */
    442   1.37  christos int
    443   1.37  christos procfs_print(v)
    444   1.37  christos 	void *v;
    445   1.37  christos {
    446   1.22   mycroft 	struct vop_print_args /* {
    447   1.22   mycroft 		struct vnode *a_vp;
    448   1.37  christos 	} */ *ap = v;
    449   1.21   mycroft 	struct pfsnode *pfs = VTOPFS(ap->a_vp);
    450    1.5        pk 
    451   1.44  christos 	printf("tag VT_PROCFS, type %d, pid %d, mode %x, flags %lx\n",
    452   1.21   mycroft 	    pfs->pfs_type, pfs->pfs_pid, pfs->pfs_mode, pfs->pfs_flags);
    453   1.37  christos 	return 0;
    454   1.36   mycroft }
    455   1.36   mycroft 
    456   1.36   mycroft int
    457  1.121     perry procfs_link(v)
    458   1.37  christos 	void *v;
    459   1.37  christos {
    460   1.36   mycroft 	struct vop_link_args /* {
    461   1.36   mycroft 		struct vnode *a_dvp;
    462  1.121     perry 		struct vnode *a_vp;
    463   1.36   mycroft 		struct componentname *a_cnp;
    464   1.37  christos 	} */ *ap = v;
    465  1.121     perry 
    466   1.36   mycroft 	VOP_ABORTOP(ap->a_dvp, ap->a_cnp);
    467   1.36   mycroft 	vput(ap->a_dvp);
    468   1.36   mycroft 	return (EROFS);
    469   1.36   mycroft }
    470   1.36   mycroft 
    471   1.36   mycroft int
    472   1.37  christos procfs_symlink(v)
    473   1.37  christos 	void *v;
    474   1.37  christos {
    475   1.36   mycroft 	struct vop_symlink_args /* {
    476   1.36   mycroft 		struct vnode *a_dvp;
    477   1.36   mycroft 		struct vnode **a_vpp;
    478   1.36   mycroft 		struct componentname *a_cnp;
    479   1.36   mycroft 		struct vattr *a_vap;
    480   1.36   mycroft 		char *a_target;
    481   1.37  christos 	} */ *ap = v;
    482  1.121     perry 
    483   1.36   mycroft 	VOP_ABORTOP(ap->a_dvp, ap->a_cnp);
    484   1.36   mycroft 	vput(ap->a_dvp);
    485   1.36   mycroft 	return (EROFS);
    486    1.1        pk }
    487    1.1        pk 
    488    1.1        pk /*
    489  1.126    atatat  * Works out the path to (and vnode of) the target process's current
    490  1.126    atatat  * working directory or chroot.  If the caller is in a chroot and
    491  1.126    atatat  * can't "reach" the target's cwd or root (or some other error
    492  1.126    atatat  * occurs), a "/" is returned for the path and a NULL pointer is
    493  1.126    atatat  * returned for the vnode.
    494  1.126    atatat  */
    495  1.126    atatat static struct vnode *
    496  1.128  christos procfs_dir(pfstype t, struct lwp *caller, struct proc *target,
    497  1.126    atatat 	   char **bpp, char *path, int len)
    498  1.126    atatat {
    499  1.128  christos 	struct vnode *vp, *rvp = caller->l_proc->p_cwdi->cwdi_rdir;
    500  1.126    atatat 	char *bp;
    501  1.126    atatat 
    502  1.126    atatat 	bp = bpp ? *bpp : NULL;
    503  1.126    atatat 
    504  1.126    atatat 	switch (t) {
    505  1.126    atatat 	case PFScwd:
    506  1.126    atatat 		vp = target->p_cwdi->cwdi_cdir;
    507  1.126    atatat 		break;
    508  1.126    atatat 	case PFSchroot:
    509  1.126    atatat 		vp = target->p_cwdi->cwdi_rdir;
    510  1.126    atatat 		break;
    511  1.136  christos 	case PFSexe:
    512  1.136  christos 		rvp = rootvnode;
    513  1.136  christos 		vp = target->p_textvp;
    514  1.136  christos 		break;
    515  1.126    atatat 	default:
    516  1.126    atatat 		return (NULL);
    517  1.126    atatat 	}
    518  1.126    atatat 
    519  1.126    atatat 	if (rvp == NULL)
    520  1.126    atatat 		rvp = rootvnode;
    521  1.126    atatat 	if (vp == NULL || getcwd_common(vp, rvp, bp ? &bp : NULL, path,
    522  1.126    atatat 	    len / 2, 0, caller) != 0) {
    523  1.126    atatat 		vp = NULL;
    524  1.126    atatat 		if (bpp) {
    525  1.126    atatat 			bp = *bpp;
    526  1.126    atatat 			*--bp = '/';
    527  1.126    atatat 		}
    528  1.126    atatat 	}
    529  1.126    atatat 
    530  1.126    atatat 	if (bpp)
    531  1.126    atatat 		*bpp = bp;
    532  1.126    atatat 
    533  1.126    atatat 	return (vp);
    534  1.126    atatat }
    535  1.126    atatat 
    536  1.126    atatat /*
    537    1.9       cgd  * Invent attributes for pfsnode (vp) and store
    538    1.9       cgd  * them in (vap).
    539    1.9       cgd  * Directories lengths are returned as zero since
    540    1.9       cgd  * any real length would require the genuine size
    541    1.9       cgd  * to be computed, and nothing cares anyway.
    542    1.9       cgd  *
    543    1.9       cgd  * this is relatively minimal for procfs.
    544    1.1        pk  */
    545   1.37  christos int
    546   1.37  christos procfs_getattr(v)
    547   1.37  christos 	void *v;
    548   1.37  christos {
    549   1.22   mycroft 	struct vop_getattr_args /* {
    550   1.22   mycroft 		struct vnode *a_vp;
    551   1.22   mycroft 		struct vattr *a_vap;
    552  1.130      elad 		kauth_cred_t a_cred;
    553  1.128  christos 		struct lwp *a_l;
    554   1.37  christos 	} */ *ap = v;
    555   1.21   mycroft 	struct pfsnode *pfs = VTOPFS(ap->a_vp);
    556   1.21   mycroft 	struct vattr *vap = ap->a_vap;
    557    1.1        pk 	struct proc *procp;
    558    1.9       cgd 	int error;
    559    1.1        pk 
    560   1.21   mycroft 	/* first check the process still exists */
    561   1.21   mycroft 	switch (pfs->pfs_type) {
    562  1.109     darcy 	case PFSroot:
    563  1.109     darcy 	case PFScurproc:
    564  1.109     darcy 	case PFSself:
    565   1.21   mycroft 		procp = 0;
    566   1.21   mycroft 		break;
    567   1.21   mycroft 
    568   1.21   mycroft 	default:
    569   1.21   mycroft 		procp = PFIND(pfs->pfs_pid);
    570   1.91  christos 		if (procp == NULL)
    571   1.21   mycroft 			return (ENOENT);
    572   1.46   mycroft 		break;
    573   1.21   mycroft 	}
    574   1.21   mycroft 
    575  1.125      elad 	if (procp != NULL) {
    576  1.132      yamt 		if (kauth_authorize_process(kauth_cred_get(),
    577  1.132      yamt 		    KAUTH_PROCESS_CANSEE, procp, NULL, NULL, NULL) != 0)
    578  1.125      elad 			return (ENOENT);
    579  1.125      elad 	}
    580  1.125      elad 
    581   1.21   mycroft 	error = 0;
    582   1.21   mycroft 
    583    1.9       cgd 	/* start by zeroing out the attributes */
    584    1.1        pk 	VATTR_NULL(vap);
    585    1.9       cgd 
    586    1.9       cgd 	/* next do all the common fields */
    587   1.21   mycroft 	vap->va_type = ap->a_vp->v_type;
    588    1.9       cgd 	vap->va_mode = pfs->pfs_mode;
    589    1.9       cgd 	vap->va_fileid = pfs->pfs_fileno;
    590    1.9       cgd 	vap->va_flags = 0;
    591   1.19       cgd 	vap->va_blocksize = PAGE_SIZE;
    592    1.9       cgd 
    593    1.9       cgd 	/*
    594  1.131    kardel 	 * Make all times be current TOD.
    595   1.90    simonb 	 *
    596    1.9       cgd 	 * It would be possible to get the process start
    597  1.126    atatat 	 * time from the p_stats structure, but there's
    598    1.9       cgd 	 * no "file creation" time stamp anyway, and the
    599  1.126    atatat 	 * p_stats structure is not addressable if u. gets
    600    1.9       cgd 	 * swapped out for that process.
    601    1.9       cgd 	 */
    602  1.131    kardel 	getnanotime(&vap->va_ctime);
    603    1.9       cgd 	vap->va_atime = vap->va_mtime = vap->va_ctime;
    604  1.126    atatat 	if (procp)
    605  1.126    atatat 		TIMEVAL_TO_TIMESPEC(&procp->p_stats->p_start,
    606  1.126    atatat 		    &vap->va_birthtime);
    607  1.126    atatat 	else
    608  1.131    kardel 		getnanotime(&vap->va_birthtime);
    609    1.9       cgd 
    610   1.21   mycroft 	switch (pfs->pfs_type) {
    611  1.109     darcy 	case PFSmem:
    612  1.109     darcy 	case PFSregs:
    613  1.109     darcy 	case PFSfpregs:
    614   1.86   thorpej #if defined(__HAVE_PROCFS_MACHDEP) && defined(PROCFS_MACHDEP_PROTECT_CASES)
    615   1.86   thorpej 	PROCFS_MACHDEP_PROTECT_CASES
    616   1.86   thorpej #endif
    617   1.47   mycroft 		/*
    618   1.47   mycroft 		 * If the process has exercised some setuid or setgid
    619   1.47   mycroft 		 * privilege, then rip away read/write permission so
    620   1.47   mycroft 		 * that only root can gain access.
    621   1.47   mycroft 		 */
    622   1.21   mycroft 		if (procp->p_flag & P_SUGID)
    623   1.47   mycroft 			vap->va_mode &= ~(S_IRUSR|S_IWUSR);
    624   1.46   mycroft 		/* FALLTHROUGH */
    625  1.109     darcy 	case PFSctl:
    626  1.109     darcy 	case PFSstatus:
    627  1.109     darcy 	case PFSstat:
    628  1.109     darcy 	case PFSnote:
    629  1.109     darcy 	case PFSnotepg:
    630  1.109     darcy 	case PFSmap:
    631  1.109     darcy 	case PFSmaps:
    632  1.109     darcy 	case PFScmdline:
    633  1.137  christos 	case PFSemul:
    634   1.12        ws 		vap->va_nlink = 1;
    635  1.130      elad 		vap->va_uid = kauth_cred_geteuid(procp->p_cred);
    636  1.130      elad 		vap->va_gid = kauth_cred_getegid(procp->p_cred);
    637   1.21   mycroft 		break;
    638  1.109     darcy 	case PFSmeminfo:
    639  1.134      manu 	case PFSdevices:
    640  1.109     darcy 	case PFScpuinfo:
    641  1.109     darcy 	case PFSuptime:
    642  1.114  jdolecek 	case PFSmounts:
    643   1.76      fvdl 		vap->va_nlink = 1;
    644   1.76      fvdl 		vap->va_uid = vap->va_gid = 0;
    645   1.76      fvdl 		break;
    646   1.46   mycroft 
    647   1.46   mycroft 	default:
    648   1.37  christos 		break;
    649   1.12        ws 	}
    650   1.12        ws 
    651    1.9       cgd 	/*
    652    1.9       cgd 	 * now do the object specific fields
    653    1.9       cgd 	 *
    654    1.9       cgd 	 * The size could be set from struct reg, but it's hardly
    655    1.9       cgd 	 * worth the trouble, and it puts some (potentially) machine
    656    1.9       cgd 	 * dependent data into this machine-independent code.  If it
    657    1.9       cgd 	 * becomes important then this function should break out into
    658    1.9       cgd 	 * a per-file stat function in the corresponding .c file.
    659    1.9       cgd 	 */
    660    1.1        pk 
    661    1.9       cgd 	switch (pfs->pfs_type) {
    662  1.109     darcy 	case PFSroot:
    663   1.21   mycroft 		/*
    664   1.21   mycroft 		 * Set nlink to 1 to tell fts(3) we don't actually know.
    665   1.21   mycroft 		 */
    666   1.21   mycroft 		vap->va_nlink = 1;
    667   1.21   mycroft 		vap->va_uid = 0;
    668   1.21   mycroft 		vap->va_gid = 0;
    669   1.46   mycroft 		vap->va_bytes = vap->va_size = DEV_BSIZE;
    670   1.21   mycroft 		break;
    671   1.21   mycroft 
    672  1.129  christos 	case PFSself:
    673  1.109     darcy 	case PFScurproc: {
    674  1.123  christos 		char bf[16];		/* should be enough */
    675   1.21   mycroft 		vap->va_nlink = 1;
    676   1.21   mycroft 		vap->va_uid = 0;
    677   1.21   mycroft 		vap->va_gid = 0;
    678   1.46   mycroft 		vap->va_bytes = vap->va_size =
    679  1.123  christos 		    snprintf(bf, sizeof(bf), "%ld", (long)curproc->p_pid);
    680    1.9       cgd 		break;
    681   1.21   mycroft 	}
    682    1.9       cgd 
    683  1.109     darcy 	case PFSfd:
    684   1.91  christos 		if (pfs->pfs_fd != -1) {
    685   1.91  christos 			struct file *fp;
    686   1.98  jdolecek 			struct proc *pown;
    687   1.98  jdolecek 
    688   1.98  jdolecek 			if ((error = procfs_getfp(pfs, &pown, &fp)) != 0)
    689   1.91  christos 				return error;
    690   1.98  jdolecek 			FILE_USE(fp);
    691   1.91  christos 			vap->va_nlink = 1;
    692  1.130      elad 			vap->va_uid = kauth_cred_geteuid(fp->f_cred);
    693  1.130      elad 			vap->va_gid = kauth_cred_getegid(fp->f_cred);
    694   1.91  christos 			switch (fp->f_type) {
    695   1.91  christos 			case DTYPE_VNODE:
    696   1.91  christos 				vap->va_bytes = vap->va_size =
    697   1.91  christos 				    ((struct vnode *)fp->f_data)->v_size;
    698   1.91  christos 				break;
    699   1.91  christos 			default:
    700   1.91  christos 				vap->va_bytes = vap->va_size = 0;
    701   1.91  christos 				break;
    702   1.91  christos 			}
    703  1.128  christos 			FILE_UNUSE(fp, proc_representative_lwp(pown));
    704   1.91  christos 			break;
    705   1.91  christos 		}
    706   1.91  christos 		/*FALLTHROUGH*/
    707  1.109     darcy 	case PFSproc:
    708    1.9       cgd 		vap->va_nlink = 2;
    709  1.130      elad 		vap->va_uid = kauth_cred_geteuid(procp->p_cred);
    710  1.130      elad 		vap->va_gid = kauth_cred_getegid(procp->p_cred);
    711   1.46   mycroft 		vap->va_bytes = vap->va_size = DEV_BSIZE;
    712   1.21   mycroft 		break;
    713   1.21   mycroft 
    714  1.109     darcy 	case PFSfile:
    715   1.21   mycroft 		error = EOPNOTSUPP;
    716    1.9       cgd 		break;
    717    1.9       cgd 
    718  1.109     darcy 	case PFSmem:
    719    1.9       cgd 		vap->va_bytes = vap->va_size =
    720    1.9       cgd 			ctob(procp->p_vmspace->vm_tsize +
    721    1.9       cgd 				    procp->p_vmspace->vm_dsize +
    722    1.9       cgd 				    procp->p_vmspace->vm_ssize);
    723    1.9       cgd 		break;
    724    1.9       cgd 
    725   1.18       cgd #if defined(PT_GETREGS) || defined(PT_SETREGS)
    726  1.109     darcy 	case PFSregs:
    727   1.11       cgd 		vap->va_bytes = vap->va_size = sizeof(struct reg);
    728   1.18       cgd 		break;
    729   1.14       cgd #endif
    730   1.14       cgd 
    731   1.18       cgd #if defined(PT_GETFPREGS) || defined(PT_SETFPREGS)
    732  1.109     darcy 	case PFSfpregs:
    733   1.14       cgd 		vap->va_bytes = vap->va_size = sizeof(struct fpreg);
    734   1.18       cgd 		break;
    735   1.14       cgd #endif
    736   1.12        ws 
    737  1.109     darcy 	case PFSctl:
    738  1.109     darcy 	case PFSstatus:
    739  1.109     darcy 	case PFSstat:
    740  1.109     darcy 	case PFSnote:
    741  1.109     darcy 	case PFSnotepg:
    742  1.109     darcy 	case PFScmdline:
    743  1.109     darcy 	case PFSmeminfo:
    744  1.134      manu 	case PFSdevices:
    745  1.109     darcy 	case PFScpuinfo:
    746  1.109     darcy 	case PFSuptime:
    747  1.114  jdolecek 	case PFSmounts:
    748   1.46   mycroft 		vap->va_bytes = vap->va_size = 0;
    749   1.79      fvdl 		break;
    750  1.109     darcy 	case PFSmap:
    751  1.109     darcy 	case PFSmaps:
    752   1.79      fvdl 		/*
    753   1.79      fvdl 		 * Advise a larger blocksize for the map files, so that
    754   1.79      fvdl 		 * they may be read in one pass.
    755   1.79      fvdl 		 */
    756   1.80      fvdl 		vap->va_blocksize = 4 * PAGE_SIZE;
    757   1.83       chs 		vap->va_bytes = vap->va_size = 0;
    758    1.9       cgd 		break;
    759   1.86   thorpej 
    760  1.126    atatat 	case PFScwd:
    761  1.136  christos 	case PFSchroot:
    762  1.136  christos 	case PFSexe: {
    763  1.126    atatat 		char *path, *bp;
    764  1.126    atatat 
    765  1.126    atatat 		MALLOC(path, char *, MAXPATHLEN + 4, M_TEMP,
    766  1.126    atatat 		    M_WAITOK|M_CANFAIL);
    767  1.126    atatat 		if (path == NULL)
    768  1.126    atatat 			return (ENOMEM);
    769  1.126    atatat 		vap->va_nlink = 1;
    770  1.126    atatat 		vap->va_uid = 0;
    771  1.126    atatat 		vap->va_gid = 0;
    772  1.126    atatat 		bp = path + MAXPATHLEN;
    773  1.126    atatat 		*--bp = '\0';
    774  1.128  christos 		(void)procfs_dir(pfs->pfs_type, curlwp, procp, &bp, path,
    775  1.126    atatat 		     MAXPATHLEN);
    776  1.126    atatat 		vap->va_bytes = vap->va_size = strlen(bp);
    777  1.126    atatat 		free(path, M_TEMP);
    778  1.126    atatat 		break;
    779  1.126    atatat 	}
    780  1.126    atatat 
    781  1.137  christos 	case PFSemul:
    782  1.137  christos 		vap->va_bytes = vap->va_size = strlen(procp->p_emul->e_name);
    783  1.137  christos 		break;
    784  1.137  christos 
    785   1.86   thorpej #ifdef __HAVE_PROCFS_MACHDEP
    786   1.86   thorpej 	PROCFS_MACHDEP_NODETYPE_CASES
    787   1.86   thorpej 		error = procfs_machdep_getattr(ap->a_vp, vap, procp);
    788   1.86   thorpej 		break;
    789   1.86   thorpej #endif
    790    1.1        pk 
    791    1.9       cgd 	default:
    792   1.21   mycroft 		panic("procfs_getattr");
    793    1.1        pk 	}
    794    1.1        pk 
    795    1.9       cgd 	return (error);
    796    1.1        pk }
    797    1.1        pk 
    798   1.37  christos /*ARGSUSED*/
    799   1.37  christos int
    800  1.135  christos procfs_setattr(void *v __unused)
    801    1.5        pk {
    802    1.5        pk 	/*
    803    1.9       cgd 	 * just fake out attribute setting
    804    1.9       cgd 	 * it's not good to generate an error
    805    1.9       cgd 	 * return, otherwise things like creat()
    806    1.9       cgd 	 * will fail when they try to set the
    807    1.9       cgd 	 * file length to 0.  worse, this means
    808    1.9       cgd 	 * that echo $note > /proc/$pid/note will fail.
    809    1.5        pk 	 */
    810    1.5        pk 
    811    1.9       cgd 	return (0);
    812    1.5        pk }
    813    1.5        pk 
    814    1.9       cgd /*
    815    1.9       cgd  * implement access checking.
    816    1.9       cgd  *
    817    1.9       cgd  * actually, the check for super-user is slightly
    818    1.9       cgd  * broken since it will allow read access to write-only
    819    1.9       cgd  * objects.  this doesn't cause any particular trouble
    820    1.9       cgd  * but does mean that the i/o entry points need to check
    821    1.9       cgd  * that the operation really does make sense.
    822    1.9       cgd  */
    823   1.37  christos int
    824   1.37  christos procfs_access(v)
    825   1.37  christos 	void *v;
    826   1.37  christos {
    827   1.22   mycroft 	struct vop_access_args /* {
    828   1.22   mycroft 		struct vnode *a_vp;
    829   1.22   mycroft 		int a_mode;
    830  1.130      elad 		kauth_cred_t a_cred;
    831  1.128  christos 		struct lwp *a_l;
    832   1.37  christos 	} */ *ap = v;
    833   1.31   mycroft 	struct vattr va;
    834    1.1        pk 	int error;
    835    1.1        pk 
    836  1.128  christos 	if ((error = VOP_GETATTR(ap->a_vp, &va, ap->a_cred, ap->a_l)) != 0)
    837    1.1        pk 		return (error);
    838    1.9       cgd 
    839   1.49   mycroft 	return (vaccess(va.va_type, va.va_mode,
    840   1.49   mycroft 	    va.va_uid, va.va_gid, ap->a_mode, ap->a_cred));
    841    1.1        pk }
    842    1.1        pk 
    843    1.1        pk /*
    844    1.9       cgd  * lookup.  this is incredibly complicated in the
    845    1.9       cgd  * general case, however for most pseudo-filesystems
    846    1.9       cgd  * very little needs to be done.
    847    1.9       cgd  *
    848   1.62  wrstuden  * Locking isn't hard here, just poorly documented.
    849   1.62  wrstuden  *
    850  1.121     perry  * If we're looking up ".", just vref the parent & return it.
    851   1.62  wrstuden  *
    852   1.62  wrstuden  * If we're looking up "..", unlock the parent, and lock "..". If everything
    853   1.62  wrstuden  * went ok, and we're on the last component and the caller requested the
    854   1.62  wrstuden  * parent locked, try to re-lock the parent. We do this to prevent lock
    855   1.62  wrstuden  * races.
    856   1.62  wrstuden  *
    857   1.62  wrstuden  * For anything else, get the needed node. Then unlock the parent if not
    858   1.62  wrstuden  * the last component or not LOCKPARENT (i.e. if we wouldn't re-lock the
    859   1.62  wrstuden  * parent in the .. case).
    860   1.62  wrstuden  *
    861   1.62  wrstuden  * We try to exit with the parent locked in error cases.
    862    1.9       cgd  */
    863   1.37  christos int
    864   1.37  christos procfs_lookup(v)
    865   1.37  christos 	void *v;
    866   1.37  christos {
    867   1.22   mycroft 	struct vop_lookup_args /* {
    868   1.22   mycroft 		struct vnode * a_dvp;
    869   1.22   mycroft 		struct vnode ** a_vpp;
    870   1.22   mycroft 		struct componentname * a_cnp;
    871   1.37  christos 	} */ *ap = v;
    872   1.21   mycroft 	struct componentname *cnp = ap->a_cnp;
    873   1.21   mycroft 	struct vnode **vpp = ap->a_vpp;
    874   1.21   mycroft 	struct vnode *dvp = ap->a_dvp;
    875   1.45       cgd 	const char *pname = cnp->cn_nameptr;
    876   1.78  jdolecek 	const struct proc_target *pt = NULL;
    877   1.32   mycroft 	struct vnode *fvp;
    878    1.1        pk 	pid_t pid;
    879    1.9       cgd 	struct pfsnode *pfs;
    880   1.76      fvdl 	struct proc *p = NULL;
    881  1.128  christos 	struct lwp *l = NULL;
    882   1.69   thorpej 	int i, error, wantpunlock, iscurproc = 0, isself = 0;
    883    1.1        pk 
    884   1.32   mycroft 	*vpp = NULL;
    885   1.62  wrstuden 	cnp->cn_flags &= ~PDIRUNLOCK;
    886   1.32   mycroft 
    887   1.32   mycroft 	if (cnp->cn_nameiop == DELETE || cnp->cn_nameiop == RENAME)
    888   1.32   mycroft 		return (EROFS);
    889   1.32   mycroft 
    890   1.21   mycroft 	if (cnp->cn_namelen == 1 && *pname == '.') {
    891   1.21   mycroft 		*vpp = dvp;
    892    1.9       cgd 		VREF(dvp);
    893    1.9       cgd 		return (0);
    894    1.9       cgd 	}
    895    1.1        pk 
    896   1.62  wrstuden 	wantpunlock = (~cnp->cn_flags & (LOCKPARENT | ISLASTCN));
    897    1.9       cgd 	pfs = VTOPFS(dvp);
    898    1.9       cgd 	switch (pfs->pfs_type) {
    899  1.109     darcy 	case PFSroot:
    900   1.62  wrstuden 		/*
    901   1.62  wrstuden 		 * Shouldn't get here with .. in the root node.
    902   1.62  wrstuden 		 */
    903  1.121     perry 		if (cnp->cn_flags & ISDOTDOT)
    904    1.9       cgd 			return (EIO);
    905    1.9       cgd 
    906   1.69   thorpej 		iscurproc = CNEQ(cnp, "curproc", 7);
    907   1.69   thorpej 		isself = CNEQ(cnp, "self", 4);
    908   1.69   thorpej 
    909   1.69   thorpej 		if (iscurproc || isself) {
    910   1.69   thorpej 			error = procfs_allocvp(dvp->v_mount, vpp, 0,
    911  1.109     darcy 			    iscurproc ? PFScurproc : PFSself, -1);
    912   1.62  wrstuden 			if ((error == 0) && (wantpunlock)) {
    913   1.62  wrstuden 				VOP_UNLOCK(dvp, 0);
    914   1.62  wrstuden 				cnp->cn_flags |= PDIRUNLOCK;
    915   1.62  wrstuden 			}
    916   1.62  wrstuden 			return (error);
    917   1.62  wrstuden 		}
    918   1.12        ws 
    919   1.76      fvdl 		for (i = 0; i < nproc_root_targets; i++) {
    920   1.76      fvdl 			pt = &proc_root_targets[i];
    921   1.76      fvdl 			if (cnp->cn_namelen == pt->pt_namlen &&
    922   1.76      fvdl 			    memcmp(pt->pt_name, pname, cnp->cn_namelen) == 0 &&
    923   1.76      fvdl 			    (pt->pt_valid == NULL ||
    924  1.128  christos 			     (*pt->pt_valid)(cnp->cn_lwp, dvp->v_mount)))
    925   1.76      fvdl 				break;
    926   1.76      fvdl 		}
    927   1.76      fvdl 
    928   1.76      fvdl 		if (i != nproc_root_targets) {
    929   1.76      fvdl 			error = procfs_allocvp(dvp->v_mount, vpp, 0,
    930   1.91  christos 			    pt->pt_pfstype, -1);
    931   1.76      fvdl 			if ((error == 0) && (wantpunlock)) {
    932   1.76      fvdl 				VOP_UNLOCK(dvp, 0);
    933   1.76      fvdl 				cnp->cn_flags |= PDIRUNLOCK;
    934   1.76      fvdl 			}
    935   1.76      fvdl 			return (error);
    936   1.76      fvdl 		}
    937   1.76      fvdl 
    938   1.91  christos 		pid = (pid_t)atoi(pname, cnp->cn_namelen);
    939    1.9       cgd 
    940   1.32   mycroft 		p = PFIND(pid);
    941   1.91  christos 		if (p == NULL)
    942   1.32   mycroft 			break;
    943    1.9       cgd 
    944  1.109     darcy 		error = procfs_allocvp(dvp->v_mount, vpp, pid, PFSproc, -1);
    945   1.62  wrstuden 		if ((error == 0) && (wantpunlock)) {
    946   1.62  wrstuden 			VOP_UNLOCK(dvp, 0);
    947   1.62  wrstuden 			cnp->cn_flags |= PDIRUNLOCK;
    948   1.62  wrstuden 		}
    949   1.62  wrstuden 		return (error);
    950    1.9       cgd 
    951  1.109     darcy 	case PFSproc:
    952   1.62  wrstuden 		/*
    953   1.62  wrstuden 		 * do the .. dance. We unlock the directory, and then
    954   1.62  wrstuden 		 * get the root dir. That will automatically return ..
    955   1.62  wrstuden 		 * locked. Then if the caller wanted dvp locked, we
    956   1.62  wrstuden 		 * re-lock.
    957   1.62  wrstuden 		 */
    958   1.62  wrstuden 		if (cnp->cn_flags & ISDOTDOT) {
    959   1.62  wrstuden 			VOP_UNLOCK(dvp, 0);
    960   1.62  wrstuden 			cnp->cn_flags |= PDIRUNLOCK;
    961  1.105   thorpej 			error = procfs_root(dvp->v_mount, vpp);
    962   1.62  wrstuden 			if ((error == 0) && (wantpunlock == 0) &&
    963   1.62  wrstuden 				    ((error = vn_lock(dvp, LK_EXCLUSIVE)) == 0))
    964   1.62  wrstuden 				cnp->cn_flags &= ~PDIRUNLOCK;
    965   1.62  wrstuden 			return (error);
    966   1.62  wrstuden 		}
    967    1.1        pk 
    968   1.32   mycroft 		p = PFIND(pfs->pfs_pid);
    969   1.91  christos 		if (p == NULL)
    970   1.32   mycroft 			break;
    971  1.128  christos 		l = proc_representative_lwp(p);
    972   1.32   mycroft 
    973   1.32   mycroft 		for (pt = proc_targets, i = 0; i < nproc_targets; pt++, i++) {
    974   1.32   mycroft 			if (cnp->cn_namelen == pt->pt_namlen &&
    975   1.56     perry 			    memcmp(pt->pt_name, pname, cnp->cn_namelen) == 0 &&
    976   1.76      fvdl 			    (pt->pt_valid == NULL ||
    977  1.128  christos 			     (*pt->pt_valid)(cnp->cn_lwp, dvp->v_mount)))
    978    1.9       cgd 				goto found;
    979    1.9       cgd 		}
    980   1.32   mycroft 		break;
    981    1.1        pk 
    982    1.9       cgd 	found:
    983  1.109     darcy 		if (pt->pt_pfstype == PFSfile) {
    984   1.75       chs 			fvp = p->p_textvp;
    985   1.23   mycroft 			/* We already checked that it exists. */
    986   1.32   mycroft 			VREF(fvp);
    987   1.53      fvdl 			vn_lock(fvp, LK_EXCLUSIVE | LK_RETRY);
    988   1.62  wrstuden 			if (wantpunlock) {
    989   1.62  wrstuden 				VOP_UNLOCK(dvp, 0);
    990   1.62  wrstuden 				cnp->cn_flags |= PDIRUNLOCK;
    991   1.62  wrstuden 			}
    992   1.32   mycroft 			*vpp = fvp;
    993   1.21   mycroft 			return (0);
    994   1.21   mycroft 		}
    995    1.1        pk 
    996   1.62  wrstuden 		error = procfs_allocvp(dvp->v_mount, vpp, pfs->pfs_pid,
    997   1.91  christos 		    pt->pt_pfstype, -1);
    998   1.62  wrstuden 		if ((error == 0) && (wantpunlock)) {
    999   1.62  wrstuden 			VOP_UNLOCK(dvp, 0);
   1000   1.62  wrstuden 			cnp->cn_flags |= PDIRUNLOCK;
   1001   1.62  wrstuden 		}
   1002   1.62  wrstuden 		return (error);
   1003    1.1        pk 
   1004  1.109     darcy 	case PFSfd: {
   1005   1.91  christos 		int fd;
   1006   1.91  christos 		struct file *fp;
   1007   1.91  christos 		/*
   1008   1.91  christos 		 * do the .. dance. We unlock the directory, and then
   1009   1.91  christos 		 * get the proc dir. That will automatically return ..
   1010   1.91  christos 		 * locked. Then if the caller wanted dvp locked, we
   1011   1.91  christos 		 * re-lock.
   1012   1.91  christos 		 */
   1013   1.91  christos 		if (cnp->cn_flags & ISDOTDOT) {
   1014   1.91  christos 			VOP_UNLOCK(dvp, 0);
   1015   1.91  christos 			cnp->cn_flags |= PDIRUNLOCK;
   1016   1.91  christos 			error = procfs_allocvp(dvp->v_mount, vpp, pfs->pfs_pid,
   1017  1.109     darcy 			    PFSproc, -1);
   1018   1.91  christos 			if ((error == 0) && (wantpunlock == 0) &&
   1019   1.91  christos 				    ((error = vn_lock(dvp, LK_EXCLUSIVE)) == 0))
   1020   1.91  christos 				cnp->cn_flags &= ~PDIRUNLOCK;
   1021   1.91  christos 			return (error);
   1022   1.91  christos 		}
   1023   1.91  christos 		fd = atoi(pname, cnp->cn_namelen);
   1024   1.91  christos 		p = PFIND(pfs->pfs_pid);
   1025   1.99  jdolecek 		if (p == NULL || (fp = fd_getfile(p->p_fd, fd)) == NULL)
   1026   1.91  christos 			return ENOENT;
   1027   1.99  jdolecek 		FILE_USE(fp);
   1028   1.99  jdolecek 
   1029   1.91  christos 		switch (fp->f_type) {
   1030   1.91  christos 		case DTYPE_VNODE:
   1031   1.91  christos 			fvp = (struct vnode *)fp->f_data;
   1032  1.101  jdolecek 
   1033  1.101  jdolecek 			/* Don't show directories */
   1034  1.102  christos 			if (fvp->v_type == VDIR)
   1035  1.102  christos 				goto symlink;
   1036  1.101  jdolecek 
   1037   1.91  christos 			VREF(fvp);
   1038  1.128  christos 			FILE_UNUSE(fp, l);
   1039  1.121     perry 			vn_lock(fvp, LK_EXCLUSIVE | LK_RETRY |
   1040   1.92  christos 			    (p == curproc ? LK_CANRECURSE : 0));
   1041   1.91  christos 			*vpp = fvp;
   1042   1.91  christos 			error = 0;
   1043   1.91  christos 			break;
   1044   1.91  christos 		default:
   1045  1.102  christos 		symlink:
   1046  1.128  christos 			FILE_UNUSE(fp, l);
   1047   1.91  christos 			error = procfs_allocvp(dvp->v_mount, vpp, pfs->pfs_pid,
   1048  1.109     darcy 			    PFSfd, fd);
   1049   1.91  christos 			break;
   1050   1.91  christos 		}
   1051   1.91  christos 		if ((error == 0) && (wantpunlock)) {
   1052   1.91  christos 			VOP_UNLOCK(dvp, 0);
   1053   1.91  christos 			cnp->cn_flags |= PDIRUNLOCK;
   1054   1.91  christos 		}
   1055   1.91  christos 		return error;
   1056   1.91  christos 	}
   1057    1.9       cgd 	default:
   1058    1.9       cgd 		return (ENOTDIR);
   1059    1.1        pk 	}
   1060   1.32   mycroft 
   1061   1.32   mycroft 	return (cnp->cn_nameiop == LOOKUP ? ENOENT : EROFS);
   1062    1.1        pk }
   1063    1.1        pk 
   1064   1.18       cgd int
   1065  1.135  christos procfs_validfile(struct lwp *l, struct mount *mp __unused)
   1066   1.18       cgd {
   1067  1.136  christos 	return l != NULL && l->l_proc != NULL && l->l_proc->p_textvp != NULL;
   1068   1.74        tv }
   1069   1.21   mycroft 
   1070   1.74        tv static int
   1071  1.128  christos procfs_validfile_linux(l, mp)
   1072  1.128  christos 	struct lwp *l;
   1073   1.76      fvdl 	struct mount *mp;
   1074   1.74        tv {
   1075   1.76      fvdl 	int flags;
   1076   1.76      fvdl 
   1077   1.76      fvdl 	flags = VFSTOPROC(mp)->pmnt_flags;
   1078  1.136  christos 	return (flags & PROCFSMNT_LINUXCOMPAT) && procfs_validfile(l, mp);
   1079   1.18       cgd }
   1080   1.18       cgd 
   1081  1.117      yamt struct procfs_root_readdir_ctx {
   1082  1.117      yamt 	struct uio *uiop;
   1083  1.117      yamt 	off_t *cookies;
   1084  1.117      yamt 	int ncookies;
   1085  1.120      yamt 	off_t off;
   1086  1.120      yamt 	off_t startoff;
   1087  1.117      yamt 	int error;
   1088  1.117      yamt };
   1089  1.117      yamt 
   1090  1.117      yamt static int
   1091  1.117      yamt procfs_root_readdir_callback(struct proc *p, void *arg)
   1092  1.117      yamt {
   1093  1.117      yamt 	struct procfs_root_readdir_ctx *ctxp = arg;
   1094  1.117      yamt 	struct dirent d;
   1095  1.117      yamt 	struct uio *uiop;
   1096  1.117      yamt 	int error;
   1097  1.117      yamt 
   1098  1.117      yamt 	uiop = ctxp->uiop;
   1099  1.117      yamt 	if (uiop->uio_resid < UIO_MX)
   1100  1.117      yamt 		return -1; /* no space */
   1101  1.117      yamt 
   1102  1.120      yamt 	if (ctxp->off < ctxp->startoff) {
   1103  1.120      yamt 		ctxp->off++;
   1104  1.117      yamt 		return 0;
   1105  1.117      yamt 	}
   1106  1.117      yamt 
   1107  1.133      yamt 	if (kauth_authorize_process(kauth_cred_get(),
   1108  1.133      yamt 	    KAUTH_PROCESS_CANSEE, p, NULL, NULL, NULL) != 0)
   1109  1.133      yamt 		return 0;
   1110  1.125      elad 
   1111  1.117      yamt 	memset(&d, 0, UIO_MX);
   1112  1.117      yamt 	d.d_reclen = UIO_MX;
   1113  1.117      yamt 	d.d_fileno = PROCFS_FILENO(p->p_pid, PFSproc, -1);
   1114  1.117      yamt 	d.d_namlen = snprintf(d.d_name,
   1115  1.117      yamt 	    UIO_MX - offsetof(struct dirent, d_name), "%ld", (long)p->p_pid);
   1116  1.117      yamt 	d.d_type = DT_DIR;
   1117  1.117      yamt 
   1118  1.117      yamt 	proclist_unlock_read();
   1119  1.117      yamt 	error = uiomove(&d, UIO_MX, uiop);
   1120  1.117      yamt 	proclist_lock_read();
   1121  1.117      yamt 	if (error) {
   1122  1.117      yamt 		ctxp->error = error;
   1123  1.117      yamt 		return -1;
   1124  1.117      yamt 	}
   1125  1.117      yamt 
   1126  1.117      yamt 	ctxp->ncookies++;
   1127  1.117      yamt 	if (ctxp->cookies)
   1128  1.120      yamt 		*(ctxp->cookies)++ = ctxp->off + 1;
   1129  1.120      yamt 	ctxp->off++;
   1130  1.117      yamt 
   1131  1.117      yamt 	return 0;
   1132  1.117      yamt }
   1133  1.117      yamt 
   1134    1.9       cgd /*
   1135    1.9       cgd  * readdir returns directory entries from pfsnode (vp).
   1136    1.9       cgd  *
   1137    1.9       cgd  * the strategy here with procfs is to generate a single
   1138   1.34   mycroft  * directory entry at a time (struct dirent) and then
   1139    1.9       cgd  * copy that out to userland using uiomove.  a more efficent
   1140    1.9       cgd  * though more complex implementation, would try to minimize
   1141    1.9       cgd  * the number of calls to uiomove().  for procfs, this is
   1142    1.9       cgd  * hardly worth the added code complexity.
   1143    1.9       cgd  *
   1144    1.9       cgd  * this should just be done through read()
   1145    1.9       cgd  */
   1146   1.37  christos int
   1147   1.37  christos procfs_readdir(v)
   1148   1.37  christos 	void *v;
   1149   1.37  christos {
   1150   1.22   mycroft 	struct vop_readdir_args /* {
   1151   1.22   mycroft 		struct vnode *a_vp;
   1152   1.22   mycroft 		struct uio *a_uio;
   1153  1.130      elad 		kauth_cred_t a_cred;
   1154   1.22   mycroft 		int *a_eofflag;
   1155   1.53      fvdl 		off_t **a_cookies;
   1156   1.53      fvdl 		int *a_ncookies;
   1157   1.37  christos 	} */ *ap = v;
   1158   1.21   mycroft 	struct uio *uio = ap->a_uio;
   1159   1.34   mycroft 	struct dirent d;
   1160    1.9       cgd 	struct pfsnode *pfs;
   1161   1.68  sommerfe 	off_t i;
   1162    1.9       cgd 	int error;
   1163   1.53      fvdl 	off_t *cookies = NULL;
   1164  1.117      yamt 	int ncookies;
   1165   1.76      fvdl 	struct vnode *vp;
   1166   1.78  jdolecek 	const struct proc_target *pt;
   1167  1.117      yamt 	struct procfs_root_readdir_ctx ctx;
   1168    1.9       cgd 
   1169   1.76      fvdl 	vp = ap->a_vp;
   1170   1.76      fvdl 	pfs = VTOPFS(vp);
   1171    1.1        pk 
   1172    1.9       cgd 	if (uio->uio_resid < UIO_MX)
   1173    1.9       cgd 		return (EINVAL);
   1174   1.35   mycroft 	if (uio->uio_offset < 0)
   1175    1.1        pk 		return (EINVAL);
   1176    1.1        pk 
   1177    1.9       cgd 	error = 0;
   1178   1.35   mycroft 	i = uio->uio_offset;
   1179  1.113       jrf 	memset(&d, 0, UIO_MX);
   1180   1.34   mycroft 	d.d_reclen = UIO_MX;
   1181   1.53      fvdl 	ncookies = uio->uio_resid / UIO_MX;
   1182    1.9       cgd 
   1183    1.9       cgd 	switch (pfs->pfs_type) {
   1184    1.9       cgd 	/*
   1185    1.9       cgd 	 * this is for the process-specific sub-directories.
   1186    1.9       cgd 	 * all that is needed to is copy out all the entries
   1187    1.9       cgd 	 * from the procent[] table (top of this file).
   1188    1.9       cgd 	 */
   1189  1.109     darcy 	case PFSproc: {
   1190   1.32   mycroft 		struct proc *p;
   1191   1.66  christos 
   1192   1.66  christos 		if (i >= nproc_targets)
   1193   1.67  sommerfe 			return 0;
   1194    1.9       cgd 
   1195   1.32   mycroft 		p = PFIND(pfs->pfs_pid);
   1196   1.32   mycroft 		if (p == NULL)
   1197   1.32   mycroft 			break;
   1198   1.32   mycroft 
   1199   1.53      fvdl 		if (ap->a_ncookies) {
   1200   1.53      fvdl 			ncookies = min(ncookies, (nproc_targets - i));
   1201   1.72   thorpej 			cookies = malloc(ncookies * sizeof (off_t),
   1202   1.53      fvdl 			    M_TEMP, M_WAITOK);
   1203   1.53      fvdl 			*ap->a_cookies = cookies;
   1204   1.53      fvdl 		}
   1205   1.53      fvdl 
   1206   1.32   mycroft 		for (pt = &proc_targets[i];
   1207   1.32   mycroft 		     uio->uio_resid >= UIO_MX && i < nproc_targets; pt++, i++) {
   1208   1.76      fvdl 			if (pt->pt_valid &&
   1209  1.128  christos 			    (*pt->pt_valid)(proc_representative_lwp(p), vp->v_mount) == 0)
   1210   1.21   mycroft 				continue;
   1211  1.121     perry 
   1212   1.91  christos 			d.d_fileno = PROCFS_FILENO(pfs->pfs_pid,
   1213   1.91  christos 			    pt->pt_pfstype, -1);
   1214   1.34   mycroft 			d.d_namlen = pt->pt_namlen;
   1215   1.56     perry 			memcpy(d.d_name, pt->pt_name, pt->pt_namlen + 1);
   1216   1.34   mycroft 			d.d_type = pt->pt_type;
   1217   1.15        ws 
   1218  1.113       jrf 			if ((error = uiomove(&d, UIO_MX, uio)) != 0)
   1219    1.9       cgd 				break;
   1220   1.53      fvdl 			if (cookies)
   1221   1.35   mycroft 				*cookies++ = i + 1;
   1222    1.6        ws 		}
   1223    1.9       cgd 
   1224    1.9       cgd 	    	break;
   1225   1.34   mycroft 	}
   1226  1.109     darcy 	case PFSfd: {
   1227   1.91  christos 		struct proc *p;
   1228   1.91  christos 		struct filedesc	*fdp;
   1229  1.111  jdolecek 		struct file *fp;
   1230  1.110    simonb 		int lim, nc = 0;
   1231   1.91  christos 
   1232   1.91  christos 		p = PFIND(pfs->pfs_pid);
   1233   1.91  christos 		if (p == NULL)
   1234   1.91  christos 			return ESRCH;
   1235   1.91  christos 
   1236  1.133      yamt 		if (kauth_authorize_process(kauth_cred_get(),
   1237  1.133      yamt 		    KAUTH_PROCESS_CANSEE, p, NULL, NULL, NULL) != 0)
   1238  1.133      yamt 			return ESRCH;
   1239  1.125      elad 
   1240   1.91  christos 		fdp = p->p_fd;
   1241   1.91  christos 
   1242   1.91  christos 		lim = min((int)p->p_rlimit[RLIMIT_NOFILE].rlim_cur, maxfiles);
   1243   1.91  christos 		if (i >= lim)
   1244   1.91  christos 			return 0;
   1245   1.91  christos 
   1246   1.91  christos 		if (ap->a_ncookies) {
   1247   1.91  christos 			ncookies = min(ncookies, (fdp->fd_nfiles + 2 - i));
   1248   1.91  christos 			cookies = malloc(ncookies * sizeof (off_t),
   1249   1.91  christos 			    M_TEMP, M_WAITOK);
   1250   1.91  christos 			*ap->a_cookies = cookies;
   1251   1.91  christos 		}
   1252   1.91  christos 
   1253   1.91  christos 		for (; i < 2 && uio->uio_resid >= UIO_MX; i++) {
   1254   1.91  christos 			pt = &proc_targets[i];
   1255   1.91  christos 			d.d_namlen = pt->pt_namlen;
   1256   1.91  christos 			d.d_fileno = PROCFS_FILENO(pfs->pfs_pid,
   1257   1.91  christos 			    pt->pt_pfstype, -1);
   1258   1.91  christos 			(void)memcpy(d.d_name, pt->pt_name, pt->pt_namlen + 1);
   1259   1.91  christos 			d.d_type = pt->pt_type;
   1260  1.113       jrf 			if ((error = uiomove(&d, UIO_MX, uio)) != 0)
   1261   1.91  christos 				break;
   1262   1.91  christos 			if (cookies)
   1263   1.91  christos 				*cookies++ = i + 1;
   1264   1.91  christos 			nc++;
   1265   1.91  christos 		}
   1266   1.91  christos 		if (error) {
   1267   1.91  christos 			ncookies = nc;
   1268   1.91  christos 			break;
   1269   1.91  christos 		}
   1270   1.91  christos 		for (; uio->uio_resid >= UIO_MX && i < fdp->fd_nfiles; i++) {
   1271  1.111  jdolecek 			/* check the descriptor exists */
   1272  1.111  jdolecek 			if ((fp = fd_getfile(fdp, i - 2)) == NULL)
   1273  1.100  jdolecek 				continue;
   1274  1.111  jdolecek 			simple_unlock(&fp->f_slock);
   1275  1.111  jdolecek 
   1276  1.109     darcy 			d.d_fileno = PROCFS_FILENO(pfs->pfs_pid, PFSfd, i - 2);
   1277   1.91  christos 			d.d_namlen = snprintf(d.d_name, sizeof(d.d_name),
   1278   1.93    martin 			    "%lld", (long long)(i - 2));
   1279   1.91  christos 			d.d_type = VREG;
   1280  1.113       jrf 			if ((error = uiomove(&d, UIO_MX, uio)) != 0)
   1281   1.91  christos 				break;
   1282   1.91  christos 			if (cookies)
   1283   1.91  christos 				*cookies++ = i + 1;
   1284   1.91  christos 			nc++;
   1285   1.91  christos 		}
   1286   1.91  christos 		ncookies = nc;
   1287   1.91  christos 		break;
   1288   1.91  christos 	}
   1289    1.9       cgd 
   1290    1.9       cgd 	/*
   1291    1.9       cgd 	 * this is for the root of the procfs filesystem
   1292   1.69   thorpej 	 * what is needed are special entries for "curproc"
   1293   1.69   thorpej 	 * and "self" followed by an entry for each process
   1294  1.117      yamt 	 * on allproc.
   1295    1.9       cgd 	 */
   1296    1.9       cgd 
   1297  1.109     darcy 	case PFSroot: {
   1298  1.117      yamt 		int nc = 0;
   1299    1.9       cgd 
   1300   1.53      fvdl 		if (ap->a_ncookies) {
   1301   1.53      fvdl 			/*
   1302   1.53      fvdl 			 * XXX Potentially allocating too much space here,
   1303   1.53      fvdl 			 * but I'm lazy. This loop needs some work.
   1304   1.53      fvdl 			 */
   1305   1.72   thorpej 			cookies = malloc(ncookies * sizeof (off_t),
   1306   1.53      fvdl 			    M_TEMP, M_WAITOK);
   1307   1.53      fvdl 			*ap->a_cookies = cookies;
   1308   1.53      fvdl 		}
   1309  1.117      yamt 		error = 0;
   1310  1.117      yamt 		/* 0 ... 3 are static entries. */
   1311  1.117      yamt 		for (; i <= 3 && uio->uio_resid >= UIO_MX; i++) {
   1312    1.9       cgd 			switch (i) {
   1313   1.12        ws 			case 0:		/* `.' */
   1314   1.12        ws 			case 1:		/* `..' */
   1315  1.109     darcy 				d.d_fileno = PROCFS_FILENO(0, PFSroot, -1);
   1316   1.34   mycroft 				d.d_namlen = i + 1;
   1317   1.56     perry 				memcpy(d.d_name, "..", d.d_namlen);
   1318   1.34   mycroft 				d.d_name[i + 1] = '\0';
   1319   1.34   mycroft 				d.d_type = DT_DIR;
   1320   1.12        ws 				break;
   1321   1.21   mycroft 
   1322   1.12        ws 			case 2:
   1323  1.109     darcy 				d.d_fileno = PROCFS_FILENO(0, PFScurproc, -1);
   1324   1.69   thorpej 				d.d_namlen = sizeof("curproc") - 1;
   1325   1.69   thorpej 				memcpy(d.d_name, "curproc", sizeof("curproc"));
   1326   1.69   thorpej 				d.d_type = DT_LNK;
   1327   1.69   thorpej 				break;
   1328   1.69   thorpej 
   1329   1.69   thorpej 			case 3:
   1330  1.109     darcy 				d.d_fileno = PROCFS_FILENO(0, PFSself, -1);
   1331   1.69   thorpej 				d.d_namlen = sizeof("self") - 1;
   1332   1.69   thorpej 				memcpy(d.d_name, "self", sizeof("self"));
   1333   1.34   mycroft 				d.d_type = DT_LNK;
   1334    1.9       cgd 				break;
   1335    1.1        pk 			}
   1336   1.21   mycroft 
   1337  1.113       jrf 			if ((error = uiomove(&d, UIO_MX, uio)) != 0)
   1338    1.9       cgd 				break;
   1339   1.53      fvdl 			nc++;
   1340   1.53      fvdl 			if (cookies)
   1341   1.35   mycroft 				*cookies++ = i + 1;
   1342    1.1        pk 		}
   1343  1.117      yamt 		/* 4 ... are process entries. */
   1344  1.117      yamt 		ctx.uiop = uio;
   1345  1.117      yamt 		ctx.error = 0;
   1346  1.120      yamt 		ctx.off = 4;
   1347  1.120      yamt 		ctx.startoff = i;
   1348  1.117      yamt 		ctx.cookies = cookies;
   1349  1.117      yamt 		ctx.ncookies = nc;
   1350  1.117      yamt 		proclist_foreach_call(&allproc,
   1351  1.117      yamt 		    procfs_root_readdir_callback, &ctx);
   1352  1.117      yamt 		cookies = ctx.cookies;
   1353  1.117      yamt 		nc = ctx.ncookies;
   1354  1.117      yamt 		error = ctx.error;
   1355  1.117      yamt 		if (error)
   1356  1.117      yamt 			break;
   1357   1.76      fvdl 
   1358  1.117      yamt 		/* misc entries. */
   1359  1.120      yamt 		if (i < ctx.off)
   1360  1.120      yamt 			i = ctx.off;
   1361  1.120      yamt 		if (i >= ctx.off + nproc_root_targets)
   1362   1.76      fvdl 			break;
   1363  1.120      yamt 		for (pt = &proc_root_targets[i - ctx.off];
   1364  1.117      yamt 		    uio->uio_resid >= UIO_MX &&
   1365  1.117      yamt 		    pt < &proc_root_targets[nproc_root_targets];
   1366  1.117      yamt 		    pt++, i++) {
   1367   1.76      fvdl 			if (pt->pt_valid &&
   1368   1.76      fvdl 			    (*pt->pt_valid)(NULL, vp->v_mount) == 0)
   1369   1.76      fvdl 				continue;
   1370   1.91  christos 			d.d_fileno = PROCFS_FILENO(0, pt->pt_pfstype, -1);
   1371   1.76      fvdl 			d.d_namlen = pt->pt_namlen;
   1372   1.76      fvdl 			memcpy(d.d_name, pt->pt_name, pt->pt_namlen + 1);
   1373   1.76      fvdl 			d.d_type = pt->pt_type;
   1374   1.76      fvdl 
   1375  1.113       jrf 			if ((error = uiomove(&d, UIO_MX, uio)) != 0)
   1376   1.76      fvdl 				break;
   1377   1.76      fvdl 			nc++;
   1378   1.76      fvdl 			if (cookies)
   1379   1.76      fvdl 				*cookies++ = i + 1;
   1380   1.76      fvdl 		}
   1381   1.76      fvdl 
   1382   1.53      fvdl 		ncookies = nc;
   1383    1.9       cgd 		break;
   1384   1.34   mycroft 	}
   1385    1.9       cgd 
   1386    1.9       cgd 	default:
   1387    1.9       cgd 		error = ENOTDIR;
   1388    1.9       cgd 		break;
   1389    1.1        pk 	}
   1390    1.9       cgd 
   1391   1.53      fvdl 	if (ap->a_ncookies) {
   1392   1.53      fvdl 		if (error) {
   1393   1.54      fvdl 			if (cookies)
   1394   1.72   thorpej 				free(*ap->a_cookies, M_TEMP);
   1395   1.53      fvdl 			*ap->a_ncookies = 0;
   1396   1.53      fvdl 			*ap->a_cookies = NULL;
   1397   1.53      fvdl 		} else
   1398   1.53      fvdl 			*ap->a_ncookies = ncookies;
   1399   1.53      fvdl 	}
   1400   1.35   mycroft 	uio->uio_offset = i;
   1401    1.9       cgd 	return (error);
   1402   1.12        ws }
   1403   1.12        ws 
   1404   1.12        ws /*
   1405  1.126    atatat  * readlink reads the link of `curproc' and others
   1406   1.12        ws  */
   1407   1.37  christos int
   1408   1.37  christos procfs_readlink(v)
   1409   1.37  christos 	void *v;
   1410   1.12        ws {
   1411   1.37  christos 	struct vop_readlink_args *ap = v;
   1412  1.123  christos 	char bf[16];		/* should be enough */
   1413  1.123  christos 	char *bp = bf;
   1414  1.102  christos 	char *path = NULL;
   1415   1.12        ws 	int len;
   1416  1.102  christos 	int error = 0;
   1417  1.102  christos 	struct pfsnode *pfs = VTOPFS(ap->a_vp);
   1418  1.126    atatat 	struct proc *pown;
   1419   1.12        ws 
   1420  1.109     darcy 	if (pfs->pfs_fileno == PROCFS_FILENO(0, PFScurproc, -1))
   1421  1.123  christos 		len = snprintf(bf, sizeof(bf), "%ld", (long)curproc->p_pid);
   1422  1.109     darcy 	else if (pfs->pfs_fileno == PROCFS_FILENO(0, PFSself, -1))
   1423  1.123  christos 		len = snprintf(bf, sizeof(bf), "%s", "curproc");
   1424  1.136  christos 	else if (pfs->pfs_fileno == PROCFS_FILENO(pfs->pfs_pid, PFScwd, -1) ||
   1425  1.136  christos 	    pfs->pfs_fileno == PROCFS_FILENO(pfs->pfs_pid, PFSchroot, -1) ||
   1426  1.136  christos 	    pfs->pfs_fileno == PROCFS_FILENO(pfs->pfs_pid, PFSexe, -1)) {
   1427  1.126    atatat 		pown = PFIND(pfs->pfs_pid);
   1428  1.126    atatat 		if (pown == NULL)
   1429  1.126    atatat 			return (ESRCH);
   1430  1.126    atatat 		MALLOC(path, char *, MAXPATHLEN + 4, M_TEMP,
   1431  1.126    atatat 		    M_WAITOK|M_CANFAIL);
   1432  1.126    atatat 		if (path == NULL)
   1433  1.126    atatat 			return (ENOMEM);
   1434  1.126    atatat 		bp = path + MAXPATHLEN;
   1435  1.126    atatat 		*--bp = '\0';
   1436  1.136  christos 		(void)procfs_dir(PROCFS_TYPE(pfs->pfs_fileno), curlwp, pown,
   1437  1.136  christos 		    &bp, path, MAXPATHLEN);
   1438  1.126    atatat 		len = strlen(bp);
   1439  1.136  christos 	} else {
   1440  1.102  christos 		struct file *fp;
   1441  1.102  christos 		struct vnode *vxp, *vp;
   1442  1.102  christos 
   1443  1.102  christos 		if ((error = procfs_getfp(pfs, &pown, &fp)) != 0)
   1444  1.102  christos 			return error;
   1445  1.102  christos 		FILE_USE(fp);
   1446  1.102  christos 		switch (fp->f_type) {
   1447  1.102  christos 		case DTYPE_VNODE:
   1448  1.102  christos 			vxp = (struct vnode *)fp->f_data;
   1449  1.102  christos 			if (vxp->v_type != VDIR) {
   1450  1.128  christos 				FILE_UNUSE(fp, proc_representative_lwp(pown));
   1451  1.102  christos 				return EINVAL;
   1452  1.102  christos 			}
   1453  1.102  christos 			if ((path = malloc(MAXPATHLEN, M_TEMP, M_WAITOK))
   1454  1.102  christos 			    == NULL) {
   1455  1.128  christos 				FILE_UNUSE(fp, proc_representative_lwp(pown));
   1456  1.102  christos 				return ENOMEM;
   1457  1.102  christos 			}
   1458  1.102  christos 			bp = path + MAXPATHLEN;
   1459  1.102  christos 			*--bp = '\0';
   1460  1.102  christos 			vp = curproc->p_cwdi->cwdi_rdir;
   1461  1.102  christos 			if (vp == NULL)
   1462  1.102  christos 				vp = rootvnode;
   1463  1.102  christos 			error = getcwd_common(vxp, vp, &bp, path,
   1464  1.128  christos 			    MAXPATHLEN / 2, 0, curlwp);
   1465  1.128  christos 			FILE_UNUSE(fp, proc_representative_lwp(pown));
   1466  1.102  christos 			if (error) {
   1467  1.102  christos 				free(path, M_TEMP);
   1468  1.102  christos 				return error;
   1469  1.102  christos 			}
   1470  1.102  christos 			len = strlen(bp);
   1471  1.102  christos 			break;
   1472  1.102  christos 
   1473  1.102  christos 		case DTYPE_MISC:
   1474  1.123  christos 			len = snprintf(bf, sizeof(bf), "%s", "[misc]");
   1475  1.102  christos 			break;
   1476  1.102  christos 
   1477  1.102  christos 		case DTYPE_KQUEUE:
   1478  1.123  christos 			len = snprintf(bf, sizeof(bf), "%s", "[kqueue]");
   1479  1.102  christos 			break;
   1480  1.102  christos 
   1481  1.102  christos 		default:
   1482  1.102  christos 			return EINVAL;
   1483  1.102  christos 		}
   1484  1.102  christos 	}
   1485   1.12        ws 
   1486  1.113       jrf 	error = uiomove(bp, len, ap->a_uio);
   1487  1.102  christos 	if (path)
   1488  1.102  christos 		free(path, M_TEMP);
   1489  1.102  christos 	return error;
   1490    1.1        pk }
   1491    1.1        pk 
   1492    1.1        pk /*
   1493   1.91  christos  * convert decimal ascii to int
   1494    1.1        pk  */
   1495   1.91  christos static int
   1496   1.91  christos atoi(b, len)
   1497    1.9       cgd 	const char *b;
   1498   1.91  christos 	size_t len;
   1499    1.1        pk {
   1500   1.91  christos 	int p = 0;
   1501    1.1        pk 
   1502    1.1        pk 	while (len--) {
   1503    1.9       cgd 		char c = *b++;
   1504    1.1        pk 		if (c < '0' || c > '9')
   1505   1.91  christos 			return -1;
   1506    1.9       cgd 		p = 10 * p + (c - '0');
   1507    1.1        pk 	}
   1508    1.9       cgd 
   1509   1.91  christos 	return p;
   1510    1.1        pk }
   1511