2 * Copyright (c) 2009 Stanislav Sedov <stas@FreeBSD.org>
3 * Copyright (c) 1988, 1993
4 * The Regents of the University of California. All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by the University of
17 * California, Berkeley and its contributors.
18 * 4. 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.
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
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
38 #include <sys/param.h>
41 #include <sys/resourcevar.h>
43 #include <sys/ucred.h>
48 #include <sys/vnode.h>
49 #include <sys/socket.h>
50 #include <sys/socketvar.h>
51 #include <sys/domain.h>
52 #include <sys/protosw.h>
54 #include <sys/unpcb.h>
55 #include <sys/sysctl.h>
57 #include <sys/filedesc.h>
58 #include <sys/queue.h>
64 #include <sys/capsicum.h>
66 #include <sys/mount.h>
68 #include <ufs/ufs/quota.h>
69 #include <ufs/ufs/inode.h>
70 #include <fs/devfs/devfs.h>
71 #include <fs/devfs/devfs_int.h>
73 #include <nfs/nfsproto.h>
74 #include <nfsclient/nfs.h>
75 #include <nfsclient/nfsnode.h>
78 #include <vm/vm_map.h>
79 #include <vm/vm_object.h>
81 #include <net/route.h>
82 #include <netinet/in.h>
83 #include <netinet/in_systm.h>
84 #include <netinet/ip.h>
85 #include <netinet/in_pcb.h>
103 #include <libprocstat.h>
104 #include "libprocstat_internal.h"
105 #include "common_kvm.h"
108 int statfs(const char *, struct statfs *); /* XXX */
110 #define PROCSTAT_KVM 1
111 #define PROCSTAT_SYSCTL 2
112 #define PROCSTAT_CORE 3
114 static char **getargv(struct procstat *procstat, struct kinfo_proc *kp,
115 size_t nchr, int env);
116 static char *getmnton(kvm_t *kd, struct mount *m);
117 static struct kinfo_vmentry * kinfo_getvmmap_core(struct procstat_core *core,
119 static Elf_Auxinfo *procstat_getauxv_core(struct procstat_core *core,
121 static Elf_Auxinfo *procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp);
122 static struct filestat_list *procstat_getfiles_kvm(
123 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
124 static struct filestat_list *procstat_getfiles_sysctl(
125 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
126 static int procstat_get_pipe_info_sysctl(struct filestat *fst,
127 struct pipestat *pipe, char *errbuf);
128 static int procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
129 struct pipestat *pipe, char *errbuf);
130 static int procstat_get_pts_info_sysctl(struct filestat *fst,
131 struct ptsstat *pts, char *errbuf);
132 static int procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
133 struct ptsstat *pts, char *errbuf);
134 static int procstat_get_sem_info_sysctl(struct filestat *fst,
135 struct semstat *sem, char *errbuf);
136 static int procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
137 struct semstat *sem, char *errbuf);
138 static int procstat_get_shm_info_sysctl(struct filestat *fst,
139 struct shmstat *shm, char *errbuf);
140 static int procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
141 struct shmstat *shm, char *errbuf);
142 static int procstat_get_socket_info_sysctl(struct filestat *fst,
143 struct sockstat *sock, char *errbuf);
144 static int procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
145 struct sockstat *sock, char *errbuf);
146 static int to_filestat_flags(int flags);
147 static int procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
148 struct vnstat *vn, char *errbuf);
149 static int procstat_get_vnode_info_sysctl(struct filestat *fst,
150 struct vnstat *vn, char *errbuf);
151 static gid_t *procstat_getgroups_core(struct procstat_core *core,
152 unsigned int *count);
153 static gid_t * procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp,
154 unsigned int *count);
155 static gid_t *procstat_getgroups_sysctl(pid_t pid, unsigned int *count);
156 static struct kinfo_kstack *procstat_getkstack_sysctl(pid_t pid,
158 static int procstat_getosrel_core(struct procstat_core *core,
160 static int procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp,
162 static int procstat_getosrel_sysctl(pid_t pid, int *osrelp);
163 static int procstat_getpathname_core(struct procstat_core *core,
164 char *pathname, size_t maxlen);
165 static int procstat_getpathname_sysctl(pid_t pid, char *pathname,
167 static int procstat_getrlimit_core(struct procstat_core *core, int which,
168 struct rlimit* rlimit);
169 static int procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp,
170 int which, struct rlimit* rlimit);
171 static int procstat_getrlimit_sysctl(pid_t pid, int which,
172 struct rlimit* rlimit);
173 static int procstat_getumask_core(struct procstat_core *core,
174 unsigned short *maskp);
175 static int procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp,
176 unsigned short *maskp);
177 static int procstat_getumask_sysctl(pid_t pid, unsigned short *maskp);
178 static int vntype2psfsttype(int type);
181 procstat_close(struct procstat *procstat)
185 if (procstat->type == PROCSTAT_KVM)
186 kvm_close(procstat->kd);
187 else if (procstat->type == PROCSTAT_CORE)
188 procstat_core_close(procstat->core);
189 procstat_freeargv(procstat);
190 procstat_freeenvv(procstat);
195 procstat_open_sysctl(void)
197 struct procstat *procstat;
199 procstat = calloc(1, sizeof(*procstat));
200 if (procstat == NULL) {
204 procstat->type = PROCSTAT_SYSCTL;
209 procstat_open_kvm(const char *nlistf, const char *memf)
211 struct procstat *procstat;
213 char buf[_POSIX2_LINE_MAX];
215 procstat = calloc(1, sizeof(*procstat));
216 if (procstat == NULL) {
220 kd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
222 warnx("kvm_openfiles(): %s", buf);
226 procstat->type = PROCSTAT_KVM;
232 procstat_open_core(const char *filename)
234 struct procstat *procstat;
235 struct procstat_core *core;
237 procstat = calloc(1, sizeof(*procstat));
238 if (procstat == NULL) {
242 core = procstat_core_open(filename);
247 procstat->type = PROCSTAT_CORE;
248 procstat->core = core;
253 procstat_getprocs(struct procstat *procstat, int what, int arg,
256 struct kinfo_proc *p0, *p;
265 if (procstat->type == PROCSTAT_KVM) {
267 p0 = kvm_getprocs(procstat->kd, what, arg, &cnt);
268 if (p0 == NULL || cnt <= 0)
271 len = *count * sizeof(*p);
274 warnx("malloc(%zu)", len);
279 } else if (procstat->type == PROCSTAT_SYSCTL) {
285 error = sysctl(name, 4, NULL, &len, NULL, 0);
286 if (error < 0 && errno != EPERM) {
287 warn("sysctl(kern.proc)");
291 warnx("no processes?");
296 p = reallocf(p, len);
298 warnx("reallocf(%zu)", len);
302 error = sysctl(name, 4, p, &len, NULL, 0);
303 } while (error < 0 && errno == ENOMEM && olen == len);
304 if (error < 0 && errno != EPERM) {
305 warn("sysctl(kern.proc)");
308 /* Perform simple consistency checks. */
309 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
310 warnx("kinfo_proc structure size mismatch (len = %zu)", len);
313 *count = len / sizeof(*p);
315 } else if (procstat->type == PROCSTAT_CORE) {
316 p = procstat_core_get(procstat->core, PSC_TYPE_PROC, NULL,
318 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
319 warnx("kinfo_proc structure size mismatch");
322 *count = len / sizeof(*p);
325 warnx("unknown access method: %d", procstat->type);
335 procstat_freeprocs(struct procstat *procstat __unused, struct kinfo_proc *p)
343 struct filestat_list *
344 procstat_getfiles(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
347 switch(procstat->type) {
349 return (procstat_getfiles_kvm(procstat, kp, mmapped));
350 case PROCSTAT_SYSCTL:
352 return (procstat_getfiles_sysctl(procstat, kp, mmapped));
354 warnx("unknown access method: %d", procstat->type);
360 procstat_freefiles(struct procstat *procstat, struct filestat_list *head)
362 struct filestat *fst, *tmp;
364 STAILQ_FOREACH_SAFE(fst, head, next, tmp) {
365 if (fst->fs_path != NULL)
370 if (procstat->vmentries != NULL) {
371 free(procstat->vmentries);
372 procstat->vmentries = NULL;
374 if (procstat->files != NULL) {
375 free(procstat->files);
376 procstat->files = NULL;
380 static struct filestat *
381 filestat_new_entry(void *typedep, int type, int fd, int fflags, int uflags,
382 int refcount, off_t offset, char *path, cap_rights_t *cap_rightsp)
384 struct filestat *entry;
386 entry = calloc(1, sizeof(*entry));
391 entry->fs_typedep = typedep;
392 entry->fs_fflags = fflags;
393 entry->fs_uflags = uflags;
395 entry->fs_type = type;
396 entry->fs_ref_count = refcount;
397 entry->fs_offset = offset;
398 entry->fs_path = path;
399 if (cap_rightsp != NULL)
400 entry->fs_cap_rights = *cap_rightsp;
402 cap_rights_init(&entry->fs_cap_rights);
406 static struct vnode *
407 getctty(kvm_t *kd, struct kinfo_proc *kp)
415 error = kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
418 warnx("can't read proc struct at %p for pid %d",
419 kp->ki_paddr, kp->ki_pid);
422 if (proc.p_pgrp == NULL)
424 error = kvm_read_all(kd, (unsigned long)proc.p_pgrp, &pgrp,
427 warnx("can't read pgrp struct at %p for pid %d",
428 proc.p_pgrp, kp->ki_pid);
431 error = kvm_read_all(kd, (unsigned long)pgrp.pg_session, &sess,
434 warnx("can't read session struct at %p for pid %d",
435 pgrp.pg_session, kp->ki_pid);
438 return (sess.s_ttyvp);
441 static struct filestat_list *
442 procstat_getfiles_kvm(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
445 struct filedesc filed;
446 struct vm_map_entry vmentry;
447 struct vm_object object;
448 struct vmspace vmspace;
449 vm_map_entry_t entryp;
453 struct file **ofiles;
454 struct filestat *entry;
455 struct filestat_list *head;
466 if (kp->ki_fd == NULL)
468 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &filed,
470 warnx("can't read filedesc at %p", (void *)kp->ki_fd);
475 * Allocate list head.
477 head = malloc(sizeof(*head));
482 /* root directory vnode, if one. */
484 entry = filestat_new_entry(filed.fd_rdir, PS_FST_TYPE_VNODE, -1,
485 PS_FST_FFLAG_READ, PS_FST_UFLAG_RDIR, 0, 0, NULL, NULL);
487 STAILQ_INSERT_TAIL(head, entry, next);
489 /* current working directory vnode. */
491 entry = filestat_new_entry(filed.fd_cdir, PS_FST_TYPE_VNODE, -1,
492 PS_FST_FFLAG_READ, PS_FST_UFLAG_CDIR, 0, 0, NULL, NULL);
494 STAILQ_INSERT_TAIL(head, entry, next);
496 /* jail root, if any. */
498 entry = filestat_new_entry(filed.fd_jdir, PS_FST_TYPE_VNODE, -1,
499 PS_FST_FFLAG_READ, PS_FST_UFLAG_JAIL, 0, 0, NULL, NULL);
501 STAILQ_INSERT_TAIL(head, entry, next);
503 /* ktrace vnode, if one */
505 entry = filestat_new_entry(kp->ki_tracep, PS_FST_TYPE_VNODE, -1,
506 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
507 PS_FST_UFLAG_TRACE, 0, 0, NULL, NULL);
509 STAILQ_INSERT_TAIL(head, entry, next);
511 /* text vnode, if one */
513 entry = filestat_new_entry(kp->ki_textvp, PS_FST_TYPE_VNODE, -1,
514 PS_FST_FFLAG_READ, PS_FST_UFLAG_TEXT, 0, 0, NULL, NULL);
516 STAILQ_INSERT_TAIL(head, entry, next);
518 /* Controlling terminal. */
519 if ((vp = getctty(kd, kp)) != NULL) {
520 entry = filestat_new_entry(vp, PS_FST_TYPE_VNODE, -1,
521 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
522 PS_FST_UFLAG_CTTY, 0, 0, NULL, NULL);
524 STAILQ_INSERT_TAIL(head, entry, next);
527 nfiles = filed.fd_lastfile + 1;
528 ofiles = malloc(nfiles * sizeof(struct file *));
529 if (ofiles == NULL) {
530 warn("malloc(%zu)", nfiles * sizeof(struct file *));
533 if (!kvm_read_all(kd, (unsigned long)filed.fd_ofiles, ofiles,
534 nfiles * sizeof(struct file *))) {
535 warnx("cannot read file structures at %p",
536 (void *)filed.fd_ofiles);
540 for (i = 0; i <= filed.fd_lastfile; i++) {
541 if (ofiles[i] == NULL)
543 if (!kvm_read_all(kd, (unsigned long)ofiles[i], &file,
544 sizeof(struct file))) {
545 warnx("can't read file %d at %p", i,
549 switch (file.f_type) {
551 type = PS_FST_TYPE_VNODE;
555 type = PS_FST_TYPE_SOCKET;
559 type = PS_FST_TYPE_PIPE;
563 type = PS_FST_TYPE_FIFO;
568 type = PS_FST_TYPE_PTS;
573 type = PS_FST_TYPE_SEM;
577 type = PS_FST_TYPE_SHM;
583 /* XXXRW: No capability rights support for kvm yet. */
584 entry = filestat_new_entry(data, type, i,
585 to_filestat_flags(file.f_flag), 0, 0, 0, NULL, NULL);
587 STAILQ_INSERT_TAIL(head, entry, next);
594 * Process mmapped files if requested.
597 if (!kvm_read_all(kd, (unsigned long)kp->ki_vmspace, &vmspace,
599 warnx("can't read vmspace at %p",
600 (void *)kp->ki_vmspace);
603 map = &vmspace.vm_map;
605 for (entryp = map->header.next;
606 entryp != &kp->ki_vmspace->vm_map.header;
607 entryp = vmentry.next) {
608 if (!kvm_read_all(kd, (unsigned long)entryp, &vmentry,
610 warnx("can't read vm_map_entry at %p",
614 if (vmentry.eflags & MAP_ENTRY_IS_SUB_MAP)
616 if ((objp = vmentry.object.vm_object) == NULL)
618 for (; objp; objp = object.backing_object) {
619 if (!kvm_read_all(kd, (unsigned long)objp,
620 &object, sizeof(object))) {
621 warnx("can't read vm_object at %p",
627 /* We want only vnode objects. */
628 if (object.type != OBJT_VNODE)
631 prot = vmentry.protection;
633 if (prot & VM_PROT_READ)
634 fflags = PS_FST_FFLAG_READ;
635 if ((vmentry.eflags & MAP_ENTRY_COW) == 0 &&
636 prot & VM_PROT_WRITE)
637 fflags |= PS_FST_FFLAG_WRITE;
640 * Create filestat entry.
642 entry = filestat_new_entry(object.handle,
643 PS_FST_TYPE_VNODE, -1, fflags,
644 PS_FST_UFLAG_MMAP, 0, 0, NULL, NULL);
646 STAILQ_INSERT_TAIL(head, entry, next);
654 * kinfo types to filestat translation.
657 kinfo_type2fst(int kftype)
663 { KF_TYPE_CRYPTO, PS_FST_TYPE_CRYPTO },
664 { KF_TYPE_FIFO, PS_FST_TYPE_FIFO },
665 { KF_TYPE_KQUEUE, PS_FST_TYPE_KQUEUE },
666 { KF_TYPE_MQUEUE, PS_FST_TYPE_MQUEUE },
667 { KF_TYPE_NONE, PS_FST_TYPE_NONE },
668 { KF_TYPE_PIPE, PS_FST_TYPE_PIPE },
669 { KF_TYPE_PTS, PS_FST_TYPE_PTS },
670 { KF_TYPE_SEM, PS_FST_TYPE_SEM },
671 { KF_TYPE_SHM, PS_FST_TYPE_SHM },
672 { KF_TYPE_SOCKET, PS_FST_TYPE_SOCKET },
673 { KF_TYPE_VNODE, PS_FST_TYPE_VNODE },
674 { KF_TYPE_UNKNOWN, PS_FST_TYPE_UNKNOWN }
676 #define NKFTYPES (sizeof(kftypes2fst) / sizeof(*kftypes2fst))
679 for (i = 0; i < NKFTYPES; i++)
680 if (kftypes2fst[i].kf_type == kftype)
683 return (PS_FST_TYPE_UNKNOWN);
684 return (kftypes2fst[i].fst_type);
688 * kinfo flags to filestat translation.
691 kinfo_fflags2fst(int kfflags)
697 { KF_FLAG_APPEND, PS_FST_FFLAG_APPEND },
698 { KF_FLAG_ASYNC, PS_FST_FFLAG_ASYNC },
699 { KF_FLAG_CREAT, PS_FST_FFLAG_CREAT },
700 { KF_FLAG_DIRECT, PS_FST_FFLAG_DIRECT },
701 { KF_FLAG_EXCL, PS_FST_FFLAG_EXCL },
702 { KF_FLAG_EXEC, PS_FST_FFLAG_EXEC },
703 { KF_FLAG_EXLOCK, PS_FST_FFLAG_EXLOCK },
704 { KF_FLAG_FSYNC, PS_FST_FFLAG_SYNC },
705 { KF_FLAG_HASLOCK, PS_FST_FFLAG_HASLOCK },
706 { KF_FLAG_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
707 { KF_FLAG_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
708 { KF_FLAG_READ, PS_FST_FFLAG_READ },
709 { KF_FLAG_SHLOCK, PS_FST_FFLAG_SHLOCK },
710 { KF_FLAG_TRUNC, PS_FST_FFLAG_TRUNC },
711 { KF_FLAG_WRITE, PS_FST_FFLAG_WRITE }
713 #define NKFFLAGS (sizeof(kfflags2fst) / sizeof(*kfflags2fst))
718 for (i = 0; i < NKFFLAGS; i++)
719 if ((kfflags & kfflags2fst[i].kf_flag) != 0)
720 flags |= kfflags2fst[i].fst_flag;
725 kinfo_uflags2fst(int fd)
729 case KF_FD_TYPE_CTTY:
730 return (PS_FST_UFLAG_CTTY);
732 return (PS_FST_UFLAG_CDIR);
733 case KF_FD_TYPE_JAIL:
734 return (PS_FST_UFLAG_JAIL);
735 case KF_FD_TYPE_TEXT:
736 return (PS_FST_UFLAG_TEXT);
737 case KF_FD_TYPE_TRACE:
738 return (PS_FST_UFLAG_TRACE);
739 case KF_FD_TYPE_ROOT:
740 return (PS_FST_UFLAG_RDIR);
745 static struct kinfo_file *
746 kinfo_getfile_core(struct procstat_core *core, int *cntp)
751 struct kinfo_file *kif, *kp, *kf;
753 buf = procstat_core_get(core, PSC_TYPE_FILES, NULL, &len);
757 * XXXMG: The code below is just copy&past from libutil.
758 * The code duplication can be avoided if libutil
759 * is extended to provide something like:
760 * struct kinfo_file *kinfo_getfile_from_buf(const char *buf,
761 * size_t len, int *cntp);
764 /* Pass 1: count items */
769 kf = (struct kinfo_file *)(uintptr_t)bp;
770 bp += kf->kf_structsize;
774 kif = calloc(cnt, sizeof(*kif));
784 kf = (struct kinfo_file *)(uintptr_t)bp;
785 /* Copy/expand into pre-zeroed buffer */
786 memcpy(kp, kf, kf->kf_structsize);
787 /* Advance to next packed record */
788 bp += kf->kf_structsize;
789 /* Set field size to fixed length, advance */
790 kp->kf_structsize = sizeof(*kp);
795 return (kif); /* Caller must free() return value */
798 static struct filestat_list *
799 procstat_getfiles_sysctl(struct procstat *procstat, struct kinfo_proc *kp,
802 struct kinfo_file *kif, *files;
803 struct kinfo_vmentry *kve, *vmentries;
804 struct filestat_list *head;
805 struct filestat *entry;
811 cap_rights_t cap_rights;
814 if (kp->ki_fd == NULL)
816 switch(procstat->type) {
817 case PROCSTAT_SYSCTL:
818 files = kinfo_getfile(kp->ki_pid, &cnt);
821 files = kinfo_getfile_core(procstat->core, &cnt);
824 assert(!"invalid type");
826 if (files == NULL && errno != EPERM) {
827 warn("kinfo_getfile()");
830 procstat->files = files;
833 * Allocate list head.
835 head = malloc(sizeof(*head));
839 for (i = 0; i < cnt; i++) {
842 type = kinfo_type2fst(kif->kf_type);
843 fd = kif->kf_fd >= 0 ? kif->kf_fd : -1;
844 fflags = kinfo_fflags2fst(kif->kf_flags);
845 uflags = kinfo_uflags2fst(kif->kf_fd);
846 refcount = kif->kf_ref_count;
847 offset = kif->kf_offset;
848 if (*kif->kf_path != '\0')
849 path = strdup(kif->kf_path);
852 cap_rights = kif->kf_cap_rights;
855 * Create filestat entry.
857 entry = filestat_new_entry(kif, type, fd, fflags, uflags,
858 refcount, offset, path, &cap_rights);
860 STAILQ_INSERT_TAIL(head, entry, next);
863 vmentries = procstat_getvmmap(procstat, kp, &cnt);
864 procstat->vmentries = vmentries;
865 if (vmentries == NULL || cnt == 0)
867 for (i = 0; i < cnt; i++) {
869 if (kve->kve_type != KVME_TYPE_VNODE)
872 if (kve->kve_protection & KVME_PROT_READ)
873 fflags = PS_FST_FFLAG_READ;
874 if ((kve->kve_flags & KVME_FLAG_COW) == 0 &&
875 kve->kve_protection & KVME_PROT_WRITE)
876 fflags |= PS_FST_FFLAG_WRITE;
877 offset = kve->kve_offset;
878 refcount = kve->kve_ref_count;
879 if (*kve->kve_path != '\0')
880 path = strdup(kve->kve_path);
883 entry = filestat_new_entry(kve, PS_FST_TYPE_VNODE, -1,
884 fflags, PS_FST_UFLAG_MMAP, refcount, offset, path,
887 STAILQ_INSERT_TAIL(head, entry, next);
895 procstat_get_pipe_info(struct procstat *procstat, struct filestat *fst,
896 struct pipestat *ps, char *errbuf)
900 if (procstat->type == PROCSTAT_KVM) {
901 return (procstat_get_pipe_info_kvm(procstat->kd, fst, ps,
903 } else if (procstat->type == PROCSTAT_SYSCTL ||
904 procstat->type == PROCSTAT_CORE) {
905 return (procstat_get_pipe_info_sysctl(fst, ps, errbuf));
907 warnx("unknown access method: %d", procstat->type);
909 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
915 procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
916 struct pipestat *ps, char *errbuf)
924 bzero(ps, sizeof(*ps));
925 pipep = fst->fs_typedep;
928 if (!kvm_read_all(kd, (unsigned long)pipep, &pi, sizeof(struct pipe))) {
929 warnx("can't read pipe at %p", (void *)pipep);
932 ps->addr = (uintptr_t)pipep;
933 ps->peer = (uintptr_t)pi.pipe_peer;
934 ps->buffer_cnt = pi.pipe_buffer.cnt;
939 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
944 procstat_get_pipe_info_sysctl(struct filestat *fst, struct pipestat *ps,
945 char *errbuf __unused)
947 struct kinfo_file *kif;
951 bzero(ps, sizeof(*ps));
952 kif = fst->fs_typedep;
955 ps->addr = kif->kf_un.kf_pipe.kf_pipe_addr;
956 ps->peer = kif->kf_un.kf_pipe.kf_pipe_peer;
957 ps->buffer_cnt = kif->kf_un.kf_pipe.kf_pipe_buffer_cnt;
962 procstat_get_pts_info(struct procstat *procstat, struct filestat *fst,
963 struct ptsstat *pts, char *errbuf)
967 if (procstat->type == PROCSTAT_KVM) {
968 return (procstat_get_pts_info_kvm(procstat->kd, fst, pts,
970 } else if (procstat->type == PROCSTAT_SYSCTL ||
971 procstat->type == PROCSTAT_CORE) {
972 return (procstat_get_pts_info_sysctl(fst, pts, errbuf));
974 warnx("unknown access method: %d", procstat->type);
976 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
982 procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
983 struct ptsstat *pts, char *errbuf)
991 bzero(pts, sizeof(*pts));
992 ttyp = fst->fs_typedep;
995 if (!kvm_read_all(kd, (unsigned long)ttyp, &tty, sizeof(struct tty))) {
996 warnx("can't read tty at %p", (void *)ttyp);
999 pts->dev = dev2udev(kd, tty.t_dev);
1000 (void)kdevtoname(kd, tty.t_dev, pts->devname);
1005 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1010 procstat_get_pts_info_sysctl(struct filestat *fst, struct ptsstat *pts,
1011 char *errbuf __unused)
1013 struct kinfo_file *kif;
1017 bzero(pts, sizeof(*pts));
1018 kif = fst->fs_typedep;
1021 pts->dev = kif->kf_un.kf_pts.kf_pts_dev;
1022 strlcpy(pts->devname, kif->kf_path, sizeof(pts->devname));
1027 procstat_get_sem_info(struct procstat *procstat, struct filestat *fst,
1028 struct semstat *sem, char *errbuf)
1032 if (procstat->type == PROCSTAT_KVM) {
1033 return (procstat_get_sem_info_kvm(procstat->kd, fst, sem,
1035 } else if (procstat->type == PROCSTAT_SYSCTL ||
1036 procstat->type == PROCSTAT_CORE) {
1037 return (procstat_get_sem_info_sysctl(fst, sem, errbuf));
1039 warnx("unknown access method: %d", procstat->type);
1041 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1047 procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
1048 struct semstat *sem, char *errbuf)
1058 bzero(sem, sizeof(*sem));
1059 ksemp = fst->fs_typedep;
1062 if (!kvm_read_all(kd, (unsigned long)ksemp, &ksem,
1063 sizeof(struct ksem))) {
1064 warnx("can't read ksem at %p", (void *)ksemp);
1067 sem->mode = S_IFREG | ksem.ks_mode;
1068 sem->value = ksem.ks_value;
1069 if (fst->fs_path == NULL && ksem.ks_path != NULL) {
1070 path = malloc(MAXPATHLEN);
1071 for (i = 0; i < MAXPATHLEN - 1; i++) {
1072 if (!kvm_read_all(kd, (unsigned long)ksem.ks_path + i,
1075 if (path[i] == '\0')
1082 fst->fs_path = path;
1088 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1093 procstat_get_sem_info_sysctl(struct filestat *fst, struct semstat *sem,
1094 char *errbuf __unused)
1096 struct kinfo_file *kif;
1100 bzero(sem, sizeof(*sem));
1101 kif = fst->fs_typedep;
1104 sem->value = kif->kf_un.kf_sem.kf_sem_value;
1105 sem->mode = kif->kf_un.kf_sem.kf_sem_mode;
1110 procstat_get_shm_info(struct procstat *procstat, struct filestat *fst,
1111 struct shmstat *shm, char *errbuf)
1115 if (procstat->type == PROCSTAT_KVM) {
1116 return (procstat_get_shm_info_kvm(procstat->kd, fst, shm,
1118 } else if (procstat->type == PROCSTAT_SYSCTL ||
1119 procstat->type == PROCSTAT_CORE) {
1120 return (procstat_get_shm_info_sysctl(fst, shm, errbuf));
1122 warnx("unknown access method: %d", procstat->type);
1124 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1130 procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
1131 struct shmstat *shm, char *errbuf)
1141 bzero(shm, sizeof(*shm));
1142 shmfdp = fst->fs_typedep;
1145 if (!kvm_read_all(kd, (unsigned long)shmfdp, &shmfd,
1146 sizeof(struct shmfd))) {
1147 warnx("can't read shmfd at %p", (void *)shmfdp);
1150 shm->mode = S_IFREG | shmfd.shm_mode;
1151 shm->size = shmfd.shm_size;
1152 if (fst->fs_path == NULL && shmfd.shm_path != NULL) {
1153 path = malloc(MAXPATHLEN);
1154 for (i = 0; i < MAXPATHLEN - 1; i++) {
1155 if (!kvm_read_all(kd, (unsigned long)shmfd.shm_path + i,
1158 if (path[i] == '\0')
1165 fst->fs_path = path;
1171 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1176 procstat_get_shm_info_sysctl(struct filestat *fst, struct shmstat *shm,
1177 char *errbuf __unused)
1179 struct kinfo_file *kif;
1183 bzero(shm, sizeof(*shm));
1184 kif = fst->fs_typedep;
1187 shm->size = kif->kf_un.kf_file.kf_file_size;
1188 shm->mode = kif->kf_un.kf_file.kf_file_mode;
1193 procstat_get_vnode_info(struct procstat *procstat, struct filestat *fst,
1194 struct vnstat *vn, char *errbuf)
1198 if (procstat->type == PROCSTAT_KVM) {
1199 return (procstat_get_vnode_info_kvm(procstat->kd, fst, vn,
1201 } else if (procstat->type == PROCSTAT_SYSCTL ||
1202 procstat->type == PROCSTAT_CORE) {
1203 return (procstat_get_vnode_info_sysctl(fst, vn, errbuf));
1205 warnx("unknown access method: %d", procstat->type);
1207 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1213 procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
1214 struct vnstat *vn, char *errbuf)
1216 /* Filesystem specific handlers. */
1217 #define FSTYPE(fst) {#fst, fst##_filestat}
1220 int (*handler)(kvm_t *kd, struct vnode *vp,
1230 #ifdef LIBPROCSTAT_ZFS
1234 #define NTYPES (sizeof(fstypes) / sizeof(*fstypes))
1244 vp = fst->fs_typedep;
1247 error = kvm_read_all(kd, (unsigned long)vp, &vnode, sizeof(vnode));
1249 warnx("can't read vnode at %p", (void *)vp);
1252 bzero(vn, sizeof(*vn));
1253 vn->vn_type = vntype2psfsttype(vnode.v_type);
1254 if (vnode.v_type == VNON || vnode.v_type == VBAD)
1256 error = kvm_read_all(kd, (unsigned long)vnode.v_tag, tagstr,
1259 warnx("can't read v_tag at %p", (void *)vp);
1262 tagstr[sizeof(tagstr) - 1] = '\0';
1265 * Find appropriate handler.
1267 for (i = 0, found = 0; i < NTYPES; i++)
1268 if (!strcmp(fstypes[i].tag, tagstr)) {
1269 if (fstypes[i].handler(kd, &vnode, vn) != 0) {
1276 snprintf(errbuf, _POSIX2_LINE_MAX, "?(%s)", tagstr);
1279 vn->vn_mntdir = getmnton(kd, vnode.v_mount);
1280 if ((vnode.v_type == VBLK || vnode.v_type == VCHR) &&
1281 vnode.v_rdev != NULL){
1282 vn->vn_dev = dev2udev(kd, vnode.v_rdev);
1283 (void)kdevtoname(kd, vnode.v_rdev, vn->vn_devname);
1291 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1296 * kinfo vnode type to filestat translation.
1299 kinfo_vtype2fst(int kfvtype)
1304 } kfvtypes2fst[] = {
1305 { KF_VTYPE_VBAD, PS_FST_VTYPE_VBAD },
1306 { KF_VTYPE_VBLK, PS_FST_VTYPE_VBLK },
1307 { KF_VTYPE_VCHR, PS_FST_VTYPE_VCHR },
1308 { KF_VTYPE_VDIR, PS_FST_VTYPE_VDIR },
1309 { KF_VTYPE_VFIFO, PS_FST_VTYPE_VFIFO },
1310 { KF_VTYPE_VLNK, PS_FST_VTYPE_VLNK },
1311 { KF_VTYPE_VNON, PS_FST_VTYPE_VNON },
1312 { KF_VTYPE_VREG, PS_FST_VTYPE_VREG },
1313 { KF_VTYPE_VSOCK, PS_FST_VTYPE_VSOCK }
1315 #define NKFVTYPES (sizeof(kfvtypes2fst) / sizeof(*kfvtypes2fst))
1318 for (i = 0; i < NKFVTYPES; i++)
1319 if (kfvtypes2fst[i].kf_vtype == kfvtype)
1322 return (PS_FST_VTYPE_UNKNOWN);
1323 return (kfvtypes2fst[i].fst_vtype);
1327 procstat_get_vnode_info_sysctl(struct filestat *fst, struct vnstat *vn,
1330 struct statfs stbuf;
1331 struct kinfo_file *kif;
1332 struct kinfo_vmentry *kve;
1344 bzero(vn, sizeof(*vn));
1345 if (fst->fs_typedep == NULL)
1347 if (fst->fs_uflags & PS_FST_UFLAG_MMAP) {
1348 kve = fst->fs_typedep;
1349 fileid = kve->kve_vn_fileid;
1350 fsid = kve->kve_vn_fsid;
1351 mode = kve->kve_vn_mode;
1352 path = kve->kve_path;
1353 rdev = kve->kve_vn_rdev;
1354 size = kve->kve_vn_size;
1355 vntype = kinfo_vtype2fst(kve->kve_vn_type);
1356 status = kve->kve_status;
1358 kif = fst->fs_typedep;
1359 fileid = kif->kf_un.kf_file.kf_file_fileid;
1360 fsid = kif->kf_un.kf_file.kf_file_fsid;
1361 mode = kif->kf_un.kf_file.kf_file_mode;
1362 path = kif->kf_path;
1363 rdev = kif->kf_un.kf_file.kf_file_rdev;
1364 size = kif->kf_un.kf_file.kf_file_size;
1365 vntype = kinfo_vtype2fst(kif->kf_vnode_type);
1366 status = kif->kf_status;
1368 vn->vn_type = vntype;
1369 if (vntype == PS_FST_VTYPE_VNON || vntype == PS_FST_VTYPE_VBAD)
1371 if ((status & KF_ATTR_VALID) == 0) {
1372 if (errbuf != NULL) {
1373 snprintf(errbuf, _POSIX2_LINE_MAX,
1374 "? (no info available)");
1378 if (path && *path) {
1379 statfs(path, &stbuf);
1380 vn->vn_mntdir = strdup(stbuf.f_mntonname);
1382 vn->vn_mntdir = strdup("-");
1384 if (vntype == PS_FST_VTYPE_VBLK) {
1385 name = devname(rdev, S_IFBLK);
1387 strlcpy(vn->vn_devname, name,
1388 sizeof(vn->vn_devname));
1389 } else if (vntype == PS_FST_VTYPE_VCHR) {
1390 name = devname(vn->vn_dev, S_IFCHR);
1392 strlcpy(vn->vn_devname, name,
1393 sizeof(vn->vn_devname));
1396 vn->vn_fileid = fileid;
1403 procstat_get_socket_info(struct procstat *procstat, struct filestat *fst,
1404 struct sockstat *sock, char *errbuf)
1408 if (procstat->type == PROCSTAT_KVM) {
1409 return (procstat_get_socket_info_kvm(procstat->kd, fst, sock,
1411 } else if (procstat->type == PROCSTAT_SYSCTL ||
1412 procstat->type == PROCSTAT_CORE) {
1413 return (procstat_get_socket_info_sysctl(fst, sock, errbuf));
1415 warnx("unknown access method: %d", procstat->type);
1417 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1423 procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
1424 struct sockstat *sock, char *errbuf)
1428 struct protosw proto;
1437 bzero(sock, sizeof(*sock));
1438 so = fst->fs_typedep;
1441 sock->so_addr = (uintptr_t)so;
1442 /* fill in socket */
1443 if (!kvm_read_all(kd, (unsigned long)so, &s,
1444 sizeof(struct socket))) {
1445 warnx("can't read sock at %p", (void *)so);
1448 /* fill in protosw entry */
1449 if (!kvm_read_all(kd, (unsigned long)s.so_proto, &proto,
1450 sizeof(struct protosw))) {
1451 warnx("can't read protosw at %p", (void *)s.so_proto);
1454 /* fill in domain */
1455 if (!kvm_read_all(kd, (unsigned long)proto.pr_domain, &dom,
1456 sizeof(struct domain))) {
1457 warnx("can't read domain at %p",
1458 (void *)proto.pr_domain);
1461 if ((len = kvm_read(kd, (unsigned long)dom.dom_name, sock->dname,
1462 sizeof(sock->dname) - 1)) < 0) {
1463 warnx("can't read domain name at %p", (void *)dom.dom_name);
1464 sock->dname[0] = '\0';
1467 sock->dname[len] = '\0';
1470 * Fill in known data.
1472 sock->type = s.so_type;
1473 sock->proto = proto.pr_protocol;
1474 sock->dom_family = dom.dom_family;
1475 sock->so_pcb = (uintptr_t)s.so_pcb;
1478 * Protocol specific data.
1480 switch(dom.dom_family) {
1483 if (proto.pr_protocol == IPPROTO_TCP) {
1485 if (kvm_read(kd, (u_long)s.so_pcb,
1486 (char *)&inpcb, sizeof(struct inpcb))
1487 != sizeof(struct inpcb)) {
1488 warnx("can't read inpcb at %p",
1492 (uintptr_t)inpcb.inp_ppcb;
1498 if (kvm_read(kd, (u_long)s.so_pcb, (char *)&unpcb,
1499 sizeof(struct unpcb)) != sizeof(struct unpcb)){
1500 warnx("can't read unpcb at %p",
1502 } else if (unpcb.unp_conn) {
1503 sock->so_rcv_sb_state = s.so_rcv.sb_state;
1504 sock->so_snd_sb_state = s.so_snd.sb_state;
1505 sock->unp_conn = (uintptr_t)unpcb.unp_conn;
1516 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1521 procstat_get_socket_info_sysctl(struct filestat *fst, struct sockstat *sock,
1522 char *errbuf __unused)
1524 struct kinfo_file *kif;
1528 bzero(sock, sizeof(*sock));
1529 kif = fst->fs_typedep;
1534 * Fill in known data.
1536 sock->type = kif->kf_sock_type;
1537 sock->proto = kif->kf_sock_protocol;
1538 sock->dom_family = kif->kf_sock_domain;
1539 sock->so_pcb = kif->kf_un.kf_sock.kf_sock_pcb;
1540 strlcpy(sock->dname, kif->kf_path, sizeof(sock->dname));
1541 bcopy(&kif->kf_sa_local, &sock->sa_local, kif->kf_sa_local.ss_len);
1542 bcopy(&kif->kf_sa_peer, &sock->sa_peer, kif->kf_sa_peer.ss_len);
1545 * Protocol specific data.
1547 switch(sock->dom_family) {
1550 if (sock->proto == IPPROTO_TCP)
1551 sock->inp_ppcb = kif->kf_un.kf_sock.kf_sock_inpcb;
1554 if (kif->kf_un.kf_sock.kf_sock_unpconn != 0) {
1555 sock->so_rcv_sb_state =
1556 kif->kf_un.kf_sock.kf_sock_rcv_sb_state;
1557 sock->so_snd_sb_state =
1558 kif->kf_un.kf_sock.kf_sock_snd_sb_state;
1560 kif->kf_un.kf_sock.kf_sock_unpconn;
1570 * Descriptor flags to filestat translation.
1573 to_filestat_flags(int flags)
1579 { FREAD, PS_FST_FFLAG_READ },
1580 { FWRITE, PS_FST_FFLAG_WRITE },
1581 { O_APPEND, PS_FST_FFLAG_APPEND },
1582 { O_ASYNC, PS_FST_FFLAG_ASYNC },
1583 { O_CREAT, PS_FST_FFLAG_CREAT },
1584 { O_DIRECT, PS_FST_FFLAG_DIRECT },
1585 { O_EXCL, PS_FST_FFLAG_EXCL },
1586 { O_EXEC, PS_FST_FFLAG_EXEC },
1587 { O_EXLOCK, PS_FST_FFLAG_EXLOCK },
1588 { O_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
1589 { O_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
1590 { O_SHLOCK, PS_FST_FFLAG_SHLOCK },
1591 { O_SYNC, PS_FST_FFLAG_SYNC },
1592 { O_TRUNC, PS_FST_FFLAG_TRUNC }
1594 #define NFSTFLAGS (sizeof(fstflags) / sizeof(*fstflags))
1599 for (i = 0; i < NFSTFLAGS; i++)
1600 if (flags & fstflags[i].flag)
1601 fst_flags |= fstflags[i].fst_flag;
1606 * Vnode type to filestate translation.
1609 vntype2psfsttype(int type)
1615 { VBAD, PS_FST_VTYPE_VBAD },
1616 { VBLK, PS_FST_VTYPE_VBLK },
1617 { VCHR, PS_FST_VTYPE_VCHR },
1618 { VDIR, PS_FST_VTYPE_VDIR },
1619 { VFIFO, PS_FST_VTYPE_VFIFO },
1620 { VLNK, PS_FST_VTYPE_VLNK },
1621 { VNON, PS_FST_VTYPE_VNON },
1622 { VREG, PS_FST_VTYPE_VREG },
1623 { VSOCK, PS_FST_VTYPE_VSOCK }
1625 #define NVFTYPES (sizeof(vt2fst) / sizeof(*vt2fst))
1626 unsigned int i, fst_type;
1628 fst_type = PS_FST_VTYPE_UNKNOWN;
1629 for (i = 0; i < NVFTYPES; i++) {
1630 if (type == vt2fst[i].vtype) {
1631 fst_type = vt2fst[i].fst_vtype;
1639 getmnton(kvm_t *kd, struct mount *m)
1642 static struct mtab {
1645 char mntonname[MNAMELEN + 1];
1649 for (mt = mhead; mt != NULL; mt = mt->next)
1651 return (mt->mntonname);
1652 if (!kvm_read_all(kd, (unsigned long)m, &mnt, sizeof(struct mount))) {
1653 warnx("can't read mount table at %p", (void *)m);
1656 if ((mt = malloc(sizeof (struct mtab))) == NULL)
1659 bcopy(&mnt.mnt_stat.f_mntonname[0], &mt->mntonname[0], MNAMELEN);
1660 mt->mntonname[MNAMELEN] = '\0';
1663 return (mt->mntonname);
1667 * Auxiliary structures and functions to get process environment or
1668 * command line arguments.
1677 static struct argvec *
1678 argvec_alloc(size_t bufsize)
1682 av = malloc(sizeof(*av));
1685 av->bufsize = bufsize;
1686 av->buf = malloc(av->bufsize);
1687 if (av->buf == NULL) {
1692 av->argv = malloc(sizeof(char *) * av->argc);
1693 if (av->argv == NULL) {
1702 argvec_free(struct argvec * av)
1711 getargv(struct procstat *procstat, struct kinfo_proc *kp, size_t nchr, int env)
1713 int error, name[4], argc, i;
1714 struct argvec *av, **avp;
1721 if (procstat->type == PROCSTAT_KVM) {
1722 warnx("can't use kvm access method");
1725 if (procstat->type != PROCSTAT_SYSCTL &&
1726 procstat->type != PROCSTAT_CORE) {
1727 warnx("unknown access method: %d", procstat->type);
1731 if (nchr == 0 || nchr > ARG_MAX)
1734 avp = (struct argvec **)(env ? &procstat->argv : &procstat->envv);
1739 av = argvec_alloc(nchr);
1742 warn("malloc(%zu)", nchr);
1746 } else if (av->bufsize < nchr) {
1747 av->buf = reallocf(av->buf, nchr);
1748 if (av->buf == NULL) {
1749 warn("malloc(%zu)", nchr);
1753 if (procstat->type == PROCSTAT_SYSCTL) {
1755 name[1] = KERN_PROC;
1756 name[2] = env ? KERN_PROC_ENV : KERN_PROC_ARGS;
1757 name[3] = kp->ki_pid;
1759 error = sysctl(name, 4, av->buf, &len, NULL, 0);
1760 if (error != 0 && errno != ESRCH && errno != EPERM)
1761 warn("sysctl(kern.proc.%s)", env ? "env" : "args");
1762 if (error != 0 || len == 0)
1764 } else /* procstat->type == PROCSTAT_CORE */ {
1765 type = env ? PSC_TYPE_ENVV : PSC_TYPE_ARGV;
1767 if (procstat_core_get(procstat->core, type, av->buf, &len)
1776 for (p = av->buf; p < av->buf + len; p += strlen(p) + 1) {
1782 argv = realloc(argv, sizeof(char *) * argc);
1784 warn("malloc(%zu)", sizeof(char *) * argc);
1796 * Return process command line arguments.
1799 procstat_getargv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1802 return (getargv(procstat, p, nchr, 0));
1806 * Free the buffer allocated by procstat_getargv().
1809 procstat_freeargv(struct procstat *procstat)
1812 if (procstat->argv != NULL) {
1813 argvec_free(procstat->argv);
1814 procstat->argv = NULL;
1819 * Return process environment.
1822 procstat_getenvv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1825 return (getargv(procstat, p, nchr, 1));
1829 * Free the buffer allocated by procstat_getenvv().
1832 procstat_freeenvv(struct procstat *procstat)
1834 if (procstat->envv != NULL) {
1835 argvec_free(procstat->envv);
1836 procstat->envv = NULL;
1840 static struct kinfo_vmentry *
1841 kinfo_getvmmap_core(struct procstat_core *core, int *cntp)
1845 char *buf, *bp, *eb;
1846 struct kinfo_vmentry *kiv, *kp, *kv;
1848 buf = procstat_core_get(core, PSC_TYPE_VMMAP, NULL, &len);
1853 * XXXMG: The code below is just copy&past from libutil.
1854 * The code duplication can be avoided if libutil
1855 * is extended to provide something like:
1856 * struct kinfo_vmentry *kinfo_getvmmap_from_buf(const char *buf,
1857 * size_t len, int *cntp);
1860 /* Pass 1: count items */
1865 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1866 bp += kv->kve_structsize;
1870 kiv = calloc(cnt, sizeof(*kiv));
1878 /* Pass 2: unpack */
1880 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1881 /* Copy/expand into pre-zeroed buffer */
1882 memcpy(kp, kv, kv->kve_structsize);
1883 /* Advance to next packed record */
1884 bp += kv->kve_structsize;
1885 /* Set field size to fixed length, advance */
1886 kp->kve_structsize = sizeof(*kp);
1891 return (kiv); /* Caller must free() return value */
1894 struct kinfo_vmentry *
1895 procstat_getvmmap(struct procstat *procstat, struct kinfo_proc *kp,
1899 switch(procstat->type) {
1901 warnx("kvm method is not supported");
1903 case PROCSTAT_SYSCTL:
1904 return (kinfo_getvmmap(kp->ki_pid, cntp));
1906 return (kinfo_getvmmap_core(procstat->core, cntp));
1908 warnx("unknown access method: %d", procstat->type);
1914 procstat_freevmmap(struct procstat *procstat __unused,
1915 struct kinfo_vmentry *vmmap)
1922 procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned int *cntp)
1931 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
1933 warnx("can't read proc struct at %p for pid %d",
1934 kp->ki_paddr, kp->ki_pid);
1937 if (proc.p_ucred == NOCRED)
1939 if (!kvm_read_all(kd, (unsigned long)proc.p_ucred, &ucred,
1941 warnx("can't read ucred struct at %p for pid %d",
1942 proc.p_ucred, kp->ki_pid);
1945 len = ucred.cr_ngroups * sizeof(gid_t);
1946 groups = malloc(len);
1947 if (groups == NULL) {
1948 warn("malloc(%zu)", len);
1951 if (!kvm_read_all(kd, (unsigned long)ucred.cr_groups, groups, len)) {
1952 warnx("can't read groups at %p for pid %d",
1953 ucred.cr_groups, kp->ki_pid);
1957 *cntp = ucred.cr_ngroups;
1962 procstat_getgroups_sysctl(pid_t pid, unsigned int *cntp)
1970 mib[2] = KERN_PROC_GROUPS;
1972 len = (sysconf(_SC_NGROUPS_MAX) + 1) * sizeof(gid_t);
1973 groups = malloc(len);
1974 if (groups == NULL) {
1975 warn("malloc(%zu)", len);
1978 if (sysctl(mib, 4, groups, &len, NULL, 0) == -1) {
1979 warn("sysctl: kern.proc.groups: %d", pid);
1983 *cntp = len / sizeof(gid_t);
1988 procstat_getgroups_core(struct procstat_core *core, unsigned int *cntp)
1993 groups = procstat_core_get(core, PSC_TYPE_GROUPS, NULL, &len);
1996 *cntp = len / sizeof(gid_t);
2001 procstat_getgroups(struct procstat *procstat, struct kinfo_proc *kp,
2004 switch(procstat->type) {
2006 return (procstat_getgroups_kvm(procstat->kd, kp, cntp));
2007 case PROCSTAT_SYSCTL:
2008 return (procstat_getgroups_sysctl(kp->ki_pid, cntp));
2010 return (procstat_getgroups_core(procstat->core, cntp));
2012 warnx("unknown access method: %d", procstat->type);
2018 procstat_freegroups(struct procstat *procstat __unused, gid_t *groups)
2025 procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned short *maskp)
2031 if (kp->ki_fd == NULL)
2033 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &fd, sizeof(fd))) {
2034 warnx("can't read filedesc at %p for pid %d", kp->ki_fd,
2038 *maskp = fd.fd_cmask;
2043 procstat_getumask_sysctl(pid_t pid, unsigned short *maskp)
2051 mib[2] = KERN_PROC_UMASK;
2053 len = sizeof(*maskp);
2054 error = sysctl(mib, 4, maskp, &len, NULL, 0);
2055 if (error != 0 && errno != ESRCH && errno != EPERM)
2056 warn("sysctl: kern.proc.umask: %d", pid);
2061 procstat_getumask_core(struct procstat_core *core, unsigned short *maskp)
2064 unsigned short *buf;
2066 buf = procstat_core_get(core, PSC_TYPE_UMASK, NULL, &len);
2069 if (len < sizeof(*maskp)) {
2079 procstat_getumask(struct procstat *procstat, struct kinfo_proc *kp,
2080 unsigned short *maskp)
2082 switch(procstat->type) {
2084 return (procstat_getumask_kvm(procstat->kd, kp, maskp));
2085 case PROCSTAT_SYSCTL:
2086 return (procstat_getumask_sysctl(kp->ki_pid, maskp));
2088 return (procstat_getumask_core(procstat->core, maskp));
2090 warnx("unknown access method: %d", procstat->type);
2096 procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp, int which,
2097 struct rlimit* rlimit)
2100 unsigned long offset;
2104 assert(which >= 0 && which < RLIM_NLIMITS);
2105 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2107 warnx("can't read proc struct at %p for pid %d",
2108 kp->ki_paddr, kp->ki_pid);
2111 if (proc.p_limit == NULL)
2113 offset = (unsigned long)proc.p_limit + sizeof(struct rlimit) * which;
2114 if (!kvm_read_all(kd, offset, rlimit, sizeof(*rlimit))) {
2115 warnx("can't read rlimit struct at %p for pid %d",
2116 (void *)offset, kp->ki_pid);
2123 procstat_getrlimit_sysctl(pid_t pid, int which, struct rlimit* rlimit)
2129 name[1] = KERN_PROC;
2130 name[2] = KERN_PROC_RLIMIT;
2133 len = sizeof(struct rlimit);
2134 error = sysctl(name, 5, rlimit, &len, NULL, 0);
2135 if (error < 0 && errno != ESRCH) {
2136 warn("sysctl: kern.proc.rlimit: %d", pid);
2139 if (error < 0 || len != sizeof(struct rlimit))
2145 procstat_getrlimit_core(struct procstat_core *core, int which,
2146 struct rlimit* rlimit)
2149 struct rlimit* rlimits;
2151 if (which < 0 || which >= RLIM_NLIMITS) {
2153 warn("getrlimit: which");
2156 rlimits = procstat_core_get(core, PSC_TYPE_RLIMIT, NULL, &len);
2157 if (rlimits == NULL)
2159 if (len < sizeof(struct rlimit) * RLIM_NLIMITS) {
2163 *rlimit = rlimits[which];
2168 procstat_getrlimit(struct procstat *procstat, struct kinfo_proc *kp, int which,
2169 struct rlimit* rlimit)
2171 switch(procstat->type) {
2173 return (procstat_getrlimit_kvm(procstat->kd, kp, which,
2175 case PROCSTAT_SYSCTL:
2176 return (procstat_getrlimit_sysctl(kp->ki_pid, which, rlimit));
2178 return (procstat_getrlimit_core(procstat->core, which, rlimit));
2180 warnx("unknown access method: %d", procstat->type);
2186 procstat_getpathname_sysctl(pid_t pid, char *pathname, size_t maxlen)
2192 name[1] = KERN_PROC;
2193 name[2] = KERN_PROC_PATHNAME;
2196 error = sysctl(name, 4, pathname, &len, NULL, 0);
2197 if (error != 0 && errno != ESRCH)
2198 warn("sysctl: kern.proc.pathname: %d", pid);
2205 procstat_getpathname_core(struct procstat_core *core, char *pathname,
2208 struct kinfo_file *files;
2211 files = kinfo_getfile_core(core, &cnt);
2215 for (i = 0; i < cnt; i++) {
2216 if (files[i].kf_fd != KF_FD_TYPE_TEXT)
2218 strncpy(pathname, files[i].kf_path, maxlen);
2227 procstat_getpathname(struct procstat *procstat, struct kinfo_proc *kp,
2228 char *pathname, size_t maxlen)
2230 switch(procstat->type) {
2232 /* XXX: Return empty string. */
2236 case PROCSTAT_SYSCTL:
2237 return (procstat_getpathname_sysctl(kp->ki_pid, pathname,
2240 return (procstat_getpathname_core(procstat->core, pathname,
2243 warnx("unknown access method: %d", procstat->type);
2249 procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp, int *osrelp)
2255 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2257 warnx("can't read proc struct at %p for pid %d",
2258 kp->ki_paddr, kp->ki_pid);
2261 *osrelp = proc.p_osrel;
2266 procstat_getosrel_sysctl(pid_t pid, int *osrelp)
2272 name[1] = KERN_PROC;
2273 name[2] = KERN_PROC_OSREL;
2275 len = sizeof(*osrelp);
2276 error = sysctl(name, 4, osrelp, &len, NULL, 0);
2277 if (error != 0 && errno != ESRCH)
2278 warn("sysctl: kern.proc.osrel: %d", pid);
2283 procstat_getosrel_core(struct procstat_core *core, int *osrelp)
2288 buf = procstat_core_get(core, PSC_TYPE_OSREL, NULL, &len);
2291 if (len < sizeof(*osrelp)) {
2301 procstat_getosrel(struct procstat *procstat, struct kinfo_proc *kp, int *osrelp)
2303 switch(procstat->type) {
2305 return (procstat_getosrel_kvm(procstat->kd, kp, osrelp));
2306 case PROCSTAT_SYSCTL:
2307 return (procstat_getosrel_sysctl(kp->ki_pid, osrelp));
2309 return (procstat_getosrel_core(procstat->core, osrelp));
2311 warnx("unknown access method: %d", procstat->type);
2316 #define PROC_AUXV_MAX 256
2318 #if __ELF_WORD_SIZE == 64
2319 static const char *elf32_sv_names[] = {
2325 is_elf32_sysctl(pid_t pid)
2329 static char sv_name[256];
2332 name[1] = KERN_PROC;
2333 name[2] = KERN_PROC_SV_NAME;
2335 len = sizeof(sv_name);
2336 error = sysctl(name, 4, sv_name, &len, NULL, 0);
2337 if (error != 0 || len == 0)
2339 for (i = 0; i < sizeof(elf32_sv_names) / sizeof(*elf32_sv_names); i++) {
2340 if (strncmp(sv_name, elf32_sv_names[i], sizeof(sv_name)) == 0)
2346 static Elf_Auxinfo *
2347 procstat_getauxv32_sysctl(pid_t pid, unsigned int *cntp)
2350 Elf32_Auxinfo *auxv32;
2353 unsigned int i, count;
2357 name[1] = KERN_PROC;
2358 name[2] = KERN_PROC_AUXV;
2360 len = PROC_AUXV_MAX * sizeof(Elf32_Auxinfo);
2362 auxv32 = malloc(len);
2363 if (auxv32 == NULL) {
2364 warn("malloc(%zu)", len);
2367 if (sysctl(name, 4, auxv32, &len, NULL, 0) == -1) {
2368 if (errno != ESRCH && errno != EPERM)
2369 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2372 count = len / sizeof(Elf_Auxinfo);
2373 auxv = malloc(count * sizeof(Elf_Auxinfo));
2375 warn("malloc(%zu)", count * sizeof(Elf_Auxinfo));
2378 for (i = 0; i < count; i++) {
2380 * XXX: We expect that values for a_type on a 32-bit platform
2381 * are directly mapped to values on 64-bit one, which is not
2384 auxv[i].a_type = auxv32[i].a_type;
2385 ptr = &auxv32[i].a_un;
2386 auxv[i].a_un.a_val = *((uint32_t *)ptr);
2393 #endif /* __ELF_WORD_SIZE == 64 */
2395 static Elf_Auxinfo *
2396 procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp)
2402 #if __ELF_WORD_SIZE == 64
2403 if (is_elf32_sysctl(pid))
2404 return (procstat_getauxv32_sysctl(pid, cntp));
2407 name[1] = KERN_PROC;
2408 name[2] = KERN_PROC_AUXV;
2410 len = PROC_AUXV_MAX * sizeof(Elf_Auxinfo);
2413 warn("malloc(%zu)", len);
2416 if (sysctl(name, 4, auxv, &len, NULL, 0) == -1) {
2417 if (errno != ESRCH && errno != EPERM)
2418 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2422 *cntp = len / sizeof(Elf_Auxinfo);
2426 static Elf_Auxinfo *
2427 procstat_getauxv_core(struct procstat_core *core, unsigned int *cntp)
2432 auxv = procstat_core_get(core, PSC_TYPE_AUXV, NULL, &len);
2435 *cntp = len / sizeof(Elf_Auxinfo);
2440 procstat_getauxv(struct procstat *procstat, struct kinfo_proc *kp,
2443 switch(procstat->type) {
2445 warnx("kvm method is not supported");
2447 case PROCSTAT_SYSCTL:
2448 return (procstat_getauxv_sysctl(kp->ki_pid, cntp));
2450 return (procstat_getauxv_core(procstat->core, cntp));
2452 warnx("unknown access method: %d", procstat->type);
2458 procstat_freeauxv(struct procstat *procstat __unused, Elf_Auxinfo *auxv)
2464 static struct kinfo_kstack *
2465 procstat_getkstack_sysctl(pid_t pid, int *cntp)
2467 struct kinfo_kstack *kkstp;
2472 name[1] = KERN_PROC;
2473 name[2] = KERN_PROC_KSTACK;
2477 error = sysctl(name, 4, NULL, &len, NULL, 0);
2478 if (error < 0 && errno != ESRCH && errno != EPERM && errno != ENOENT) {
2479 warn("sysctl: kern.proc.kstack: %d", pid);
2482 if (error == -1 && errno == ENOENT) {
2483 warnx("sysctl: kern.proc.kstack unavailable"
2484 " (options DDB or options STACK required in kernel)");
2489 kkstp = malloc(len);
2490 if (kkstp == NULL) {
2491 warn("malloc(%zu)", len);
2494 if (sysctl(name, 4, kkstp, &len, NULL, 0) == -1) {
2495 warn("sysctl: kern.proc.pid: %d", pid);
2499 *cntp = len / sizeof(*kkstp);
2504 struct kinfo_kstack *
2505 procstat_getkstack(struct procstat *procstat, struct kinfo_proc *kp,
2508 switch(procstat->type) {
2510 warnx("kvm method is not supported");
2512 case PROCSTAT_SYSCTL:
2513 return (procstat_getkstack_sysctl(kp->ki_pid, cntp));
2515 warnx("core method is not supported");
2518 warnx("unknown access method: %d", procstat->type);
2524 procstat_freekstack(struct procstat *procstat __unused,
2525 struct kinfo_kstack *kkstp)