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