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