procfs_vnops.c revision 1.28 1 1.28 christos /* $NetBSD: procfs_vnops.c,v 1.28 1994/11/14 06:08:21 christos Exp $ */
2 1.24 cgd
3 1.1 pk /*
4 1.9 cgd * Copyright (c) 1993 Jan-Simon Pendry
5 1.21 mycroft * Copyright (c) 1993
6 1.21 mycroft * The Regents of the University of California. All rights reserved.
7 1.2 pk *
8 1.9 cgd * This code is derived from software contributed to Berkeley by
9 1.9 cgd * Jan-Simon Pendry.
10 1.9 cgd *
11 1.2 pk * Redistribution and use in source and binary forms, with or without
12 1.2 pk * modification, are permitted provided that the following conditions
13 1.2 pk * are met:
14 1.2 pk * 1. Redistributions of source code must retain the above copyright
15 1.2 pk * notice, this list of conditions and the following disclaimer.
16 1.2 pk * 2. Redistributions in binary form must reproduce the above copyright
17 1.2 pk * notice, this list of conditions and the following disclaimer in the
18 1.2 pk * documentation and/or other materials provided with the distribution.
19 1.2 pk * 3. All advertising materials mentioning features or use of this software
20 1.2 pk * must display the following acknowledgement:
21 1.9 cgd * This product includes software developed by the University of
22 1.9 cgd * California, Berkeley and its contributors.
23 1.9 cgd * 4. Neither the name of the University nor the names of its contributors
24 1.9 cgd * may be used to endorse or promote products derived from this software
25 1.9 cgd * without specific prior written permission.
26 1.9 cgd *
27 1.9 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 1.9 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 1.9 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 1.9 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 1.9 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 1.9 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 1.9 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 1.9 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 1.9 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 1.9 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 1.9 cgd * SUCH DAMAGE.
38 1.2 pk *
39 1.24 cgd * @(#)procfs_vnops.c 8.8 (Berkeley) 6/15/94
40 1.2 pk */
41 1.2 pk
42 1.2 pk /*
43 1.9 cgd * procfs vnode interface
44 1.1 pk */
45 1.1 pk
46 1.8 mycroft #include <sys/param.h>
47 1.8 mycroft #include <sys/systm.h>
48 1.8 mycroft #include <sys/time.h>
49 1.8 mycroft #include <sys/kernel.h>
50 1.8 mycroft #include <sys/file.h>
51 1.8 mycroft #include <sys/proc.h>
52 1.8 mycroft #include <sys/vnode.h>
53 1.8 mycroft #include <sys/namei.h>
54 1.9 cgd #include <sys/malloc.h>
55 1.21 mycroft #include <sys/dirent.h>
56 1.8 mycroft #include <sys/resourcevar.h>
57 1.14 cgd #include <sys/ptrace.h>
58 1.21 mycroft #include <vm/vm.h> /* for PAGE_SIZE */
59 1.21 mycroft #include <machine/reg.h>
60 1.9 cgd #include <miscfs/procfs/procfs.h>
61 1.11 cgd
62 1.9 cgd /*
63 1.9 cgd * Vnode Operations.
64 1.9 cgd *
65 1.9 cgd */
66 1.1 pk
67 1.1 pk /*
68 1.9 cgd * This is a list of the valid names in the
69 1.9 cgd * process-specific sub-directories. It is
70 1.9 cgd * used in procfs_lookup and procfs_readdir
71 1.9 cgd */
72 1.9 cgd static struct pfsnames {
73 1.21 mycroft u_char d_type;
74 1.21 mycroft u_char d_namlen;
75 1.9 cgd char d_name[PROCFS_NAMELEN];
76 1.9 cgd pfstype d_pfstype;
77 1.21 mycroft int (*d_valid) __P((struct proc *p));
78 1.9 cgd } procent[] = {
79 1.9 cgd #define N(s) sizeof(s)-1, s
80 1.9 cgd /* namlen, nam, type */
81 1.21 mycroft { DT_DIR, N("."), Pproc, NULL },
82 1.21 mycroft { DT_DIR, N(".."), Proot, NULL },
83 1.21 mycroft { DT_REG, N("file"), Pfile, procfs_validfile },
84 1.21 mycroft { DT_REG, N("mem"), Pmem, NULL },
85 1.21 mycroft { DT_REG, N("regs"), Pregs, procfs_validregs },
86 1.21 mycroft { DT_REG, N("fpregs"), Pfpregs, procfs_validfpregs },
87 1.21 mycroft { DT_REG, N("ctl"), Pctl, NULL },
88 1.21 mycroft { DT_REG, N("status"), Pstatus, NULL },
89 1.21 mycroft { DT_REG, N("note"), Pnote, NULL },
90 1.21 mycroft { DT_REG, N("notepg"), Pnotepg, NULL },
91 1.9 cgd #undef N
92 1.1 pk };
93 1.9 cgd #define Nprocent (sizeof(procent)/sizeof(procent[0]))
94 1.9 cgd
95 1.9 cgd static pid_t atopid __P((const char *, u_int));
96 1.1 pk
97 1.1 pk /*
98 1.9 cgd * set things up for doing i/o on
99 1.9 cgd * the pfsnode (vp). (vp) is locked
100 1.9 cgd * on entry, and should be left locked
101 1.9 cgd * on exit.
102 1.1 pk *
103 1.9 cgd * for procfs we don't need to do anything
104 1.9 cgd * in particular for i/o. all that is done
105 1.9 cgd * is to support exclusive open on process
106 1.9 cgd * memory images.
107 1.1 pk */
108 1.21 mycroft procfs_open(ap)
109 1.22 mycroft struct vop_open_args /* {
110 1.22 mycroft struct vnode *a_vp;
111 1.22 mycroft int a_mode;
112 1.22 mycroft struct ucred *a_cred;
113 1.22 mycroft struct proc *a_p;
114 1.28 christos struct file *a_fp;
115 1.22 mycroft } */ *ap;
116 1.1 pk {
117 1.21 mycroft struct pfsnode *pfs = VTOPFS(ap->a_vp);
118 1.9 cgd
119 1.9 cgd switch (pfs->pfs_type) {
120 1.9 cgd case Pmem:
121 1.9 cgd if (PFIND(pfs->pfs_pid) == 0)
122 1.9 cgd return (ENOENT); /* was ESRCH, jsp */
123 1.9 cgd
124 1.21 mycroft if ((pfs->pfs_flags & FWRITE) && (ap->a_mode & O_EXCL) ||
125 1.21 mycroft (pfs->pfs_flags & O_EXCL) && (ap->a_mode & FWRITE))
126 1.9 cgd return (EBUSY);
127 1.1 pk
128 1.21 mycroft if (ap->a_mode & FWRITE)
129 1.21 mycroft pfs->pfs_flags = ap->a_mode & (FWRITE|O_EXCL);
130 1.1 pk
131 1.9 cgd return (0);
132 1.1 pk
133 1.9 cgd default:
134 1.9 cgd break;
135 1.9 cgd }
136 1.1 pk
137 1.9 cgd return (0);
138 1.1 pk }
139 1.1 pk
140 1.1 pk /*
141 1.9 cgd * close the pfsnode (vp) after doing i/o.
142 1.9 cgd * (vp) is not locked on entry or exit.
143 1.9 cgd *
144 1.9 cgd * nothing to do for procfs other than undo
145 1.9 cgd * any exclusive open flag (see _open above).
146 1.1 pk */
147 1.21 mycroft procfs_close(ap)
148 1.22 mycroft struct vop_close_args /* {
149 1.22 mycroft struct vnode *a_vp;
150 1.22 mycroft int a_fflag;
151 1.22 mycroft struct ucred *a_cred;
152 1.22 mycroft struct proc *a_p;
153 1.22 mycroft } */ *ap;
154 1.1 pk {
155 1.21 mycroft struct pfsnode *pfs = VTOPFS(ap->a_vp);
156 1.1 pk
157 1.9 cgd switch (pfs->pfs_type) {
158 1.9 cgd case Pmem:
159 1.21 mycroft if ((ap->a_fflag & FWRITE) && (pfs->pfs_flags & O_EXCL))
160 1.9 cgd pfs->pfs_flags &= ~(FWRITE|O_EXCL);
161 1.9 cgd break;
162 1.9 cgd }
163 1.1 pk
164 1.1 pk return (0);
165 1.1 pk }
166 1.1 pk
167 1.1 pk /*
168 1.9 cgd * do an ioctl operation on pfsnode (vp).
169 1.9 cgd * (vp) is not locked on entry or exit.
170 1.1 pk */
171 1.21 mycroft procfs_ioctl(ap)
172 1.22 mycroft struct vop_ioctl_args /* {
173 1.22 mycroft struct vnode *a_vp;
174 1.27 cgd u_long a_command;
175 1.22 mycroft caddr_t a_data;
176 1.22 mycroft int a_fflag;
177 1.22 mycroft struct ucred *a_cred;
178 1.22 mycroft struct proc *a_p;
179 1.22 mycroft } */ *ap;
180 1.1 pk {
181 1.1 pk
182 1.9 cgd return (ENOTTY);
183 1.1 pk }
184 1.1 pk
185 1.1 pk /*
186 1.9 cgd * do block mapping for pfsnode (vp).
187 1.9 cgd * since we don't use the buffer cache
188 1.9 cgd * for procfs this function should never
189 1.9 cgd * be called. in any case, it's not clear
190 1.9 cgd * what part of the kernel ever makes use
191 1.9 cgd * of this function. for sanity, this is the
192 1.9 cgd * usual no-op bmap, although returning
193 1.9 cgd * (EIO) would be a reasonable alternative.
194 1.1 pk */
195 1.21 mycroft procfs_bmap(ap)
196 1.22 mycroft struct vop_bmap_args /* {
197 1.22 mycroft struct vnode *a_vp;
198 1.22 mycroft daddr_t a_bn;
199 1.22 mycroft struct vnode **a_vpp;
200 1.22 mycroft daddr_t *a_bnp;
201 1.22 mycroft } */ *ap;
202 1.1 pk {
203 1.1 pk
204 1.21 mycroft if (ap->a_vpp != NULL)
205 1.21 mycroft *ap->a_vpp = ap->a_vp;
206 1.21 mycroft if (ap->a_bnp != NULL)
207 1.21 mycroft *ap->a_bnp = ap->a_bn;
208 1.1 pk return (0);
209 1.1 pk }
210 1.1 pk
211 1.1 pk /*
212 1.9 cgd * _inactive is called when the pfsnode
213 1.9 cgd * is vrele'd and the reference count goes
214 1.9 cgd * to zero. (vp) will be on the vnode free
215 1.9 cgd * list, so to get it back vget() must be
216 1.9 cgd * used.
217 1.9 cgd *
218 1.9 cgd * for procfs, check if the process is still
219 1.9 cgd * alive and if it isn't then just throw away
220 1.9 cgd * the vnode by calling vgone(). this may
221 1.9 cgd * be overkill and a waste of time since the
222 1.9 cgd * chances are that the process will still be
223 1.9 cgd * there and PFIND is not free.
224 1.9 cgd *
225 1.9 cgd * (vp) is not locked on entry or exit.
226 1.1 pk */
227 1.21 mycroft procfs_inactive(ap)
228 1.22 mycroft struct vop_inactive_args /* {
229 1.22 mycroft struct vnode *a_vp;
230 1.22 mycroft } */ *ap;
231 1.1 pk {
232 1.21 mycroft struct pfsnode *pfs = VTOPFS(ap->a_vp);
233 1.1 pk
234 1.9 cgd if (PFIND(pfs->pfs_pid) == 0)
235 1.21 mycroft vgone(ap->a_vp);
236 1.5 pk
237 1.9 cgd return (0);
238 1.1 pk }
239 1.1 pk
240 1.1 pk /*
241 1.9 cgd * _reclaim is called when getnewvnode()
242 1.9 cgd * wants to make use of an entry on the vnode
243 1.9 cgd * free list. at this time the filesystem needs
244 1.9 cgd * to free any private data and remove the node
245 1.9 cgd * from any private lists.
246 1.1 pk */
247 1.21 mycroft procfs_reclaim(ap)
248 1.22 mycroft struct vop_reclaim_args /* {
249 1.22 mycroft struct vnode *a_vp;
250 1.22 mycroft } */ *ap;
251 1.21 mycroft {
252 1.21 mycroft
253 1.21 mycroft return (procfs_freevp(ap->a_vp));
254 1.21 mycroft }
255 1.21 mycroft
256 1.21 mycroft /*
257 1.21 mycroft * Return POSIX pathconf information applicable to special devices.
258 1.21 mycroft */
259 1.21 mycroft procfs_pathconf(ap)
260 1.21 mycroft struct vop_pathconf_args /* {
261 1.21 mycroft struct vnode *a_vp;
262 1.21 mycroft int a_name;
263 1.26 cgd register_t *a_retval;
264 1.21 mycroft } */ *ap;
265 1.1 pk {
266 1.1 pk
267 1.21 mycroft switch (ap->a_name) {
268 1.21 mycroft case _PC_LINK_MAX:
269 1.21 mycroft *ap->a_retval = LINK_MAX;
270 1.21 mycroft return (0);
271 1.21 mycroft case _PC_MAX_CANON:
272 1.21 mycroft *ap->a_retval = MAX_CANON;
273 1.21 mycroft return (0);
274 1.21 mycroft case _PC_MAX_INPUT:
275 1.21 mycroft *ap->a_retval = MAX_INPUT;
276 1.21 mycroft return (0);
277 1.21 mycroft case _PC_PIPE_BUF:
278 1.21 mycroft *ap->a_retval = PIPE_BUF;
279 1.21 mycroft return (0);
280 1.21 mycroft case _PC_CHOWN_RESTRICTED:
281 1.21 mycroft *ap->a_retval = 1;
282 1.21 mycroft return (0);
283 1.21 mycroft case _PC_VDISABLE:
284 1.21 mycroft *ap->a_retval = _POSIX_VDISABLE;
285 1.21 mycroft return (0);
286 1.21 mycroft default:
287 1.21 mycroft return (EINVAL);
288 1.21 mycroft }
289 1.21 mycroft /* NOTREACHED */
290 1.1 pk }
291 1.1 pk
292 1.1 pk /*
293 1.9 cgd * _print is used for debugging.
294 1.9 cgd * just print a readable description
295 1.9 cgd * of (vp).
296 1.1 pk */
297 1.21 mycroft procfs_print(ap)
298 1.22 mycroft struct vop_print_args /* {
299 1.22 mycroft struct vnode *a_vp;
300 1.22 mycroft } */ *ap;
301 1.1 pk {
302 1.21 mycroft struct pfsnode *pfs = VTOPFS(ap->a_vp);
303 1.5 pk
304 1.21 mycroft printf("tag VT_PROCFS, type %s, pid %d, mode %x, flags %x\n",
305 1.21 mycroft pfs->pfs_type, pfs->pfs_pid, pfs->pfs_mode, pfs->pfs_flags);
306 1.1 pk }
307 1.1 pk
308 1.1 pk /*
309 1.9 cgd * _abortop is called when operations such as
310 1.9 cgd * rename and create fail. this entry is responsible
311 1.9 cgd * for undoing any side-effects caused by the lookup.
312 1.9 cgd * this will always include freeing the pathname buffer.
313 1.1 pk */
314 1.21 mycroft procfs_abortop(ap)
315 1.22 mycroft struct vop_abortop_args /* {
316 1.22 mycroft struct vnode *a_dvp;
317 1.22 mycroft struct componentname *a_cnp;
318 1.22 mycroft } */ *ap;
319 1.1 pk {
320 1.9 cgd
321 1.21 mycroft if ((ap->a_cnp->cn_flags & (HASBUF | SAVESTART)) == HASBUF)
322 1.21 mycroft FREE(ap->a_cnp->cn_pnbuf, M_NAMEI);
323 1.9 cgd return (0);
324 1.1 pk }
325 1.1 pk
326 1.1 pk /*
327 1.9 cgd * generic entry point for unsupported operations
328 1.1 pk */
329 1.9 cgd procfs_badop()
330 1.1 pk {
331 1.1 pk
332 1.9 cgd return (EIO);
333 1.1 pk }
334 1.1 pk
335 1.1 pk /*
336 1.9 cgd * Invent attributes for pfsnode (vp) and store
337 1.9 cgd * them in (vap).
338 1.9 cgd * Directories lengths are returned as zero since
339 1.9 cgd * any real length would require the genuine size
340 1.9 cgd * to be computed, and nothing cares anyway.
341 1.9 cgd *
342 1.9 cgd * this is relatively minimal for procfs.
343 1.1 pk */
344 1.21 mycroft procfs_getattr(ap)
345 1.22 mycroft struct vop_getattr_args /* {
346 1.22 mycroft struct vnode *a_vp;
347 1.22 mycroft struct vattr *a_vap;
348 1.22 mycroft struct ucred *a_cred;
349 1.22 mycroft struct proc *a_p;
350 1.22 mycroft } */ *ap;
351 1.1 pk {
352 1.21 mycroft struct pfsnode *pfs = VTOPFS(ap->a_vp);
353 1.21 mycroft struct vattr *vap = ap->a_vap;
354 1.1 pk struct proc *procp;
355 1.9 cgd int error;
356 1.1 pk
357 1.21 mycroft /* first check the process still exists */
358 1.21 mycroft switch (pfs->pfs_type) {
359 1.21 mycroft case Proot:
360 1.21 mycroft case Pcurproc:
361 1.21 mycroft procp = 0;
362 1.21 mycroft break;
363 1.21 mycroft
364 1.21 mycroft default:
365 1.21 mycroft procp = PFIND(pfs->pfs_pid);
366 1.21 mycroft if (procp == 0)
367 1.21 mycroft return (ENOENT);
368 1.21 mycroft }
369 1.21 mycroft
370 1.21 mycroft error = 0;
371 1.21 mycroft
372 1.9 cgd /* start by zeroing out the attributes */
373 1.1 pk VATTR_NULL(vap);
374 1.9 cgd
375 1.9 cgd /* next do all the common fields */
376 1.21 mycroft vap->va_type = ap->a_vp->v_type;
377 1.9 cgd vap->va_mode = pfs->pfs_mode;
378 1.9 cgd vap->va_fileid = pfs->pfs_fileno;
379 1.9 cgd vap->va_flags = 0;
380 1.19 cgd vap->va_blocksize = PAGE_SIZE;
381 1.9 cgd vap->va_bytes = vap->va_size = 0;
382 1.9 cgd
383 1.9 cgd /*
384 1.9 cgd * Make all times be current TOD.
385 1.9 cgd * It would be possible to get the process start
386 1.9 cgd * time from the p_stat structure, but there's
387 1.9 cgd * no "file creation" time stamp anyway, and the
388 1.9 cgd * p_stat structure is not addressible if u. gets
389 1.9 cgd * swapped out for that process.
390 1.21 mycroft *
391 1.21 mycroft * XXX
392 1.21 mycroft * Note that microtime() returns a timeval, not a timespec.
393 1.9 cgd */
394 1.9 cgd microtime(&vap->va_ctime);
395 1.9 cgd vap->va_atime = vap->va_mtime = vap->va_ctime;
396 1.9 cgd
397 1.21 mycroft /*
398 1.21 mycroft * If the process has exercised some setuid or setgid
399 1.21 mycroft * privilege, then rip away read/write permission so
400 1.21 mycroft * that only root can gain access.
401 1.21 mycroft */
402 1.21 mycroft switch (pfs->pfs_type) {
403 1.21 mycroft case Pmem:
404 1.21 mycroft case Pregs:
405 1.21 mycroft case Pfpregs:
406 1.21 mycroft if (procp->p_flag & P_SUGID)
407 1.21 mycroft vap->va_mode &= ~((VREAD|VWRITE)|
408 1.21 mycroft ((VREAD|VWRITE)>>3)|
409 1.21 mycroft ((VREAD|VWRITE)>>6));
410 1.21 mycroft case Pctl:
411 1.21 mycroft case Pstatus:
412 1.21 mycroft case Pnote:
413 1.21 mycroft case Pnotepg:
414 1.12 ws vap->va_nlink = 1;
415 1.12 ws vap->va_uid = procp->p_ucred->cr_uid;
416 1.12 ws vap->va_gid = procp->p_ucred->cr_gid;
417 1.21 mycroft break;
418 1.12 ws }
419 1.12 ws
420 1.9 cgd /*
421 1.9 cgd * now do the object specific fields
422 1.9 cgd *
423 1.9 cgd * The size could be set from struct reg, but it's hardly
424 1.9 cgd * worth the trouble, and it puts some (potentially) machine
425 1.9 cgd * dependent data into this machine-independent code. If it
426 1.9 cgd * becomes important then this function should break out into
427 1.9 cgd * a per-file stat function in the corresponding .c file.
428 1.9 cgd */
429 1.1 pk
430 1.9 cgd switch (pfs->pfs_type) {
431 1.9 cgd case Proot:
432 1.21 mycroft /*
433 1.21 mycroft * Set nlink to 1 to tell fts(3) we don't actually know.
434 1.21 mycroft */
435 1.21 mycroft vap->va_nlink = 1;
436 1.21 mycroft vap->va_uid = 0;
437 1.21 mycroft vap->va_gid = 0;
438 1.21 mycroft vap->va_size = vap->va_bytes = DEV_BSIZE;
439 1.21 mycroft break;
440 1.21 mycroft
441 1.21 mycroft case Pcurproc: {
442 1.21 mycroft char buf[16]; /* should be enough */
443 1.21 mycroft vap->va_nlink = 1;
444 1.21 mycroft vap->va_uid = 0;
445 1.21 mycroft vap->va_gid = 0;
446 1.21 mycroft vap->va_size = vap->va_bytes =
447 1.21 mycroft sprintf(buf, "%ld", (long)curproc->p_pid);
448 1.9 cgd break;
449 1.21 mycroft }
450 1.9 cgd
451 1.9 cgd case Pproc:
452 1.9 cgd vap->va_nlink = 2;
453 1.21 mycroft vap->va_uid = procp->p_ucred->cr_uid;
454 1.21 mycroft vap->va_gid = procp->p_ucred->cr_gid;
455 1.21 mycroft vap->va_size = vap->va_bytes = DEV_BSIZE;
456 1.21 mycroft break;
457 1.21 mycroft
458 1.21 mycroft case Pfile:
459 1.21 mycroft error = EOPNOTSUPP;
460 1.9 cgd break;
461 1.9 cgd
462 1.9 cgd case Pmem:
463 1.9 cgd vap->va_bytes = vap->va_size =
464 1.9 cgd ctob(procp->p_vmspace->vm_tsize +
465 1.9 cgd procp->p_vmspace->vm_dsize +
466 1.9 cgd procp->p_vmspace->vm_ssize);
467 1.9 cgd break;
468 1.9 cgd
469 1.18 cgd #if defined(PT_GETREGS) || defined(PT_SETREGS)
470 1.9 cgd case Pregs:
471 1.11 cgd vap->va_bytes = vap->va_size = sizeof(struct reg);
472 1.18 cgd break;
473 1.14 cgd #endif
474 1.14 cgd
475 1.18 cgd #if defined(PT_GETFPREGS) || defined(PT_SETFPREGS)
476 1.14 cgd case Pfpregs:
477 1.14 cgd vap->va_bytes = vap->va_size = sizeof(struct fpreg);
478 1.18 cgd break;
479 1.14 cgd #endif
480 1.12 ws
481 1.21 mycroft case Pctl:
482 1.12 ws case Pstatus:
483 1.9 cgd case Pnote:
484 1.9 cgd case Pnotepg:
485 1.9 cgd break;
486 1.1 pk
487 1.9 cgd default:
488 1.21 mycroft panic("procfs_getattr");
489 1.1 pk }
490 1.1 pk
491 1.9 cgd return (error);
492 1.1 pk }
493 1.1 pk
494 1.21 mycroft procfs_setattr(ap)
495 1.22 mycroft struct vop_setattr_args /* {
496 1.22 mycroft struct vnode *a_vp;
497 1.22 mycroft struct vattr *a_vap;
498 1.22 mycroft struct ucred *a_cred;
499 1.22 mycroft struct proc *a_p;
500 1.22 mycroft } */ *ap;
501 1.5 pk {
502 1.5 pk /*
503 1.9 cgd * just fake out attribute setting
504 1.9 cgd * it's not good to generate an error
505 1.9 cgd * return, otherwise things like creat()
506 1.9 cgd * will fail when they try to set the
507 1.9 cgd * file length to 0. worse, this means
508 1.9 cgd * that echo $note > /proc/$pid/note will fail.
509 1.5 pk */
510 1.5 pk
511 1.9 cgd return (0);
512 1.5 pk }
513 1.5 pk
514 1.9 cgd /*
515 1.9 cgd * implement access checking.
516 1.9 cgd *
517 1.9 cgd * something very similar to this code is duplicated
518 1.9 cgd * throughout the 4bsd kernel and should be moved
519 1.9 cgd * into kern/vfs_subr.c sometime.
520 1.9 cgd *
521 1.9 cgd * actually, the check for super-user is slightly
522 1.9 cgd * broken since it will allow read access to write-only
523 1.9 cgd * objects. this doesn't cause any particular trouble
524 1.9 cgd * but does mean that the i/o entry points need to check
525 1.9 cgd * that the operation really does make sense.
526 1.9 cgd */
527 1.21 mycroft procfs_access(ap)
528 1.22 mycroft struct vop_access_args /* {
529 1.22 mycroft struct vnode *a_vp;
530 1.22 mycroft int a_mode;
531 1.22 mycroft struct ucred *a_cred;
532 1.22 mycroft struct proc *a_p;
533 1.22 mycroft } */ *ap;
534 1.1 pk {
535 1.9 cgd struct vattr *vap;
536 1.1 pk struct vattr vattr;
537 1.1 pk int error;
538 1.1 pk
539 1.1 pk /*
540 1.1 pk * If you're the super-user,
541 1.1 pk * you always get access.
542 1.1 pk */
543 1.21 mycroft if (ap->a_cred->cr_uid == 0)
544 1.1 pk return (0);
545 1.21 mycroft
546 1.1 pk vap = &vattr;
547 1.21 mycroft if (error = VOP_GETATTR(ap->a_vp, vap, ap->a_cred, ap->a_p))
548 1.1 pk return (error);
549 1.9 cgd
550 1.1 pk /*
551 1.1 pk * Access check is based on only one of owner, group, public.
552 1.1 pk * If not owner, then check group. If not a member of the
553 1.1 pk * group, then check public access.
554 1.1 pk */
555 1.21 mycroft if (ap->a_cred->cr_uid != vap->va_uid) {
556 1.9 cgd gid_t *gp;
557 1.9 cgd int i;
558 1.9 cgd
559 1.21 mycroft ap->a_mode >>= 3;
560 1.21 mycroft gp = ap->a_cred->cr_groups;
561 1.21 mycroft for (i = 0; i < ap->a_cred->cr_ngroups; i++, gp++)
562 1.1 pk if (vap->va_gid == *gp)
563 1.1 pk goto found;
564 1.21 mycroft ap->a_mode >>= 3;
565 1.1 pk found:
566 1.1 pk ;
567 1.1 pk }
568 1.9 cgd
569 1.21 mycroft if ((vap->va_mode & ap->a_mode) == ap->a_mode)
570 1.1 pk return (0);
571 1.9 cgd
572 1.1 pk return (EACCES);
573 1.1 pk }
574 1.1 pk
575 1.1 pk /*
576 1.9 cgd * lookup. this is incredibly complicated in the
577 1.9 cgd * general case, however for most pseudo-filesystems
578 1.9 cgd * very little needs to be done.
579 1.9 cgd *
580 1.9 cgd * unless you want to get a migraine, just make sure your
581 1.9 cgd * filesystem doesn't do any locking of its own. otherwise
582 1.9 cgd * read and inwardly digest ufs_lookup().
583 1.9 cgd */
584 1.21 mycroft procfs_lookup(ap)
585 1.22 mycroft struct vop_lookup_args /* {
586 1.22 mycroft struct vnode * a_dvp;
587 1.22 mycroft struct vnode ** a_vpp;
588 1.22 mycroft struct componentname * a_cnp;
589 1.22 mycroft } */ *ap;
590 1.1 pk {
591 1.21 mycroft struct componentname *cnp = ap->a_cnp;
592 1.21 mycroft struct vnode **vpp = ap->a_vpp;
593 1.21 mycroft struct vnode *dvp = ap->a_dvp;
594 1.21 mycroft char *pname = cnp->cn_nameptr;
595 1.1 pk pid_t pid;
596 1.1 pk struct vnode *nvp;
597 1.9 cgd struct pfsnode *pfs;
598 1.1 pk struct proc *procp;
599 1.9 cgd pfstype pfs_type;
600 1.9 cgd int i;
601 1.1 pk
602 1.21 mycroft if (cnp->cn_namelen == 1 && *pname == '.') {
603 1.21 mycroft *vpp = dvp;
604 1.9 cgd VREF(dvp);
605 1.21 mycroft /*VOP_LOCK(dvp);*/
606 1.9 cgd return (0);
607 1.9 cgd }
608 1.1 pk
609 1.21 mycroft *vpp = NULL;
610 1.1 pk
611 1.9 cgd pfs = VTOPFS(dvp);
612 1.9 cgd switch (pfs->pfs_type) {
613 1.9 cgd case Proot:
614 1.21 mycroft if (cnp->cn_flags & ISDOTDOT)
615 1.9 cgd return (EIO);
616 1.9 cgd
617 1.21 mycroft if (CNEQ(cnp, "curproc", 7))
618 1.21 mycroft return (procfs_allocvp(dvp->v_mount, vpp, 0, Pcurproc));
619 1.12 ws
620 1.21 mycroft pid = atopid(pname, cnp->cn_namelen);
621 1.9 cgd if (pid == NO_PID)
622 1.9 cgd return (ENOENT);
623 1.9 cgd
624 1.9 cgd procp = PFIND(pid);
625 1.9 cgd if (procp == 0)
626 1.9 cgd return (ENOENT);
627 1.9 cgd
628 1.21 mycroft return (procfs_allocvp(dvp->v_mount, vpp, pid, Pproc));
629 1.9 cgd
630 1.9 cgd case Pproc:
631 1.23 mycroft if (cnp->cn_flags & ISDOTDOT)
632 1.23 mycroft return (procfs_root(dvp->v_mount, vpp));
633 1.1 pk
634 1.9 cgd procp = PFIND(pfs->pfs_pid);
635 1.9 cgd if (procp == 0)
636 1.9 cgd return (ENOENT);
637 1.9 cgd
638 1.9 cgd for (i = 0; i < Nprocent; i++) {
639 1.9 cgd struct pfsnames *dp = &procent[i];
640 1.9 cgd
641 1.21 mycroft if (cnp->cn_namelen == dp->d_namlen &&
642 1.18 cgd bcmp(pname, dp->d_name, dp->d_namlen) == 0 &&
643 1.18 cgd (dp->d_valid == NULL || (*dp->d_valid)(procp))) {
644 1.9 cgd pfs_type = dp->d_pfstype;
645 1.9 cgd goto found;
646 1.9 cgd }
647 1.9 cgd }
648 1.9 cgd return (ENOENT);
649 1.1 pk
650 1.9 cgd found:
651 1.9 cgd if (pfs_type == Pfile) {
652 1.9 cgd nvp = procfs_findtextvp(procp);
653 1.23 mycroft /* We already checked that it exists. */
654 1.21 mycroft VREF(nvp);
655 1.21 mycroft VOP_LOCK(nvp);
656 1.21 mycroft *vpp = nvp;
657 1.21 mycroft return (0);
658 1.21 mycroft }
659 1.1 pk
660 1.21 mycroft return (procfs_allocvp(dvp->v_mount, vpp, pfs->pfs_pid,
661 1.21 mycroft pfs_type));
662 1.1 pk
663 1.9 cgd default:
664 1.9 cgd return (ENOTDIR);
665 1.1 pk }
666 1.1 pk }
667 1.1 pk
668 1.18 cgd int
669 1.21 mycroft procfs_validfile(p)
670 1.21 mycroft struct proc *p;
671 1.18 cgd {
672 1.21 mycroft
673 1.21 mycroft return (procfs_findtextvp(p) != NULLVP);
674 1.18 cgd }
675 1.18 cgd
676 1.9 cgd /*
677 1.9 cgd * readdir returns directory entries from pfsnode (vp).
678 1.9 cgd *
679 1.9 cgd * the strategy here with procfs is to generate a single
680 1.9 cgd * directory entry at a time (struct pfsdent) and then
681 1.9 cgd * copy that out to userland using uiomove. a more efficent
682 1.9 cgd * though more complex implementation, would try to minimize
683 1.9 cgd * the number of calls to uiomove(). for procfs, this is
684 1.9 cgd * hardly worth the added code complexity.
685 1.9 cgd *
686 1.9 cgd * this should just be done through read()
687 1.9 cgd */
688 1.21 mycroft procfs_readdir(ap)
689 1.22 mycroft struct vop_readdir_args /* {
690 1.22 mycroft struct vnode *a_vp;
691 1.22 mycroft struct uio *a_uio;
692 1.22 mycroft struct ucred *a_cred;
693 1.22 mycroft int *a_eofflag;
694 1.22 mycroft u_long *a_cookies;
695 1.22 mycroft int a_ncookies;
696 1.22 mycroft } */ *ap;
697 1.1 pk {
698 1.21 mycroft struct uio *uio = ap->a_uio;
699 1.9 cgd struct pfsdent d;
700 1.9 cgd struct pfsdent *dp = &d;
701 1.9 cgd struct pfsnode *pfs;
702 1.9 cgd int error;
703 1.9 cgd int count;
704 1.9 cgd int i;
705 1.22 mycroft
706 1.22 mycroft /*
707 1.22 mycroft * We don't allow exporting procfs mounts, and currently local
708 1.22 mycroft * requests do not need cookies.
709 1.22 mycroft */
710 1.22 mycroft if (ap->a_ncookies)
711 1.22 mycroft panic("procfs_readdir: not hungry");
712 1.9 cgd
713 1.21 mycroft pfs = VTOPFS(ap->a_vp);
714 1.1 pk
715 1.9 cgd if (uio->uio_resid < UIO_MX)
716 1.9 cgd return (EINVAL);
717 1.9 cgd if (uio->uio_offset & (UIO_MX-1))
718 1.9 cgd return (EINVAL);
719 1.9 cgd if (uio->uio_offset < 0)
720 1.1 pk return (EINVAL);
721 1.1 pk
722 1.9 cgd error = 0;
723 1.1 pk count = 0;
724 1.9 cgd i = uio->uio_offset / UIO_MX;
725 1.9 cgd
726 1.9 cgd switch (pfs->pfs_type) {
727 1.9 cgd /*
728 1.9 cgd * this is for the process-specific sub-directories.
729 1.9 cgd * all that is needed to is copy out all the entries
730 1.9 cgd * from the procent[] table (top of this file).
731 1.9 cgd */
732 1.9 cgd case Pproc: {
733 1.21 mycroft pid_t pid = pfs->pfs_pid;
734 1.21 mycroft struct pfsnames *dt;
735 1.21 mycroft
736 1.21 mycroft for (dt = &procent[i]; i < Nprocent && uio->uio_resid >= UIO_MX;
737 1.21 mycroft dt++, i++) {
738 1.21 mycroft struct proc *p = PFIND(pid);
739 1.9 cgd
740 1.21 mycroft if (p == NULL)
741 1.9 cgd break;
742 1.9 cgd
743 1.21 mycroft if (dt->d_valid && (*dt->d_valid)(p) == 0)
744 1.21 mycroft continue;
745 1.21 mycroft
746 1.9 cgd dp->d_reclen = UIO_MX;
747 1.12 ws dp->d_fileno = PROCFS_FILENO(pid, dt->d_pfstype);
748 1.21 mycroft dp->d_namlen = dt->d_namlen;
749 1.21 mycroft bcopy(dt->d_name, dp->d_name, dt->d_namlen + 1);
750 1.21 mycroft dp->d_type = dt->d_type;
751 1.15 ws
752 1.21 mycroft if (error = uiomove((caddr_t)dp, UIO_MX, uio))
753 1.9 cgd break;
754 1.6 ws }
755 1.9 cgd
756 1.9 cgd break;
757 1.9 cgd
758 1.9 cgd }
759 1.9 cgd
760 1.9 cgd /*
761 1.9 cgd * this is for the root of the procfs filesystem
762 1.9 cgd * what is needed is a special entry for "curproc"
763 1.9 cgd * followed by an entry for each process on allproc
764 1.9 cgd #ifdef PROCFS_ZOMBIE
765 1.9 cgd * and zombproc.
766 1.9 cgd #endif
767 1.9 cgd */
768 1.9 cgd
769 1.9 cgd case Proot: {
770 1.9 cgd #ifdef PROCFS_ZOMBIE
771 1.9 cgd int doingzomb = 0;
772 1.9 cgd #endif
773 1.21 mycroft int pcnt = 0;
774 1.25 mycroft volatile struct proc *p = allproc.lh_first;
775 1.9 cgd
776 1.21 mycroft again:
777 1.21 mycroft for (; p && uio->uio_resid >= UIO_MX; i++, pcnt++) {
778 1.9 cgd bzero((char *) dp, UIO_MX);
779 1.9 cgd dp->d_reclen = UIO_MX;
780 1.9 cgd
781 1.9 cgd switch (i) {
782 1.12 ws case 0: /* `.' */
783 1.12 ws case 1: /* `..' */
784 1.12 ws dp->d_fileno = PROCFS_FILENO(0, Proot);
785 1.12 ws dp->d_namlen = i + 1;
786 1.21 mycroft bcopy("..", dp->d_name, dp->d_namlen);
787 1.21 mycroft dp->d_name[i + 1] = '\0';
788 1.21 mycroft dp->d_type = DT_DIR;
789 1.12 ws break;
790 1.21 mycroft
791 1.12 ws case 2:
792 1.21 mycroft dp->d_fileno = PROCFS_FILENO(0, Pcurproc);
793 1.9 cgd dp->d_namlen = 7;
794 1.21 mycroft bcopy("curproc", dp->d_name, 8);
795 1.21 mycroft dp->d_type = DT_LNK;
796 1.9 cgd break;
797 1.9 cgd
798 1.9 cgd default:
799 1.21 mycroft while (pcnt < i) {
800 1.21 mycroft pcnt++;
801 1.25 mycroft p = p->p_list.le_next;
802 1.21 mycroft if (!p)
803 1.21 mycroft goto done;
804 1.9 cgd }
805 1.21 mycroft dp->d_fileno = PROCFS_FILENO(p->p_pid, Pproc);
806 1.21 mycroft dp->d_namlen = sprintf(dp->d_name, "%ld",
807 1.21 mycroft (long)p->p_pid);
808 1.21 mycroft dp->d_type = DT_REG;
809 1.25 mycroft p = p->p_list.le_next;
810 1.9 cgd break;
811 1.1 pk }
812 1.21 mycroft
813 1.21 mycroft if (error = uiomove((caddr_t)dp, UIO_MX, uio))
814 1.9 cgd break;
815 1.1 pk }
816 1.21 mycroft done:
817 1.21 mycroft
818 1.21 mycroft #ifdef PROCFS_ZOMBIE
819 1.21 mycroft if (p == 0 && doingzomb == 0) {
820 1.21 mycroft doingzomb = 1;
821 1.25 mycroft p = zombproc.lh_first;
822 1.21 mycroft goto again;
823 1.21 mycroft }
824 1.21 mycroft #endif
825 1.1 pk
826 1.9 cgd break;
827 1.9 cgd
828 1.9 cgd }
829 1.9 cgd
830 1.9 cgd default:
831 1.9 cgd error = ENOTDIR;
832 1.9 cgd break;
833 1.1 pk }
834 1.9 cgd
835 1.9 cgd uio->uio_offset = i * UIO_MX;
836 1.1 pk
837 1.9 cgd return (error);
838 1.12 ws }
839 1.12 ws
840 1.12 ws /*
841 1.21 mycroft * readlink reads the link of `curproc'
842 1.12 ws */
843 1.21 mycroft procfs_readlink(ap)
844 1.21 mycroft struct vop_readlink_args *ap;
845 1.12 ws {
846 1.21 mycroft struct uio *uio = ap->a_uio;
847 1.12 ws char buf[16]; /* should be enough */
848 1.12 ws int len;
849 1.12 ws
850 1.21 mycroft if (VTOPFS(ap->a_vp)->pfs_fileno != PROCFS_FILENO(0, Pcurproc))
851 1.21 mycroft return (EINVAL);
852 1.12 ws
853 1.21 mycroft len = sprintf(buf, "%ld", (long)curproc->p_pid);
854 1.12 ws
855 1.21 mycroft return (uiomove((caddr_t)buf, len, ap->a_uio));
856 1.1 pk }
857 1.1 pk
858 1.1 pk /*
859 1.9 cgd * convert decimal ascii to pid_t
860 1.1 pk */
861 1.9 cgd static pid_t
862 1.9 cgd atopid(b, len)
863 1.9 cgd const char *b;
864 1.9 cgd u_int len;
865 1.1 pk {
866 1.9 cgd pid_t p = 0;
867 1.1 pk
868 1.1 pk while (len--) {
869 1.9 cgd char c = *b++;
870 1.1 pk if (c < '0' || c > '9')
871 1.9 cgd return (NO_PID);
872 1.9 cgd p = 10 * p + (c - '0');
873 1.9 cgd if (p > PID_MAX)
874 1.9 cgd return (NO_PID);
875 1.1 pk }
876 1.9 cgd
877 1.9 cgd return (p);
878 1.1 pk }
879 1.9 cgd
880 1.9 cgd /*
881 1.9 cgd * procfs vnode operations.
882 1.9 cgd */
883 1.21 mycroft int (**procfs_vnodeop_p)();
884 1.21 mycroft struct vnodeopv_entry_desc procfs_vnodeop_entries[] = {
885 1.21 mycroft { &vop_default_desc, vn_default_error },
886 1.21 mycroft { &vop_lookup_desc, procfs_lookup }, /* lookup */
887 1.21 mycroft { &vop_create_desc, procfs_create }, /* create */
888 1.21 mycroft { &vop_mknod_desc, procfs_mknod }, /* mknod */
889 1.21 mycroft { &vop_open_desc, procfs_open }, /* open */
890 1.21 mycroft { &vop_close_desc, procfs_close }, /* close */
891 1.21 mycroft { &vop_access_desc, procfs_access }, /* access */
892 1.21 mycroft { &vop_getattr_desc, procfs_getattr }, /* getattr */
893 1.21 mycroft { &vop_setattr_desc, procfs_setattr }, /* setattr */
894 1.21 mycroft { &vop_read_desc, procfs_read }, /* read */
895 1.21 mycroft { &vop_write_desc, procfs_write }, /* write */
896 1.21 mycroft { &vop_ioctl_desc, procfs_ioctl }, /* ioctl */
897 1.21 mycroft { &vop_select_desc, procfs_select }, /* select */
898 1.21 mycroft { &vop_mmap_desc, procfs_mmap }, /* mmap */
899 1.21 mycroft { &vop_fsync_desc, procfs_fsync }, /* fsync */
900 1.21 mycroft { &vop_seek_desc, procfs_seek }, /* seek */
901 1.21 mycroft { &vop_remove_desc, procfs_remove }, /* remove */
902 1.21 mycroft { &vop_link_desc, procfs_link }, /* link */
903 1.21 mycroft { &vop_rename_desc, procfs_rename }, /* rename */
904 1.21 mycroft { &vop_mkdir_desc, procfs_mkdir }, /* mkdir */
905 1.21 mycroft { &vop_rmdir_desc, procfs_rmdir }, /* rmdir */
906 1.21 mycroft { &vop_symlink_desc, procfs_symlink }, /* symlink */
907 1.21 mycroft { &vop_readdir_desc, procfs_readdir }, /* readdir */
908 1.21 mycroft { &vop_readlink_desc, procfs_readlink }, /* readlink */
909 1.21 mycroft { &vop_abortop_desc, procfs_abortop }, /* abortop */
910 1.21 mycroft { &vop_inactive_desc, procfs_inactive }, /* inactive */
911 1.21 mycroft { &vop_reclaim_desc, procfs_reclaim }, /* reclaim */
912 1.21 mycroft { &vop_lock_desc, procfs_lock }, /* lock */
913 1.21 mycroft { &vop_unlock_desc, procfs_unlock }, /* unlock */
914 1.21 mycroft { &vop_bmap_desc, procfs_bmap }, /* bmap */
915 1.21 mycroft { &vop_strategy_desc, procfs_strategy }, /* strategy */
916 1.21 mycroft { &vop_print_desc, procfs_print }, /* print */
917 1.21 mycroft { &vop_islocked_desc, procfs_islocked }, /* islocked */
918 1.21 mycroft { &vop_pathconf_desc, procfs_pathconf }, /* pathconf */
919 1.21 mycroft { &vop_advlock_desc, procfs_advlock }, /* advlock */
920 1.21 mycroft { &vop_blkatoff_desc, procfs_blkatoff }, /* blkatoff */
921 1.21 mycroft { &vop_valloc_desc, procfs_valloc }, /* valloc */
922 1.21 mycroft { &vop_vfree_desc, procfs_vfree }, /* vfree */
923 1.21 mycroft { &vop_truncate_desc, procfs_truncate }, /* truncate */
924 1.21 mycroft { &vop_update_desc, procfs_update }, /* update */
925 1.21 mycroft { (struct vnodeop_desc*)NULL, (int(*)())NULL }
926 1.9 cgd };
927 1.21 mycroft struct vnodeopv_desc procfs_vnodeop_opv_desc =
928 1.21 mycroft { &procfs_vnodeop_p, procfs_vnodeop_entries };
929