2 * Copyright (c) 2009 Stanislav Sedov <stas@FreeBSD.org>
3 * Copyright (c) 1988, 1993
4 * The Regents of the University of California. All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. All advertising materials mentioning features or use of this software
15 * must display the following acknowledgement:
16 * This product includes software developed by the University of
17 * California, Berkeley and its contributors.
18 * 4. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
38 #include <sys/param.h>
41 #include <sys/resourcevar.h>
43 #include <sys/ucred.h>
48 #include <sys/vnode.h>
49 #include <sys/socket.h>
50 #include <sys/socketvar.h>
51 #include <sys/domain.h>
52 #include <sys/protosw.h>
54 #include <sys/unpcb.h>
55 #include <sys/sysctl.h>
57 #include <sys/filedesc.h>
58 #include <sys/queue.h>
65 #include <sys/mount.h>
67 #include <ufs/ufs/quota.h>
68 #include <ufs/ufs/inode.h>
69 #include <fs/devfs/devfs.h>
70 #include <fs/devfs/devfs_int.h>
72 #include <nfs/nfsproto.h>
73 #include <nfsclient/nfs.h>
74 #include <nfsclient/nfsnode.h>
77 #include <vm/vm_map.h>
78 #include <vm/vm_object.h>
80 #include <net/route.h>
81 #include <netinet/in.h>
82 #include <netinet/in_systm.h>
83 #include <netinet/ip.h>
84 #include <netinet/in_pcb.h>
102 #include <libprocstat.h>
103 #include "libprocstat_internal.h"
104 #include "common_kvm.h"
107 int statfs(const char *, struct statfs *); /* XXX */
109 #define PROCSTAT_KVM 1
110 #define PROCSTAT_SYSCTL 2
111 #define PROCSTAT_CORE 3
113 static char **getargv(struct procstat *procstat, struct kinfo_proc *kp,
114 size_t nchr, int env);
115 static char *getmnton(kvm_t *kd, struct mount *m);
116 static struct kinfo_vmentry * kinfo_getvmmap_core(struct procstat_core *core,
118 static Elf_Auxinfo *procstat_getauxv_core(struct procstat_core *core,
120 static Elf_Auxinfo *procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp);
121 static struct filestat_list *procstat_getfiles_kvm(
122 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
123 static struct filestat_list *procstat_getfiles_sysctl(
124 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
125 static int procstat_get_pipe_info_sysctl(struct filestat *fst,
126 struct pipestat *pipe, char *errbuf);
127 static int procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
128 struct pipestat *pipe, char *errbuf);
129 static int procstat_get_pts_info_sysctl(struct filestat *fst,
130 struct ptsstat *pts, char *errbuf);
131 static int procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
132 struct ptsstat *pts, char *errbuf);
133 static int procstat_get_sem_info_sysctl(struct filestat *fst,
134 struct semstat *sem, char *errbuf);
135 static int procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
136 struct semstat *sem, char *errbuf);
137 static int procstat_get_shm_info_sysctl(struct filestat *fst,
138 struct shmstat *shm, char *errbuf);
139 static int procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
140 struct shmstat *shm, char *errbuf);
141 static int procstat_get_socket_info_sysctl(struct filestat *fst,
142 struct sockstat *sock, char *errbuf);
143 static int procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
144 struct sockstat *sock, char *errbuf);
145 static int to_filestat_flags(int flags);
146 static int procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
147 struct vnstat *vn, char *errbuf);
148 static int procstat_get_vnode_info_sysctl(struct filestat *fst,
149 struct vnstat *vn, char *errbuf);
150 static gid_t *procstat_getgroups_core(struct procstat_core *core,
151 unsigned int *count);
152 static gid_t * procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp,
153 unsigned int *count);
154 static gid_t *procstat_getgroups_sysctl(pid_t pid, unsigned int *count);
155 static struct kinfo_kstack *procstat_getkstack_sysctl(pid_t pid,
157 static int procstat_getosrel_core(struct procstat_core *core,
159 static int procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp,
161 static int procstat_getosrel_sysctl(pid_t pid, int *osrelp);
162 static int procstat_getpathname_core(struct procstat_core *core,
163 char *pathname, size_t maxlen);
164 static int procstat_getpathname_sysctl(pid_t pid, char *pathname,
166 static int procstat_getrlimit_core(struct procstat_core *core, int which,
167 struct rlimit* rlimit);
168 static int procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp,
169 int which, struct rlimit* rlimit);
170 static int procstat_getrlimit_sysctl(pid_t pid, int which,
171 struct rlimit* rlimit);
172 static int procstat_getumask_core(struct procstat_core *core,
173 unsigned short *maskp);
174 static int procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp,
175 unsigned short *maskp);
176 static int procstat_getumask_sysctl(pid_t pid, unsigned short *maskp);
177 static int vntype2psfsttype(int type);
180 procstat_close(struct procstat *procstat)
184 if (procstat->type == PROCSTAT_KVM)
185 kvm_close(procstat->kd);
186 else if (procstat->type == PROCSTAT_CORE)
187 procstat_core_close(procstat->core);
188 procstat_freeargv(procstat);
189 procstat_freeenvv(procstat);
194 procstat_open_sysctl(void)
196 struct procstat *procstat;
198 procstat = calloc(1, sizeof(*procstat));
199 if (procstat == NULL) {
203 procstat->type = PROCSTAT_SYSCTL;
208 procstat_open_kvm(const char *nlistf, const char *memf)
210 struct procstat *procstat;
212 char buf[_POSIX2_LINE_MAX];
214 procstat = calloc(1, sizeof(*procstat));
215 if (procstat == NULL) {
219 kd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
221 warnx("kvm_openfiles(): %s", buf);
225 procstat->type = PROCSTAT_KVM;
231 procstat_open_core(const char *filename)
233 struct procstat *procstat;
234 struct procstat_core *core;
236 procstat = calloc(1, sizeof(*procstat));
237 if (procstat == NULL) {
241 core = procstat_core_open(filename);
246 procstat->type = PROCSTAT_CORE;
247 procstat->core = core;
252 procstat_getprocs(struct procstat *procstat, int what, int arg,
255 struct kinfo_proc *p0, *p;
264 if (procstat->type == PROCSTAT_KVM) {
266 p0 = kvm_getprocs(procstat->kd, what, arg, &cnt);
267 if (p0 == NULL || cnt <= 0)
270 len = *count * sizeof(*p);
273 warnx("malloc(%zu)", len);
278 } else if (procstat->type == PROCSTAT_SYSCTL) {
284 error = sysctl(name, 4, NULL, &len, NULL, 0);
285 if (error < 0 && errno != EPERM) {
286 warn("sysctl(kern.proc)");
290 warnx("no processes?");
295 warnx("malloc(%zu)", len);
298 error = sysctl(name, 4, p, &len, NULL, 0);
299 if (error < 0 && errno != EPERM) {
300 warn("sysctl(kern.proc)");
303 /* Perform simple consistency checks. */
304 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
305 warnx("kinfo_proc structure size mismatch (len = %zu)", len);
308 *count = len / sizeof(*p);
310 } else if (procstat->type == PROCSTAT_CORE) {
311 p = procstat_core_get(procstat->core, PSC_TYPE_PROC, NULL,
313 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
314 warnx("kinfo_proc structure size mismatch");
317 *count = len / sizeof(*p);
320 warnx("unknown access method: %d", procstat->type);
330 procstat_freeprocs(struct procstat *procstat __unused, struct kinfo_proc *p)
338 struct filestat_list *
339 procstat_getfiles(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
342 switch(procstat->type) {
344 return (procstat_getfiles_kvm(procstat, kp, mmapped));
345 case PROCSTAT_SYSCTL:
347 return (procstat_getfiles_sysctl(procstat, kp, mmapped));
349 warnx("unknown access method: %d", procstat->type);
355 procstat_freefiles(struct procstat *procstat, struct filestat_list *head)
357 struct filestat *fst, *tmp;
359 STAILQ_FOREACH_SAFE(fst, head, next, tmp) {
360 if (fst->fs_path != NULL)
365 if (procstat->vmentries != NULL) {
366 free(procstat->vmentries);
367 procstat->vmentries = NULL;
369 if (procstat->files != NULL) {
370 free(procstat->files);
371 procstat->files = NULL;
375 static struct filestat *
376 filestat_new_entry(void *typedep, int type, int fd, int fflags, int uflags,
377 int refcount, off_t offset, char *path, cap_rights_t cap_rights)
379 struct filestat *entry;
381 entry = calloc(1, sizeof(*entry));
386 entry->fs_typedep = typedep;
387 entry->fs_fflags = fflags;
388 entry->fs_uflags = uflags;
390 entry->fs_type = type;
391 entry->fs_ref_count = refcount;
392 entry->fs_offset = offset;
393 entry->fs_path = path;
394 entry->fs_cap_rights = cap_rights;
398 static struct vnode *
399 getctty(kvm_t *kd, struct kinfo_proc *kp)
407 error = kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
410 warnx("can't read proc struct at %p for pid %d",
411 kp->ki_paddr, kp->ki_pid);
414 if (proc.p_pgrp == NULL)
416 error = kvm_read_all(kd, (unsigned long)proc.p_pgrp, &pgrp,
419 warnx("can't read pgrp struct at %p for pid %d",
420 proc.p_pgrp, kp->ki_pid);
423 error = kvm_read_all(kd, (unsigned long)pgrp.pg_session, &sess,
426 warnx("can't read session struct at %p for pid %d",
427 pgrp.pg_session, kp->ki_pid);
430 return (sess.s_ttyvp);
433 static struct filestat_list *
434 procstat_getfiles_kvm(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
437 struct filedesc filed;
438 struct vm_map_entry vmentry;
439 struct vm_object object;
440 struct vmspace vmspace;
441 vm_map_entry_t entryp;
445 struct file **ofiles;
446 struct filestat *entry;
447 struct filestat_list *head;
458 if (kp->ki_fd == NULL)
460 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &filed,
462 warnx("can't read filedesc at %p", (void *)kp->ki_fd);
467 * Allocate list head.
469 head = malloc(sizeof(*head));
474 /* root directory vnode, if one. */
476 entry = filestat_new_entry(filed.fd_rdir, PS_FST_TYPE_VNODE, -1,
477 PS_FST_FFLAG_READ, PS_FST_UFLAG_RDIR, 0, 0, NULL, 0);
479 STAILQ_INSERT_TAIL(head, entry, next);
481 /* current working directory vnode. */
483 entry = filestat_new_entry(filed.fd_cdir, PS_FST_TYPE_VNODE, -1,
484 PS_FST_FFLAG_READ, PS_FST_UFLAG_CDIR, 0, 0, NULL, 0);
486 STAILQ_INSERT_TAIL(head, entry, next);
488 /* jail root, if any. */
490 entry = filestat_new_entry(filed.fd_jdir, PS_FST_TYPE_VNODE, -1,
491 PS_FST_FFLAG_READ, PS_FST_UFLAG_JAIL, 0, 0, NULL, 0);
493 STAILQ_INSERT_TAIL(head, entry, next);
495 /* ktrace vnode, if one */
497 entry = filestat_new_entry(kp->ki_tracep, PS_FST_TYPE_VNODE, -1,
498 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
499 PS_FST_UFLAG_TRACE, 0, 0, NULL, 0);
501 STAILQ_INSERT_TAIL(head, entry, next);
503 /* text vnode, if one */
505 entry = filestat_new_entry(kp->ki_textvp, PS_FST_TYPE_VNODE, -1,
506 PS_FST_FFLAG_READ, PS_FST_UFLAG_TEXT, 0, 0, NULL, 0);
508 STAILQ_INSERT_TAIL(head, entry, next);
510 /* Controlling terminal. */
511 if ((vp = getctty(kd, kp)) != NULL) {
512 entry = filestat_new_entry(vp, PS_FST_TYPE_VNODE, -1,
513 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
514 PS_FST_UFLAG_CTTY, 0, 0, NULL, 0);
516 STAILQ_INSERT_TAIL(head, entry, next);
519 nfiles = filed.fd_lastfile + 1;
520 ofiles = malloc(nfiles * sizeof(struct file *));
521 if (ofiles == NULL) {
522 warn("malloc(%zu)", nfiles * sizeof(struct file *));
525 if (!kvm_read_all(kd, (unsigned long)filed.fd_ofiles, ofiles,
526 nfiles * sizeof(struct file *))) {
527 warnx("cannot read file structures at %p",
528 (void *)filed.fd_ofiles);
532 for (i = 0; i <= filed.fd_lastfile; i++) {
533 if (ofiles[i] == NULL)
535 if (!kvm_read_all(kd, (unsigned long)ofiles[i], &file,
536 sizeof(struct file))) {
537 warnx("can't read file %d at %p", i,
541 switch (file.f_type) {
543 type = PS_FST_TYPE_VNODE;
547 type = PS_FST_TYPE_SOCKET;
551 type = PS_FST_TYPE_PIPE;
555 type = PS_FST_TYPE_FIFO;
560 type = PS_FST_TYPE_PTS;
565 type = PS_FST_TYPE_SEM;
569 type = PS_FST_TYPE_SHM;
575 /* XXXRW: No capability rights support for kvm yet. */
576 entry = filestat_new_entry(data, type, i,
577 to_filestat_flags(file.f_flag), 0, 0, 0, NULL, 0);
579 STAILQ_INSERT_TAIL(head, entry, next);
586 * Process mmapped files if requested.
589 if (!kvm_read_all(kd, (unsigned long)kp->ki_vmspace, &vmspace,
591 warnx("can't read vmspace at %p",
592 (void *)kp->ki_vmspace);
595 map = &vmspace.vm_map;
597 for (entryp = map->header.next;
598 entryp != &kp->ki_vmspace->vm_map.header;
599 entryp = vmentry.next) {
600 if (!kvm_read_all(kd, (unsigned long)entryp, &vmentry,
602 warnx("can't read vm_map_entry at %p",
606 if (vmentry.eflags & MAP_ENTRY_IS_SUB_MAP)
608 if ((objp = vmentry.object.vm_object) == NULL)
610 for (; objp; objp = object.backing_object) {
611 if (!kvm_read_all(kd, (unsigned long)objp,
612 &object, sizeof(object))) {
613 warnx("can't read vm_object at %p",
619 /* We want only vnode objects. */
620 if (object.type != OBJT_VNODE)
623 prot = vmentry.protection;
625 if (prot & VM_PROT_READ)
626 fflags = PS_FST_FFLAG_READ;
627 if ((vmentry.eflags & MAP_ENTRY_COW) == 0 &&
628 prot & VM_PROT_WRITE)
629 fflags |= PS_FST_FFLAG_WRITE;
632 * Create filestat entry.
634 entry = filestat_new_entry(object.handle,
635 PS_FST_TYPE_VNODE, -1, fflags,
636 PS_FST_UFLAG_MMAP, 0, 0, NULL, 0);
638 STAILQ_INSERT_TAIL(head, entry, next);
646 * kinfo types to filestat translation.
649 kinfo_type2fst(int kftype)
655 { KF_TYPE_CRYPTO, PS_FST_TYPE_CRYPTO },
656 { KF_TYPE_FIFO, PS_FST_TYPE_FIFO },
657 { KF_TYPE_KQUEUE, PS_FST_TYPE_KQUEUE },
658 { KF_TYPE_MQUEUE, PS_FST_TYPE_MQUEUE },
659 { KF_TYPE_NONE, PS_FST_TYPE_NONE },
660 { KF_TYPE_PIPE, PS_FST_TYPE_PIPE },
661 { KF_TYPE_PTS, PS_FST_TYPE_PTS },
662 { KF_TYPE_SEM, PS_FST_TYPE_SEM },
663 { KF_TYPE_SHM, PS_FST_TYPE_SHM },
664 { KF_TYPE_SOCKET, PS_FST_TYPE_SOCKET },
665 { KF_TYPE_VNODE, PS_FST_TYPE_VNODE },
666 { KF_TYPE_UNKNOWN, PS_FST_TYPE_UNKNOWN }
668 #define NKFTYPES (sizeof(kftypes2fst) / sizeof(*kftypes2fst))
671 for (i = 0; i < NKFTYPES; i++)
672 if (kftypes2fst[i].kf_type == kftype)
675 return (PS_FST_TYPE_UNKNOWN);
676 return (kftypes2fst[i].fst_type);
680 * kinfo flags to filestat translation.
683 kinfo_fflags2fst(int kfflags)
689 { KF_FLAG_APPEND, PS_FST_FFLAG_APPEND },
690 { KF_FLAG_ASYNC, PS_FST_FFLAG_ASYNC },
691 { KF_FLAG_CREAT, PS_FST_FFLAG_CREAT },
692 { KF_FLAG_DIRECT, PS_FST_FFLAG_DIRECT },
693 { KF_FLAG_EXCL, PS_FST_FFLAG_EXCL },
694 { KF_FLAG_EXEC, PS_FST_FFLAG_EXEC },
695 { KF_FLAG_EXLOCK, PS_FST_FFLAG_EXLOCK },
696 { KF_FLAG_FSYNC, PS_FST_FFLAG_SYNC },
697 { KF_FLAG_HASLOCK, PS_FST_FFLAG_HASLOCK },
698 { KF_FLAG_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
699 { KF_FLAG_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
700 { KF_FLAG_READ, PS_FST_FFLAG_READ },
701 { KF_FLAG_SHLOCK, PS_FST_FFLAG_SHLOCK },
702 { KF_FLAG_TRUNC, PS_FST_FFLAG_TRUNC },
703 { KF_FLAG_WRITE, PS_FST_FFLAG_WRITE }
705 #define NKFFLAGS (sizeof(kfflags2fst) / sizeof(*kfflags2fst))
710 for (i = 0; i < NKFFLAGS; i++)
711 if ((kfflags & kfflags2fst[i].kf_flag) != 0)
712 flags |= kfflags2fst[i].fst_flag;
717 kinfo_uflags2fst(int fd)
721 case KF_FD_TYPE_CTTY:
722 return (PS_FST_UFLAG_CTTY);
724 return (PS_FST_UFLAG_CDIR);
725 case KF_FD_TYPE_JAIL:
726 return (PS_FST_UFLAG_JAIL);
727 case KF_FD_TYPE_TEXT:
728 return (PS_FST_UFLAG_TEXT);
729 case KF_FD_TYPE_TRACE:
730 return (PS_FST_UFLAG_TRACE);
731 case KF_FD_TYPE_ROOT:
732 return (PS_FST_UFLAG_RDIR);
737 static struct kinfo_file *
738 kinfo_getfile_core(struct procstat_core *core, int *cntp)
743 struct kinfo_file *kif, *kp, *kf;
745 buf = procstat_core_get(core, PSC_TYPE_FILES, NULL, &len);
749 * XXXMG: The code below is just copy&past from libutil.
750 * The code duplication can be avoided if libutil
751 * is extended to provide something like:
752 * struct kinfo_file *kinfo_getfile_from_buf(const char *buf,
753 * size_t len, int *cntp);
756 /* Pass 1: count items */
761 kf = (struct kinfo_file *)(uintptr_t)bp;
762 bp += kf->kf_structsize;
766 kif = calloc(cnt, sizeof(*kif));
776 kf = (struct kinfo_file *)(uintptr_t)bp;
777 /* Copy/expand into pre-zeroed buffer */
778 memcpy(kp, kf, kf->kf_structsize);
779 /* Advance to next packed record */
780 bp += kf->kf_structsize;
781 /* Set field size to fixed length, advance */
782 kp->kf_structsize = sizeof(*kp);
787 return (kif); /* Caller must free() return value */
790 static struct filestat_list *
791 procstat_getfiles_sysctl(struct procstat *procstat, struct kinfo_proc *kp,
794 struct kinfo_file *kif, *files;
795 struct kinfo_vmentry *kve, *vmentries;
796 struct filestat_list *head;
797 struct filestat *entry;
803 cap_rights_t cap_rights;
806 if (kp->ki_fd == NULL)
808 switch(procstat->type) {
809 case PROCSTAT_SYSCTL:
810 files = kinfo_getfile(kp->ki_pid, &cnt);
813 files = kinfo_getfile_core(procstat->core, &cnt);
816 assert(!"invalid type");
818 if (files == NULL && errno != EPERM) {
819 warn("kinfo_getfile()");
822 procstat->files = files;
825 * Allocate list head.
827 head = malloc(sizeof(*head));
831 for (i = 0; i < cnt; i++) {
834 type = kinfo_type2fst(kif->kf_type);
835 fd = kif->kf_fd >= 0 ? kif->kf_fd : -1;
836 fflags = kinfo_fflags2fst(kif->kf_flags);
837 uflags = kinfo_uflags2fst(kif->kf_fd);
838 refcount = kif->kf_ref_count;
839 offset = kif->kf_offset;
840 if (*kif->kf_path != '\0')
841 path = strdup(kif->kf_path);
844 cap_rights = kif->kf_cap_rights;
847 * Create filestat entry.
849 entry = filestat_new_entry(kif, type, fd, fflags, uflags,
850 refcount, offset, path, cap_rights);
852 STAILQ_INSERT_TAIL(head, entry, next);
855 vmentries = procstat_getvmmap(procstat, kp, &cnt);
856 procstat->vmentries = vmentries;
857 if (vmentries == NULL || cnt == 0)
859 for (i = 0; i < cnt; i++) {
861 if (kve->kve_type != KVME_TYPE_VNODE)
864 if (kve->kve_protection & KVME_PROT_READ)
865 fflags = PS_FST_FFLAG_READ;
866 if ((kve->kve_flags & KVME_FLAG_COW) == 0 &&
867 kve->kve_protection & KVME_PROT_WRITE)
868 fflags |= PS_FST_FFLAG_WRITE;
869 offset = kve->kve_offset;
870 refcount = kve->kve_ref_count;
871 if (*kve->kve_path != '\0')
872 path = strdup(kve->kve_path);
875 entry = filestat_new_entry(kve, PS_FST_TYPE_VNODE, -1,
876 fflags, PS_FST_UFLAG_MMAP, refcount, offset, path,
879 STAILQ_INSERT_TAIL(head, entry, next);
887 procstat_get_pipe_info(struct procstat *procstat, struct filestat *fst,
888 struct pipestat *ps, char *errbuf)
892 if (procstat->type == PROCSTAT_KVM) {
893 return (procstat_get_pipe_info_kvm(procstat->kd, fst, ps,
895 } else if (procstat->type == PROCSTAT_SYSCTL ||
896 procstat->type == PROCSTAT_CORE) {
897 return (procstat_get_pipe_info_sysctl(fst, ps, errbuf));
899 warnx("unknown access method: %d", procstat->type);
900 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
906 procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
907 struct pipestat *ps, char *errbuf)
915 bzero(ps, sizeof(*ps));
916 pipep = fst->fs_typedep;
919 if (!kvm_read_all(kd, (unsigned long)pipep, &pi, sizeof(struct pipe))) {
920 warnx("can't read pipe at %p", (void *)pipep);
923 ps->addr = (uintptr_t)pipep;
924 ps->peer = (uintptr_t)pi.pipe_peer;
925 ps->buffer_cnt = pi.pipe_buffer.cnt;
929 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
934 procstat_get_pipe_info_sysctl(struct filestat *fst, struct pipestat *ps,
935 char *errbuf __unused)
937 struct kinfo_file *kif;
941 bzero(ps, sizeof(*ps));
942 kif = fst->fs_typedep;
945 ps->addr = kif->kf_un.kf_pipe.kf_pipe_addr;
946 ps->peer = kif->kf_un.kf_pipe.kf_pipe_peer;
947 ps->buffer_cnt = kif->kf_un.kf_pipe.kf_pipe_buffer_cnt;
952 procstat_get_pts_info(struct procstat *procstat, struct filestat *fst,
953 struct ptsstat *pts, char *errbuf)
957 if (procstat->type == PROCSTAT_KVM) {
958 return (procstat_get_pts_info_kvm(procstat->kd, fst, pts,
960 } else if (procstat->type == PROCSTAT_SYSCTL ||
961 procstat->type == PROCSTAT_CORE) {
962 return (procstat_get_pts_info_sysctl(fst, pts, errbuf));
964 warnx("unknown access method: %d", procstat->type);
965 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
971 procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
972 struct ptsstat *pts, char *errbuf)
980 bzero(pts, sizeof(*pts));
981 ttyp = fst->fs_typedep;
984 if (!kvm_read_all(kd, (unsigned long)ttyp, &tty, sizeof(struct tty))) {
985 warnx("can't read tty at %p", (void *)ttyp);
988 pts->dev = dev2udev(kd, tty.t_dev);
989 (void)kdevtoname(kd, tty.t_dev, pts->devname);
993 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
998 procstat_get_pts_info_sysctl(struct filestat *fst, struct ptsstat *pts,
999 char *errbuf __unused)
1001 struct kinfo_file *kif;
1005 bzero(pts, sizeof(*pts));
1006 kif = fst->fs_typedep;
1009 pts->dev = kif->kf_un.kf_pts.kf_pts_dev;
1010 strlcpy(pts->devname, kif->kf_path, sizeof(pts->devname));
1015 procstat_get_sem_info(struct procstat *procstat, struct filestat *fst,
1016 struct semstat *sem, char *errbuf)
1020 if (procstat->type == PROCSTAT_KVM) {
1021 return (procstat_get_sem_info_kvm(procstat->kd, fst, sem,
1023 } else if (procstat->type == PROCSTAT_SYSCTL ||
1024 procstat->type == PROCSTAT_CORE) {
1025 return (procstat_get_sem_info_sysctl(fst, sem, errbuf));
1027 warnx("unknown access method: %d", procstat->type);
1028 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1034 procstat_get_sem_info_kvm(kvm_t *kd, struct filestat *fst,
1035 struct semstat *sem, char *errbuf)
1045 bzero(sem, sizeof(*sem));
1046 ksemp = fst->fs_typedep;
1049 if (!kvm_read_all(kd, (unsigned long)ksemp, &ksem,
1050 sizeof(struct ksem))) {
1051 warnx("can't read ksem at %p", (void *)ksemp);
1054 sem->mode = S_IFREG | ksem.ks_mode;
1055 sem->value = ksem.ks_value;
1056 if (fst->fs_path == NULL && ksem.ks_path != NULL) {
1057 path = malloc(MAXPATHLEN);
1058 for (i = 0; i < MAXPATHLEN - 1; i++) {
1059 if (!kvm_read_all(kd, (unsigned long)ksem.ks_path + i,
1062 if (path[i] == '\0')
1069 fst->fs_path = path;
1074 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1079 procstat_get_sem_info_sysctl(struct filestat *fst, struct semstat *sem,
1080 char *errbuf __unused)
1082 struct kinfo_file *kif;
1086 bzero(sem, sizeof(*sem));
1087 kif = fst->fs_typedep;
1090 sem->value = kif->kf_un.kf_sem.kf_sem_value;
1091 sem->mode = kif->kf_un.kf_sem.kf_sem_mode;
1096 procstat_get_shm_info(struct procstat *procstat, struct filestat *fst,
1097 struct shmstat *shm, char *errbuf)
1101 if (procstat->type == PROCSTAT_KVM) {
1102 return (procstat_get_shm_info_kvm(procstat->kd, fst, shm,
1104 } else if (procstat->type == PROCSTAT_SYSCTL ||
1105 procstat->type == PROCSTAT_CORE) {
1106 return (procstat_get_shm_info_sysctl(fst, shm, errbuf));
1108 warnx("unknown access method: %d", procstat->type);
1109 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1115 procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
1116 struct shmstat *shm, char *errbuf)
1126 bzero(shm, sizeof(*shm));
1127 shmfdp = fst->fs_typedep;
1130 if (!kvm_read_all(kd, (unsigned long)shmfdp, &shmfd,
1131 sizeof(struct shmfd))) {
1132 warnx("can't read shmfd at %p", (void *)shmfdp);
1135 shm->mode = S_IFREG | shmfd.shm_mode;
1136 shm->size = shmfd.shm_size;
1137 if (fst->fs_path == NULL && shmfd.shm_path != NULL) {
1138 path = malloc(MAXPATHLEN);
1139 for (i = 0; i < MAXPATHLEN - 1; i++) {
1140 if (!kvm_read_all(kd, (unsigned long)shmfd.shm_path + i,
1143 if (path[i] == '\0')
1150 fst->fs_path = path;
1155 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1160 procstat_get_shm_info_sysctl(struct filestat *fst, struct shmstat *shm,
1161 char *errbuf __unused)
1163 struct kinfo_file *kif;
1167 bzero(shm, sizeof(*shm));
1168 kif = fst->fs_typedep;
1171 shm->size = kif->kf_un.kf_file.kf_file_size;
1172 shm->mode = kif->kf_un.kf_file.kf_file_mode;
1177 procstat_get_vnode_info(struct procstat *procstat, struct filestat *fst,
1178 struct vnstat *vn, char *errbuf)
1182 if (procstat->type == PROCSTAT_KVM) {
1183 return (procstat_get_vnode_info_kvm(procstat->kd, fst, vn,
1185 } else if (procstat->type == PROCSTAT_SYSCTL ||
1186 procstat->type == PROCSTAT_CORE) {
1187 return (procstat_get_vnode_info_sysctl(fst, vn, errbuf));
1189 warnx("unknown access method: %d", procstat->type);
1190 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1196 procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
1197 struct vnstat *vn, char *errbuf)
1199 /* Filesystem specific handlers. */
1200 #define FSTYPE(fst) {#fst, fst##_filestat}
1203 int (*handler)(kvm_t *kd, struct vnode *vp,
1212 #ifdef LIBPROCSTAT_ZFS
1216 #define NTYPES (sizeof(fstypes) / sizeof(*fstypes))
1226 vp = fst->fs_typedep;
1229 error = kvm_read_all(kd, (unsigned long)vp, &vnode, sizeof(vnode));
1231 warnx("can't read vnode at %p", (void *)vp);
1234 bzero(vn, sizeof(*vn));
1235 vn->vn_type = vntype2psfsttype(vnode.v_type);
1236 if (vnode.v_type == VNON || vnode.v_type == VBAD)
1238 error = kvm_read_all(kd, (unsigned long)vnode.v_tag, tagstr,
1241 warnx("can't read v_tag at %p", (void *)vp);
1244 tagstr[sizeof(tagstr) - 1] = '\0';
1247 * Find appropriate handler.
1249 for (i = 0, found = 0; i < NTYPES; i++)
1250 if (!strcmp(fstypes[i].tag, tagstr)) {
1251 if (fstypes[i].handler(kd, &vnode, vn) != 0) {
1257 snprintf(errbuf, _POSIX2_LINE_MAX, "?(%s)", tagstr);
1260 vn->vn_mntdir = getmnton(kd, vnode.v_mount);
1261 if ((vnode.v_type == VBLK || vnode.v_type == VCHR) &&
1262 vnode.v_rdev != NULL){
1263 vn->vn_dev = dev2udev(kd, vnode.v_rdev);
1264 (void)kdevtoname(kd, vnode.v_rdev, vn->vn_devname);
1271 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1276 * kinfo vnode type to filestat translation.
1279 kinfo_vtype2fst(int kfvtype)
1284 } kfvtypes2fst[] = {
1285 { KF_VTYPE_VBAD, PS_FST_VTYPE_VBAD },
1286 { KF_VTYPE_VBLK, PS_FST_VTYPE_VBLK },
1287 { KF_VTYPE_VCHR, PS_FST_VTYPE_VCHR },
1288 { KF_VTYPE_VDIR, PS_FST_VTYPE_VDIR },
1289 { KF_VTYPE_VFIFO, PS_FST_VTYPE_VFIFO },
1290 { KF_VTYPE_VLNK, PS_FST_VTYPE_VLNK },
1291 { KF_VTYPE_VNON, PS_FST_VTYPE_VNON },
1292 { KF_VTYPE_VREG, PS_FST_VTYPE_VREG },
1293 { KF_VTYPE_VSOCK, PS_FST_VTYPE_VSOCK }
1295 #define NKFVTYPES (sizeof(kfvtypes2fst) / sizeof(*kfvtypes2fst))
1298 for (i = 0; i < NKFVTYPES; i++)
1299 if (kfvtypes2fst[i].kf_vtype == kfvtype)
1302 return (PS_FST_VTYPE_UNKNOWN);
1303 return (kfvtypes2fst[i].fst_vtype);
1307 procstat_get_vnode_info_sysctl(struct filestat *fst, struct vnstat *vn,
1310 struct statfs stbuf;
1311 struct kinfo_file *kif;
1312 struct kinfo_vmentry *kve;
1324 bzero(vn, sizeof(*vn));
1325 if (fst->fs_typedep == NULL)
1327 if (fst->fs_uflags & PS_FST_UFLAG_MMAP) {
1328 kve = fst->fs_typedep;
1329 fileid = kve->kve_vn_fileid;
1330 fsid = kve->kve_vn_fsid;
1331 mode = kve->kve_vn_mode;
1332 path = kve->kve_path;
1333 rdev = kve->kve_vn_rdev;
1334 size = kve->kve_vn_size;
1335 vntype = kinfo_vtype2fst(kve->kve_vn_type);
1336 status = kve->kve_status;
1338 kif = fst->fs_typedep;
1339 fileid = kif->kf_un.kf_file.kf_file_fileid;
1340 fsid = kif->kf_un.kf_file.kf_file_fsid;
1341 mode = kif->kf_un.kf_file.kf_file_mode;
1342 path = kif->kf_path;
1343 rdev = kif->kf_un.kf_file.kf_file_rdev;
1344 size = kif->kf_un.kf_file.kf_file_size;
1345 vntype = kinfo_vtype2fst(kif->kf_vnode_type);
1346 status = kif->kf_status;
1348 vn->vn_type = vntype;
1349 if (vntype == PS_FST_VTYPE_VNON || vntype == PS_FST_VTYPE_VBAD)
1351 if ((status & KF_ATTR_VALID) == 0) {
1352 snprintf(errbuf, _POSIX2_LINE_MAX, "? (no info available)");
1355 if (path && *path) {
1356 statfs(path, &stbuf);
1357 vn->vn_mntdir = strdup(stbuf.f_mntonname);
1359 vn->vn_mntdir = strdup("-");
1361 if (vntype == PS_FST_VTYPE_VBLK) {
1362 name = devname(rdev, S_IFBLK);
1364 strlcpy(vn->vn_devname, name,
1365 sizeof(vn->vn_devname));
1366 } else if (vntype == PS_FST_VTYPE_VCHR) {
1367 name = devname(vn->vn_dev, S_IFCHR);
1369 strlcpy(vn->vn_devname, name,
1370 sizeof(vn->vn_devname));
1373 vn->vn_fileid = fileid;
1380 procstat_get_socket_info(struct procstat *procstat, struct filestat *fst,
1381 struct sockstat *sock, char *errbuf)
1385 if (procstat->type == PROCSTAT_KVM) {
1386 return (procstat_get_socket_info_kvm(procstat->kd, fst, sock,
1388 } else if (procstat->type == PROCSTAT_SYSCTL ||
1389 procstat->type == PROCSTAT_CORE) {
1390 return (procstat_get_socket_info_sysctl(fst, sock, errbuf));
1392 warnx("unknown access method: %d", procstat->type);
1393 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1399 procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
1400 struct sockstat *sock, char *errbuf)
1404 struct protosw proto;
1413 bzero(sock, sizeof(*sock));
1414 so = fst->fs_typedep;
1417 sock->so_addr = (uintptr_t)so;
1418 /* fill in socket */
1419 if (!kvm_read_all(kd, (unsigned long)so, &s,
1420 sizeof(struct socket))) {
1421 warnx("can't read sock at %p", (void *)so);
1424 /* fill in protosw entry */
1425 if (!kvm_read_all(kd, (unsigned long)s.so_proto, &proto,
1426 sizeof(struct protosw))) {
1427 warnx("can't read protosw at %p", (void *)s.so_proto);
1430 /* fill in domain */
1431 if (!kvm_read_all(kd, (unsigned long)proto.pr_domain, &dom,
1432 sizeof(struct domain))) {
1433 warnx("can't read domain at %p",
1434 (void *)proto.pr_domain);
1437 if ((len = kvm_read(kd, (unsigned long)dom.dom_name, sock->dname,
1438 sizeof(sock->dname) - 1)) < 0) {
1439 warnx("can't read domain name at %p", (void *)dom.dom_name);
1440 sock->dname[0] = '\0';
1443 sock->dname[len] = '\0';
1446 * Fill in known data.
1448 sock->type = s.so_type;
1449 sock->proto = proto.pr_protocol;
1450 sock->dom_family = dom.dom_family;
1451 sock->so_pcb = (uintptr_t)s.so_pcb;
1454 * Protocol specific data.
1456 switch(dom.dom_family) {
1459 if (proto.pr_protocol == IPPROTO_TCP) {
1461 if (kvm_read(kd, (u_long)s.so_pcb,
1462 (char *)&inpcb, sizeof(struct inpcb))
1463 != sizeof(struct inpcb)) {
1464 warnx("can't read inpcb at %p",
1468 (uintptr_t)inpcb.inp_ppcb;
1474 if (kvm_read(kd, (u_long)s.so_pcb, (char *)&unpcb,
1475 sizeof(struct unpcb)) != sizeof(struct unpcb)){
1476 warnx("can't read unpcb at %p",
1478 } else if (unpcb.unp_conn) {
1479 sock->so_rcv_sb_state = s.so_rcv.sb_state;
1480 sock->so_snd_sb_state = s.so_snd.sb_state;
1481 sock->unp_conn = (uintptr_t)unpcb.unp_conn;
1491 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1496 procstat_get_socket_info_sysctl(struct filestat *fst, struct sockstat *sock,
1497 char *errbuf __unused)
1499 struct kinfo_file *kif;
1503 bzero(sock, sizeof(*sock));
1504 kif = fst->fs_typedep;
1509 * Fill in known data.
1511 sock->type = kif->kf_sock_type;
1512 sock->proto = kif->kf_sock_protocol;
1513 sock->dom_family = kif->kf_sock_domain;
1514 sock->so_pcb = kif->kf_un.kf_sock.kf_sock_pcb;
1515 strlcpy(sock->dname, kif->kf_path, sizeof(sock->dname));
1516 bcopy(&kif->kf_sa_local, &sock->sa_local, kif->kf_sa_local.ss_len);
1517 bcopy(&kif->kf_sa_peer, &sock->sa_peer, kif->kf_sa_peer.ss_len);
1520 * Protocol specific data.
1522 switch(sock->dom_family) {
1525 if (sock->proto == IPPROTO_TCP)
1526 sock->inp_ppcb = kif->kf_un.kf_sock.kf_sock_inpcb;
1529 if (kif->kf_un.kf_sock.kf_sock_unpconn != 0) {
1530 sock->so_rcv_sb_state =
1531 kif->kf_un.kf_sock.kf_sock_rcv_sb_state;
1532 sock->so_snd_sb_state =
1533 kif->kf_un.kf_sock.kf_sock_snd_sb_state;
1535 kif->kf_un.kf_sock.kf_sock_unpconn;
1545 * Descriptor flags to filestat translation.
1548 to_filestat_flags(int flags)
1554 { FREAD, PS_FST_FFLAG_READ },
1555 { FWRITE, PS_FST_FFLAG_WRITE },
1556 { O_APPEND, PS_FST_FFLAG_APPEND },
1557 { O_ASYNC, PS_FST_FFLAG_ASYNC },
1558 { O_CREAT, PS_FST_FFLAG_CREAT },
1559 { O_DIRECT, PS_FST_FFLAG_DIRECT },
1560 { O_EXCL, PS_FST_FFLAG_EXCL },
1561 { O_EXEC, PS_FST_FFLAG_EXEC },
1562 { O_EXLOCK, PS_FST_FFLAG_EXLOCK },
1563 { O_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
1564 { O_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
1565 { O_SHLOCK, PS_FST_FFLAG_SHLOCK },
1566 { O_SYNC, PS_FST_FFLAG_SYNC },
1567 { O_TRUNC, PS_FST_FFLAG_TRUNC }
1569 #define NFSTFLAGS (sizeof(fstflags) / sizeof(*fstflags))
1574 for (i = 0; i < NFSTFLAGS; i++)
1575 if (flags & fstflags[i].flag)
1576 fst_flags |= fstflags[i].fst_flag;
1581 * Vnode type to filestate translation.
1584 vntype2psfsttype(int type)
1590 { VBAD, PS_FST_VTYPE_VBAD },
1591 { VBLK, PS_FST_VTYPE_VBLK },
1592 { VCHR, PS_FST_VTYPE_VCHR },
1593 { VDIR, PS_FST_VTYPE_VDIR },
1594 { VFIFO, PS_FST_VTYPE_VFIFO },
1595 { VLNK, PS_FST_VTYPE_VLNK },
1596 { VNON, PS_FST_VTYPE_VNON },
1597 { VREG, PS_FST_VTYPE_VREG },
1598 { VSOCK, PS_FST_VTYPE_VSOCK }
1600 #define NVFTYPES (sizeof(vt2fst) / sizeof(*vt2fst))
1601 unsigned int i, fst_type;
1603 fst_type = PS_FST_VTYPE_UNKNOWN;
1604 for (i = 0; i < NVFTYPES; i++) {
1605 if (type == vt2fst[i].vtype) {
1606 fst_type = vt2fst[i].fst_vtype;
1614 getmnton(kvm_t *kd, struct mount *m)
1617 static struct mtab {
1620 char mntonname[MNAMELEN + 1];
1624 for (mt = mhead; mt != NULL; mt = mt->next)
1626 return (mt->mntonname);
1627 if (!kvm_read_all(kd, (unsigned long)m, &mnt, sizeof(struct mount))) {
1628 warnx("can't read mount table at %p", (void *)m);
1631 if ((mt = malloc(sizeof (struct mtab))) == NULL)
1634 bcopy(&mnt.mnt_stat.f_mntonname[0], &mt->mntonname[0], MNAMELEN);
1635 mt->mntonname[MNAMELEN] = '\0';
1638 return (mt->mntonname);
1642 * Auxiliary structures and functions to get process environment or
1643 * command line arguments.
1652 static struct argvec *
1653 argvec_alloc(size_t bufsize)
1657 av = malloc(sizeof(*av));
1660 av->bufsize = bufsize;
1661 av->buf = malloc(av->bufsize);
1662 if (av->buf == NULL) {
1667 av->argv = malloc(sizeof(char *) * av->argc);
1668 if (av->argv == NULL) {
1677 argvec_free(struct argvec * av)
1686 getargv(struct procstat *procstat, struct kinfo_proc *kp, size_t nchr, int env)
1688 int error, name[4], argc, i;
1689 struct argvec *av, **avp;
1696 if (procstat->type == PROCSTAT_KVM) {
1697 warnx("can't use kvm access method");
1700 if (procstat->type != PROCSTAT_SYSCTL &&
1701 procstat->type != PROCSTAT_CORE) {
1702 warnx("unknown access method: %d", procstat->type);
1706 if (nchr == 0 || nchr > ARG_MAX)
1709 avp = (struct argvec **)(env ? &procstat->argv : &procstat->envv);
1714 av = argvec_alloc(nchr);
1717 warn("malloc(%zu)", nchr);
1721 } else if (av->bufsize < nchr) {
1722 av->buf = reallocf(av->buf, nchr);
1723 if (av->buf == NULL) {
1724 warn("malloc(%zu)", nchr);
1728 if (procstat->type == PROCSTAT_SYSCTL) {
1730 name[1] = KERN_PROC;
1731 name[2] = env ? KERN_PROC_ENV : KERN_PROC_ARGS;
1732 name[3] = kp->ki_pid;
1734 error = sysctl(name, 4, av->buf, &len, NULL, 0);
1735 if (error != 0 && errno != ESRCH && errno != EPERM)
1736 warn("sysctl(kern.proc.%s)", env ? "env" : "args");
1737 if (error != 0 || len == 0)
1739 } else /* procstat->type == PROCSTAT_CORE */ {
1740 type = env ? PSC_TYPE_ENVV : PSC_TYPE_ARGV;
1742 if (procstat_core_get(procstat->core, type, av->buf, &len)
1751 for (p = av->buf; p < av->buf + len; p += strlen(p) + 1) {
1757 argv = realloc(argv, sizeof(char *) * argc);
1759 warn("malloc(%zu)", sizeof(char *) * argc);
1771 * Return process command line arguments.
1774 procstat_getargv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1777 return (getargv(procstat, p, nchr, 0));
1781 * Free the buffer allocated by procstat_getargv().
1784 procstat_freeargv(struct procstat *procstat)
1787 if (procstat->argv != NULL) {
1788 argvec_free(procstat->argv);
1789 procstat->argv = NULL;
1794 * Return process environment.
1797 procstat_getenvv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1800 return (getargv(procstat, p, nchr, 1));
1804 * Free the buffer allocated by procstat_getenvv().
1807 procstat_freeenvv(struct procstat *procstat)
1809 if (procstat->envv != NULL) {
1810 argvec_free(procstat->envv);
1811 procstat->envv = NULL;
1815 static struct kinfo_vmentry *
1816 kinfo_getvmmap_core(struct procstat_core *core, int *cntp)
1820 char *buf, *bp, *eb;
1821 struct kinfo_vmentry *kiv, *kp, *kv;
1823 buf = procstat_core_get(core, PSC_TYPE_VMMAP, NULL, &len);
1828 * XXXMG: The code below is just copy&past from libutil.
1829 * The code duplication can be avoided if libutil
1830 * is extended to provide something like:
1831 * struct kinfo_vmentry *kinfo_getvmmap_from_buf(const char *buf,
1832 * size_t len, int *cntp);
1835 /* Pass 1: count items */
1840 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1841 bp += kv->kve_structsize;
1845 kiv = calloc(cnt, sizeof(*kiv));
1853 /* Pass 2: unpack */
1855 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1856 /* Copy/expand into pre-zeroed buffer */
1857 memcpy(kp, kv, kv->kve_structsize);
1858 /* Advance to next packed record */
1859 bp += kv->kve_structsize;
1860 /* Set field size to fixed length, advance */
1861 kp->kve_structsize = sizeof(*kp);
1866 return (kiv); /* Caller must free() return value */
1869 struct kinfo_vmentry *
1870 procstat_getvmmap(struct procstat *procstat, struct kinfo_proc *kp,
1874 switch(procstat->type) {
1876 warnx("kvm method is not supported");
1878 case PROCSTAT_SYSCTL:
1879 return (kinfo_getvmmap(kp->ki_pid, cntp));
1881 return (kinfo_getvmmap_core(procstat->core, cntp));
1883 warnx("unknown access method: %d", procstat->type);
1889 procstat_freevmmap(struct procstat *procstat __unused,
1890 struct kinfo_vmentry *vmmap)
1897 procstat_getgroups_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned int *cntp)
1906 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
1908 warnx("can't read proc struct at %p for pid %d",
1909 kp->ki_paddr, kp->ki_pid);
1912 if (proc.p_ucred == NOCRED)
1914 if (!kvm_read_all(kd, (unsigned long)proc.p_ucred, &ucred,
1916 warnx("can't read ucred struct at %p for pid %d",
1917 proc.p_ucred, kp->ki_pid);
1920 len = ucred.cr_ngroups * sizeof(gid_t);
1921 groups = malloc(len);
1922 if (groups == NULL) {
1923 warn("malloc(%zu)", len);
1926 if (!kvm_read_all(kd, (unsigned long)ucred.cr_groups, groups, len)) {
1927 warnx("can't read groups at %p for pid %d",
1928 ucred.cr_groups, kp->ki_pid);
1932 *cntp = ucred.cr_ngroups;
1937 procstat_getgroups_sysctl(pid_t pid, unsigned int *cntp)
1945 mib[2] = KERN_PROC_GROUPS;
1947 len = (sysconf(_SC_NGROUPS_MAX) + 1) * sizeof(gid_t);
1948 groups = malloc(len);
1949 if (groups == NULL) {
1950 warn("malloc(%zu)", len);
1953 if (sysctl(mib, 4, groups, &len, NULL, 0) == -1) {
1954 warn("sysctl: kern.proc.groups: %d", pid);
1958 *cntp = len / sizeof(gid_t);
1963 procstat_getgroups_core(struct procstat_core *core, unsigned int *cntp)
1968 groups = procstat_core_get(core, PSC_TYPE_GROUPS, NULL, &len);
1971 *cntp = len / sizeof(gid_t);
1976 procstat_getgroups(struct procstat *procstat, struct kinfo_proc *kp,
1979 switch(procstat->type) {
1981 return (procstat_getgroups_kvm(procstat->kd, kp, cntp));
1982 case PROCSTAT_SYSCTL:
1983 return (procstat_getgroups_sysctl(kp->ki_pid, cntp));
1985 return (procstat_getgroups_core(procstat->core, cntp));
1987 warnx("unknown access method: %d", procstat->type);
1993 procstat_freegroups(struct procstat *procstat __unused, gid_t *groups)
2000 procstat_getumask_kvm(kvm_t *kd, struct kinfo_proc *kp, unsigned short *maskp)
2006 if (kp->ki_fd == NULL)
2008 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &fd, sizeof(fd))) {
2009 warnx("can't read filedesc at %p for pid %d", kp->ki_fd,
2013 *maskp = fd.fd_cmask;
2018 procstat_getumask_sysctl(pid_t pid, unsigned short *maskp)
2026 mib[2] = KERN_PROC_UMASK;
2028 len = sizeof(*maskp);
2029 error = sysctl(mib, 4, maskp, &len, NULL, 0);
2030 if (error != 0 && errno != ESRCH)
2031 warn("sysctl: kern.proc.umask: %d", pid);
2036 procstat_getumask_core(struct procstat_core *core, unsigned short *maskp)
2039 unsigned short *buf;
2041 buf = procstat_core_get(core, PSC_TYPE_UMASK, NULL, &len);
2044 if (len < sizeof(*maskp)) {
2054 procstat_getumask(struct procstat *procstat, struct kinfo_proc *kp,
2055 unsigned short *maskp)
2057 switch(procstat->type) {
2059 return (procstat_getumask_kvm(procstat->kd, kp, maskp));
2060 case PROCSTAT_SYSCTL:
2061 return (procstat_getumask_sysctl(kp->ki_pid, maskp));
2063 return (procstat_getumask_core(procstat->core, maskp));
2065 warnx("unknown access method: %d", procstat->type);
2071 procstat_getrlimit_kvm(kvm_t *kd, struct kinfo_proc *kp, int which,
2072 struct rlimit* rlimit)
2075 unsigned long offset;
2079 assert(which >= 0 && which < RLIM_NLIMITS);
2080 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2082 warnx("can't read proc struct at %p for pid %d",
2083 kp->ki_paddr, kp->ki_pid);
2086 if (proc.p_limit == NULL)
2088 offset = (unsigned long)proc.p_limit + sizeof(struct rlimit) * which;
2089 if (!kvm_read_all(kd, offset, rlimit, sizeof(*rlimit))) {
2090 warnx("can't read rlimit struct at %p for pid %d",
2091 (void *)offset, kp->ki_pid);
2098 procstat_getrlimit_sysctl(pid_t pid, int which, struct rlimit* rlimit)
2104 name[1] = KERN_PROC;
2105 name[2] = KERN_PROC_RLIMIT;
2108 len = sizeof(struct rlimit);
2109 error = sysctl(name, 5, rlimit, &len, NULL, 0);
2110 if (error < 0 && errno != ESRCH) {
2111 warn("sysctl: kern.proc.rlimit: %d", pid);
2114 if (error < 0 || len != sizeof(struct rlimit))
2120 procstat_getrlimit_core(struct procstat_core *core, int which,
2121 struct rlimit* rlimit)
2124 struct rlimit* rlimits;
2126 if (which < 0 || which >= RLIM_NLIMITS) {
2128 warn("getrlimit: which");
2131 rlimits = procstat_core_get(core, PSC_TYPE_RLIMIT, NULL, &len);
2132 if (rlimits == NULL)
2134 if (len < sizeof(struct rlimit) * RLIM_NLIMITS) {
2138 *rlimit = rlimits[which];
2143 procstat_getrlimit(struct procstat *procstat, struct kinfo_proc *kp, int which,
2144 struct rlimit* rlimit)
2146 switch(procstat->type) {
2148 return (procstat_getrlimit_kvm(procstat->kd, kp, which,
2150 case PROCSTAT_SYSCTL:
2151 return (procstat_getrlimit_sysctl(kp->ki_pid, which, rlimit));
2153 return (procstat_getrlimit_core(procstat->core, which, rlimit));
2155 warnx("unknown access method: %d", procstat->type);
2161 procstat_getpathname_sysctl(pid_t pid, char *pathname, size_t maxlen)
2167 name[1] = KERN_PROC;
2168 name[2] = KERN_PROC_PATHNAME;
2171 error = sysctl(name, 4, pathname, &len, NULL, 0);
2172 if (error != 0 && errno != ESRCH)
2173 warn("sysctl: kern.proc.pathname: %d", pid);
2180 procstat_getpathname_core(struct procstat_core *core, char *pathname,
2183 struct kinfo_file *files;
2186 files = kinfo_getfile_core(core, &cnt);
2190 for (i = 0; i < cnt; i++) {
2191 if (files[i].kf_fd != KF_FD_TYPE_TEXT)
2193 strncpy(pathname, files[i].kf_path, maxlen);
2202 procstat_getpathname(struct procstat *procstat, struct kinfo_proc *kp,
2203 char *pathname, size_t maxlen)
2205 switch(procstat->type) {
2207 /* XXX: Return empty string. */
2211 case PROCSTAT_SYSCTL:
2212 return (procstat_getpathname_sysctl(kp->ki_pid, pathname,
2215 return (procstat_getpathname_core(procstat->core, pathname,
2218 warnx("unknown access method: %d", procstat->type);
2224 procstat_getosrel_kvm(kvm_t *kd, struct kinfo_proc *kp, int *osrelp)
2230 if (!kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
2232 warnx("can't read proc struct at %p for pid %d",
2233 kp->ki_paddr, kp->ki_pid);
2236 *osrelp = proc.p_osrel;
2241 procstat_getosrel_sysctl(pid_t pid, int *osrelp)
2247 name[1] = KERN_PROC;
2248 name[2] = KERN_PROC_OSREL;
2250 len = sizeof(*osrelp);
2251 error = sysctl(name, 4, osrelp, &len, NULL, 0);
2252 if (error != 0 && errno != ESRCH)
2253 warn("sysctl: kern.proc.osrel: %d", pid);
2258 procstat_getosrel_core(struct procstat_core *core, int *osrelp)
2263 buf = procstat_core_get(core, PSC_TYPE_OSREL, NULL, &len);
2266 if (len < sizeof(*osrelp)) {
2276 procstat_getosrel(struct procstat *procstat, struct kinfo_proc *kp, int *osrelp)
2278 switch(procstat->type) {
2280 return (procstat_getosrel_kvm(procstat->kd, kp, osrelp));
2281 case PROCSTAT_SYSCTL:
2282 return (procstat_getosrel_sysctl(kp->ki_pid, osrelp));
2284 return (procstat_getosrel_core(procstat->core, osrelp));
2286 warnx("unknown access method: %d", procstat->type);
2291 #define PROC_AUXV_MAX 256
2293 #if __ELF_WORD_SIZE == 64
2294 static const char *elf32_sv_names[] = {
2300 is_elf32_sysctl(pid_t pid)
2304 static char sv_name[256];
2307 name[1] = KERN_PROC;
2308 name[2] = KERN_PROC_SV_NAME;
2310 len = sizeof(sv_name);
2311 error = sysctl(name, 4, sv_name, &len, NULL, 0);
2312 if (error != 0 || len == 0)
2314 for (i = 0; i < sizeof(elf32_sv_names) / sizeof(*elf32_sv_names); i++) {
2315 if (strncmp(sv_name, elf32_sv_names[i], sizeof(sv_name)) == 0)
2321 static Elf_Auxinfo *
2322 procstat_getauxv32_sysctl(pid_t pid, unsigned int *cntp)
2325 Elf32_Auxinfo *auxv32;
2328 unsigned int i, count;
2332 name[1] = KERN_PROC;
2333 name[2] = KERN_PROC_AUXV;
2335 len = PROC_AUXV_MAX * sizeof(Elf32_Auxinfo);
2337 auxv32 = malloc(len);
2338 if (auxv32 == NULL) {
2339 warn("malloc(%zu)", len);
2342 if (sysctl(name, 4, auxv32, &len, NULL, 0) == -1) {
2343 if (errno != ESRCH && errno != EPERM)
2344 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2347 count = len / sizeof(Elf_Auxinfo);
2348 auxv = malloc(count * sizeof(Elf_Auxinfo));
2350 warn("malloc(%zu)", count * sizeof(Elf_Auxinfo));
2353 for (i = 0; i < count; i++) {
2355 * XXX: We expect that values for a_type on a 32-bit platform
2356 * are directly mapped to values on 64-bit one, which is not
2359 auxv[i].a_type = auxv32[i].a_type;
2360 ptr = &auxv32[i].a_un;
2361 auxv[i].a_un.a_val = *((uint32_t *)ptr);
2368 #endif /* __ELF_WORD_SIZE == 64 */
2370 static Elf_Auxinfo *
2371 procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp)
2377 #if __ELF_WORD_SIZE == 64
2378 if (is_elf32_sysctl(pid))
2379 return (procstat_getauxv32_sysctl(pid, cntp));
2382 name[1] = KERN_PROC;
2383 name[2] = KERN_PROC_AUXV;
2385 len = PROC_AUXV_MAX * sizeof(Elf_Auxinfo);
2388 warn("malloc(%zu)", len);
2391 if (sysctl(name, 4, auxv, &len, NULL, 0) == -1) {
2392 if (errno != ESRCH && errno != EPERM)
2393 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2397 *cntp = len / sizeof(Elf_Auxinfo);
2401 static Elf_Auxinfo *
2402 procstat_getauxv_core(struct procstat_core *core, unsigned int *cntp)
2407 auxv = procstat_core_get(core, PSC_TYPE_AUXV, NULL, &len);
2410 *cntp = len / sizeof(Elf_Auxinfo);
2415 procstat_getauxv(struct procstat *procstat, struct kinfo_proc *kp,
2418 switch(procstat->type) {
2420 warnx("kvm method is not supported");
2422 case PROCSTAT_SYSCTL:
2423 return (procstat_getauxv_sysctl(kp->ki_pid, cntp));
2425 return (procstat_getauxv_core(procstat->core, cntp));
2427 warnx("unknown access method: %d", procstat->type);
2433 procstat_freeauxv(struct procstat *procstat __unused, Elf_Auxinfo *auxv)
2439 static struct kinfo_kstack *
2440 procstat_getkstack_sysctl(pid_t pid, int *cntp)
2442 struct kinfo_kstack *kkstp;
2447 name[1] = KERN_PROC;
2448 name[2] = KERN_PROC_KSTACK;
2452 error = sysctl(name, 4, NULL, &len, NULL, 0);
2453 if (error < 0 && errno != ESRCH && errno != EPERM && errno != ENOENT) {
2454 warn("sysctl: kern.proc.kstack: %d", pid);
2457 if (error == -1 && errno == ENOENT) {
2458 warnx("sysctl: kern.proc.kstack unavailable"
2459 " (options DDB or options STACK required in kernel)");
2464 kkstp = malloc(len);
2465 if (kkstp == NULL) {
2466 warn("malloc(%zu)", len);
2469 if (sysctl(name, 4, kkstp, &len, NULL, 0) == -1) {
2470 warn("sysctl: kern.proc.pid: %d", pid);
2474 *cntp = len / sizeof(*kkstp);
2479 struct kinfo_kstack *
2480 procstat_getkstack(struct procstat *procstat, struct kinfo_proc *kp,
2483 switch(procstat->type) {
2485 warnx("kvm method is not supported");
2487 case PROCSTAT_SYSCTL:
2488 return (procstat_getkstack_sysctl(kp->ki_pid, cntp));
2490 warnx("core method is not supported");
2493 warnx("unknown access method: %d", procstat->type);
2499 procstat_freekstack(struct procstat *procstat __unused,
2500 struct kinfo_kstack *kkstp)