2 * SPDX-License-Identifier: BSD-4-Clause
4 * Copyright (c) 2017 Dell EMC
5 * Copyright (c) 2009 Stanislav Sedov <stas@FreeBSD.org>
6 * Copyright (c) 1988, 1993
7 * The Regents of the University of California. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by the University of
20 * California, Berkeley and its contributors.
21 * 4. Neither the name of the University nor the names of its contributors
22 * may be used to endorse or promote products derived from this software
23 * without specific prior written permission.
25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 #include <sys/cdefs.h>
39 __FBSDID("$FreeBSD$");
41 #include <sys/param.h>
44 #include <sys/resourcevar.h>
46 #include <sys/ucred.h>
51 #include <sys/vnode.h>
52 #include <sys/socket.h>
54 #include <sys/socketvar.h>
55 #include <sys/domain.h>
56 #include <sys/protosw.h>
59 #include <sys/unpcb.h>
60 #include <sys/sysctl.h>
62 #include <sys/filedesc.h>
63 #include <sys/queue.h>
69 #include <sys/capsicum.h>
70 #include <sys/ptrace.h>
72 #include <sys/mount.h>
73 #include <sys/filedesc.h>
75 #include <ufs/ufs/quota.h>
76 #include <ufs/ufs/inode.h>
77 #include <fs/devfs/devfs.h>
78 #include <fs/devfs/devfs_int.h>
80 #include <nfs/nfsproto.h>
81 #include <nfsclient/nfs.h>
82 #include <nfsclient/nfsnode.h>
85 #include <vm/vm_map.h>
86 #include <vm/vm_object.h>
88 #include <net/route.h>
89 #include <netinet/in.h>
90 #include <netinet/in_systm.h>
91 #include <netinet/ip.h>
93 #include <netinet/in_pcb.h>
111 #include <libprocstat.h>
112 #include "libprocstat_internal.h"
113 #include "common_kvm.h"
116 int statfs(const char *, struct statfs *); /* XXX */
118 #define PROCSTAT_KVM 1
119 #define PROCSTAT_SYSCTL 2
120 #define PROCSTAT_CORE 3
122 static char **getargv(struct procstat *procstat, struct kinfo_proc *kp,
123 size_t nchr, int env);
124 static char *getmnton(kvm_t *kd, struct mount *m);
125 static struct kinfo_vmentry * kinfo_getvmmap_core(struct procstat_core *core,
127 static Elf_Auxinfo *procstat_getauxv_core(struct procstat_core *core,
129 static Elf_Auxinfo *procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp);
130 static struct filestat_list *procstat_getfiles_kvm(
131 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
132 static struct filestat_list *procstat_getfiles_sysctl(
133 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
134 static int procstat_get_pipe_info_sysctl(struct filestat *fst,
135 struct pipestat *pipe, char *errbuf);
136 static int procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
137 struct pipestat *pipe, char *errbuf);
138 static int procstat_get_pts_info_sysctl(struct filestat *fst,
139 struct ptsstat *pts, char *errbuf);
140 static int procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
141 struct ptsstat *pts, char *errbuf);
142 static int procstat_get_sem_info_sysctl(struct filestat *fst,
143 struct semstat *sem, char *errbuf);
144 static int procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
145 struct semstat *sem, char *errbuf);
146 static int procstat_get_shm_info_sysctl(struct filestat *fst,
147 struct shmstat *shm, char *errbuf);
148 static int procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
149 struct shmstat *shm, char *errbuf);
150 static int procstat_get_socket_info_sysctl(struct filestat *fst,
151 struct sockstat *sock, char *errbuf);
152 static int procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
153 struct sockstat *sock, char *errbuf);
154 static int to_filestat_flags(int flags);
155 static int procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
156 struct vnstat *vn, char *errbuf);
157 static int procstat_get_vnode_info_sysctl(struct filestat *fst,
158 struct vnstat *vn, char *errbuf);
159 static gid_t *procstat_getgroups_core(struct procstat_core *core,
160 unsigned int *count);
161 static gid_t * procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp,
162 unsigned int *count);
163 static gid_t *procstat_getgroups_sysctl(pid_t pid, unsigned int *count);
164 static struct kinfo_kstack *procstat_getkstack_sysctl(pid_t pid,
166 static int procstat_getosrel_core(struct procstat_core *core,
168 static int procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp,
170 static int procstat_getosrel_sysctl(pid_t pid, int *osrelp);
171 static int procstat_getpathname_core(struct procstat_core *core,
172 char *pathname, size_t maxlen);
173 static int procstat_getpathname_sysctl(pid_t pid, char *pathname,
175 static int procstat_getrlimit_core(struct procstat_core *core, int which,
176 struct rlimit* rlimit);
177 static int procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp,
178 int which, struct rlimit* rlimit);
179 static int procstat_getrlimit_sysctl(pid_t pid, int which,
180 struct rlimit* rlimit);
181 static int procstat_getumask_core(struct procstat_core *core,
182 unsigned short *maskp);
183 static int procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp,
184 unsigned short *maskp);
185 static int procstat_getumask_sysctl(pid_t pid, unsigned short *maskp);
186 static int vntype2psfsttype(int type);
189 procstat_close(struct procstat *procstat)
193 if (procstat->type == PROCSTAT_KVM)
194 kvm_close(procstat->kd);
195 else if (procstat->type == PROCSTAT_CORE)
196 procstat_core_close(procstat->core);
197 procstat_freeargv(procstat);
198 procstat_freeenvv(procstat);
203 procstat_open_sysctl(void)
205 struct procstat *procstat;
207 procstat = calloc(1, sizeof(*procstat));
208 if (procstat == NULL) {
212 procstat->type = PROCSTAT_SYSCTL;
217 procstat_open_kvm(const char *nlistf, const char *memf)
219 struct procstat *procstat;
221 char buf[_POSIX2_LINE_MAX];
223 procstat = calloc(1, sizeof(*procstat));
224 if (procstat == NULL) {
228 kd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
230 warnx("kvm_openfiles(): %s", buf);
234 procstat->type = PROCSTAT_KVM;
240 procstat_open_core(const char *filename)
242 struct procstat *procstat;
243 struct procstat_core *core;
245 procstat = calloc(1, sizeof(*procstat));
246 if (procstat == NULL) {
250 core = procstat_core_open(filename);
255 procstat->type = PROCSTAT_CORE;
256 procstat->core = core;
261 procstat_getprocs(struct procstat *procstat, int what, int arg,
264 struct kinfo_proc *p0, *p;
273 if (procstat->type == PROCSTAT_KVM) {
275 p0 = kvm_getprocs(procstat->kd, what, arg, &cnt);
276 if (p0 == NULL || cnt <= 0)
279 len = *count * sizeof(*p);
282 warnx("malloc(%zu)", len);
287 } else if (procstat->type == PROCSTAT_SYSCTL) {
293 error = sysctl(name, nitems(name), NULL, &len, NULL, 0);
294 if (error < 0 && errno != EPERM) {
295 warn("sysctl(kern.proc)");
299 warnx("no processes?");
304 p = reallocf(p, len);
306 warnx("reallocf(%zu)", len);
310 error = sysctl(name, nitems(name), p, &len, NULL, 0);
311 } while (error < 0 && errno == ENOMEM && olen == len);
312 if (error < 0 && errno != EPERM) {
313 warn("sysctl(kern.proc)");
316 /* Perform simple consistency checks. */
317 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
318 warnx("kinfo_proc structure size mismatch (len = %zu)", len);
321 *count = len / sizeof(*p);
323 } else if (procstat->type == PROCSTAT_CORE) {
324 p = procstat_core_get(procstat->core, PSC_TYPE_PROC, NULL,
326 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
327 warnx("kinfo_proc structure size mismatch");
330 *count = len / sizeof(*p);
333 warnx("unknown access method: %d", procstat->type);
343 procstat_freeprocs(struct procstat *procstat __unused, struct kinfo_proc *p)
351 struct filestat_list *
352 procstat_getfiles(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
355 switch(procstat->type) {
357 return (procstat_getfiles_kvm(procstat, kp, mmapped));
358 case PROCSTAT_SYSCTL:
360 return (procstat_getfiles_sysctl(procstat, kp, mmapped));
362 warnx("unknown access method: %d", procstat->type);
368 procstat_freefiles(struct procstat *procstat, struct filestat_list *head)
370 struct filestat *fst, *tmp;
372 STAILQ_FOREACH_SAFE(fst, head, next, tmp) {
373 if (fst->fs_path != NULL)
378 if (procstat->vmentries != NULL) {
379 free(procstat->vmentries);
380 procstat->vmentries = NULL;
382 if (procstat->files != NULL) {
383 free(procstat->files);
384 procstat->files = NULL;
388 static struct filestat *
389 filestat_new_entry(void *typedep, int type, int fd, int fflags, int uflags,
390 int refcount, off_t offset, char *path, cap_rights_t *cap_rightsp)
392 struct filestat *entry;
394 entry = calloc(1, sizeof(*entry));
399 entry->fs_typedep = typedep;
400 entry->fs_fflags = fflags;
401 entry->fs_uflags = uflags;
403 entry->fs_type = type;
404 entry->fs_ref_count = refcount;
405 entry->fs_offset = offset;
406 entry->fs_path = path;
407 if (cap_rightsp != NULL)
408 entry->fs_cap_rights = *cap_rightsp;
410 cap_rights_init(&entry->fs_cap_rights);
414 static struct vnode *
415 getctty(kvm_t *kd, struct kinfo_proc *kp)
423 error = kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
426 warnx("can't read proc struct at %p for pid %d",
427 kp->ki_paddr, kp->ki_pid);
430 if (proc.p_pgrp == NULL)
432 error = kvm_read_all(kd, (unsigned long)proc.p_pgrp, &pgrp,
435 warnx("can't read pgrp struct at %p for pid %d",
436 proc.p_pgrp, kp->ki_pid);
439 error = kvm_read_all(kd, (unsigned long)pgrp.pg_session, &sess,
442 warnx("can't read session struct at %p for pid %d",
443 pgrp.pg_session, kp->ki_pid);
446 return (sess.s_ttyvp);
450 procstat_vm_map_reader(void *token, vm_map_entry_t addr, vm_map_entry_t dest)
455 return (kvm_read_all(kd, (unsigned long)addr, dest, sizeof(*dest)));
458 static struct filestat_list *
459 procstat_getfiles_kvm(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
462 struct filedesc filed;
463 struct fdescenttbl *fdt;
465 unsigned long pwd_addr;
466 struct vm_map_entry vmentry;
467 struct vm_object object;
468 struct vmspace vmspace;
469 vm_map_entry_t entryp;
472 struct filestat *entry;
473 struct filestat_list *head;
487 if (kp->ki_fd == NULL)
489 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &filed,
491 warnx("can't read filedesc at %p", (void *)kp->ki_fd);
495 pwd_addr = (unsigned long)(FILEDESC_KVM_LOAD_PWD(&filed));
497 if (!kvm_read_all(kd, pwd_addr, &pwd, sizeof(pwd))) {
498 warnx("can't read fd_pwd at %p", (void *)pwd_addr);
505 * Allocate list head.
507 head = malloc(sizeof(*head));
512 /* root directory vnode, if one. */
515 entry = filestat_new_entry(pwd.pwd_rdir, PS_FST_TYPE_VNODE, -1,
516 PS_FST_FFLAG_READ, PS_FST_UFLAG_RDIR, 0, 0, NULL, NULL);
518 STAILQ_INSERT_TAIL(head, entry, next);
520 /* current working directory vnode. */
522 entry = filestat_new_entry(pwd.pwd_cdir, PS_FST_TYPE_VNODE, -1,
523 PS_FST_FFLAG_READ, PS_FST_UFLAG_CDIR, 0, 0, NULL, NULL);
525 STAILQ_INSERT_TAIL(head, entry, next);
527 /* jail root, if any. */
529 entry = filestat_new_entry(pwd.pwd_jdir, PS_FST_TYPE_VNODE, -1,
530 PS_FST_FFLAG_READ, PS_FST_UFLAG_JAIL, 0, 0, NULL, NULL);
532 STAILQ_INSERT_TAIL(head, entry, next);
535 /* ktrace vnode, if one */
537 entry = filestat_new_entry(kp->ki_tracep, PS_FST_TYPE_VNODE, -1,
538 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
539 PS_FST_UFLAG_TRACE, 0, 0, NULL, NULL);
541 STAILQ_INSERT_TAIL(head, entry, next);
543 /* text vnode, if one */
545 entry = filestat_new_entry(kp->ki_textvp, PS_FST_TYPE_VNODE, -1,
546 PS_FST_FFLAG_READ, PS_FST_UFLAG_TEXT, 0, 0, NULL, NULL);
548 STAILQ_INSERT_TAIL(head, entry, next);
550 /* Controlling terminal. */
551 if ((vp = getctty(kd, kp)) != NULL) {
552 entry = filestat_new_entry(vp, PS_FST_TYPE_VNODE, -1,
553 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
554 PS_FST_UFLAG_CTTY, 0, 0, NULL, NULL);
556 STAILQ_INSERT_TAIL(head, entry, next);
559 if (!kvm_read_all(kd, (unsigned long)filed.fd_files, &nfiles,
561 warnx("can't read fd_files at %p", (void *)filed.fd_files);
565 fdt_size = sizeof(*fdt) + nfiles * sizeof(struct filedescent);
566 fdt = malloc(fdt_size);
568 warn("malloc(%zu)", fdt_size);
571 if (!kvm_read_all(kd, (unsigned long)filed.fd_files, fdt, fdt_size)) {
572 warnx("cannot read file structures at %p", (void *)filed.fd_files);
576 for (i = 0; i < nfiles; i++) {
577 if (fdt->fdt_ofiles[i].fde_file == NULL) {
580 if (!kvm_read_all(kd, (unsigned long)fdt->fdt_ofiles[i].fde_file, &file,
581 sizeof(struct file))) {
582 warnx("can't read file %d at %p", i,
583 (void *)fdt->fdt_ofiles[i].fde_file);
586 switch (file.f_type) {
588 type = PS_FST_TYPE_VNODE;
592 type = PS_FST_TYPE_SOCKET;
596 type = PS_FST_TYPE_PIPE;
600 type = PS_FST_TYPE_FIFO;
605 type = PS_FST_TYPE_PTS;
610 type = PS_FST_TYPE_SEM;
614 type = PS_FST_TYPE_SHM;
618 type = PS_FST_TYPE_PROCDESC;
622 type = PS_FST_TYPE_DEV;
628 /* XXXRW: No capability rights support for kvm yet. */
629 entry = filestat_new_entry(data, type, i,
630 to_filestat_flags(file.f_flag), 0, 0, 0, NULL, NULL);
632 STAILQ_INSERT_TAIL(head, entry, next);
639 * Process mmapped files if requested.
642 if (!kvm_read_all(kd, (unsigned long)kp->ki_vmspace, &vmspace,
644 warnx("can't read vmspace at %p",
645 (void *)kp->ki_vmspace);
649 vmentry = vmspace.vm_map.header;
650 for (entryp = vm_map_entry_read_succ(kd, &vmentry, procstat_vm_map_reader);
651 entryp != NULL && entryp != &kp->ki_vmspace->vm_map.header;
652 entryp = vm_map_entry_read_succ(kd, &vmentry, procstat_vm_map_reader)) {
653 if (vmentry.eflags & MAP_ENTRY_IS_SUB_MAP)
655 if ((objp = vmentry.object.vm_object) == NULL)
657 for (; objp; objp = object.backing_object) {
658 if (!kvm_read_all(kd, (unsigned long)objp,
659 &object, sizeof(object))) {
660 warnx("can't read vm_object at %p",
666 /* We want only vnode objects. */
667 if (object.type != OBJT_VNODE)
670 prot = vmentry.protection;
672 if (prot & VM_PROT_READ)
673 fflags = PS_FST_FFLAG_READ;
674 if ((vmentry.eflags & MAP_ENTRY_COW) == 0 &&
675 prot & VM_PROT_WRITE)
676 fflags |= PS_FST_FFLAG_WRITE;
679 * Create filestat entry.
681 entry = filestat_new_entry(object.handle,
682 PS_FST_TYPE_VNODE, -1, fflags,
683 PS_FST_UFLAG_MMAP, 0, 0, NULL, NULL);
685 STAILQ_INSERT_TAIL(head, entry, next);
688 warnx("can't read vm_map_entry");
695 * kinfo types to filestat translation.
698 kinfo_type2fst(int kftype)
704 { KF_TYPE_PROCDESC, PS_FST_TYPE_PROCDESC },
705 { KF_TYPE_CRYPTO, PS_FST_TYPE_CRYPTO },
706 { KF_TYPE_DEV, PS_FST_TYPE_DEV },
707 { KF_TYPE_FIFO, PS_FST_TYPE_FIFO },
708 { KF_TYPE_KQUEUE, PS_FST_TYPE_KQUEUE },
709 { KF_TYPE_MQUEUE, PS_FST_TYPE_MQUEUE },
710 { KF_TYPE_NONE, PS_FST_TYPE_NONE },
711 { KF_TYPE_PIPE, PS_FST_TYPE_PIPE },
712 { KF_TYPE_PTS, PS_FST_TYPE_PTS },
713 { KF_TYPE_SEM, PS_FST_TYPE_SEM },
714 { KF_TYPE_SHM, PS_FST_TYPE_SHM },
715 { KF_TYPE_SOCKET, PS_FST_TYPE_SOCKET },
716 { KF_TYPE_VNODE, PS_FST_TYPE_VNODE },
717 { KF_TYPE_UNKNOWN, PS_FST_TYPE_UNKNOWN }
719 #define NKFTYPES (sizeof(kftypes2fst) / sizeof(*kftypes2fst))
722 for (i = 0; i < NKFTYPES; i++)
723 if (kftypes2fst[i].kf_type == kftype)
726 return (PS_FST_TYPE_UNKNOWN);
727 return (kftypes2fst[i].fst_type);
731 * kinfo flags to filestat translation.
734 kinfo_fflags2fst(int kfflags)
740 { KF_FLAG_APPEND, PS_FST_FFLAG_APPEND },
741 { KF_FLAG_ASYNC, PS_FST_FFLAG_ASYNC },
742 { KF_FLAG_CREAT, PS_FST_FFLAG_CREAT },
743 { KF_FLAG_DIRECT, PS_FST_FFLAG_DIRECT },
744 { KF_FLAG_EXCL, PS_FST_FFLAG_EXCL },
745 { KF_FLAG_EXEC, PS_FST_FFLAG_EXEC },
746 { KF_FLAG_EXLOCK, PS_FST_FFLAG_EXLOCK },
747 { KF_FLAG_FSYNC, PS_FST_FFLAG_SYNC },
748 { KF_FLAG_HASLOCK, PS_FST_FFLAG_HASLOCK },
749 { KF_FLAG_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
750 { KF_FLAG_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
751 { KF_FLAG_READ, PS_FST_FFLAG_READ },
752 { KF_FLAG_SHLOCK, PS_FST_FFLAG_SHLOCK },
753 { KF_FLAG_TRUNC, PS_FST_FFLAG_TRUNC },
754 { KF_FLAG_WRITE, PS_FST_FFLAG_WRITE }
756 #define NKFFLAGS (sizeof(kfflags2fst) / sizeof(*kfflags2fst))
761 for (i = 0; i < NKFFLAGS; i++)
762 if ((kfflags & kfflags2fst[i].kf_flag) != 0)
763 flags |= kfflags2fst[i].fst_flag;
768 kinfo_uflags2fst(int fd)
772 case KF_FD_TYPE_CTTY:
773 return (PS_FST_UFLAG_CTTY);
775 return (PS_FST_UFLAG_CDIR);
776 case KF_FD_TYPE_JAIL:
777 return (PS_FST_UFLAG_JAIL);
778 case KF_FD_TYPE_TEXT:
779 return (PS_FST_UFLAG_TEXT);
780 case KF_FD_TYPE_TRACE:
781 return (PS_FST_UFLAG_TRACE);
782 case KF_FD_TYPE_ROOT:
783 return (PS_FST_UFLAG_RDIR);
788 static struct kinfo_file *
789 kinfo_getfile_core(struct procstat_core *core, int *cntp)
794 struct kinfo_file *kif, *kp, *kf;
796 buf = procstat_core_get(core, PSC_TYPE_FILES, NULL, &len);
800 * XXXMG: The code below is just copy&past from libutil.
801 * The code duplication can be avoided if libutil
802 * is extended to provide something like:
803 * struct kinfo_file *kinfo_getfile_from_buf(const char *buf,
804 * size_t len, int *cntp);
807 /* Pass 1: count items */
812 kf = (struct kinfo_file *)(uintptr_t)bp;
813 if (kf->kf_structsize == 0)
815 bp += kf->kf_structsize;
819 kif = calloc(cnt, sizeof(*kif));
829 kf = (struct kinfo_file *)(uintptr_t)bp;
830 if (kf->kf_structsize == 0)
832 /* Copy/expand into pre-zeroed buffer */
833 memcpy(kp, kf, kf->kf_structsize);
834 /* Advance to next packed record */
835 bp += kf->kf_structsize;
836 /* Set field size to fixed length, advance */
837 kp->kf_structsize = sizeof(*kp);
842 return (kif); /* Caller must free() return value */
845 static struct filestat_list *
846 procstat_getfiles_sysctl(struct procstat *procstat, struct kinfo_proc *kp,
849 struct kinfo_file *kif, *files;
850 struct kinfo_vmentry *kve, *vmentries;
851 struct filestat_list *head;
852 struct filestat *entry;
858 cap_rights_t cap_rights;
861 if (kp->ki_fd == NULL)
863 switch(procstat->type) {
864 case PROCSTAT_SYSCTL:
865 files = kinfo_getfile(kp->ki_pid, &cnt);
868 files = kinfo_getfile_core(procstat->core, &cnt);
871 assert(!"invalid type");
873 if (files == NULL && errno != EPERM) {
874 warn("kinfo_getfile()");
877 procstat->files = files;
880 * Allocate list head.
882 head = malloc(sizeof(*head));
886 for (i = 0; i < cnt; i++) {
889 type = kinfo_type2fst(kif->kf_type);
890 fd = kif->kf_fd >= 0 ? kif->kf_fd : -1;
891 fflags = kinfo_fflags2fst(kif->kf_flags);
892 uflags = kinfo_uflags2fst(kif->kf_fd);
893 refcount = kif->kf_ref_count;
894 offset = kif->kf_offset;
895 if (*kif->kf_path != '\0')
896 path = strdup(kif->kf_path);
899 cap_rights = kif->kf_cap_rights;
902 * Create filestat entry.
904 entry = filestat_new_entry(kif, type, fd, fflags, uflags,
905 refcount, offset, path, &cap_rights);
907 STAILQ_INSERT_TAIL(head, entry, next);
910 vmentries = procstat_getvmmap(procstat, kp, &cnt);
911 procstat->vmentries = vmentries;
912 if (vmentries == NULL || cnt == 0)
914 for (i = 0; i < cnt; i++) {
916 if (kve->kve_type != KVME_TYPE_VNODE)
919 if (kve->kve_protection & KVME_PROT_READ)
920 fflags = PS_FST_FFLAG_READ;
921 if ((kve->kve_flags & KVME_FLAG_COW) == 0 &&
922 kve->kve_protection & KVME_PROT_WRITE)
923 fflags |= PS_FST_FFLAG_WRITE;
924 offset = kve->kve_offset;
925 refcount = kve->kve_ref_count;
926 if (*kve->kve_path != '\0')
927 path = strdup(kve->kve_path);
930 entry = filestat_new_entry(kve, PS_FST_TYPE_VNODE, -1,
931 fflags, PS_FST_UFLAG_MMAP, refcount, offset, path,
934 STAILQ_INSERT_TAIL(head, entry, next);
942 procstat_get_pipe_info(struct procstat *procstat, struct filestat *fst,
943 struct pipestat *ps, char *errbuf)
947 if (procstat->type == PROCSTAT_KVM) {
948 return (procstat_get_pipe_info_kvm(procstat->kd, fst, ps,
950 } else if (procstat->type == PROCSTAT_SYSCTL ||
951 procstat->type == PROCSTAT_CORE) {
952 return (procstat_get_pipe_info_sysctl(fst, ps, errbuf));
954 warnx("unknown access method: %d", procstat->type);
956 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
962 procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
963 struct pipestat *ps, char *errbuf)
971 bzero(ps, sizeof(*ps));
972 pipep = fst->fs_typedep;
975 if (!kvm_read_all(kd, (unsigned long)pipep, &pi, sizeof(struct pipe))) {
976 warnx("can't read pipe at %p", (void *)pipep);
979 ps->addr = (uintptr_t)pipep;
980 ps->peer = (uintptr_t)pi.pipe_peer;
981 ps->buffer_cnt = pi.pipe_buffer.cnt;
986 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
991 procstat_get_pipe_info_sysctl(struct filestat *fst, struct pipestat *ps,
992 char *errbuf __unused)
994 struct kinfo_file *kif;
998 bzero(ps, sizeof(*ps));
999 kif = fst->fs_typedep;
1002 ps->addr = kif->kf_un.kf_pipe.kf_pipe_addr;
1003 ps->peer = kif->kf_un.kf_pipe.kf_pipe_peer;
1004 ps->buffer_cnt = kif->kf_un.kf_pipe.kf_pipe_buffer_cnt;
1009 procstat_get_pts_info(struct procstat *procstat, struct filestat *fst,
1010 struct ptsstat *pts, char *errbuf)
1014 if (procstat->type == PROCSTAT_KVM) {
1015 return (procstat_get_pts_info_kvm(procstat->kd, fst, pts,
1017 } else if (procstat->type == PROCSTAT_SYSCTL ||
1018 procstat->type == PROCSTAT_CORE) {
1019 return (procstat_get_pts_info_sysctl(fst, pts, errbuf));
1021 warnx("unknown access method: %d", procstat->type);
1023 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1029 procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
1030 struct ptsstat *pts, char *errbuf)
1038 bzero(pts, sizeof(*pts));
1039 ttyp = fst->fs_typedep;
1042 if (!kvm_read_all(kd, (unsigned long)ttyp, &tty, sizeof(struct tty))) {
1043 warnx("can't read tty at %p", (void *)ttyp);
1046 pts->dev = dev2udev(kd, tty.t_dev);
1047 (void)kdevtoname(kd, tty.t_dev, pts->devname);
1052 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1057 procstat_get_pts_info_sysctl(struct filestat *fst, struct ptsstat *pts,
1058 char *errbuf __unused)
1060 struct kinfo_file *kif;
1064 bzero(pts, sizeof(*pts));
1065 kif = fst->fs_typedep;
1068 pts->dev = kif->kf_un.kf_pts.kf_pts_dev;
1069 strlcpy(pts->devname, kif->kf_path, sizeof(pts->devname));
1074 procstat_get_sem_info(struct procstat *procstat, struct filestat *fst,
1075 struct semstat *sem, char *errbuf)
1079 if (procstat->type == PROCSTAT_KVM) {
1080 return (procstat_get_sem_info_kvm(procstat->kd, fst, sem,
1082 } else if (procstat->type == PROCSTAT_SYSCTL ||
1083 procstat->type == PROCSTAT_CORE) {
1084 return (procstat_get_sem_info_sysctl(fst, sem, errbuf));
1086 warnx("unknown access method: %d", procstat->type);
1088 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1094 procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
1095 struct semstat *sem, char *errbuf)
1105 bzero(sem, sizeof(*sem));
1106 ksemp = fst->fs_typedep;
1109 if (!kvm_read_all(kd, (unsigned long)ksemp, &ksem,
1110 sizeof(struct ksem))) {
1111 warnx("can't read ksem at %p", (void *)ksemp);
1114 sem->mode = S_IFREG | ksem.ks_mode;
1115 sem->value = ksem.ks_value;
1116 if (fst->fs_path == NULL && ksem.ks_path != NULL) {
1117 path = malloc(MAXPATHLEN);
1118 for (i = 0; i < MAXPATHLEN - 1; i++) {
1119 if (!kvm_read_all(kd, (unsigned long)ksem.ks_path + i,
1122 if (path[i] == '\0')
1129 fst->fs_path = path;
1135 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1140 procstat_get_sem_info_sysctl(struct filestat *fst, struct semstat *sem,
1141 char *errbuf __unused)
1143 struct kinfo_file *kif;
1147 bzero(sem, sizeof(*sem));
1148 kif = fst->fs_typedep;
1151 sem->value = kif->kf_un.kf_sem.kf_sem_value;
1152 sem->mode = kif->kf_un.kf_sem.kf_sem_mode;
1157 procstat_get_shm_info(struct procstat *procstat, struct filestat *fst,
1158 struct shmstat *shm, char *errbuf)
1162 if (procstat->type == PROCSTAT_KVM) {
1163 return (procstat_get_shm_info_kvm(procstat->kd, fst, shm,
1165 } else if (procstat->type == PROCSTAT_SYSCTL ||
1166 procstat->type == PROCSTAT_CORE) {
1167 return (procstat_get_shm_info_sysctl(fst, shm, errbuf));
1169 warnx("unknown access method: %d", procstat->type);
1171 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1177 procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
1178 struct shmstat *shm, char *errbuf)
1188 bzero(shm, sizeof(*shm));
1189 shmfdp = fst->fs_typedep;
1192 if (!kvm_read_all(kd, (unsigned long)shmfdp, &shmfd,
1193 sizeof(struct shmfd))) {
1194 warnx("can't read shmfd at %p", (void *)shmfdp);
1197 shm->mode = S_IFREG | shmfd.shm_mode;
1198 shm->size = shmfd.shm_size;
1199 if (fst->fs_path == NULL && shmfd.shm_path != NULL) {
1200 path = malloc(MAXPATHLEN);
1201 for (i = 0; i < MAXPATHLEN - 1; i++) {
1202 if (!kvm_read_all(kd, (unsigned long)shmfd.shm_path + i,
1205 if (path[i] == '\0')
1212 fst->fs_path = path;
1218 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1223 procstat_get_shm_info_sysctl(struct filestat *fst, struct shmstat *shm,
1224 char *errbuf __unused)
1226 struct kinfo_file *kif;
1230 bzero(shm, sizeof(*shm));
1231 kif = fst->fs_typedep;
1234 shm->size = kif->kf_un.kf_file.kf_file_size;
1235 shm->mode = kif->kf_un.kf_file.kf_file_mode;
1240 procstat_get_vnode_info(struct procstat *procstat, struct filestat *fst,
1241 struct vnstat *vn, char *errbuf)
1245 if (procstat->type == PROCSTAT_KVM) {
1246 return (procstat_get_vnode_info_kvm(procstat->kd, fst, vn,
1248 } else if (procstat->type == PROCSTAT_SYSCTL ||
1249 procstat->type == PROCSTAT_CORE) {
1250 return (procstat_get_vnode_info_sysctl(fst, vn, errbuf));
1252 warnx("unknown access method: %d", procstat->type);
1254 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1260 procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
1261 struct vnstat *vn, char *errbuf)
1263 /* Filesystem specific handlers. */
1264 #define FSTYPE(fst) {#fst, fst##_filestat}
1267 int (*handler)(kvm_t *kd, struct vnode *vp,
1277 #ifdef LIBPROCSTAT_ZFS
1281 #define NTYPES (sizeof(fstypes) / sizeof(*fstypes))
1291 vp = fst->fs_typedep;
1294 error = kvm_read_all(kd, (unsigned long)vp, &vnode, sizeof(vnode));
1296 warnx("can't read vnode at %p", (void *)vp);
1299 bzero(vn, sizeof(*vn));
1300 vn->vn_type = vntype2psfsttype(vnode.v_type);
1301 if (vnode.v_type == VNON || vnode.v_type == VBAD)
1303 error = kvm_read_all(kd, (unsigned long)vnode.v_lock.lock_object.lo_name,
1304 tagstr, sizeof(tagstr));
1306 warnx("can't read lo_name at %p", (void *)vp);
1309 tagstr[sizeof(tagstr) - 1] = '\0';
1312 * Find appropriate handler.
1314 for (i = 0; i < NTYPES; i++)
1315 if (!strcmp(fstypes[i].tag, tagstr)) {
1316 if (fstypes[i].handler(kd, &vnode, vn) != 0) {
1323 snprintf(errbuf, _POSIX2_LINE_MAX, "?(%s)", tagstr);
1326 vn->vn_mntdir = getmnton(kd, vnode.v_mount);
1327 if ((vnode.v_type == VBLK || vnode.v_type == VCHR) &&
1328 vnode.v_rdev != NULL){
1329 vn->vn_dev = dev2udev(kd, vnode.v_rdev);
1330 (void)kdevtoname(kd, vnode.v_rdev, vn->vn_devname);
1338 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1343 * kinfo vnode type to filestat translation.
1346 kinfo_vtype2fst(int kfvtype)
1351 } kfvtypes2fst[] = {
1352 { KF_VTYPE_VBAD, PS_FST_VTYPE_VBAD },
1353 { KF_VTYPE_VBLK, PS_FST_VTYPE_VBLK },
1354 { KF_VTYPE_VCHR, PS_FST_VTYPE_VCHR },
1355 { KF_VTYPE_VDIR, PS_FST_VTYPE_VDIR },
1356 { KF_VTYPE_VFIFO, PS_FST_VTYPE_VFIFO },
1357 { KF_VTYPE_VLNK, PS_FST_VTYPE_VLNK },
1358 { KF_VTYPE_VNON, PS_FST_VTYPE_VNON },
1359 { KF_VTYPE_VREG, PS_FST_VTYPE_VREG },
1360 { KF_VTYPE_VSOCK, PS_FST_VTYPE_VSOCK }
1362 #define NKFVTYPES (sizeof(kfvtypes2fst) / sizeof(*kfvtypes2fst))
1365 for (i = 0; i < NKFVTYPES; i++)
1366 if (kfvtypes2fst[i].kf_vtype == kfvtype)
1369 return (PS_FST_VTYPE_UNKNOWN);
1370 return (kfvtypes2fst[i].fst_vtype);
1374 procstat_get_vnode_info_sysctl(struct filestat *fst, struct vnstat *vn,
1377 struct statfs stbuf;
1378 struct kinfo_file *kif;
1379 struct kinfo_vmentry *kve;
1391 bzero(vn, sizeof(*vn));
1392 if (fst->fs_typedep == NULL)
1394 if (fst->fs_uflags & PS_FST_UFLAG_MMAP) {
1395 kve = fst->fs_typedep;
1396 fileid = kve->kve_vn_fileid;
1397 fsid = kve->kve_vn_fsid;
1398 mode = kve->kve_vn_mode;
1399 path = kve->kve_path;
1400 rdev = kve->kve_vn_rdev;
1401 size = kve->kve_vn_size;
1402 vntype = kinfo_vtype2fst(kve->kve_vn_type);
1403 status = kve->kve_status;
1405 kif = fst->fs_typedep;
1406 fileid = kif->kf_un.kf_file.kf_file_fileid;
1407 fsid = kif->kf_un.kf_file.kf_file_fsid;
1408 mode = kif->kf_un.kf_file.kf_file_mode;
1409 path = kif->kf_path;
1410 rdev = kif->kf_un.kf_file.kf_file_rdev;
1411 size = kif->kf_un.kf_file.kf_file_size;
1412 vntype = kinfo_vtype2fst(kif->kf_vnode_type);
1413 status = kif->kf_status;
1415 vn->vn_type = vntype;
1416 if (vntype == PS_FST_VTYPE_VNON || vntype == PS_FST_VTYPE_VBAD)
1418 if ((status & KF_ATTR_VALID) == 0) {
1419 if (errbuf != NULL) {
1420 snprintf(errbuf, _POSIX2_LINE_MAX,
1421 "? (no info available)");
1425 if (path && *path) {
1426 statfs(path, &stbuf);
1427 vn->vn_mntdir = strdup(stbuf.f_mntonname);
1429 vn->vn_mntdir = strdup("-");
1431 if (vntype == PS_FST_VTYPE_VBLK) {
1432 name = devname(rdev, S_IFBLK);
1434 strlcpy(vn->vn_devname, name,
1435 sizeof(vn->vn_devname));
1436 } else if (vntype == PS_FST_VTYPE_VCHR) {
1437 name = devname(vn->vn_dev, S_IFCHR);
1439 strlcpy(vn->vn_devname, name,
1440 sizeof(vn->vn_devname));
1443 vn->vn_fileid = fileid;
1450 procstat_get_socket_info(struct procstat *procstat, struct filestat *fst,
1451 struct sockstat *sock, char *errbuf)
1455 if (procstat->type == PROCSTAT_KVM) {
1456 return (procstat_get_socket_info_kvm(procstat->kd, fst, sock,
1458 } else if (procstat->type == PROCSTAT_SYSCTL ||
1459 procstat->type == PROCSTAT_CORE) {
1460 return (procstat_get_socket_info_sysctl(fst, sock, errbuf));
1462 warnx("unknown access method: %d", procstat->type);
1464 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1470 procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
1471 struct sockstat *sock, char *errbuf)
1475 struct protosw proto;
1484 bzero(sock, sizeof(*sock));
1485 so = fst->fs_typedep;
1488 sock->so_addr = (uintptr_t)so;
1489 /* fill in socket */
1490 if (!kvm_read_all(kd, (unsigned long)so, &s,
1491 sizeof(struct socket))) {
1492 warnx("can't read sock at %p", (void *)so);
1495 /* fill in protosw entry */
1496 if (!kvm_read_all(kd, (unsigned long)s.so_proto, &proto,
1497 sizeof(struct protosw))) {
1498 warnx("can't read protosw at %p", (void *)s.so_proto);
1501 /* fill in domain */
1502 if (!kvm_read_all(kd, (unsigned long)proto.pr_domain, &dom,
1503 sizeof(struct domain))) {
1504 warnx("can't read domain at %p",
1505 (void *)proto.pr_domain);
1508 if ((len = kvm_read(kd, (unsigned long)dom.dom_name, sock->dname,
1509 sizeof(sock->dname) - 1)) < 0) {
1510 warnx("can't read domain name at %p", (void *)dom.dom_name);
1511 sock->dname[0] = '\0';
1514 sock->dname[len] = '\0';
1517 * Fill in known data.
1519 sock->type = s.so_type;
1520 sock->proto = proto.pr_protocol;
1521 sock->dom_family = dom.dom_family;
1522 sock->so_pcb = (uintptr_t)s.so_pcb;
1525 * Protocol specific data.
1527 switch(dom.dom_family) {
1530 if (proto.pr_protocol == IPPROTO_TCP) {
1532 if (kvm_read(kd, (u_long)s.so_pcb,
1533 (char *)&inpcb, sizeof(struct inpcb))
1534 != sizeof(struct inpcb)) {
1535 warnx("can't read inpcb at %p",
1539 (uintptr_t)inpcb.inp_ppcb;
1540 sock->sendq = s.so_snd.sb_ccc;
1541 sock->recvq = s.so_rcv.sb_ccc;
1547 if (kvm_read(kd, (u_long)s.so_pcb, (char *)&unpcb,
1548 sizeof(struct unpcb)) != sizeof(struct unpcb)){
1549 warnx("can't read unpcb at %p",
1551 } else if (unpcb.unp_conn) {
1552 sock->so_rcv_sb_state = s.so_rcv.sb_state;
1553 sock->so_snd_sb_state = s.so_snd.sb_state;
1554 sock->unp_conn = (uintptr_t)unpcb.unp_conn;
1555 sock->sendq = s.so_snd.sb_ccc;
1556 sock->recvq = s.so_rcv.sb_ccc;
1567 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1572 procstat_get_socket_info_sysctl(struct filestat *fst, struct sockstat *sock,
1573 char *errbuf __unused)
1575 struct kinfo_file *kif;
1579 bzero(sock, sizeof(*sock));
1580 kif = fst->fs_typedep;
1585 * Fill in known data.
1587 sock->type = kif->kf_sock_type;
1588 sock->proto = kif->kf_sock_protocol;
1589 sock->dom_family = kif->kf_sock_domain;
1590 sock->so_pcb = kif->kf_un.kf_sock.kf_sock_pcb;
1591 strlcpy(sock->dname, kif->kf_path, sizeof(sock->dname));
1592 bcopy(&kif->kf_un.kf_sock.kf_sa_local, &sock->sa_local,
1593 kif->kf_un.kf_sock.kf_sa_local.ss_len);
1594 bcopy(&kif->kf_un.kf_sock.kf_sa_peer, &sock->sa_peer,
1595 kif->kf_un.kf_sock.kf_sa_peer.ss_len);
1598 * Protocol specific data.
1600 switch(sock->dom_family) {
1603 if (sock->proto == IPPROTO_TCP) {
1604 sock->inp_ppcb = kif->kf_un.kf_sock.kf_sock_inpcb;
1605 sock->sendq = kif->kf_un.kf_sock.kf_sock_sendq;
1606 sock->recvq = kif->kf_un.kf_sock.kf_sock_recvq;
1610 if (kif->kf_un.kf_sock.kf_sock_unpconn != 0) {
1611 sock->so_rcv_sb_state =
1612 kif->kf_un.kf_sock.kf_sock_rcv_sb_state;
1613 sock->so_snd_sb_state =
1614 kif->kf_un.kf_sock.kf_sock_snd_sb_state;
1616 kif->kf_un.kf_sock.kf_sock_unpconn;
1617 sock->sendq = kif->kf_un.kf_sock.kf_sock_sendq;
1618 sock->recvq = kif->kf_un.kf_sock.kf_sock_recvq;
1628 * Descriptor flags to filestat translation.
1631 to_filestat_flags(int flags)
1637 { FREAD, PS_FST_FFLAG_READ },
1638 { FWRITE, PS_FST_FFLAG_WRITE },
1639 { O_APPEND, PS_FST_FFLAG_APPEND },
1640 { O_ASYNC, PS_FST_FFLAG_ASYNC },
1641 { O_CREAT, PS_FST_FFLAG_CREAT },
1642 { O_DIRECT, PS_FST_FFLAG_DIRECT },
1643 { O_EXCL, PS_FST_FFLAG_EXCL },
1644 { O_EXEC, PS_FST_FFLAG_EXEC },
1645 { O_EXLOCK, PS_FST_FFLAG_EXLOCK },
1646 { O_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
1647 { O_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
1648 { O_SHLOCK, PS_FST_FFLAG_SHLOCK },
1649 { O_SYNC, PS_FST_FFLAG_SYNC },
1650 { O_TRUNC, PS_FST_FFLAG_TRUNC }
1652 #define NFSTFLAGS (sizeof(fstflags) / sizeof(*fstflags))
1657 for (i = 0; i < NFSTFLAGS; i++)
1658 if (flags & fstflags[i].flag)
1659 fst_flags |= fstflags[i].fst_flag;
1664 * Vnode type to filestate translation.
1667 vntype2psfsttype(int type)
1673 { VBAD, PS_FST_VTYPE_VBAD },
1674 { VBLK, PS_FST_VTYPE_VBLK },
1675 { VCHR, PS_FST_VTYPE_VCHR },
1676 { VDIR, PS_FST_VTYPE_VDIR },
1677 { VFIFO, PS_FST_VTYPE_VFIFO },
1678 { VLNK, PS_FST_VTYPE_VLNK },
1679 { VNON, PS_FST_VTYPE_VNON },
1680 { VREG, PS_FST_VTYPE_VREG },
1681 { VSOCK, PS_FST_VTYPE_VSOCK }
1683 #define NVFTYPES (sizeof(vt2fst) / sizeof(*vt2fst))
1684 unsigned int i, fst_type;
1686 fst_type = PS_FST_VTYPE_UNKNOWN;
1687 for (i = 0; i < NVFTYPES; i++) {
1688 if (type == vt2fst[i].vtype) {
1689 fst_type = vt2fst[i].fst_vtype;
1697 getmnton(kvm_t *kd, struct mount *m)
1700 static struct mtab {
1703 char mntonname[MNAMELEN + 1];
1707 for (mt = mhead; mt != NULL; mt = mt->next)
1709 return (mt->mntonname);
1710 if (!kvm_read_all(kd, (unsigned long)m, &mnt, sizeof(struct mount))) {
1711 warnx("can't read mount table at %p", (void *)m);
1714 if ((mt = malloc(sizeof (struct mtab))) == NULL)
1717 bcopy(&mnt.mnt_stat.f_mntonname[0], &mt->mntonname[0], MNAMELEN);
1718 mt->mntonname[MNAMELEN] = '\0';
1721 return (mt->mntonname);
1725 * Auxiliary structures and functions to get process environment or
1726 * command line arguments.
1735 static struct argvec *
1736 argvec_alloc(size_t bufsize)
1740 av = malloc(sizeof(*av));
1743 av->bufsize = bufsize;
1744 av->buf = malloc(av->bufsize);
1745 if (av->buf == NULL) {
1750 av->argv = malloc(sizeof(char *) * av->argc);
1751 if (av->argv == NULL) {
1760 argvec_free(struct argvec * av)
1769 getargv(struct procstat *procstat, struct kinfo_proc *kp, size_t nchr, int env)
1771 int error, name[4], argc, i;
1772 struct argvec *av, **avp;
1779 if (procstat->type == PROCSTAT_KVM) {
1780 warnx("can't use kvm access method");
1783 if (procstat->type != PROCSTAT_SYSCTL &&
1784 procstat->type != PROCSTAT_CORE) {
1785 warnx("unknown access method: %d", procstat->type);
1789 if (nchr == 0 || nchr > ARG_MAX)
1792 avp = (struct argvec **)(env ? &procstat->argv : &procstat->envv);
1797 av = argvec_alloc(nchr);
1800 warn("malloc(%zu)", nchr);
1804 } else if (av->bufsize < nchr) {
1805 av->buf = reallocf(av->buf, nchr);
1806 if (av->buf == NULL) {
1807 warn("malloc(%zu)", nchr);
1811 if (procstat->type == PROCSTAT_SYSCTL) {
1813 name[1] = KERN_PROC;
1814 name[2] = env ? KERN_PROC_ENV : KERN_PROC_ARGS;
1815 name[3] = kp->ki_pid;
1817 error = sysctl(name, nitems(name), av->buf, &len, NULL, 0);
1818 if (error != 0 && errno != ESRCH && errno != EPERM)
1819 warn("sysctl(kern.proc.%s)", env ? "env" : "args");
1820 if (error != 0 || len == 0)
1822 } else /* procstat->type == PROCSTAT_CORE */ {
1823 type = env ? PSC_TYPE_ENVV : PSC_TYPE_ARGV;
1825 if (procstat_core_get(procstat->core, type, av->buf, &len)
1834 for (p = av->buf; p < av->buf + len; p += strlen(p) + 1) {
1840 argv = realloc(argv, sizeof(char *) * argc);
1842 warn("malloc(%zu)", sizeof(char *) * argc);
1854 * Return process command line arguments.
1857 procstat_getargv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1860 return (getargv(procstat, p, nchr, 0));
1864 * Free the buffer allocated by procstat_getargv().
1867 procstat_freeargv(struct procstat *procstat)
1870 if (procstat->argv != NULL) {
1871 argvec_free(procstat->argv);
1872 procstat->argv = NULL;
1877 * Return process environment.
1880 procstat_getenvv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1883 return (getargv(procstat, p, nchr, 1));
1887 * Free the buffer allocated by procstat_getenvv().
1890 procstat_freeenvv(struct procstat *procstat)
1892 if (procstat->envv != NULL) {
1893 argvec_free(procstat->envv);
1894 procstat->envv = NULL;
1898 static struct kinfo_vmentry *
1899 kinfo_getvmmap_core(struct procstat_core *core, int *cntp)
1903 char *buf, *bp, *eb;
1904 struct kinfo_vmentry *kiv, *kp, *kv;
1906 buf = procstat_core_get(core, PSC_TYPE_VMMAP, NULL, &len);
1911 * XXXMG: The code below is just copy&past from libutil.
1912 * The code duplication can be avoided if libutil
1913 * is extended to provide something like:
1914 * struct kinfo_vmentry *kinfo_getvmmap_from_buf(const char *buf,
1915 * size_t len, int *cntp);
1918 /* Pass 1: count items */
1923 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1924 if (kv->kve_structsize == 0)
1926 bp += kv->kve_structsize;
1930 kiv = calloc(cnt, sizeof(*kiv));
1938 /* Pass 2: unpack */
1940 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1941 if (kv->kve_structsize == 0)
1943 /* Copy/expand into pre-zeroed buffer */
1944 memcpy(kp, kv, kv->kve_structsize);
1945 /* Advance to next packed record */
1946 bp += kv->kve_structsize;
1947 /* Set field size to fixed length, advance */
1948 kp->kve_structsize = sizeof(*kp);
1953 return (kiv); /* Caller must free() return value */
1956 struct kinfo_vmentry *
1957 procstat_getvmmap(struct procstat *procstat, struct kinfo_proc *kp,
1961 switch(procstat->type) {
1963 warnx("kvm method is not supported");
1965 case PROCSTAT_SYSCTL:
1966 return (kinfo_getvmmap(kp->ki_pid, cntp));
1968 return (kinfo_getvmmap_core(procstat->core, cntp));
1970 warnx("unknown access method: %d", procstat->type);
1976 procstat_freevmmap(struct procstat *procstat __unused,
1977 struct kinfo_vmentry *vmmap)
1984 procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned int *cntp)
1993 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
1995 warnx("can't read proc struct at %p for pid %d",
1996 kp->ki_paddr, kp->ki_pid);
1999 if (proc.p_ucred == NOCRED)
2001 if (!kvm_read_all(kd, (unsigned long)proc.p_ucred, &ucred,
2003 warnx("can't read ucred struct at %p for pid %d",
2004 proc.p_ucred, kp->ki_pid);
2007 len = ucred.cr_ngroups * sizeof(gid_t);
2008 groups = malloc(len);
2009 if (groups == NULL) {
2010 warn("malloc(%zu)", len);
2013 if (!kvm_read_all(kd, (unsigned long)ucred.cr_groups, groups, len)) {
2014 warnx("can't read groups at %p for pid %d",
2015 ucred.cr_groups, kp->ki_pid);
2019 *cntp = ucred.cr_ngroups;
2024 procstat_getgroups_sysctl(pid_t pid, unsigned int *cntp)
2032 mib[2] = KERN_PROC_GROUPS;
2034 len = (sysconf(_SC_NGROUPS_MAX) + 1) * sizeof(gid_t);
2035 groups = malloc(len);
2036 if (groups == NULL) {
2037 warn("malloc(%zu)", len);
2040 if (sysctl(mib, nitems(mib), groups, &len, NULL, 0) == -1) {
2041 warn("sysctl: kern.proc.groups: %d", pid);
2045 *cntp = len / sizeof(gid_t);
2050 procstat_getgroups_core(struct procstat_core *core, unsigned int *cntp)
2055 groups = procstat_core_get(core, PSC_TYPE_GROUPS, NULL, &len);
2058 *cntp = len / sizeof(gid_t);
2063 procstat_getgroups(struct procstat *procstat, struct kinfo_proc *kp,
2066 switch(procstat->type) {
2068 return (procstat_getgroups_kvm(procstat->kd, kp, cntp));
2069 case PROCSTAT_SYSCTL:
2070 return (procstat_getgroups_sysctl(kp->ki_pid, cntp));
2072 return (procstat_getgroups_core(procstat->core, cntp));
2074 warnx("unknown access method: %d", procstat->type);
2080 procstat_freegroups(struct procstat *procstat __unused, gid_t *groups)
2087 procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned short *maskp)
2093 if (kp->ki_fd == NULL)
2095 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &fd, sizeof(fd))) {
2096 warnx("can't read filedesc at %p for pid %d", kp->ki_fd,
2100 *maskp = fd.fd_cmask;
2105 procstat_getumask_sysctl(pid_t pid, unsigned short *maskp)
2113 mib[2] = KERN_PROC_UMASK;
2115 len = sizeof(*maskp);
2116 error = sysctl(mib, nitems(mib), maskp, &len, NULL, 0);
2117 if (error != 0 && errno != ESRCH && errno != EPERM)
2118 warn("sysctl: kern.proc.umask: %d", pid);
2123 procstat_getumask_core(struct procstat_core *core, unsigned short *maskp)
2126 unsigned short *buf;
2128 buf = procstat_core_get(core, PSC_TYPE_UMASK, NULL, &len);
2131 if (len < sizeof(*maskp)) {
2141 procstat_getumask(struct procstat *procstat, struct kinfo_proc *kp,
2142 unsigned short *maskp)
2144 switch(procstat->type) {
2146 return (procstat_getumask_kvm(procstat->kd, kp, maskp));
2147 case PROCSTAT_SYSCTL:
2148 return (procstat_getumask_sysctl(kp->ki_pid, maskp));
2150 return (procstat_getumask_core(procstat->core, maskp));
2152 warnx("unknown access method: %d", procstat->type);
2158 procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp, int which,
2159 struct rlimit* rlimit)
2162 unsigned long offset;
2166 assert(which >= 0 && which < RLIM_NLIMITS);
2167 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2169 warnx("can't read proc struct at %p for pid %d",
2170 kp->ki_paddr, kp->ki_pid);
2173 if (proc.p_limit == NULL)
2175 offset = (unsigned long)proc.p_limit + sizeof(struct rlimit) * which;
2176 if (!kvm_read_all(kd, offset, rlimit, sizeof(*rlimit))) {
2177 warnx("can't read rlimit struct at %p for pid %d",
2178 (void *)offset, kp->ki_pid);
2185 procstat_getrlimit_sysctl(pid_t pid, int which, struct rlimit* rlimit)
2191 name[1] = KERN_PROC;
2192 name[2] = KERN_PROC_RLIMIT;
2195 len = sizeof(struct rlimit);
2196 error = sysctl(name, nitems(name), rlimit, &len, NULL, 0);
2197 if (error < 0 && errno != ESRCH) {
2198 warn("sysctl: kern.proc.rlimit: %d", pid);
2201 if (error < 0 || len != sizeof(struct rlimit))
2207 procstat_getrlimit_core(struct procstat_core *core, int which,
2208 struct rlimit* rlimit)
2211 struct rlimit* rlimits;
2213 if (which < 0 || which >= RLIM_NLIMITS) {
2215 warn("getrlimit: which");
2218 rlimits = procstat_core_get(core, PSC_TYPE_RLIMIT, NULL, &len);
2219 if (rlimits == NULL)
2221 if (len < sizeof(struct rlimit) * RLIM_NLIMITS) {
2225 *rlimit = rlimits[which];
2231 procstat_getrlimit(struct procstat *procstat, struct kinfo_proc *kp, int which,
2232 struct rlimit* rlimit)
2234 switch(procstat->type) {
2236 return (procstat_getrlimit_kvm(procstat->kd, kp, which,
2238 case PROCSTAT_SYSCTL:
2239 return (procstat_getrlimit_sysctl(kp->ki_pid, which, rlimit));
2241 return (procstat_getrlimit_core(procstat->core, which, rlimit));
2243 warnx("unknown access method: %d", procstat->type);
2249 procstat_getpathname_sysctl(pid_t pid, char *pathname, size_t maxlen)
2255 name[1] = KERN_PROC;
2256 name[2] = KERN_PROC_PATHNAME;
2259 error = sysctl(name, nitems(name), pathname, &len, NULL, 0);
2260 if (error != 0 && errno != ESRCH)
2261 warn("sysctl: kern.proc.pathname: %d", pid);
2268 procstat_getpathname_core(struct procstat_core *core, char *pathname,
2271 struct kinfo_file *files;
2274 files = kinfo_getfile_core(core, &cnt);
2278 for (i = 0; i < cnt; i++) {
2279 if (files[i].kf_fd != KF_FD_TYPE_TEXT)
2281 strncpy(pathname, files[i].kf_path, maxlen);
2290 procstat_getpathname(struct procstat *procstat, struct kinfo_proc *kp,
2291 char *pathname, size_t maxlen)
2293 switch(procstat->type) {
2295 /* XXX: Return empty string. */
2299 case PROCSTAT_SYSCTL:
2300 return (procstat_getpathname_sysctl(kp->ki_pid, pathname,
2303 return (procstat_getpathname_core(procstat->core, pathname,
2306 warnx("unknown access method: %d", procstat->type);
2312 procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp, int *osrelp)
2318 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2320 warnx("can't read proc struct at %p for pid %d",
2321 kp->ki_paddr, kp->ki_pid);
2324 *osrelp = proc.p_osrel;
2329 procstat_getosrel_sysctl(pid_t pid, int *osrelp)
2335 name[1] = KERN_PROC;
2336 name[2] = KERN_PROC_OSREL;
2338 len = sizeof(*osrelp);
2339 error = sysctl(name, nitems(name), osrelp, &len, NULL, 0);
2340 if (error != 0 && errno != ESRCH)
2341 warn("sysctl: kern.proc.osrel: %d", pid);
2346 procstat_getosrel_core(struct procstat_core *core, int *osrelp)
2351 buf = procstat_core_get(core, PSC_TYPE_OSREL, NULL, &len);
2354 if (len < sizeof(*osrelp)) {
2364 procstat_getosrel(struct procstat *procstat, struct kinfo_proc *kp, int *osrelp)
2366 switch(procstat->type) {
2368 return (procstat_getosrel_kvm(procstat->kd, kp, osrelp));
2369 case PROCSTAT_SYSCTL:
2370 return (procstat_getosrel_sysctl(kp->ki_pid, osrelp));
2372 return (procstat_getosrel_core(procstat->core, osrelp));
2374 warnx("unknown access method: %d", procstat->type);
2379 #define PROC_AUXV_MAX 256
2381 #if __ELF_WORD_SIZE == 64
2382 static const char *elf32_sv_names[] = {
2388 is_elf32_sysctl(pid_t pid)
2392 static char sv_name[256];
2395 name[1] = KERN_PROC;
2396 name[2] = KERN_PROC_SV_NAME;
2398 len = sizeof(sv_name);
2399 error = sysctl(name, nitems(name), sv_name, &len, NULL, 0);
2400 if (error != 0 || len == 0)
2402 for (i = 0; i < sizeof(elf32_sv_names) / sizeof(*elf32_sv_names); i++) {
2403 if (strncmp(sv_name, elf32_sv_names[i], sizeof(sv_name)) == 0)
2409 static Elf_Auxinfo *
2410 procstat_getauxv32_sysctl(pid_t pid, unsigned int *cntp)
2413 Elf32_Auxinfo *auxv32;
2416 unsigned int i, count;
2420 name[1] = KERN_PROC;
2421 name[2] = KERN_PROC_AUXV;
2423 len = PROC_AUXV_MAX * sizeof(Elf32_Auxinfo);
2425 auxv32 = malloc(len);
2426 if (auxv32 == NULL) {
2427 warn("malloc(%zu)", len);
2430 if (sysctl(name, nitems(name), auxv32, &len, NULL, 0) == -1) {
2431 if (errno != ESRCH && errno != EPERM)
2432 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2435 count = len / sizeof(Elf_Auxinfo);
2436 auxv = malloc(count * sizeof(Elf_Auxinfo));
2438 warn("malloc(%zu)", count * sizeof(Elf_Auxinfo));
2441 for (i = 0; i < count; i++) {
2443 * XXX: We expect that values for a_type on a 32-bit platform
2444 * are directly mapped to values on 64-bit one, which is not
2447 auxv[i].a_type = auxv32[i].a_type;
2448 ptr = &auxv32[i].a_un;
2449 auxv[i].a_un.a_val = *((uint32_t *)ptr);
2456 #endif /* __ELF_WORD_SIZE == 64 */
2458 static Elf_Auxinfo *
2459 procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp)
2465 #if __ELF_WORD_SIZE == 64
2466 if (is_elf32_sysctl(pid))
2467 return (procstat_getauxv32_sysctl(pid, cntp));
2470 name[1] = KERN_PROC;
2471 name[2] = KERN_PROC_AUXV;
2473 len = PROC_AUXV_MAX * sizeof(Elf_Auxinfo);
2476 warn("malloc(%zu)", len);
2479 if (sysctl(name, nitems(name), auxv, &len, NULL, 0) == -1) {
2480 if (errno != ESRCH && errno != EPERM)
2481 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2485 *cntp = len / sizeof(Elf_Auxinfo);
2489 static Elf_Auxinfo *
2490 procstat_getauxv_core(struct procstat_core *core, unsigned int *cntp)
2495 auxv = procstat_core_get(core, PSC_TYPE_AUXV, NULL, &len);
2498 *cntp = len / sizeof(Elf_Auxinfo);
2503 procstat_getauxv(struct procstat *procstat, struct kinfo_proc *kp,
2506 switch(procstat->type) {
2508 warnx("kvm method is not supported");
2510 case PROCSTAT_SYSCTL:
2511 return (procstat_getauxv_sysctl(kp->ki_pid, cntp));
2513 return (procstat_getauxv_core(procstat->core, cntp));
2515 warnx("unknown access method: %d", procstat->type);
2521 procstat_freeauxv(struct procstat *procstat __unused, Elf_Auxinfo *auxv)
2527 static struct ptrace_lwpinfo *
2528 procstat_getptlwpinfo_core(struct procstat_core *core, unsigned int *cntp)
2531 struct ptrace_lwpinfo *pl;
2535 cnt = procstat_core_note_count(core, PSC_TYPE_PTLWPINFO);
2539 len = cnt * sizeof(*pl);
2540 buf = calloc(1, len);
2541 pl = procstat_core_get(core, PSC_TYPE_PTLWPINFO, buf, &len);
2546 *cntp = len / sizeof(*pl);
2550 struct ptrace_lwpinfo *
2551 procstat_getptlwpinfo(struct procstat *procstat, unsigned int *cntp)
2553 switch (procstat->type) {
2555 warnx("kvm method is not supported");
2557 case PROCSTAT_SYSCTL:
2558 warnx("sysctl method is not supported");
2561 return (procstat_getptlwpinfo_core(procstat->core, cntp));
2563 warnx("unknown access method: %d", procstat->type);
2569 procstat_freeptlwpinfo(struct procstat *procstat __unused,
2570 struct ptrace_lwpinfo *pl)
2575 static struct kinfo_kstack *
2576 procstat_getkstack_sysctl(pid_t pid, int *cntp)
2578 struct kinfo_kstack *kkstp;
2583 name[1] = KERN_PROC;
2584 name[2] = KERN_PROC_KSTACK;
2588 error = sysctl(name, nitems(name), NULL, &len, NULL, 0);
2589 if (error < 0 && errno != ESRCH && errno != EPERM && errno != ENOENT) {
2590 warn("sysctl: kern.proc.kstack: %d", pid);
2593 if (error == -1 && errno == ENOENT) {
2594 warnx("sysctl: kern.proc.kstack unavailable"
2595 " (options DDB or options STACK required in kernel)");
2600 kkstp = malloc(len);
2601 if (kkstp == NULL) {
2602 warn("malloc(%zu)", len);
2605 if (sysctl(name, nitems(name), kkstp, &len, NULL, 0) == -1) {
2606 warn("sysctl: kern.proc.pid: %d", pid);
2610 *cntp = len / sizeof(*kkstp);
2615 struct kinfo_kstack *
2616 procstat_getkstack(struct procstat *procstat, struct kinfo_proc *kp,
2619 switch(procstat->type) {
2621 warnx("kvm method is not supported");
2623 case PROCSTAT_SYSCTL:
2624 return (procstat_getkstack_sysctl(kp->ki_pid, cntp));
2626 warnx("core method is not supported");
2629 warnx("unknown access method: %d", procstat->type);
2635 procstat_freekstack(struct procstat *procstat __unused,
2636 struct kinfo_kstack *kkstp)