2 * Copyright (c) 2017 Dell EMC
3 * Copyright (c) 2009 Stanislav Sedov <stas@FreeBSD.org>
4 * Copyright (c) 1988, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
39 #include <sys/param.h>
42 #include <sys/resourcevar.h>
44 #include <sys/ucred.h>
49 #include <sys/vnode.h>
50 #include <sys/socket.h>
52 #include <sys/socketvar.h>
53 #include <sys/domain.h>
54 #include <sys/protosw.h>
57 #include <sys/unpcb.h>
58 #include <sys/sysctl.h>
60 #include <sys/filedesc.h>
61 #include <sys/queue.h>
67 #include <sys/capsicum.h>
68 #include <sys/ptrace.h>
70 #include <sys/mount.h>
72 #include <ufs/ufs/quota.h>
73 #include <ufs/ufs/inode.h>
74 #include <fs/devfs/devfs.h>
75 #include <fs/devfs/devfs_int.h>
77 #include <nfs/nfsproto.h>
78 #include <nfsclient/nfs.h>
79 #include <nfsclient/nfsnode.h>
82 #include <vm/vm_map.h>
83 #include <vm/vm_object.h>
85 #include <net/route.h>
86 #include <netinet/in.h>
87 #include <netinet/in_systm.h>
88 #include <netinet/ip.h>
90 #include <netinet/in_pcb.h>
108 #include <libprocstat.h>
109 #include "libprocstat_internal.h"
110 #include "common_kvm.h"
113 int statfs(const char *, struct statfs *); /* XXX */
115 #define PROCSTAT_KVM 1
116 #define PROCSTAT_SYSCTL 2
117 #define PROCSTAT_CORE 3
119 static char **getargv(struct procstat *procstat, struct kinfo_proc *kp,
120 size_t nchr, int env);
121 static char *getmnton(kvm_t *kd, struct mount *m);
122 static struct kinfo_vmentry * kinfo_getvmmap_core(struct procstat_core *core,
124 static Elf_Auxinfo *procstat_getauxv_core(struct procstat_core *core,
126 static Elf_Auxinfo *procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp);
127 static struct filestat_list *procstat_getfiles_kvm(
128 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
129 static struct filestat_list *procstat_getfiles_sysctl(
130 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
131 static int procstat_get_pipe_info_sysctl(struct filestat *fst,
132 struct pipestat *pipe, char *errbuf);
133 static int procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
134 struct pipestat *pipe, char *errbuf);
135 static int procstat_get_pts_info_sysctl(struct filestat *fst,
136 struct ptsstat *pts, char *errbuf);
137 static int procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
138 struct ptsstat *pts, char *errbuf);
139 static int procstat_get_sem_info_sysctl(struct filestat *fst,
140 struct semstat *sem, char *errbuf);
141 static int procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
142 struct semstat *sem, char *errbuf);
143 static int procstat_get_shm_info_sysctl(struct filestat *fst,
144 struct shmstat *shm, char *errbuf);
145 static int procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
146 struct shmstat *shm, char *errbuf);
147 static int procstat_get_socket_info_sysctl(struct filestat *fst,
148 struct sockstat *sock, char *errbuf);
149 static int procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
150 struct sockstat *sock, char *errbuf);
151 static int to_filestat_flags(int flags);
152 static int procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
153 struct vnstat *vn, char *errbuf);
154 static int procstat_get_vnode_info_sysctl(struct filestat *fst,
155 struct vnstat *vn, char *errbuf);
156 static gid_t *procstat_getgroups_core(struct procstat_core *core,
157 unsigned int *count);
158 static gid_t * procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp,
159 unsigned int *count);
160 static gid_t *procstat_getgroups_sysctl(pid_t pid, unsigned int *count);
161 static struct kinfo_kstack *procstat_getkstack_sysctl(pid_t pid,
163 static int procstat_getosrel_core(struct procstat_core *core,
165 static int procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp,
167 static int procstat_getosrel_sysctl(pid_t pid, int *osrelp);
168 static int procstat_getpathname_core(struct procstat_core *core,
169 char *pathname, size_t maxlen);
170 static int procstat_getpathname_sysctl(pid_t pid, char *pathname,
172 static int procstat_getrlimit_core(struct procstat_core *core, int which,
173 struct rlimit* rlimit);
174 static int procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp,
175 int which, struct rlimit* rlimit);
176 static int procstat_getrlimit_sysctl(pid_t pid, int which,
177 struct rlimit* rlimit);
178 static int procstat_getumask_core(struct procstat_core *core,
179 unsigned short *maskp);
180 static int procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp,
181 unsigned short *maskp);
182 static int procstat_getumask_sysctl(pid_t pid, unsigned short *maskp);
183 static int vntype2psfsttype(int type);
186 procstat_close(struct procstat *procstat)
190 if (procstat->type == PROCSTAT_KVM)
191 kvm_close(procstat->kd);
192 else if (procstat->type == PROCSTAT_CORE)
193 procstat_core_close(procstat->core);
194 procstat_freeargv(procstat);
195 procstat_freeenvv(procstat);
200 procstat_open_sysctl(void)
202 struct procstat *procstat;
204 procstat = calloc(1, sizeof(*procstat));
205 if (procstat == NULL) {
209 procstat->type = PROCSTAT_SYSCTL;
214 procstat_open_kvm(const char *nlistf, const char *memf)
216 struct procstat *procstat;
218 char buf[_POSIX2_LINE_MAX];
220 procstat = calloc(1, sizeof(*procstat));
221 if (procstat == NULL) {
225 kd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
227 warnx("kvm_openfiles(): %s", buf);
231 procstat->type = PROCSTAT_KVM;
237 procstat_open_core(const char *filename)
239 struct procstat *procstat;
240 struct procstat_core *core;
242 procstat = calloc(1, sizeof(*procstat));
243 if (procstat == NULL) {
247 core = procstat_core_open(filename);
252 procstat->type = PROCSTAT_CORE;
253 procstat->core = core;
258 procstat_getprocs(struct procstat *procstat, int what, int arg,
261 struct kinfo_proc *p0, *p;
270 if (procstat->type == PROCSTAT_KVM) {
272 p0 = kvm_getprocs(procstat->kd, what, arg, &cnt);
273 if (p0 == NULL || cnt <= 0)
276 len = *count * sizeof(*p);
279 warnx("malloc(%zu)", len);
284 } else if (procstat->type == PROCSTAT_SYSCTL) {
290 error = sysctl(name, nitems(name), NULL, &len, NULL, 0);
291 if (error < 0 && errno != EPERM) {
292 warn("sysctl(kern.proc)");
296 warnx("no processes?");
301 p = reallocf(p, len);
303 warnx("reallocf(%zu)", len);
307 error = sysctl(name, nitems(name), p, &len, NULL, 0);
308 } while (error < 0 && errno == ENOMEM && olen == len);
309 if (error < 0 && errno != EPERM) {
310 warn("sysctl(kern.proc)");
313 /* Perform simple consistency checks. */
314 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
315 warnx("kinfo_proc structure size mismatch (len = %zu)", len);
318 *count = len / sizeof(*p);
320 } else if (procstat->type == PROCSTAT_CORE) {
321 p = procstat_core_get(procstat->core, PSC_TYPE_PROC, NULL,
323 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
324 warnx("kinfo_proc structure size mismatch");
327 *count = len / sizeof(*p);
330 warnx("unknown access method: %d", procstat->type);
340 procstat_freeprocs(struct procstat *procstat __unused, struct kinfo_proc *p)
348 struct filestat_list *
349 procstat_getfiles(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
352 switch(procstat->type) {
354 return (procstat_getfiles_kvm(procstat, kp, mmapped));
355 case PROCSTAT_SYSCTL:
357 return (procstat_getfiles_sysctl(procstat, kp, mmapped));
359 warnx("unknown access method: %d", procstat->type);
365 procstat_freefiles(struct procstat *procstat, struct filestat_list *head)
367 struct filestat *fst, *tmp;
369 STAILQ_FOREACH_SAFE(fst, head, next, tmp) {
370 if (fst->fs_path != NULL)
375 if (procstat->vmentries != NULL) {
376 free(procstat->vmentries);
377 procstat->vmentries = NULL;
379 if (procstat->files != NULL) {
380 free(procstat->files);
381 procstat->files = NULL;
385 static struct filestat *
386 filestat_new_entry(void *typedep, int type, int fd, int fflags, int uflags,
387 int refcount, off_t offset, char *path, cap_rights_t *cap_rightsp)
389 struct filestat *entry;
391 entry = calloc(1, sizeof(*entry));
396 entry->fs_typedep = typedep;
397 entry->fs_fflags = fflags;
398 entry->fs_uflags = uflags;
400 entry->fs_type = type;
401 entry->fs_ref_count = refcount;
402 entry->fs_offset = offset;
403 entry->fs_path = path;
404 if (cap_rightsp != NULL)
405 entry->fs_cap_rights = *cap_rightsp;
407 cap_rights_init(&entry->fs_cap_rights);
411 static struct vnode *
412 getctty(kvm_t *kd, struct kinfo_proc *kp)
420 error = kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
423 warnx("can't read proc struct at %p for pid %d",
424 kp->ki_paddr, kp->ki_pid);
427 if (proc.p_pgrp == NULL)
429 error = kvm_read_all(kd, (unsigned long)proc.p_pgrp, &pgrp,
432 warnx("can't read pgrp struct at %p for pid %d",
433 proc.p_pgrp, kp->ki_pid);
436 error = kvm_read_all(kd, (unsigned long)pgrp.pg_session, &sess,
439 warnx("can't read session struct at %p for pid %d",
440 pgrp.pg_session, kp->ki_pid);
443 return (sess.s_ttyvp);
446 static struct filestat_list *
447 procstat_getfiles_kvm(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
450 struct filedesc filed;
451 struct vm_map_entry vmentry;
452 struct vm_object object;
453 struct vmspace vmspace;
454 vm_map_entry_t entryp;
458 struct file **ofiles;
459 struct filestat *entry;
460 struct filestat_list *head;
471 if (kp->ki_fd == NULL)
473 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &filed,
475 warnx("can't read filedesc at %p", (void *)kp->ki_fd);
480 * Allocate list head.
482 head = malloc(sizeof(*head));
487 /* root directory vnode, if one. */
489 entry = filestat_new_entry(filed.fd_rdir, PS_FST_TYPE_VNODE, -1,
490 PS_FST_FFLAG_READ, PS_FST_UFLAG_RDIR, 0, 0, NULL, NULL);
492 STAILQ_INSERT_TAIL(head, entry, next);
494 /* current working directory vnode. */
496 entry = filestat_new_entry(filed.fd_cdir, PS_FST_TYPE_VNODE, -1,
497 PS_FST_FFLAG_READ, PS_FST_UFLAG_CDIR, 0, 0, NULL, NULL);
499 STAILQ_INSERT_TAIL(head, entry, next);
501 /* jail root, if any. */
503 entry = filestat_new_entry(filed.fd_jdir, PS_FST_TYPE_VNODE, -1,
504 PS_FST_FFLAG_READ, PS_FST_UFLAG_JAIL, 0, 0, NULL, NULL);
506 STAILQ_INSERT_TAIL(head, entry, next);
508 /* ktrace vnode, if one */
510 entry = filestat_new_entry(kp->ki_tracep, PS_FST_TYPE_VNODE, -1,
511 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
512 PS_FST_UFLAG_TRACE, 0, 0, NULL, NULL);
514 STAILQ_INSERT_TAIL(head, entry, next);
516 /* text vnode, if one */
518 entry = filestat_new_entry(kp->ki_textvp, PS_FST_TYPE_VNODE, -1,
519 PS_FST_FFLAG_READ, PS_FST_UFLAG_TEXT, 0, 0, NULL, NULL);
521 STAILQ_INSERT_TAIL(head, entry, next);
523 /* Controlling terminal. */
524 if ((vp = getctty(kd, kp)) != NULL) {
525 entry = filestat_new_entry(vp, PS_FST_TYPE_VNODE, -1,
526 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
527 PS_FST_UFLAG_CTTY, 0, 0, NULL, NULL);
529 STAILQ_INSERT_TAIL(head, entry, next);
532 nfiles = filed.fd_lastfile + 1;
533 ofiles = malloc(nfiles * sizeof(struct file *));
534 if (ofiles == NULL) {
535 warn("malloc(%zu)", nfiles * sizeof(struct file *));
538 if (!kvm_read_all(kd, (unsigned long)filed.fd_ofiles, ofiles,
539 nfiles * sizeof(struct file *))) {
540 warnx("cannot read file structures at %p",
541 (void *)filed.fd_ofiles);
545 for (i = 0; i <= filed.fd_lastfile; i++) {
546 if (ofiles[i] == NULL)
548 if (!kvm_read_all(kd, (unsigned long)ofiles[i], &file,
549 sizeof(struct file))) {
550 warnx("can't read file %d at %p", i,
554 switch (file.f_type) {
556 type = PS_FST_TYPE_VNODE;
560 type = PS_FST_TYPE_SOCKET;
564 type = PS_FST_TYPE_PIPE;
568 type = PS_FST_TYPE_FIFO;
573 type = PS_FST_TYPE_PTS;
578 type = PS_FST_TYPE_SEM;
582 type = PS_FST_TYPE_SHM;
586 type = PS_FST_TYPE_PROCDESC;
592 /* XXXRW: No capability rights support for kvm yet. */
593 entry = filestat_new_entry(data, type, i,
594 to_filestat_flags(file.f_flag), 0, 0, 0, NULL, NULL);
596 STAILQ_INSERT_TAIL(head, entry, next);
603 * Process mmapped files if requested.
606 if (!kvm_read_all(kd, (unsigned long)kp->ki_vmspace, &vmspace,
608 warnx("can't read vmspace at %p",
609 (void *)kp->ki_vmspace);
612 map = &vmspace.vm_map;
614 for (entryp = map->header.next;
615 entryp != &kp->ki_vmspace->vm_map.header;
616 entryp = vmentry.next) {
617 if (!kvm_read_all(kd, (unsigned long)entryp, &vmentry,
619 warnx("can't read vm_map_entry at %p",
623 if (vmentry.eflags & MAP_ENTRY_IS_SUB_MAP)
625 if ((objp = vmentry.object.vm_object) == NULL)
627 for (; objp; objp = object.backing_object) {
628 if (!kvm_read_all(kd, (unsigned long)objp,
629 &object, sizeof(object))) {
630 warnx("can't read vm_object at %p",
636 /* We want only vnode objects. */
637 if (object.type != OBJT_VNODE)
640 prot = vmentry.protection;
642 if (prot & VM_PROT_READ)
643 fflags = PS_FST_FFLAG_READ;
644 if ((vmentry.eflags & MAP_ENTRY_COW) == 0 &&
645 prot & VM_PROT_WRITE)
646 fflags |= PS_FST_FFLAG_WRITE;
649 * Create filestat entry.
651 entry = filestat_new_entry(object.handle,
652 PS_FST_TYPE_VNODE, -1, fflags,
653 PS_FST_UFLAG_MMAP, 0, 0, NULL, NULL);
655 STAILQ_INSERT_TAIL(head, entry, next);
663 * kinfo types to filestat translation.
666 kinfo_type2fst(int kftype)
672 { KF_TYPE_PROCDESC, PS_FST_TYPE_PROCDESC },
673 { KF_TYPE_CRYPTO, PS_FST_TYPE_CRYPTO },
674 { KF_TYPE_FIFO, PS_FST_TYPE_FIFO },
675 { KF_TYPE_KQUEUE, PS_FST_TYPE_KQUEUE },
676 { KF_TYPE_MQUEUE, PS_FST_TYPE_MQUEUE },
677 { KF_TYPE_NONE, PS_FST_TYPE_NONE },
678 { KF_TYPE_PIPE, PS_FST_TYPE_PIPE },
679 { KF_TYPE_PTS, PS_FST_TYPE_PTS },
680 { KF_TYPE_SEM, PS_FST_TYPE_SEM },
681 { KF_TYPE_SHM, PS_FST_TYPE_SHM },
682 { KF_TYPE_SOCKET, PS_FST_TYPE_SOCKET },
683 { KF_TYPE_VNODE, PS_FST_TYPE_VNODE },
684 { KF_TYPE_UNKNOWN, PS_FST_TYPE_UNKNOWN }
686 #define NKFTYPES (sizeof(kftypes2fst) / sizeof(*kftypes2fst))
689 for (i = 0; i < NKFTYPES; i++)
690 if (kftypes2fst[i].kf_type == kftype)
693 return (PS_FST_TYPE_UNKNOWN);
694 return (kftypes2fst[i].fst_type);
698 * kinfo flags to filestat translation.
701 kinfo_fflags2fst(int kfflags)
707 { KF_FLAG_APPEND, PS_FST_FFLAG_APPEND },
708 { KF_FLAG_ASYNC, PS_FST_FFLAG_ASYNC },
709 { KF_FLAG_CREAT, PS_FST_FFLAG_CREAT },
710 { KF_FLAG_DIRECT, PS_FST_FFLAG_DIRECT },
711 { KF_FLAG_EXCL, PS_FST_FFLAG_EXCL },
712 { KF_FLAG_EXEC, PS_FST_FFLAG_EXEC },
713 { KF_FLAG_EXLOCK, PS_FST_FFLAG_EXLOCK },
714 { KF_FLAG_FSYNC, PS_FST_FFLAG_SYNC },
715 { KF_FLAG_HASLOCK, PS_FST_FFLAG_HASLOCK },
716 { KF_FLAG_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
717 { KF_FLAG_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
718 { KF_FLAG_READ, PS_FST_FFLAG_READ },
719 { KF_FLAG_SHLOCK, PS_FST_FFLAG_SHLOCK },
720 { KF_FLAG_TRUNC, PS_FST_FFLAG_TRUNC },
721 { KF_FLAG_WRITE, PS_FST_FFLAG_WRITE }
723 #define NKFFLAGS (sizeof(kfflags2fst) / sizeof(*kfflags2fst))
728 for (i = 0; i < NKFFLAGS; i++)
729 if ((kfflags & kfflags2fst[i].kf_flag) != 0)
730 flags |= kfflags2fst[i].fst_flag;
735 kinfo_uflags2fst(int fd)
739 case KF_FD_TYPE_CTTY:
740 return (PS_FST_UFLAG_CTTY);
742 return (PS_FST_UFLAG_CDIR);
743 case KF_FD_TYPE_JAIL:
744 return (PS_FST_UFLAG_JAIL);
745 case KF_FD_TYPE_TEXT:
746 return (PS_FST_UFLAG_TEXT);
747 case KF_FD_TYPE_TRACE:
748 return (PS_FST_UFLAG_TRACE);
749 case KF_FD_TYPE_ROOT:
750 return (PS_FST_UFLAG_RDIR);
755 static struct kinfo_file *
756 kinfo_getfile_core(struct procstat_core *core, int *cntp)
761 struct kinfo_file *kif, *kp, *kf;
763 buf = procstat_core_get(core, PSC_TYPE_FILES, NULL, &len);
767 * XXXMG: The code below is just copy&past from libutil.
768 * The code duplication can be avoided if libutil
769 * is extended to provide something like:
770 * struct kinfo_file *kinfo_getfile_from_buf(const char *buf,
771 * size_t len, int *cntp);
774 /* Pass 1: count items */
779 kf = (struct kinfo_file *)(uintptr_t)bp;
780 if (kf->kf_structsize == 0)
782 bp += kf->kf_structsize;
786 kif = calloc(cnt, sizeof(*kif));
796 kf = (struct kinfo_file *)(uintptr_t)bp;
797 if (kf->kf_structsize == 0)
799 /* Copy/expand into pre-zeroed buffer */
800 memcpy(kp, kf, kf->kf_structsize);
801 /* Advance to next packed record */
802 bp += kf->kf_structsize;
803 /* Set field size to fixed length, advance */
804 kp->kf_structsize = sizeof(*kp);
809 return (kif); /* Caller must free() return value */
812 static struct filestat_list *
813 procstat_getfiles_sysctl(struct procstat *procstat, struct kinfo_proc *kp,
816 struct kinfo_file *kif, *files;
817 struct kinfo_vmentry *kve, *vmentries;
818 struct filestat_list *head;
819 struct filestat *entry;
825 cap_rights_t cap_rights;
828 if (kp->ki_fd == NULL)
830 switch(procstat->type) {
831 case PROCSTAT_SYSCTL:
832 files = kinfo_getfile(kp->ki_pid, &cnt);
835 files = kinfo_getfile_core(procstat->core, &cnt);
838 assert(!"invalid type");
840 if (files == NULL && errno != EPERM) {
841 warn("kinfo_getfile()");
844 procstat->files = files;
847 * Allocate list head.
849 head = malloc(sizeof(*head));
853 for (i = 0; i < cnt; i++) {
856 type = kinfo_type2fst(kif->kf_type);
857 fd = kif->kf_fd >= 0 ? kif->kf_fd : -1;
858 fflags = kinfo_fflags2fst(kif->kf_flags);
859 uflags = kinfo_uflags2fst(kif->kf_fd);
860 refcount = kif->kf_ref_count;
861 offset = kif->kf_offset;
862 if (*kif->kf_path != '\0')
863 path = strdup(kif->kf_path);
866 cap_rights = kif->kf_cap_rights;
869 * Create filestat entry.
871 entry = filestat_new_entry(kif, type, fd, fflags, uflags,
872 refcount, offset, path, &cap_rights);
874 STAILQ_INSERT_TAIL(head, entry, next);
877 vmentries = procstat_getvmmap(procstat, kp, &cnt);
878 procstat->vmentries = vmentries;
879 if (vmentries == NULL || cnt == 0)
881 for (i = 0; i < cnt; i++) {
883 if (kve->kve_type != KVME_TYPE_VNODE)
886 if (kve->kve_protection & KVME_PROT_READ)
887 fflags = PS_FST_FFLAG_READ;
888 if ((kve->kve_flags & KVME_FLAG_COW) == 0 &&
889 kve->kve_protection & KVME_PROT_WRITE)
890 fflags |= PS_FST_FFLAG_WRITE;
891 offset = kve->kve_offset;
892 refcount = kve->kve_ref_count;
893 if (*kve->kve_path != '\0')
894 path = strdup(kve->kve_path);
897 entry = filestat_new_entry(kve, PS_FST_TYPE_VNODE, -1,
898 fflags, PS_FST_UFLAG_MMAP, refcount, offset, path,
901 STAILQ_INSERT_TAIL(head, entry, next);
909 procstat_get_pipe_info(struct procstat *procstat, struct filestat *fst,
910 struct pipestat *ps, char *errbuf)
914 if (procstat->type == PROCSTAT_KVM) {
915 return (procstat_get_pipe_info_kvm(procstat->kd, fst, ps,
917 } else if (procstat->type == PROCSTAT_SYSCTL ||
918 procstat->type == PROCSTAT_CORE) {
919 return (procstat_get_pipe_info_sysctl(fst, ps, errbuf));
921 warnx("unknown access method: %d", procstat->type);
923 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
929 procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
930 struct pipestat *ps, char *errbuf)
938 bzero(ps, sizeof(*ps));
939 pipep = fst->fs_typedep;
942 if (!kvm_read_all(kd, (unsigned long)pipep, &pi, sizeof(struct pipe))) {
943 warnx("can't read pipe at %p", (void *)pipep);
946 ps->addr = (uintptr_t)pipep;
947 ps->peer = (uintptr_t)pi.pipe_peer;
948 ps->buffer_cnt = pi.pipe_buffer.cnt;
953 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
958 procstat_get_pipe_info_sysctl(struct filestat *fst, struct pipestat *ps,
959 char *errbuf __unused)
961 struct kinfo_file *kif;
965 bzero(ps, sizeof(*ps));
966 kif = fst->fs_typedep;
969 ps->addr = kif->kf_un.kf_pipe.kf_pipe_addr;
970 ps->peer = kif->kf_un.kf_pipe.kf_pipe_peer;
971 ps->buffer_cnt = kif->kf_un.kf_pipe.kf_pipe_buffer_cnt;
976 procstat_get_pts_info(struct procstat *procstat, struct filestat *fst,
977 struct ptsstat *pts, char *errbuf)
981 if (procstat->type == PROCSTAT_KVM) {
982 return (procstat_get_pts_info_kvm(procstat->kd, fst, pts,
984 } else if (procstat->type == PROCSTAT_SYSCTL ||
985 procstat->type == PROCSTAT_CORE) {
986 return (procstat_get_pts_info_sysctl(fst, pts, errbuf));
988 warnx("unknown access method: %d", procstat->type);
990 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
996 procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
997 struct ptsstat *pts, char *errbuf)
1005 bzero(pts, sizeof(*pts));
1006 ttyp = fst->fs_typedep;
1009 if (!kvm_read_all(kd, (unsigned long)ttyp, &tty, sizeof(struct tty))) {
1010 warnx("can't read tty at %p", (void *)ttyp);
1013 pts->dev = dev2udev(kd, tty.t_dev);
1014 (void)kdevtoname(kd, tty.t_dev, pts->devname);
1019 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1024 procstat_get_pts_info_sysctl(struct filestat *fst, struct ptsstat *pts,
1025 char *errbuf __unused)
1027 struct kinfo_file *kif;
1031 bzero(pts, sizeof(*pts));
1032 kif = fst->fs_typedep;
1035 pts->dev = kif->kf_un.kf_pts.kf_pts_dev;
1036 strlcpy(pts->devname, kif->kf_path, sizeof(pts->devname));
1041 procstat_get_sem_info(struct procstat *procstat, struct filestat *fst,
1042 struct semstat *sem, char *errbuf)
1046 if (procstat->type == PROCSTAT_KVM) {
1047 return (procstat_get_sem_info_kvm(procstat->kd, fst, sem,
1049 } else if (procstat->type == PROCSTAT_SYSCTL ||
1050 procstat->type == PROCSTAT_CORE) {
1051 return (procstat_get_sem_info_sysctl(fst, sem, errbuf));
1053 warnx("unknown access method: %d", procstat->type);
1055 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1061 procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
1062 struct semstat *sem, char *errbuf)
1072 bzero(sem, sizeof(*sem));
1073 ksemp = fst->fs_typedep;
1076 if (!kvm_read_all(kd, (unsigned long)ksemp, &ksem,
1077 sizeof(struct ksem))) {
1078 warnx("can't read ksem at %p", (void *)ksemp);
1081 sem->mode = S_IFREG | ksem.ks_mode;
1082 sem->value = ksem.ks_value;
1083 if (fst->fs_path == NULL && ksem.ks_path != NULL) {
1084 path = malloc(MAXPATHLEN);
1085 for (i = 0; i < MAXPATHLEN - 1; i++) {
1086 if (!kvm_read_all(kd, (unsigned long)ksem.ks_path + i,
1089 if (path[i] == '\0')
1096 fst->fs_path = path;
1102 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1107 procstat_get_sem_info_sysctl(struct filestat *fst, struct semstat *sem,
1108 char *errbuf __unused)
1110 struct kinfo_file *kif;
1114 bzero(sem, sizeof(*sem));
1115 kif = fst->fs_typedep;
1118 sem->value = kif->kf_un.kf_sem.kf_sem_value;
1119 sem->mode = kif->kf_un.kf_sem.kf_sem_mode;
1124 procstat_get_shm_info(struct procstat *procstat, struct filestat *fst,
1125 struct shmstat *shm, char *errbuf)
1129 if (procstat->type == PROCSTAT_KVM) {
1130 return (procstat_get_shm_info_kvm(procstat->kd, fst, shm,
1132 } else if (procstat->type == PROCSTAT_SYSCTL ||
1133 procstat->type == PROCSTAT_CORE) {
1134 return (procstat_get_shm_info_sysctl(fst, shm, errbuf));
1136 warnx("unknown access method: %d", procstat->type);
1138 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1144 procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
1145 struct shmstat *shm, char *errbuf)
1155 bzero(shm, sizeof(*shm));
1156 shmfdp = fst->fs_typedep;
1159 if (!kvm_read_all(kd, (unsigned long)shmfdp, &shmfd,
1160 sizeof(struct shmfd))) {
1161 warnx("can't read shmfd at %p", (void *)shmfdp);
1164 shm->mode = S_IFREG | shmfd.shm_mode;
1165 shm->size = shmfd.shm_size;
1166 if (fst->fs_path == NULL && shmfd.shm_path != NULL) {
1167 path = malloc(MAXPATHLEN);
1168 for (i = 0; i < MAXPATHLEN - 1; i++) {
1169 if (!kvm_read_all(kd, (unsigned long)shmfd.shm_path + i,
1172 if (path[i] == '\0')
1179 fst->fs_path = path;
1185 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1190 procstat_get_shm_info_sysctl(struct filestat *fst, struct shmstat *shm,
1191 char *errbuf __unused)
1193 struct kinfo_file *kif;
1197 bzero(shm, sizeof(*shm));
1198 kif = fst->fs_typedep;
1201 shm->size = kif->kf_un.kf_file.kf_file_size;
1202 shm->mode = kif->kf_un.kf_file.kf_file_mode;
1207 procstat_get_vnode_info(struct procstat *procstat, struct filestat *fst,
1208 struct vnstat *vn, char *errbuf)
1212 if (procstat->type == PROCSTAT_KVM) {
1213 return (procstat_get_vnode_info_kvm(procstat->kd, fst, vn,
1215 } else if (procstat->type == PROCSTAT_SYSCTL ||
1216 procstat->type == PROCSTAT_CORE) {
1217 return (procstat_get_vnode_info_sysctl(fst, vn, errbuf));
1219 warnx("unknown access method: %d", procstat->type);
1221 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1227 procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
1228 struct vnstat *vn, char *errbuf)
1230 /* Filesystem specific handlers. */
1231 #define FSTYPE(fst) {#fst, fst##_filestat}
1234 int (*handler)(kvm_t *kd, struct vnode *vp,
1244 #ifdef LIBPROCSTAT_ZFS
1248 #define NTYPES (sizeof(fstypes) / sizeof(*fstypes))
1258 vp = fst->fs_typedep;
1261 error = kvm_read_all(kd, (unsigned long)vp, &vnode, sizeof(vnode));
1263 warnx("can't read vnode at %p", (void *)vp);
1266 bzero(vn, sizeof(*vn));
1267 vn->vn_type = vntype2psfsttype(vnode.v_type);
1268 if (vnode.v_type == VNON || vnode.v_type == VBAD)
1270 error = kvm_read_all(kd, (unsigned long)vnode.v_tag, tagstr,
1273 warnx("can't read v_tag at %p", (void *)vp);
1276 tagstr[sizeof(tagstr) - 1] = '\0';
1279 * Find appropriate handler.
1281 for (i = 0; i < NTYPES; i++)
1282 if (!strcmp(fstypes[i].tag, tagstr)) {
1283 if (fstypes[i].handler(kd, &vnode, vn) != 0) {
1290 snprintf(errbuf, _POSIX2_LINE_MAX, "?(%s)", tagstr);
1293 vn->vn_mntdir = getmnton(kd, vnode.v_mount);
1294 if ((vnode.v_type == VBLK || vnode.v_type == VCHR) &&
1295 vnode.v_rdev != NULL){
1296 vn->vn_dev = dev2udev(kd, vnode.v_rdev);
1297 (void)kdevtoname(kd, vnode.v_rdev, vn->vn_devname);
1305 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1310 * kinfo vnode type to filestat translation.
1313 kinfo_vtype2fst(int kfvtype)
1318 } kfvtypes2fst[] = {
1319 { KF_VTYPE_VBAD, PS_FST_VTYPE_VBAD },
1320 { KF_VTYPE_VBLK, PS_FST_VTYPE_VBLK },
1321 { KF_VTYPE_VCHR, PS_FST_VTYPE_VCHR },
1322 { KF_VTYPE_VDIR, PS_FST_VTYPE_VDIR },
1323 { KF_VTYPE_VFIFO, PS_FST_VTYPE_VFIFO },
1324 { KF_VTYPE_VLNK, PS_FST_VTYPE_VLNK },
1325 { KF_VTYPE_VNON, PS_FST_VTYPE_VNON },
1326 { KF_VTYPE_VREG, PS_FST_VTYPE_VREG },
1327 { KF_VTYPE_VSOCK, PS_FST_VTYPE_VSOCK }
1329 #define NKFVTYPES (sizeof(kfvtypes2fst) / sizeof(*kfvtypes2fst))
1332 for (i = 0; i < NKFVTYPES; i++)
1333 if (kfvtypes2fst[i].kf_vtype == kfvtype)
1336 return (PS_FST_VTYPE_UNKNOWN);
1337 return (kfvtypes2fst[i].fst_vtype);
1341 procstat_get_vnode_info_sysctl(struct filestat *fst, struct vnstat *vn,
1344 struct statfs stbuf;
1345 struct kinfo_file *kif;
1346 struct kinfo_vmentry *kve;
1358 bzero(vn, sizeof(*vn));
1359 if (fst->fs_typedep == NULL)
1361 if (fst->fs_uflags & PS_FST_UFLAG_MMAP) {
1362 kve = fst->fs_typedep;
1363 fileid = kve->kve_vn_fileid;
1364 fsid = kve->kve_vn_fsid;
1365 mode = kve->kve_vn_mode;
1366 path = kve->kve_path;
1367 rdev = kve->kve_vn_rdev;
1368 size = kve->kve_vn_size;
1369 vntype = kinfo_vtype2fst(kve->kve_vn_type);
1370 status = kve->kve_status;
1372 kif = fst->fs_typedep;
1373 fileid = kif->kf_un.kf_file.kf_file_fileid;
1374 fsid = kif->kf_un.kf_file.kf_file_fsid;
1375 mode = kif->kf_un.kf_file.kf_file_mode;
1376 path = kif->kf_path;
1377 rdev = kif->kf_un.kf_file.kf_file_rdev;
1378 size = kif->kf_un.kf_file.kf_file_size;
1379 vntype = kinfo_vtype2fst(kif->kf_vnode_type);
1380 status = kif->kf_status;
1382 vn->vn_type = vntype;
1383 if (vntype == PS_FST_VTYPE_VNON || vntype == PS_FST_VTYPE_VBAD)
1385 if ((status & KF_ATTR_VALID) == 0) {
1386 if (errbuf != NULL) {
1387 snprintf(errbuf, _POSIX2_LINE_MAX,
1388 "? (no info available)");
1392 if (path && *path) {
1393 statfs(path, &stbuf);
1394 vn->vn_mntdir = strdup(stbuf.f_mntonname);
1396 vn->vn_mntdir = strdup("-");
1398 if (vntype == PS_FST_VTYPE_VBLK) {
1399 name = devname(rdev, S_IFBLK);
1401 strlcpy(vn->vn_devname, name,
1402 sizeof(vn->vn_devname));
1403 } else if (vntype == PS_FST_VTYPE_VCHR) {
1404 name = devname(vn->vn_dev, S_IFCHR);
1406 strlcpy(vn->vn_devname, name,
1407 sizeof(vn->vn_devname));
1410 vn->vn_fileid = fileid;
1417 procstat_get_socket_info(struct procstat *procstat, struct filestat *fst,
1418 struct sockstat *sock, char *errbuf)
1422 if (procstat->type == PROCSTAT_KVM) {
1423 return (procstat_get_socket_info_kvm(procstat->kd, fst, sock,
1425 } else if (procstat->type == PROCSTAT_SYSCTL ||
1426 procstat->type == PROCSTAT_CORE) {
1427 return (procstat_get_socket_info_sysctl(fst, sock, errbuf));
1429 warnx("unknown access method: %d", procstat->type);
1431 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1437 procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
1438 struct sockstat *sock, char *errbuf)
1442 struct protosw proto;
1451 bzero(sock, sizeof(*sock));
1452 so = fst->fs_typedep;
1455 sock->so_addr = (uintptr_t)so;
1456 /* fill in socket */
1457 if (!kvm_read_all(kd, (unsigned long)so, &s,
1458 sizeof(struct socket))) {
1459 warnx("can't read sock at %p", (void *)so);
1462 /* fill in protosw entry */
1463 if (!kvm_read_all(kd, (unsigned long)s.so_proto, &proto,
1464 sizeof(struct protosw))) {
1465 warnx("can't read protosw at %p", (void *)s.so_proto);
1468 /* fill in domain */
1469 if (!kvm_read_all(kd, (unsigned long)proto.pr_domain, &dom,
1470 sizeof(struct domain))) {
1471 warnx("can't read domain at %p",
1472 (void *)proto.pr_domain);
1475 if ((len = kvm_read(kd, (unsigned long)dom.dom_name, sock->dname,
1476 sizeof(sock->dname) - 1)) < 0) {
1477 warnx("can't read domain name at %p", (void *)dom.dom_name);
1478 sock->dname[0] = '\0';
1481 sock->dname[len] = '\0';
1484 * Fill in known data.
1486 sock->type = s.so_type;
1487 sock->proto = proto.pr_protocol;
1488 sock->dom_family = dom.dom_family;
1489 sock->so_pcb = (uintptr_t)s.so_pcb;
1492 * Protocol specific data.
1494 switch(dom.dom_family) {
1497 if (proto.pr_protocol == IPPROTO_TCP) {
1499 if (kvm_read(kd, (u_long)s.so_pcb,
1500 (char *)&inpcb, sizeof(struct inpcb))
1501 != sizeof(struct inpcb)) {
1502 warnx("can't read inpcb at %p",
1506 (uintptr_t)inpcb.inp_ppcb;
1507 sock->sendq = s.so_snd.sb_ccc;
1508 sock->recvq = s.so_rcv.sb_ccc;
1514 if (kvm_read(kd, (u_long)s.so_pcb, (char *)&unpcb,
1515 sizeof(struct unpcb)) != sizeof(struct unpcb)){
1516 warnx("can't read unpcb at %p",
1518 } else if (unpcb.unp_conn) {
1519 sock->so_rcv_sb_state = s.so_rcv.sb_state;
1520 sock->so_snd_sb_state = s.so_snd.sb_state;
1521 sock->unp_conn = (uintptr_t)unpcb.unp_conn;
1522 sock->sendq = s.so_snd.sb_ccc;
1523 sock->recvq = s.so_rcv.sb_ccc;
1534 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1539 procstat_get_socket_info_sysctl(struct filestat *fst, struct sockstat *sock,
1540 char *errbuf __unused)
1542 struct kinfo_file *kif;
1546 bzero(sock, sizeof(*sock));
1547 kif = fst->fs_typedep;
1552 * Fill in known data.
1554 sock->type = kif->kf_sock_type;
1555 sock->proto = kif->kf_sock_protocol;
1556 sock->dom_family = kif->kf_sock_domain;
1557 sock->so_pcb = kif->kf_un.kf_sock.kf_sock_pcb;
1558 strlcpy(sock->dname, kif->kf_path, sizeof(sock->dname));
1559 bcopy(&kif->kf_un.kf_sock.kf_sa_local, &sock->sa_local,
1560 kif->kf_un.kf_sock.kf_sa_local.ss_len);
1561 bcopy(&kif->kf_un.kf_sock.kf_sa_peer, &sock->sa_peer,
1562 kif->kf_un.kf_sock.kf_sa_peer.ss_len);
1565 * Protocol specific data.
1567 switch(sock->dom_family) {
1570 if (sock->proto == IPPROTO_TCP) {
1571 sock->inp_ppcb = kif->kf_un.kf_sock.kf_sock_inpcb;
1572 sock->sendq = kif->kf_un.kf_sock.kf_sock_sendq;
1573 sock->recvq = kif->kf_un.kf_sock.kf_sock_recvq;
1577 if (kif->kf_un.kf_sock.kf_sock_unpconn != 0) {
1578 sock->so_rcv_sb_state =
1579 kif->kf_un.kf_sock.kf_sock_rcv_sb_state;
1580 sock->so_snd_sb_state =
1581 kif->kf_un.kf_sock.kf_sock_snd_sb_state;
1583 kif->kf_un.kf_sock.kf_sock_unpconn;
1584 sock->sendq = kif->kf_un.kf_sock.kf_sock_sendq;
1585 sock->recvq = kif->kf_un.kf_sock.kf_sock_recvq;
1595 * Descriptor flags to filestat translation.
1598 to_filestat_flags(int flags)
1604 { FREAD, PS_FST_FFLAG_READ },
1605 { FWRITE, PS_FST_FFLAG_WRITE },
1606 { O_APPEND, PS_FST_FFLAG_APPEND },
1607 { O_ASYNC, PS_FST_FFLAG_ASYNC },
1608 { O_CREAT, PS_FST_FFLAG_CREAT },
1609 { O_DIRECT, PS_FST_FFLAG_DIRECT },
1610 { O_EXCL, PS_FST_FFLAG_EXCL },
1611 { O_EXEC, PS_FST_FFLAG_EXEC },
1612 { O_EXLOCK, PS_FST_FFLAG_EXLOCK },
1613 { O_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
1614 { O_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
1615 { O_SHLOCK, PS_FST_FFLAG_SHLOCK },
1616 { O_SYNC, PS_FST_FFLAG_SYNC },
1617 { O_TRUNC, PS_FST_FFLAG_TRUNC }
1619 #define NFSTFLAGS (sizeof(fstflags) / sizeof(*fstflags))
1624 for (i = 0; i < NFSTFLAGS; i++)
1625 if (flags & fstflags[i].flag)
1626 fst_flags |= fstflags[i].fst_flag;
1631 * Vnode type to filestate translation.
1634 vntype2psfsttype(int type)
1640 { VBAD, PS_FST_VTYPE_VBAD },
1641 { VBLK, PS_FST_VTYPE_VBLK },
1642 { VCHR, PS_FST_VTYPE_VCHR },
1643 { VDIR, PS_FST_VTYPE_VDIR },
1644 { VFIFO, PS_FST_VTYPE_VFIFO },
1645 { VLNK, PS_FST_VTYPE_VLNK },
1646 { VNON, PS_FST_VTYPE_VNON },
1647 { VREG, PS_FST_VTYPE_VREG },
1648 { VSOCK, PS_FST_VTYPE_VSOCK }
1650 #define NVFTYPES (sizeof(vt2fst) / sizeof(*vt2fst))
1651 unsigned int i, fst_type;
1653 fst_type = PS_FST_VTYPE_UNKNOWN;
1654 for (i = 0; i < NVFTYPES; i++) {
1655 if (type == vt2fst[i].vtype) {
1656 fst_type = vt2fst[i].fst_vtype;
1664 getmnton(kvm_t *kd, struct mount *m)
1667 static struct mtab {
1670 char mntonname[MNAMELEN + 1];
1674 for (mt = mhead; mt != NULL; mt = mt->next)
1676 return (mt->mntonname);
1677 if (!kvm_read_all(kd, (unsigned long)m, &mnt, sizeof(struct mount))) {
1678 warnx("can't read mount table at %p", (void *)m);
1681 if ((mt = malloc(sizeof (struct mtab))) == NULL)
1684 bcopy(&mnt.mnt_stat.f_mntonname[0], &mt->mntonname[0], MNAMELEN);
1685 mt->mntonname[MNAMELEN] = '\0';
1688 return (mt->mntonname);
1692 * Auxiliary structures and functions to get process environment or
1693 * command line arguments.
1702 static struct argvec *
1703 argvec_alloc(size_t bufsize)
1707 av = malloc(sizeof(*av));
1710 av->bufsize = bufsize;
1711 av->buf = malloc(av->bufsize);
1712 if (av->buf == NULL) {
1717 av->argv = malloc(sizeof(char *) * av->argc);
1718 if (av->argv == NULL) {
1727 argvec_free(struct argvec * av)
1736 getargv(struct procstat *procstat, struct kinfo_proc *kp, size_t nchr, int env)
1738 int error, name[4], argc, i;
1739 struct argvec *av, **avp;
1746 if (procstat->type == PROCSTAT_KVM) {
1747 warnx("can't use kvm access method");
1750 if (procstat->type != PROCSTAT_SYSCTL &&
1751 procstat->type != PROCSTAT_CORE) {
1752 warnx("unknown access method: %d", procstat->type);
1756 if (nchr == 0 || nchr > ARG_MAX)
1759 avp = (struct argvec **)(env ? &procstat->argv : &procstat->envv);
1764 av = argvec_alloc(nchr);
1767 warn("malloc(%zu)", nchr);
1771 } else if (av->bufsize < nchr) {
1772 av->buf = reallocf(av->buf, nchr);
1773 if (av->buf == NULL) {
1774 warn("malloc(%zu)", nchr);
1778 if (procstat->type == PROCSTAT_SYSCTL) {
1780 name[1] = KERN_PROC;
1781 name[2] = env ? KERN_PROC_ENV : KERN_PROC_ARGS;
1782 name[3] = kp->ki_pid;
1784 error = sysctl(name, nitems(name), av->buf, &len, NULL, 0);
1785 if (error != 0 && errno != ESRCH && errno != EPERM)
1786 warn("sysctl(kern.proc.%s)", env ? "env" : "args");
1787 if (error != 0 || len == 0)
1789 } else /* procstat->type == PROCSTAT_CORE */ {
1790 type = env ? PSC_TYPE_ENVV : PSC_TYPE_ARGV;
1792 if (procstat_core_get(procstat->core, type, av->buf, &len)
1801 for (p = av->buf; p < av->buf + len; p += strlen(p) + 1) {
1807 argv = realloc(argv, sizeof(char *) * argc);
1809 warn("malloc(%zu)", sizeof(char *) * argc);
1821 * Return process command line arguments.
1824 procstat_getargv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1827 return (getargv(procstat, p, nchr, 0));
1831 * Free the buffer allocated by procstat_getargv().
1834 procstat_freeargv(struct procstat *procstat)
1837 if (procstat->argv != NULL) {
1838 argvec_free(procstat->argv);
1839 procstat->argv = NULL;
1844 * Return process environment.
1847 procstat_getenvv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1850 return (getargv(procstat, p, nchr, 1));
1854 * Free the buffer allocated by procstat_getenvv().
1857 procstat_freeenvv(struct procstat *procstat)
1859 if (procstat->envv != NULL) {
1860 argvec_free(procstat->envv);
1861 procstat->envv = NULL;
1865 static struct kinfo_vmentry *
1866 kinfo_getvmmap_core(struct procstat_core *core, int *cntp)
1870 char *buf, *bp, *eb;
1871 struct kinfo_vmentry *kiv, *kp, *kv;
1873 buf = procstat_core_get(core, PSC_TYPE_VMMAP, NULL, &len);
1878 * XXXMG: The code below is just copy&past from libutil.
1879 * The code duplication can be avoided if libutil
1880 * is extended to provide something like:
1881 * struct kinfo_vmentry *kinfo_getvmmap_from_buf(const char *buf,
1882 * size_t len, int *cntp);
1885 /* Pass 1: count items */
1890 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1891 if (kv->kve_structsize == 0)
1893 bp += kv->kve_structsize;
1897 kiv = calloc(cnt, sizeof(*kiv));
1905 /* Pass 2: unpack */
1907 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1908 if (kv->kve_structsize == 0)
1910 /* Copy/expand into pre-zeroed buffer */
1911 memcpy(kp, kv, kv->kve_structsize);
1912 /* Advance to next packed record */
1913 bp += kv->kve_structsize;
1914 /* Set field size to fixed length, advance */
1915 kp->kve_structsize = sizeof(*kp);
1920 return (kiv); /* Caller must free() return value */
1923 struct kinfo_vmentry *
1924 procstat_getvmmap(struct procstat *procstat, struct kinfo_proc *kp,
1928 switch(procstat->type) {
1930 warnx("kvm method is not supported");
1932 case PROCSTAT_SYSCTL:
1933 return (kinfo_getvmmap(kp->ki_pid, cntp));
1935 return (kinfo_getvmmap_core(procstat->core, cntp));
1937 warnx("unknown access method: %d", procstat->type);
1943 procstat_freevmmap(struct procstat *procstat __unused,
1944 struct kinfo_vmentry *vmmap)
1951 procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned int *cntp)
1960 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
1962 warnx("can't read proc struct at %p for pid %d",
1963 kp->ki_paddr, kp->ki_pid);
1966 if (proc.p_ucred == NOCRED)
1968 if (!kvm_read_all(kd, (unsigned long)proc.p_ucred, &ucred,
1970 warnx("can't read ucred struct at %p for pid %d",
1971 proc.p_ucred, kp->ki_pid);
1974 len = ucred.cr_ngroups * sizeof(gid_t);
1975 groups = malloc(len);
1976 if (groups == NULL) {
1977 warn("malloc(%zu)", len);
1980 if (!kvm_read_all(kd, (unsigned long)ucred.cr_groups, groups, len)) {
1981 warnx("can't read groups at %p for pid %d",
1982 ucred.cr_groups, kp->ki_pid);
1986 *cntp = ucred.cr_ngroups;
1991 procstat_getgroups_sysctl(pid_t pid, unsigned int *cntp)
1999 mib[2] = KERN_PROC_GROUPS;
2001 len = (sysconf(_SC_NGROUPS_MAX) + 1) * sizeof(gid_t);
2002 groups = malloc(len);
2003 if (groups == NULL) {
2004 warn("malloc(%zu)", len);
2007 if (sysctl(mib, nitems(mib), groups, &len, NULL, 0) == -1) {
2008 warn("sysctl: kern.proc.groups: %d", pid);
2012 *cntp = len / sizeof(gid_t);
2017 procstat_getgroups_core(struct procstat_core *core, unsigned int *cntp)
2022 groups = procstat_core_get(core, PSC_TYPE_GROUPS, NULL, &len);
2025 *cntp = len / sizeof(gid_t);
2030 procstat_getgroups(struct procstat *procstat, struct kinfo_proc *kp,
2033 switch(procstat->type) {
2035 return (procstat_getgroups_kvm(procstat->kd, kp, cntp));
2036 case PROCSTAT_SYSCTL:
2037 return (procstat_getgroups_sysctl(kp->ki_pid, cntp));
2039 return (procstat_getgroups_core(procstat->core, cntp));
2041 warnx("unknown access method: %d", procstat->type);
2047 procstat_freegroups(struct procstat *procstat __unused, gid_t *groups)
2054 procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned short *maskp)
2060 if (kp->ki_fd == NULL)
2062 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &fd, sizeof(fd))) {
2063 warnx("can't read filedesc at %p for pid %d", kp->ki_fd,
2067 *maskp = fd.fd_cmask;
2072 procstat_getumask_sysctl(pid_t pid, unsigned short *maskp)
2080 mib[2] = KERN_PROC_UMASK;
2082 len = sizeof(*maskp);
2083 error = sysctl(mib, nitems(mib), maskp, &len, NULL, 0);
2084 if (error != 0 && errno != ESRCH && errno != EPERM)
2085 warn("sysctl: kern.proc.umask: %d", pid);
2090 procstat_getumask_core(struct procstat_core *core, unsigned short *maskp)
2093 unsigned short *buf;
2095 buf = procstat_core_get(core, PSC_TYPE_UMASK, NULL, &len);
2098 if (len < sizeof(*maskp)) {
2108 procstat_getumask(struct procstat *procstat, struct kinfo_proc *kp,
2109 unsigned short *maskp)
2111 switch(procstat->type) {
2113 return (procstat_getumask_kvm(procstat->kd, kp, maskp));
2114 case PROCSTAT_SYSCTL:
2115 return (procstat_getumask_sysctl(kp->ki_pid, maskp));
2117 return (procstat_getumask_core(procstat->core, maskp));
2119 warnx("unknown access method: %d", procstat->type);
2125 procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp, int which,
2126 struct rlimit* rlimit)
2129 unsigned long offset;
2133 assert(which >= 0 && which < RLIM_NLIMITS);
2134 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2136 warnx("can't read proc struct at %p for pid %d",
2137 kp->ki_paddr, kp->ki_pid);
2140 if (proc.p_limit == NULL)
2142 offset = (unsigned long)proc.p_limit + sizeof(struct rlimit) * which;
2143 if (!kvm_read_all(kd, offset, rlimit, sizeof(*rlimit))) {
2144 warnx("can't read rlimit struct at %p for pid %d",
2145 (void *)offset, kp->ki_pid);
2152 procstat_getrlimit_sysctl(pid_t pid, int which, struct rlimit* rlimit)
2158 name[1] = KERN_PROC;
2159 name[2] = KERN_PROC_RLIMIT;
2162 len = sizeof(struct rlimit);
2163 error = sysctl(name, nitems(name), rlimit, &len, NULL, 0);
2164 if (error < 0 && errno != ESRCH) {
2165 warn("sysctl: kern.proc.rlimit: %d", pid);
2168 if (error < 0 || len != sizeof(struct rlimit))
2174 procstat_getrlimit_core(struct procstat_core *core, int which,
2175 struct rlimit* rlimit)
2178 struct rlimit* rlimits;
2180 if (which < 0 || which >= RLIM_NLIMITS) {
2182 warn("getrlimit: which");
2185 rlimits = procstat_core_get(core, PSC_TYPE_RLIMIT, NULL, &len);
2186 if (rlimits == NULL)
2188 if (len < sizeof(struct rlimit) * RLIM_NLIMITS) {
2192 *rlimit = rlimits[which];
2197 procstat_getrlimit(struct procstat *procstat, struct kinfo_proc *kp, int which,
2198 struct rlimit* rlimit)
2200 switch(procstat->type) {
2202 return (procstat_getrlimit_kvm(procstat->kd, kp, which,
2204 case PROCSTAT_SYSCTL:
2205 return (procstat_getrlimit_sysctl(kp->ki_pid, which, rlimit));
2207 return (procstat_getrlimit_core(procstat->core, which, rlimit));
2209 warnx("unknown access method: %d", procstat->type);
2215 procstat_getpathname_sysctl(pid_t pid, char *pathname, size_t maxlen)
2221 name[1] = KERN_PROC;
2222 name[2] = KERN_PROC_PATHNAME;
2225 error = sysctl(name, nitems(name), pathname, &len, NULL, 0);
2226 if (error != 0 && errno != ESRCH)
2227 warn("sysctl: kern.proc.pathname: %d", pid);
2234 procstat_getpathname_core(struct procstat_core *core, char *pathname,
2237 struct kinfo_file *files;
2240 files = kinfo_getfile_core(core, &cnt);
2244 for (i = 0; i < cnt; i++) {
2245 if (files[i].kf_fd != KF_FD_TYPE_TEXT)
2247 strncpy(pathname, files[i].kf_path, maxlen);
2256 procstat_getpathname(struct procstat *procstat, struct kinfo_proc *kp,
2257 char *pathname, size_t maxlen)
2259 switch(procstat->type) {
2261 /* XXX: Return empty string. */
2265 case PROCSTAT_SYSCTL:
2266 return (procstat_getpathname_sysctl(kp->ki_pid, pathname,
2269 return (procstat_getpathname_core(procstat->core, pathname,
2272 warnx("unknown access method: %d", procstat->type);
2278 procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp, int *osrelp)
2284 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2286 warnx("can't read proc struct at %p for pid %d",
2287 kp->ki_paddr, kp->ki_pid);
2290 *osrelp = proc.p_osrel;
2295 procstat_getosrel_sysctl(pid_t pid, int *osrelp)
2301 name[1] = KERN_PROC;
2302 name[2] = KERN_PROC_OSREL;
2304 len = sizeof(*osrelp);
2305 error = sysctl(name, nitems(name), osrelp, &len, NULL, 0);
2306 if (error != 0 && errno != ESRCH)
2307 warn("sysctl: kern.proc.osrel: %d", pid);
2312 procstat_getosrel_core(struct procstat_core *core, int *osrelp)
2317 buf = procstat_core_get(core, PSC_TYPE_OSREL, NULL, &len);
2320 if (len < sizeof(*osrelp)) {
2330 procstat_getosrel(struct procstat *procstat, struct kinfo_proc *kp, int *osrelp)
2332 switch(procstat->type) {
2334 return (procstat_getosrel_kvm(procstat->kd, kp, osrelp));
2335 case PROCSTAT_SYSCTL:
2336 return (procstat_getosrel_sysctl(kp->ki_pid, osrelp));
2338 return (procstat_getosrel_core(procstat->core, osrelp));
2340 warnx("unknown access method: %d", procstat->type);
2345 #define PROC_AUXV_MAX 256
2347 #if __ELF_WORD_SIZE == 64
2348 static const char *elf32_sv_names[] = {
2354 is_elf32_sysctl(pid_t pid)
2358 static char sv_name[256];
2361 name[1] = KERN_PROC;
2362 name[2] = KERN_PROC_SV_NAME;
2364 len = sizeof(sv_name);
2365 error = sysctl(name, nitems(name), sv_name, &len, NULL, 0);
2366 if (error != 0 || len == 0)
2368 for (i = 0; i < sizeof(elf32_sv_names) / sizeof(*elf32_sv_names); i++) {
2369 if (strncmp(sv_name, elf32_sv_names[i], sizeof(sv_name)) == 0)
2375 static Elf_Auxinfo *
2376 procstat_getauxv32_sysctl(pid_t pid, unsigned int *cntp)
2379 Elf32_Auxinfo *auxv32;
2382 unsigned int i, count;
2386 name[1] = KERN_PROC;
2387 name[2] = KERN_PROC_AUXV;
2389 len = PROC_AUXV_MAX * sizeof(Elf32_Auxinfo);
2391 auxv32 = malloc(len);
2392 if (auxv32 == NULL) {
2393 warn("malloc(%zu)", len);
2396 if (sysctl(name, nitems(name), auxv32, &len, NULL, 0) == -1) {
2397 if (errno != ESRCH && errno != EPERM)
2398 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2401 count = len / sizeof(Elf_Auxinfo);
2402 auxv = malloc(count * sizeof(Elf_Auxinfo));
2404 warn("malloc(%zu)", count * sizeof(Elf_Auxinfo));
2407 for (i = 0; i < count; i++) {
2409 * XXX: We expect that values for a_type on a 32-bit platform
2410 * are directly mapped to values on 64-bit one, which is not
2413 auxv[i].a_type = auxv32[i].a_type;
2414 ptr = &auxv32[i].a_un;
2415 auxv[i].a_un.a_val = *((uint32_t *)ptr);
2422 #endif /* __ELF_WORD_SIZE == 64 */
2424 static Elf_Auxinfo *
2425 procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp)
2431 #if __ELF_WORD_SIZE == 64
2432 if (is_elf32_sysctl(pid))
2433 return (procstat_getauxv32_sysctl(pid, cntp));
2436 name[1] = KERN_PROC;
2437 name[2] = KERN_PROC_AUXV;
2439 len = PROC_AUXV_MAX * sizeof(Elf_Auxinfo);
2442 warn("malloc(%zu)", len);
2445 if (sysctl(name, nitems(name), auxv, &len, NULL, 0) == -1) {
2446 if (errno != ESRCH && errno != EPERM)
2447 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2451 *cntp = len / sizeof(Elf_Auxinfo);
2455 static Elf_Auxinfo *
2456 procstat_getauxv_core(struct procstat_core *core, unsigned int *cntp)
2461 auxv = procstat_core_get(core, PSC_TYPE_AUXV, NULL, &len);
2464 *cntp = len / sizeof(Elf_Auxinfo);
2469 procstat_getauxv(struct procstat *procstat, struct kinfo_proc *kp,
2472 switch(procstat->type) {
2474 warnx("kvm method is not supported");
2476 case PROCSTAT_SYSCTL:
2477 return (procstat_getauxv_sysctl(kp->ki_pid, cntp));
2479 return (procstat_getauxv_core(procstat->core, cntp));
2481 warnx("unknown access method: %d", procstat->type);
2487 procstat_freeauxv(struct procstat *procstat __unused, Elf_Auxinfo *auxv)
2493 static struct ptrace_lwpinfo *
2494 procstat_getptlwpinfo_core(struct procstat_core *core, unsigned int *cntp)
2497 struct ptrace_lwpinfo *pl;
2501 cnt = procstat_core_note_count(core, PSC_TYPE_PTLWPINFO);
2505 len = cnt * sizeof(*pl);
2506 buf = calloc(1, len);
2507 pl = procstat_core_get(core, PSC_TYPE_PTLWPINFO, buf, &len);
2512 *cntp = len / sizeof(*pl);
2516 struct ptrace_lwpinfo *
2517 procstat_getptlwpinfo(struct procstat *procstat, unsigned int *cntp)
2519 switch (procstat->type) {
2521 warnx("kvm method is not supported");
2523 case PROCSTAT_SYSCTL:
2524 warnx("sysctl method is not supported");
2527 return (procstat_getptlwpinfo_core(procstat->core, cntp));
2529 warnx("unknown access method: %d", procstat->type);
2535 procstat_freeptlwpinfo(struct procstat *procstat __unused,
2536 struct ptrace_lwpinfo *pl)
2541 static struct kinfo_kstack *
2542 procstat_getkstack_sysctl(pid_t pid, int *cntp)
2544 struct kinfo_kstack *kkstp;
2549 name[1] = KERN_PROC;
2550 name[2] = KERN_PROC_KSTACK;
2554 error = sysctl(name, nitems(name), NULL, &len, NULL, 0);
2555 if (error < 0 && errno != ESRCH && errno != EPERM && errno != ENOENT) {
2556 warn("sysctl: kern.proc.kstack: %d", pid);
2559 if (error == -1 && errno == ENOENT) {
2560 warnx("sysctl: kern.proc.kstack unavailable"
2561 " (options DDB or options STACK required in kernel)");
2566 kkstp = malloc(len);
2567 if (kkstp == NULL) {
2568 warn("malloc(%zu)", len);
2571 if (sysctl(name, nitems(name), kkstp, &len, NULL, 0) == -1) {
2572 warn("sysctl: kern.proc.pid: %d", pid);
2576 *cntp = len / sizeof(*kkstp);
2581 struct kinfo_kstack *
2582 procstat_getkstack(struct procstat *procstat, struct kinfo_proc *kp,
2585 switch(procstat->type) {
2587 warnx("kvm method is not supported");
2589 case PROCSTAT_SYSCTL:
2590 return (procstat_getkstack_sysctl(kp->ki_pid, cntp));
2592 warnx("core method is not supported");
2595 warnx("unknown access method: %d", procstat->type);
2601 procstat_freekstack(struct procstat *procstat __unused,
2602 struct kinfo_kstack *kkstp)