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>
45 #include <sys/vnode.h>
46 #include <sys/socket.h>
47 #include <sys/socketvar.h>
48 #include <sys/domain.h>
49 #include <sys/protosw.h>
51 #include <sys/unpcb.h>
52 #include <sys/sysctl.h>
54 #include <sys/filedesc.h>
55 #include <sys/queue.h>
61 #include <sys/mount.h>
63 #include <ufs/ufs/quota.h>
64 #include <ufs/ufs/inode.h>
65 #include <fs/devfs/devfs.h>
66 #include <fs/devfs/devfs_int.h>
68 #include <nfs/nfsproto.h>
69 #include <nfsclient/nfs.h>
70 #include <nfsclient/nfsnode.h>
73 #include <vm/vm_map.h>
74 #include <vm/vm_object.h>
76 #include <net/route.h>
77 #include <netinet/in.h>
78 #include <netinet/in_systm.h>
79 #include <netinet/ip.h>
80 #include <netinet/in_pcb.h>
98 #include <libprocstat.h>
99 #include "libprocstat_internal.h"
100 #include "common_kvm.h"
103 int statfs(const char *, struct statfs *); /* XXX */
105 #define PROCSTAT_KVM 1
106 #define PROCSTAT_SYSCTL 2
107 #define PROCSTAT_CORE 3
109 static char **getargv(struct procstat *procstat, struct kinfo_proc *kp,
110 size_t nchr, int env);
111 static char *getmnton(kvm_t *kd, struct mount *m);
112 static struct kinfo_vmentry * kinfo_getvmmap_core(struct procstat_core *core,
114 static Elf_Auxinfo *procstat_getauxv_core(struct procstat_core *core,
116 static Elf_Auxinfo *procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp);
117 static struct filestat_list *procstat_getfiles_kvm(
118 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
119 static struct filestat_list *procstat_getfiles_sysctl(
120 struct procstat *procstat, struct kinfo_proc *kp, int mmapped);
121 static int procstat_get_pipe_info_sysctl(struct filestat *fst,
122 struct pipestat *pipe, char *errbuf);
123 static int procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
124 struct pipestat *pipe, char *errbuf);
125 static int procstat_get_pts_info_sysctl(struct filestat *fst,
126 struct ptsstat *pts, char *errbuf);
127 static int procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
128 struct ptsstat *pts, char *errbuf);
129 static int procstat_get_shm_info_sysctl(struct filestat *fst,
130 struct shmstat *shm, char *errbuf);
131 static int procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
132 struct shmstat *shm, char *errbuf);
133 static int procstat_get_socket_info_sysctl(struct filestat *fst,
134 struct sockstat *sock, char *errbuf);
135 static int procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
136 struct sockstat *sock, char *errbuf);
137 static int to_filestat_flags(int flags);
138 static int procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
139 struct vnstat *vn, char *errbuf);
140 static int procstat_get_vnode_info_sysctl(struct filestat *fst,
141 struct vnstat *vn, char *errbuf);
142 static gid_t *procstat_getgroups_core(struct procstat_core *core,
143 unsigned int *count);
144 static gid_t *procstat_getgroups_sysctl(pid_t pid, unsigned int *count);
145 static struct kinfo_kstack *procstat_getkstack_sysctl(pid_t pid,
147 static int procstat_getpathname_core(struct procstat_core *core,
148 char *pathname, size_t maxlen);
149 static int procstat_getpathname_sysctl(pid_t pid, char *pathname,
151 static int procstat_getrlimit_core(struct procstat_core *core, int which,
152 struct rlimit* rlimit);
153 static int procstat_getrlimit_sysctl(pid_t pid, int which,
154 struct rlimit* rlimit);
155 static int procstat_getumask_core(struct procstat_core *core,
156 unsigned short *maskp);
157 static int procstat_getumask_sysctl(pid_t pid, unsigned short *maskp);
158 static int vntype2psfsttype(int type);
161 procstat_close(struct procstat *procstat)
165 if (procstat->type == PROCSTAT_KVM)
166 kvm_close(procstat->kd);
167 else if (procstat->type == PROCSTAT_CORE)
168 procstat_core_close(procstat->core);
169 procstat_freeargv(procstat);
170 procstat_freeenvv(procstat);
175 procstat_open_sysctl(void)
177 struct procstat *procstat;
179 procstat = calloc(1, sizeof(*procstat));
180 if (procstat == NULL) {
184 procstat->type = PROCSTAT_SYSCTL;
189 procstat_open_kvm(const char *nlistf, const char *memf)
191 struct procstat *procstat;
193 char buf[_POSIX2_LINE_MAX];
195 procstat = calloc(1, sizeof(*procstat));
196 if (procstat == NULL) {
200 kd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
202 warnx("kvm_openfiles(): %s", buf);
206 procstat->type = PROCSTAT_KVM;
212 procstat_open_core(const char *filename)
214 struct procstat *procstat;
215 struct procstat_core *core;
217 procstat = calloc(1, sizeof(*procstat));
218 if (procstat == NULL) {
222 core = procstat_core_open(filename);
227 procstat->type = PROCSTAT_CORE;
228 procstat->core = core;
233 procstat_getprocs(struct procstat *procstat, int what, int arg,
236 struct kinfo_proc *p0, *p;
245 if (procstat->type == PROCSTAT_KVM) {
247 p0 = kvm_getprocs(procstat->kd, what, arg, &cnt);
248 if (p0 == NULL || cnt <= 0)
251 len = *count * sizeof(*p);
254 warnx("malloc(%zu)", len);
259 } else if (procstat->type == PROCSTAT_SYSCTL) {
265 error = sysctl(name, 4, NULL, &len, NULL, 0);
266 if (error < 0 && errno != EPERM) {
267 warn("sysctl(kern.proc)");
271 warnx("no processes?");
276 warnx("malloc(%zu)", len);
279 error = sysctl(name, 4, p, &len, NULL, 0);
280 if (error < 0 && errno != EPERM) {
281 warn("sysctl(kern.proc)");
284 /* Perform simple consistency checks. */
285 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
286 warnx("kinfo_proc structure size mismatch (len = %zu)", len);
289 *count = len / sizeof(*p);
291 } else if (procstat->type == PROCSTAT_CORE) {
292 p = procstat_core_get(procstat->core, PSC_TYPE_PROC, NULL,
294 if ((len % sizeof(*p)) != 0 || p->ki_structsize != sizeof(*p)) {
295 warnx("kinfo_proc structure size mismatch");
298 *count = len / sizeof(*p);
301 warnx("unknown access method: %d", procstat->type);
311 procstat_freeprocs(struct procstat *procstat __unused, struct kinfo_proc *p)
319 struct filestat_list *
320 procstat_getfiles(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
323 switch(procstat->type) {
325 return (procstat_getfiles_kvm(procstat, kp, mmapped));
326 case PROCSTAT_SYSCTL:
328 return (procstat_getfiles_sysctl(procstat, kp, mmapped));
330 warnx("unknown access method: %d", procstat->type);
336 procstat_freefiles(struct procstat *procstat, struct filestat_list *head)
338 struct filestat *fst, *tmp;
340 STAILQ_FOREACH_SAFE(fst, head, next, tmp) {
341 if (fst->fs_path != NULL)
346 if (procstat->vmentries != NULL) {
347 free(procstat->vmentries);
348 procstat->vmentries = NULL;
350 if (procstat->files != NULL) {
351 free(procstat->files);
352 procstat->files = NULL;
356 static struct filestat *
357 filestat_new_entry(void *typedep, int type, int fd, int fflags, int uflags,
358 int refcount, off_t offset, char *path, cap_rights_t cap_rights)
360 struct filestat *entry;
362 entry = calloc(1, sizeof(*entry));
367 entry->fs_typedep = typedep;
368 entry->fs_fflags = fflags;
369 entry->fs_uflags = uflags;
371 entry->fs_type = type;
372 entry->fs_ref_count = refcount;
373 entry->fs_offset = offset;
374 entry->fs_path = path;
375 entry->fs_cap_rights = cap_rights;
379 static struct vnode *
380 getctty(kvm_t *kd, struct kinfo_proc *kp)
388 error = kvm_read_all(kd, (unsigned long)kp->ki_paddr, &proc,
391 warnx("can't read proc struct at %p for pid %d",
392 kp->ki_paddr, kp->ki_pid);
395 if (proc.p_pgrp == NULL)
397 error = kvm_read_all(kd, (unsigned long)proc.p_pgrp, &pgrp,
400 warnx("can't read pgrp struct at %p for pid %d",
401 proc.p_pgrp, kp->ki_pid);
404 error = kvm_read_all(kd, (unsigned long)pgrp.pg_session, &sess,
407 warnx("can't read session struct at %p for pid %d",
408 pgrp.pg_session, kp->ki_pid);
411 return (sess.s_ttyvp);
414 static struct filestat_list *
415 procstat_getfiles_kvm(struct procstat *procstat, struct kinfo_proc *kp, int mmapped)
418 struct filedesc filed;
419 struct vm_map_entry vmentry;
420 struct vm_object object;
421 struct vmspace vmspace;
422 vm_map_entry_t entryp;
426 struct file **ofiles;
427 struct filestat *entry;
428 struct filestat_list *head;
439 if (kp->ki_fd == NULL)
441 if (!kvm_read_all(kd, (unsigned long)kp->ki_fd, &filed,
443 warnx("can't read filedesc at %p", (void *)kp->ki_fd);
448 * Allocate list head.
450 head = malloc(sizeof(*head));
455 /* root directory vnode, if one. */
457 entry = filestat_new_entry(filed.fd_rdir, PS_FST_TYPE_VNODE, -1,
458 PS_FST_FFLAG_READ, PS_FST_UFLAG_RDIR, 0, 0, NULL, 0);
460 STAILQ_INSERT_TAIL(head, entry, next);
462 /* current working directory vnode. */
464 entry = filestat_new_entry(filed.fd_cdir, PS_FST_TYPE_VNODE, -1,
465 PS_FST_FFLAG_READ, PS_FST_UFLAG_CDIR, 0, 0, NULL, 0);
467 STAILQ_INSERT_TAIL(head, entry, next);
469 /* jail root, if any. */
471 entry = filestat_new_entry(filed.fd_jdir, PS_FST_TYPE_VNODE, -1,
472 PS_FST_FFLAG_READ, PS_FST_UFLAG_JAIL, 0, 0, NULL, 0);
474 STAILQ_INSERT_TAIL(head, entry, next);
476 /* ktrace vnode, if one */
478 entry = filestat_new_entry(kp->ki_tracep, PS_FST_TYPE_VNODE, -1,
479 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
480 PS_FST_UFLAG_TRACE, 0, 0, NULL, 0);
482 STAILQ_INSERT_TAIL(head, entry, next);
484 /* text vnode, if one */
486 entry = filestat_new_entry(kp->ki_textvp, PS_FST_TYPE_VNODE, -1,
487 PS_FST_FFLAG_READ, PS_FST_UFLAG_TEXT, 0, 0, NULL, 0);
489 STAILQ_INSERT_TAIL(head, entry, next);
491 /* Controlling terminal. */
492 if ((vp = getctty(kd, kp)) != NULL) {
493 entry = filestat_new_entry(vp, PS_FST_TYPE_VNODE, -1,
494 PS_FST_FFLAG_READ | PS_FST_FFLAG_WRITE,
495 PS_FST_UFLAG_CTTY, 0, 0, NULL, 0);
497 STAILQ_INSERT_TAIL(head, entry, next);
500 nfiles = filed.fd_lastfile + 1;
501 ofiles = malloc(nfiles * sizeof(struct file *));
502 if (ofiles == NULL) {
503 warn("malloc(%zu)", nfiles * sizeof(struct file *));
506 if (!kvm_read_all(kd, (unsigned long)filed.fd_ofiles, ofiles,
507 nfiles * sizeof(struct file *))) {
508 warnx("cannot read file structures at %p",
509 (void *)filed.fd_ofiles);
513 for (i = 0; i <= filed.fd_lastfile; i++) {
514 if (ofiles[i] == NULL)
516 if (!kvm_read_all(kd, (unsigned long)ofiles[i], &file,
517 sizeof(struct file))) {
518 warnx("can't read file %d at %p", i,
522 switch (file.f_type) {
524 type = PS_FST_TYPE_VNODE;
528 type = PS_FST_TYPE_SOCKET;
532 type = PS_FST_TYPE_PIPE;
536 type = PS_FST_TYPE_FIFO;
541 type = PS_FST_TYPE_PTS;
546 type = PS_FST_TYPE_SHM;
552 /* XXXRW: No capability rights support for kvm yet. */
553 entry = filestat_new_entry(data, type, i,
554 to_filestat_flags(file.f_flag), 0, 0, 0, NULL, 0);
556 STAILQ_INSERT_TAIL(head, entry, next);
563 * Process mmapped files if requested.
566 if (!kvm_read_all(kd, (unsigned long)kp->ki_vmspace, &vmspace,
568 warnx("can't read vmspace at %p",
569 (void *)kp->ki_vmspace);
572 map = &vmspace.vm_map;
574 for (entryp = map->header.next;
575 entryp != &kp->ki_vmspace->vm_map.header;
576 entryp = vmentry.next) {
577 if (!kvm_read_all(kd, (unsigned long)entryp, &vmentry,
579 warnx("can't read vm_map_entry at %p",
583 if (vmentry.eflags & MAP_ENTRY_IS_SUB_MAP)
585 if ((objp = vmentry.object.vm_object) == NULL)
587 for (; objp; objp = object.backing_object) {
588 if (!kvm_read_all(kd, (unsigned long)objp,
589 &object, sizeof(object))) {
590 warnx("can't read vm_object at %p",
596 /* We want only vnode objects. */
597 if (object.type != OBJT_VNODE)
600 prot = vmentry.protection;
602 if (prot & VM_PROT_READ)
603 fflags = PS_FST_FFLAG_READ;
604 if ((vmentry.eflags & MAP_ENTRY_COW) == 0 &&
605 prot & VM_PROT_WRITE)
606 fflags |= PS_FST_FFLAG_WRITE;
609 * Create filestat entry.
611 entry = filestat_new_entry(object.handle,
612 PS_FST_TYPE_VNODE, -1, fflags,
613 PS_FST_UFLAG_MMAP, 0, 0, NULL, 0);
615 STAILQ_INSERT_TAIL(head, entry, next);
623 * kinfo types to filestat translation.
626 kinfo_type2fst(int kftype)
632 { KF_TYPE_CRYPTO, PS_FST_TYPE_CRYPTO },
633 { KF_TYPE_FIFO, PS_FST_TYPE_FIFO },
634 { KF_TYPE_KQUEUE, PS_FST_TYPE_KQUEUE },
635 { KF_TYPE_MQUEUE, PS_FST_TYPE_MQUEUE },
636 { KF_TYPE_NONE, PS_FST_TYPE_NONE },
637 { KF_TYPE_PIPE, PS_FST_TYPE_PIPE },
638 { KF_TYPE_PTS, PS_FST_TYPE_PTS },
639 { KF_TYPE_SEM, PS_FST_TYPE_SEM },
640 { KF_TYPE_SHM, PS_FST_TYPE_SHM },
641 { KF_TYPE_SOCKET, PS_FST_TYPE_SOCKET },
642 { KF_TYPE_VNODE, PS_FST_TYPE_VNODE },
643 { KF_TYPE_UNKNOWN, PS_FST_TYPE_UNKNOWN }
645 #define NKFTYPES (sizeof(kftypes2fst) / sizeof(*kftypes2fst))
648 for (i = 0; i < NKFTYPES; i++)
649 if (kftypes2fst[i].kf_type == kftype)
652 return (PS_FST_TYPE_UNKNOWN);
653 return (kftypes2fst[i].fst_type);
657 * kinfo flags to filestat translation.
660 kinfo_fflags2fst(int kfflags)
666 { KF_FLAG_APPEND, PS_FST_FFLAG_APPEND },
667 { KF_FLAG_ASYNC, PS_FST_FFLAG_ASYNC },
668 { KF_FLAG_CREAT, PS_FST_FFLAG_CREAT },
669 { KF_FLAG_DIRECT, PS_FST_FFLAG_DIRECT },
670 { KF_FLAG_EXCL, PS_FST_FFLAG_EXCL },
671 { KF_FLAG_EXEC, PS_FST_FFLAG_EXEC },
672 { KF_FLAG_EXLOCK, PS_FST_FFLAG_EXLOCK },
673 { KF_FLAG_FSYNC, PS_FST_FFLAG_SYNC },
674 { KF_FLAG_HASLOCK, PS_FST_FFLAG_HASLOCK },
675 { KF_FLAG_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
676 { KF_FLAG_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
677 { KF_FLAG_READ, PS_FST_FFLAG_READ },
678 { KF_FLAG_SHLOCK, PS_FST_FFLAG_SHLOCK },
679 { KF_FLAG_TRUNC, PS_FST_FFLAG_TRUNC },
680 { KF_FLAG_WRITE, PS_FST_FFLAG_WRITE }
682 #define NKFFLAGS (sizeof(kfflags2fst) / sizeof(*kfflags2fst))
687 for (i = 0; i < NKFFLAGS; i++)
688 if ((kfflags & kfflags2fst[i].kf_flag) != 0)
689 flags |= kfflags2fst[i].fst_flag;
694 kinfo_uflags2fst(int fd)
698 case KF_FD_TYPE_CTTY:
699 return (PS_FST_UFLAG_CTTY);
701 return (PS_FST_UFLAG_CDIR);
702 case KF_FD_TYPE_JAIL:
703 return (PS_FST_UFLAG_JAIL);
704 case KF_FD_TYPE_TEXT:
705 return (PS_FST_UFLAG_TEXT);
706 case KF_FD_TYPE_TRACE:
707 return (PS_FST_UFLAG_TRACE);
708 case KF_FD_TYPE_ROOT:
709 return (PS_FST_UFLAG_RDIR);
714 static struct kinfo_file *
715 kinfo_getfile_core(struct procstat_core *core, int *cntp)
720 struct kinfo_file *kif, *kp, *kf;
722 buf = procstat_core_get(core, PSC_TYPE_FILES, NULL, &len);
726 * XXXMG: The code below is just copy&past from libutil.
727 * The code duplication can be avoided if libutil
728 * is extended to provide something like:
729 * struct kinfo_file *kinfo_getfile_from_buf(const char *buf,
730 * size_t len, int *cntp);
733 /* Pass 1: count items */
738 kf = (struct kinfo_file *)(uintptr_t)bp;
739 bp += kf->kf_structsize;
743 kif = calloc(cnt, sizeof(*kif));
753 kf = (struct kinfo_file *)(uintptr_t)bp;
754 /* Copy/expand into pre-zeroed buffer */
755 memcpy(kp, kf, kf->kf_structsize);
756 /* Advance to next packed record */
757 bp += kf->kf_structsize;
758 /* Set field size to fixed length, advance */
759 kp->kf_structsize = sizeof(*kp);
764 return (kif); /* Caller must free() return value */
767 static struct filestat_list *
768 procstat_getfiles_sysctl(struct procstat *procstat, struct kinfo_proc *kp,
771 struct kinfo_file *kif, *files;
772 struct kinfo_vmentry *kve, *vmentries;
773 struct filestat_list *head;
774 struct filestat *entry;
780 cap_rights_t cap_rights;
783 if (kp->ki_fd == NULL)
785 switch(procstat->type) {
786 case PROCSTAT_SYSCTL:
787 files = kinfo_getfile(kp->ki_pid, &cnt);
790 files = kinfo_getfile_core(procstat->core, &cnt);
793 assert(!"invalid type");
795 if (files == NULL && errno != EPERM) {
796 warn("kinfo_getfile()");
799 procstat->files = files;
802 * Allocate list head.
804 head = malloc(sizeof(*head));
808 for (i = 0; i < cnt; i++) {
811 type = kinfo_type2fst(kif->kf_type);
812 fd = kif->kf_fd >= 0 ? kif->kf_fd : -1;
813 fflags = kinfo_fflags2fst(kif->kf_flags);
814 uflags = kinfo_uflags2fst(kif->kf_fd);
815 refcount = kif->kf_ref_count;
816 offset = kif->kf_offset;
817 if (*kif->kf_path != '\0')
818 path = strdup(kif->kf_path);
821 cap_rights = kif->kf_cap_rights;
824 * Create filestat entry.
826 entry = filestat_new_entry(kif, type, fd, fflags, uflags,
827 refcount, offset, path, cap_rights);
829 STAILQ_INSERT_TAIL(head, entry, next);
832 vmentries = procstat_getvmmap(procstat, kp, &cnt);
833 procstat->vmentries = vmentries;
834 if (vmentries == NULL || cnt == 0)
836 for (i = 0; i < cnt; i++) {
838 if (kve->kve_type != KVME_TYPE_VNODE)
841 if (kve->kve_protection & KVME_PROT_READ)
842 fflags = PS_FST_FFLAG_READ;
843 if ((kve->kve_flags & KVME_FLAG_COW) == 0 &&
844 kve->kve_protection & KVME_PROT_WRITE)
845 fflags |= PS_FST_FFLAG_WRITE;
846 offset = kve->kve_offset;
847 refcount = kve->kve_ref_count;
848 if (*kve->kve_path != '\0')
849 path = strdup(kve->kve_path);
852 entry = filestat_new_entry(kve, PS_FST_TYPE_VNODE, -1,
853 fflags, PS_FST_UFLAG_MMAP, refcount, offset, path,
856 STAILQ_INSERT_TAIL(head, entry, next);
864 procstat_get_pipe_info(struct procstat *procstat, struct filestat *fst,
865 struct pipestat *ps, char *errbuf)
869 if (procstat->type == PROCSTAT_KVM) {
870 return (procstat_get_pipe_info_kvm(procstat->kd, fst, ps,
872 } else if (procstat->type == PROCSTAT_SYSCTL ||
873 procstat->type == PROCSTAT_CORE) {
874 return (procstat_get_pipe_info_sysctl(fst, ps, errbuf));
876 warnx("unknown access method: %d", procstat->type);
877 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
883 procstat_get_pipe_info_kvm(kvm_t *kd, struct filestat *fst,
884 struct pipestat *ps, char *errbuf)
892 bzero(ps, sizeof(*ps));
893 pipep = fst->fs_typedep;
896 if (!kvm_read_all(kd, (unsigned long)pipep, &pi, sizeof(struct pipe))) {
897 warnx("can't read pipe at %p", (void *)pipep);
900 ps->addr = (uintptr_t)pipep;
901 ps->peer = (uintptr_t)pi.pipe_peer;
902 ps->buffer_cnt = pi.pipe_buffer.cnt;
906 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
911 procstat_get_pipe_info_sysctl(struct filestat *fst, struct pipestat *ps,
912 char *errbuf __unused)
914 struct kinfo_file *kif;
918 bzero(ps, sizeof(*ps));
919 kif = fst->fs_typedep;
922 ps->addr = kif->kf_un.kf_pipe.kf_pipe_addr;
923 ps->peer = kif->kf_un.kf_pipe.kf_pipe_peer;
924 ps->buffer_cnt = kif->kf_un.kf_pipe.kf_pipe_buffer_cnt;
929 procstat_get_pts_info(struct procstat *procstat, struct filestat *fst,
930 struct ptsstat *pts, char *errbuf)
934 if (procstat->type == PROCSTAT_KVM) {
935 return (procstat_get_pts_info_kvm(procstat->kd, fst, pts,
937 } else if (procstat->type == PROCSTAT_SYSCTL ||
938 procstat->type == PROCSTAT_CORE) {
939 return (procstat_get_pts_info_sysctl(fst, pts, errbuf));
941 warnx("unknown access method: %d", procstat->type);
942 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
948 procstat_get_pts_info_kvm(kvm_t *kd, struct filestat *fst,
949 struct ptsstat *pts, char *errbuf)
957 bzero(pts, sizeof(*pts));
958 ttyp = fst->fs_typedep;
961 if (!kvm_read_all(kd, (unsigned long)ttyp, &tty, sizeof(struct tty))) {
962 warnx("can't read tty at %p", (void *)ttyp);
965 pts->dev = dev2udev(kd, tty.t_dev);
966 (void)kdevtoname(kd, tty.t_dev, pts->devname);
970 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
975 procstat_get_pts_info_sysctl(struct filestat *fst, struct ptsstat *pts,
976 char *errbuf __unused)
978 struct kinfo_file *kif;
982 bzero(pts, sizeof(*pts));
983 kif = fst->fs_typedep;
986 pts->dev = kif->kf_un.kf_pts.kf_pts_dev;
987 strlcpy(pts->devname, kif->kf_path, sizeof(pts->devname));
992 procstat_get_shm_info(struct procstat *procstat, struct filestat *fst,
993 struct shmstat *shm, char *errbuf)
997 if (procstat->type == PROCSTAT_KVM) {
998 return (procstat_get_shm_info_kvm(procstat->kd, fst, shm,
1000 } else if (procstat->type == PROCSTAT_SYSCTL ||
1001 procstat->type == PROCSTAT_CORE) {
1002 return (procstat_get_shm_info_sysctl(fst, shm, errbuf));
1004 warnx("unknown access method: %d", procstat->type);
1005 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1011 procstat_get_shm_info_kvm(kvm_t *kd, struct filestat *fst,
1012 struct shmstat *shm, char *errbuf)
1022 bzero(shm, sizeof(*shm));
1023 shmfdp = fst->fs_typedep;
1026 if (!kvm_read_all(kd, (unsigned long)shmfdp, &shmfd,
1027 sizeof(struct shmfd))) {
1028 warnx("can't read shmfd at %p", (void *)shmfdp);
1031 shm->mode = S_IFREG | shmfd.shm_mode;
1032 shm->size = shmfd.shm_size;
1033 if (fst->fs_path == NULL && shmfd.shm_path != NULL) {
1034 path = malloc(MAXPATHLEN);
1035 for (i = 0; i < MAXPATHLEN - 1; i++) {
1036 if (!kvm_read_all(kd, (unsigned long)shmfd.shm_path + i,
1039 if (path[i] == '\0')
1046 fst->fs_path = path;
1051 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1056 procstat_get_shm_info_sysctl(struct filestat *fst, struct shmstat *shm,
1057 char *errbuf __unused)
1059 struct kinfo_file *kif;
1063 bzero(shm, sizeof(*shm));
1064 kif = fst->fs_typedep;
1067 shm->size = kif->kf_un.kf_file.kf_file_size;
1068 shm->mode = kif->kf_un.kf_file.kf_file_mode;
1073 procstat_get_vnode_info(struct procstat *procstat, struct filestat *fst,
1074 struct vnstat *vn, char *errbuf)
1078 if (procstat->type == PROCSTAT_KVM) {
1079 return (procstat_get_vnode_info_kvm(procstat->kd, fst, vn,
1081 } else if (procstat->type == PROCSTAT_SYSCTL ||
1082 procstat->type == PROCSTAT_CORE) {
1083 return (procstat_get_vnode_info_sysctl(fst, vn, errbuf));
1085 warnx("unknown access method: %d", procstat->type);
1086 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1092 procstat_get_vnode_info_kvm(kvm_t *kd, struct filestat *fst,
1093 struct vnstat *vn, char *errbuf)
1095 /* Filesystem specific handlers. */
1096 #define FSTYPE(fst) {#fst, fst##_filestat}
1099 int (*handler)(kvm_t *kd, struct vnode *vp,
1108 #ifdef LIBPROCSTAT_ZFS
1112 #define NTYPES (sizeof(fstypes) / sizeof(*fstypes))
1122 vp = fst->fs_typedep;
1125 error = kvm_read_all(kd, (unsigned long)vp, &vnode, sizeof(vnode));
1127 warnx("can't read vnode at %p", (void *)vp);
1130 bzero(vn, sizeof(*vn));
1131 vn->vn_type = vntype2psfsttype(vnode.v_type);
1132 if (vnode.v_type == VNON || vnode.v_type == VBAD)
1134 error = kvm_read_all(kd, (unsigned long)vnode.v_tag, tagstr,
1137 warnx("can't read v_tag at %p", (void *)vp);
1140 tagstr[sizeof(tagstr) - 1] = '\0';
1143 * Find appropriate handler.
1145 for (i = 0, found = 0; i < NTYPES; i++)
1146 if (!strcmp(fstypes[i].tag, tagstr)) {
1147 if (fstypes[i].handler(kd, &vnode, vn) != 0) {
1153 snprintf(errbuf, _POSIX2_LINE_MAX, "?(%s)", tagstr);
1156 vn->vn_mntdir = getmnton(kd, vnode.v_mount);
1157 if ((vnode.v_type == VBLK || vnode.v_type == VCHR) &&
1158 vnode.v_rdev != NULL){
1159 vn->vn_dev = dev2udev(kd, vnode.v_rdev);
1160 (void)kdevtoname(kd, vnode.v_rdev, vn->vn_devname);
1167 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1172 * kinfo vnode type to filestat translation.
1175 kinfo_vtype2fst(int kfvtype)
1180 } kfvtypes2fst[] = {
1181 { KF_VTYPE_VBAD, PS_FST_VTYPE_VBAD },
1182 { KF_VTYPE_VBLK, PS_FST_VTYPE_VBLK },
1183 { KF_VTYPE_VCHR, PS_FST_VTYPE_VCHR },
1184 { KF_VTYPE_VDIR, PS_FST_VTYPE_VDIR },
1185 { KF_VTYPE_VFIFO, PS_FST_VTYPE_VFIFO },
1186 { KF_VTYPE_VLNK, PS_FST_VTYPE_VLNK },
1187 { KF_VTYPE_VNON, PS_FST_VTYPE_VNON },
1188 { KF_VTYPE_VREG, PS_FST_VTYPE_VREG },
1189 { KF_VTYPE_VSOCK, PS_FST_VTYPE_VSOCK }
1191 #define NKFVTYPES (sizeof(kfvtypes2fst) / sizeof(*kfvtypes2fst))
1194 for (i = 0; i < NKFVTYPES; i++)
1195 if (kfvtypes2fst[i].kf_vtype == kfvtype)
1198 return (PS_FST_VTYPE_UNKNOWN);
1199 return (kfvtypes2fst[i].fst_vtype);
1203 procstat_get_vnode_info_sysctl(struct filestat *fst, struct vnstat *vn,
1206 struct statfs stbuf;
1207 struct kinfo_file *kif;
1208 struct kinfo_vmentry *kve;
1220 bzero(vn, sizeof(*vn));
1221 if (fst->fs_typedep == NULL)
1223 if (fst->fs_uflags & PS_FST_UFLAG_MMAP) {
1224 kve = fst->fs_typedep;
1225 fileid = kve->kve_vn_fileid;
1226 fsid = kve->kve_vn_fsid;
1227 mode = kve->kve_vn_mode;
1228 path = kve->kve_path;
1229 rdev = kve->kve_vn_rdev;
1230 size = kve->kve_vn_size;
1231 vntype = kinfo_vtype2fst(kve->kve_vn_type);
1232 status = kve->kve_status;
1234 kif = fst->fs_typedep;
1235 fileid = kif->kf_un.kf_file.kf_file_fileid;
1236 fsid = kif->kf_un.kf_file.kf_file_fsid;
1237 mode = kif->kf_un.kf_file.kf_file_mode;
1238 path = kif->kf_path;
1239 rdev = kif->kf_un.kf_file.kf_file_rdev;
1240 size = kif->kf_un.kf_file.kf_file_size;
1241 vntype = kinfo_vtype2fst(kif->kf_vnode_type);
1242 status = kif->kf_status;
1244 vn->vn_type = vntype;
1245 if (vntype == PS_FST_VTYPE_VNON || vntype == PS_FST_VTYPE_VBAD)
1247 if ((status & KF_ATTR_VALID) == 0) {
1248 snprintf(errbuf, _POSIX2_LINE_MAX, "? (no info available)");
1251 if (path && *path) {
1252 statfs(path, &stbuf);
1253 vn->vn_mntdir = strdup(stbuf.f_mntonname);
1255 vn->vn_mntdir = strdup("-");
1257 if (vntype == PS_FST_VTYPE_VBLK) {
1258 name = devname(rdev, S_IFBLK);
1260 strlcpy(vn->vn_devname, name,
1261 sizeof(vn->vn_devname));
1262 } else if (vntype == PS_FST_VTYPE_VCHR) {
1263 name = devname(vn->vn_dev, S_IFCHR);
1265 strlcpy(vn->vn_devname, name,
1266 sizeof(vn->vn_devname));
1269 vn->vn_fileid = fileid;
1276 procstat_get_socket_info(struct procstat *procstat, struct filestat *fst,
1277 struct sockstat *sock, char *errbuf)
1281 if (procstat->type == PROCSTAT_KVM) {
1282 return (procstat_get_socket_info_kvm(procstat->kd, fst, sock,
1284 } else if (procstat->type == PROCSTAT_SYSCTL ||
1285 procstat->type == PROCSTAT_CORE) {
1286 return (procstat_get_socket_info_sysctl(fst, sock, errbuf));
1288 warnx("unknown access method: %d", procstat->type);
1289 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1295 procstat_get_socket_info_kvm(kvm_t *kd, struct filestat *fst,
1296 struct sockstat *sock, char *errbuf)
1300 struct protosw proto;
1309 bzero(sock, sizeof(*sock));
1310 so = fst->fs_typedep;
1313 sock->so_addr = (uintptr_t)so;
1314 /* fill in socket */
1315 if (!kvm_read_all(kd, (unsigned long)so, &s,
1316 sizeof(struct socket))) {
1317 warnx("can't read sock at %p", (void *)so);
1320 /* fill in protosw entry */
1321 if (!kvm_read_all(kd, (unsigned long)s.so_proto, &proto,
1322 sizeof(struct protosw))) {
1323 warnx("can't read protosw at %p", (void *)s.so_proto);
1326 /* fill in domain */
1327 if (!kvm_read_all(kd, (unsigned long)proto.pr_domain, &dom,
1328 sizeof(struct domain))) {
1329 warnx("can't read domain at %p",
1330 (void *)proto.pr_domain);
1333 if ((len = kvm_read(kd, (unsigned long)dom.dom_name, sock->dname,
1334 sizeof(sock->dname) - 1)) < 0) {
1335 warnx("can't read domain name at %p", (void *)dom.dom_name);
1336 sock->dname[0] = '\0';
1339 sock->dname[len] = '\0';
1342 * Fill in known data.
1344 sock->type = s.so_type;
1345 sock->proto = proto.pr_protocol;
1346 sock->dom_family = dom.dom_family;
1347 sock->so_pcb = (uintptr_t)s.so_pcb;
1350 * Protocol specific data.
1352 switch(dom.dom_family) {
1355 if (proto.pr_protocol == IPPROTO_TCP) {
1357 if (kvm_read(kd, (u_long)s.so_pcb,
1358 (char *)&inpcb, sizeof(struct inpcb))
1359 != sizeof(struct inpcb)) {
1360 warnx("can't read inpcb at %p",
1364 (uintptr_t)inpcb.inp_ppcb;
1370 if (kvm_read(kd, (u_long)s.so_pcb, (char *)&unpcb,
1371 sizeof(struct unpcb)) != sizeof(struct unpcb)){
1372 warnx("can't read unpcb at %p",
1374 } else if (unpcb.unp_conn) {
1375 sock->so_rcv_sb_state = s.so_rcv.sb_state;
1376 sock->so_snd_sb_state = s.so_snd.sb_state;
1377 sock->unp_conn = (uintptr_t)unpcb.unp_conn;
1387 snprintf(errbuf, _POSIX2_LINE_MAX, "error");
1392 procstat_get_socket_info_sysctl(struct filestat *fst, struct sockstat *sock,
1393 char *errbuf __unused)
1395 struct kinfo_file *kif;
1399 bzero(sock, sizeof(*sock));
1400 kif = fst->fs_typedep;
1405 * Fill in known data.
1407 sock->type = kif->kf_sock_type;
1408 sock->proto = kif->kf_sock_protocol;
1409 sock->dom_family = kif->kf_sock_domain;
1410 sock->so_pcb = kif->kf_un.kf_sock.kf_sock_pcb;
1411 strlcpy(sock->dname, kif->kf_path, sizeof(sock->dname));
1412 bcopy(&kif->kf_sa_local, &sock->sa_local, kif->kf_sa_local.ss_len);
1413 bcopy(&kif->kf_sa_peer, &sock->sa_peer, kif->kf_sa_peer.ss_len);
1416 * Protocol specific data.
1418 switch(sock->dom_family) {
1421 if (sock->proto == IPPROTO_TCP)
1422 sock->inp_ppcb = kif->kf_un.kf_sock.kf_sock_inpcb;
1425 if (kif->kf_un.kf_sock.kf_sock_unpconn != 0) {
1426 sock->so_rcv_sb_state =
1427 kif->kf_un.kf_sock.kf_sock_rcv_sb_state;
1428 sock->so_snd_sb_state =
1429 kif->kf_un.kf_sock.kf_sock_snd_sb_state;
1431 kif->kf_un.kf_sock.kf_sock_unpconn;
1441 * Descriptor flags to filestat translation.
1444 to_filestat_flags(int flags)
1450 { FREAD, PS_FST_FFLAG_READ },
1451 { FWRITE, PS_FST_FFLAG_WRITE },
1452 { O_APPEND, PS_FST_FFLAG_APPEND },
1453 { O_ASYNC, PS_FST_FFLAG_ASYNC },
1454 { O_CREAT, PS_FST_FFLAG_CREAT },
1455 { O_DIRECT, PS_FST_FFLAG_DIRECT },
1456 { O_EXCL, PS_FST_FFLAG_EXCL },
1457 { O_EXEC, PS_FST_FFLAG_EXEC },
1458 { O_EXLOCK, PS_FST_FFLAG_EXLOCK },
1459 { O_NOFOLLOW, PS_FST_FFLAG_NOFOLLOW },
1460 { O_NONBLOCK, PS_FST_FFLAG_NONBLOCK },
1461 { O_SHLOCK, PS_FST_FFLAG_SHLOCK },
1462 { O_SYNC, PS_FST_FFLAG_SYNC },
1463 { O_TRUNC, PS_FST_FFLAG_TRUNC }
1465 #define NFSTFLAGS (sizeof(fstflags) / sizeof(*fstflags))
1470 for (i = 0; i < NFSTFLAGS; i++)
1471 if (flags & fstflags[i].flag)
1472 fst_flags |= fstflags[i].fst_flag;
1477 * Vnode type to filestate translation.
1480 vntype2psfsttype(int type)
1486 { VBAD, PS_FST_VTYPE_VBAD },
1487 { VBLK, PS_FST_VTYPE_VBLK },
1488 { VCHR, PS_FST_VTYPE_VCHR },
1489 { VDIR, PS_FST_VTYPE_VDIR },
1490 { VFIFO, PS_FST_VTYPE_VFIFO },
1491 { VLNK, PS_FST_VTYPE_VLNK },
1492 { VNON, PS_FST_VTYPE_VNON },
1493 { VREG, PS_FST_VTYPE_VREG },
1494 { VSOCK, PS_FST_VTYPE_VSOCK }
1496 #define NVFTYPES (sizeof(vt2fst) / sizeof(*vt2fst))
1497 unsigned int i, fst_type;
1499 fst_type = PS_FST_VTYPE_UNKNOWN;
1500 for (i = 0; i < NVFTYPES; i++) {
1501 if (type == vt2fst[i].vtype) {
1502 fst_type = vt2fst[i].fst_vtype;
1510 getmnton(kvm_t *kd, struct mount *m)
1513 static struct mtab {
1516 char mntonname[MNAMELEN + 1];
1520 for (mt = mhead; mt != NULL; mt = mt->next)
1522 return (mt->mntonname);
1523 if (!kvm_read_all(kd, (unsigned long)m, &mnt, sizeof(struct mount))) {
1524 warnx("can't read mount table at %p", (void *)m);
1527 if ((mt = malloc(sizeof (struct mtab))) == NULL)
1530 bcopy(&mnt.mnt_stat.f_mntonname[0], &mt->mntonname[0], MNAMELEN);
1531 mt->mntonname[MNAMELEN] = '\0';
1534 return (mt->mntonname);
1538 * Auxiliary structures and functions to get process environment or
1539 * command line arguments.
1548 static struct argvec *
1549 argvec_alloc(size_t bufsize)
1553 av = malloc(sizeof(*av));
1556 av->bufsize = bufsize;
1557 av->buf = malloc(av->bufsize);
1558 if (av->buf == NULL) {
1563 av->argv = malloc(sizeof(char *) * av->argc);
1564 if (av->argv == NULL) {
1573 argvec_free(struct argvec * av)
1582 getargv(struct procstat *procstat, struct kinfo_proc *kp, size_t nchr, int env)
1584 int error, name[4], argc, i;
1585 struct argvec *av, **avp;
1592 if (procstat->type == PROCSTAT_KVM) {
1593 warnx("can't use kvm access method");
1596 if (procstat->type != PROCSTAT_SYSCTL &&
1597 procstat->type != PROCSTAT_CORE) {
1598 warnx("unknown access method: %d", procstat->type);
1602 if (nchr == 0 || nchr > ARG_MAX)
1605 avp = (struct argvec **)(env ? &procstat->argv : &procstat->envv);
1610 av = argvec_alloc(nchr);
1613 warn("malloc(%zu)", nchr);
1617 } else if (av->bufsize < nchr) {
1618 av->buf = reallocf(av->buf, nchr);
1619 if (av->buf == NULL) {
1620 warn("malloc(%zu)", nchr);
1624 if (procstat->type == PROCSTAT_SYSCTL) {
1626 name[1] = KERN_PROC;
1627 name[2] = env ? KERN_PROC_ENV : KERN_PROC_ARGS;
1628 name[3] = kp->ki_pid;
1630 error = sysctl(name, 4, av->buf, &len, NULL, 0);
1631 if (error != 0 && errno != ESRCH && errno != EPERM)
1632 warn("sysctl(kern.proc.%s)", env ? "env" : "args");
1633 if (error != 0 || len == 0)
1635 } else /* procstat->type == PROCSTAT_CORE */ {
1636 type = env ? PSC_TYPE_ENVV : PSC_TYPE_ARGV;
1638 if (procstat_core_get(procstat->core, type, av->buf, &len)
1647 for (p = av->buf; p < av->buf + len; p += strlen(p) + 1) {
1653 argv = realloc(argv, sizeof(char *) * argc);
1655 warn("malloc(%zu)", sizeof(char *) * argc);
1667 * Return process command line arguments.
1670 procstat_getargv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1673 return (getargv(procstat, p, nchr, 0));
1677 * Free the buffer allocated by procstat_getargv().
1680 procstat_freeargv(struct procstat *procstat)
1683 if (procstat->argv != NULL) {
1684 argvec_free(procstat->argv);
1685 procstat->argv = NULL;
1690 * Return process environment.
1693 procstat_getenvv(struct procstat *procstat, struct kinfo_proc *p, size_t nchr)
1696 return (getargv(procstat, p, nchr, 1));
1700 * Free the buffer allocated by procstat_getenvv().
1703 procstat_freeenvv(struct procstat *procstat)
1705 if (procstat->envv != NULL) {
1706 argvec_free(procstat->envv);
1707 procstat->envv = NULL;
1711 static struct kinfo_vmentry *
1712 kinfo_getvmmap_core(struct procstat_core *core, int *cntp)
1716 char *buf, *bp, *eb;
1717 struct kinfo_vmentry *kiv, *kp, *kv;
1719 buf = procstat_core_get(core, PSC_TYPE_VMMAP, NULL, &len);
1724 * XXXMG: The code below is just copy&past from libutil.
1725 * The code duplication can be avoided if libutil
1726 * is extended to provide something like:
1727 * struct kinfo_vmentry *kinfo_getvmmap_from_buf(const char *buf,
1728 * size_t len, int *cntp);
1731 /* Pass 1: count items */
1736 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1737 bp += kv->kve_structsize;
1741 kiv = calloc(cnt, sizeof(*kiv));
1749 /* Pass 2: unpack */
1751 kv = (struct kinfo_vmentry *)(uintptr_t)bp;
1752 /* Copy/expand into pre-zeroed buffer */
1753 memcpy(kp, kv, kv->kve_structsize);
1754 /* Advance to next packed record */
1755 bp += kv->kve_structsize;
1756 /* Set field size to fixed length, advance */
1757 kp->kve_structsize = sizeof(*kp);
1762 return (kiv); /* Caller must free() return value */
1765 struct kinfo_vmentry *
1766 procstat_getvmmap(struct procstat *procstat, struct kinfo_proc *kp,
1770 switch(procstat->type) {
1772 warnx("kvm method is not supported");
1774 case PROCSTAT_SYSCTL:
1775 return (kinfo_getvmmap(kp->ki_pid, cntp));
1777 return (kinfo_getvmmap_core(procstat->core, cntp));
1779 warnx("unknown access method: %d", procstat->type);
1785 procstat_freevmmap(struct procstat *procstat __unused,
1786 struct kinfo_vmentry *vmmap)
1793 procstat_getgroups_sysctl(pid_t pid, unsigned int *cntp)
1801 mib[2] = KERN_PROC_GROUPS;
1803 len = (sysconf(_SC_NGROUPS_MAX) + 1) * sizeof(gid_t);
1804 groups = malloc(len);
1805 if (groups == NULL) {
1806 warn("malloc(%zu)", len);
1809 if (sysctl(mib, 4, groups, &len, NULL, 0) == -1) {
1810 warn("sysctl: kern.proc.groups: %d", pid);
1814 *cntp = len / sizeof(gid_t);
1819 procstat_getgroups_core(struct procstat_core *core, unsigned int *cntp)
1824 groups = procstat_core_get(core, PSC_TYPE_GROUPS, NULL, &len);
1827 *cntp = len / sizeof(gid_t);
1832 procstat_getgroups(struct procstat *procstat, struct kinfo_proc *kp,
1835 switch(procstat->type) {
1837 warnx("kvm method is not supported");
1839 case PROCSTAT_SYSCTL:
1840 return (procstat_getgroups_sysctl(kp->ki_pid, cntp));
1842 return (procstat_getgroups_core(procstat->core, cntp));
1844 warnx("unknown access method: %d", procstat->type);
1850 procstat_freegroups(struct procstat *procstat __unused, gid_t *groups)
1857 procstat_getumask_sysctl(pid_t pid, unsigned short *maskp)
1865 mib[2] = KERN_PROC_UMASK;
1867 len = sizeof(*maskp);
1868 error = sysctl(mib, 4, maskp, &len, NULL, 0);
1869 if (error != 0 && errno != ESRCH)
1870 warn("sysctl: kern.proc.umask: %d", pid);
1875 procstat_getumask_core(struct procstat_core *core, unsigned short *maskp)
1878 unsigned short *buf;
1880 buf = procstat_core_get(core, PSC_TYPE_UMASK, NULL, &len);
1883 if (len < sizeof(*maskp)) {
1893 procstat_getumask(struct procstat *procstat, struct kinfo_proc *kp,
1894 unsigned short *maskp)
1896 switch(procstat->type) {
1898 warnx("kvm method is not supported");
1900 case PROCSTAT_SYSCTL:
1901 return (procstat_getumask_sysctl(kp->ki_pid, maskp));
1903 return (procstat_getumask_core(procstat->core, maskp));
1905 warnx("unknown access method: %d", procstat->type);
1911 procstat_getrlimit_sysctl(pid_t pid, int which, struct rlimit* rlimit)
1917 name[1] = KERN_PROC;
1918 name[2] = KERN_PROC_RLIMIT;
1921 len = sizeof(struct rlimit);
1922 error = sysctl(name, 5, rlimit, &len, NULL, 0);
1923 if (error < 0 && errno != ESRCH) {
1924 warn("sysctl: kern.proc.rlimit: %d", pid);
1927 if (error < 0 || len != sizeof(struct rlimit))
1933 procstat_getrlimit_core(struct procstat_core *core, int which,
1934 struct rlimit* rlimit)
1937 struct rlimit* rlimits;
1939 if (which < 0 || which >= RLIM_NLIMITS) {
1941 warn("getrlimit: which");
1944 rlimits = procstat_core_get(core, PSC_TYPE_RLIMIT, NULL, &len);
1945 if (rlimits == NULL)
1947 if (len < sizeof(struct rlimit) * RLIM_NLIMITS) {
1951 *rlimit = rlimits[which];
1956 procstat_getrlimit(struct procstat *procstat, struct kinfo_proc *kp, int which,
1957 struct rlimit* rlimit)
1959 switch(procstat->type) {
1961 warnx("kvm method is not supported");
1963 case PROCSTAT_SYSCTL:
1964 return (procstat_getrlimit_sysctl(kp->ki_pid, which, rlimit));
1966 return (procstat_getrlimit_core(procstat->core, which, rlimit));
1968 warnx("unknown access method: %d", procstat->type);
1974 procstat_getpathname_sysctl(pid_t pid, char *pathname, size_t maxlen)
1980 name[1] = KERN_PROC;
1981 name[2] = KERN_PROC_PATHNAME;
1984 error = sysctl(name, 4, pathname, &len, NULL, 0);
1985 if (error != 0 && errno != ESRCH)
1986 warn("sysctl: kern.proc.pathname: %d", pid);
1993 procstat_getpathname_core(struct procstat_core *core, char *pathname,
1996 struct kinfo_file *files;
1999 files = kinfo_getfile_core(core, &cnt);
2003 for (i = 0; i < cnt; i++) {
2004 if (files[i].kf_fd != KF_FD_TYPE_TEXT)
2006 strncpy(pathname, files[i].kf_path, maxlen);
2015 procstat_getpathname(struct procstat *procstat, struct kinfo_proc *kp,
2016 char *pathname, size_t maxlen)
2018 switch(procstat->type) {
2020 warnx("kvm method is not supported");
2022 case PROCSTAT_SYSCTL:
2023 return (procstat_getpathname_sysctl(kp->ki_pid, pathname,
2026 return (procstat_getpathname_core(procstat->core, pathname,
2029 warnx("unknown access method: %d", procstat->type);
2035 procstat_getosrel_sysctl(pid_t pid, int *osrelp)
2041 name[1] = KERN_PROC;
2042 name[2] = KERN_PROC_OSREL;
2044 len = sizeof(*osrelp);
2045 error = sysctl(name, 4, osrelp, &len, NULL, 0);
2046 if (error != 0 && errno != ESRCH)
2047 warn("sysctl: kern.proc.osrel: %d", pid);
2052 procstat_getosrel_core(struct procstat_core *core, int *osrelp)
2057 buf = procstat_core_get(core, PSC_TYPE_OSREL, NULL, &len);
2060 if (len < sizeof(*osrelp)) {
2070 procstat_getosrel(struct procstat *procstat, struct kinfo_proc *kp, int *osrelp)
2072 switch(procstat->type) {
2074 warnx("kvm method is not supported");
2076 case PROCSTAT_SYSCTL:
2077 return (procstat_getosrel_sysctl(kp->ki_pid, osrelp));
2079 return (procstat_getosrel_core(procstat->core, osrelp));
2081 warnx("unknown access method: %d", procstat->type);
2086 #define PROC_AUXV_MAX 256
2088 #if __ELF_WORD_SIZE == 64
2089 static const char *elf32_sv_names[] = {
2095 is_elf32_sysctl(pid_t pid)
2099 static char sv_name[256];
2102 name[1] = KERN_PROC;
2103 name[2] = KERN_PROC_SV_NAME;
2105 len = sizeof(sv_name);
2106 error = sysctl(name, 4, sv_name, &len, NULL, 0);
2107 if (error != 0 || len == 0)
2109 for (i = 0; i < sizeof(elf32_sv_names) / sizeof(*elf32_sv_names); i++) {
2110 if (strncmp(sv_name, elf32_sv_names[i], sizeof(sv_name)) == 0)
2116 static Elf_Auxinfo *
2117 procstat_getauxv32_sysctl(pid_t pid, unsigned int *cntp)
2120 Elf32_Auxinfo *auxv32;
2123 unsigned int i, count;
2127 name[1] = KERN_PROC;
2128 name[2] = KERN_PROC_AUXV;
2130 len = PROC_AUXV_MAX * sizeof(Elf32_Auxinfo);
2132 auxv32 = malloc(len);
2133 if (auxv32 == NULL) {
2134 warn("malloc(%zu)", len);
2137 if (sysctl(name, 4, auxv32, &len, NULL, 0) == -1) {
2138 if (errno != ESRCH && errno != EPERM)
2139 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2142 count = len / sizeof(Elf_Auxinfo);
2143 auxv = malloc(count * sizeof(Elf_Auxinfo));
2145 warn("malloc(%zu)", count * sizeof(Elf_Auxinfo));
2148 for (i = 0; i < count; i++) {
2150 * XXX: We expect that values for a_type on a 32-bit platform
2151 * are directly mapped to values on 64-bit one, which is not
2154 auxv[i].a_type = auxv32[i].a_type;
2155 ptr = &auxv32[i].a_un;
2156 auxv[i].a_un.a_val = *((uint32_t *)ptr);
2163 #endif /* __ELF_WORD_SIZE == 64 */
2165 static Elf_Auxinfo *
2166 procstat_getauxv_sysctl(pid_t pid, unsigned int *cntp)
2172 #if __ELF_WORD_SIZE == 64
2173 if (is_elf32_sysctl(pid))
2174 return (procstat_getauxv32_sysctl(pid, cntp));
2177 name[1] = KERN_PROC;
2178 name[2] = KERN_PROC_AUXV;
2180 len = PROC_AUXV_MAX * sizeof(Elf_Auxinfo);
2183 warn("malloc(%zu)", len);
2186 if (sysctl(name, 4, auxv, &len, NULL, 0) == -1) {
2187 if (errno != ESRCH && errno != EPERM)
2188 warn("sysctl: kern.proc.auxv: %d: %d", pid, errno);
2192 *cntp = len / sizeof(Elf_Auxinfo);
2196 static Elf_Auxinfo *
2197 procstat_getauxv_core(struct procstat_core *core, unsigned int *cntp)
2202 auxv = procstat_core_get(core, PSC_TYPE_AUXV, NULL, &len);
2205 *cntp = len / sizeof(Elf_Auxinfo);
2210 procstat_getauxv(struct procstat *procstat, struct kinfo_proc *kp,
2213 switch(procstat->type) {
2215 warnx("kvm method is not supported");
2217 case PROCSTAT_SYSCTL:
2218 return (procstat_getauxv_sysctl(kp->ki_pid, cntp));
2220 return (procstat_getauxv_core(procstat->core, cntp));
2222 warnx("unknown access method: %d", procstat->type);
2228 procstat_freeauxv(struct procstat *procstat __unused, Elf_Auxinfo *auxv)
2234 static struct kinfo_kstack *
2235 procstat_getkstack_sysctl(pid_t pid, int *cntp)
2237 struct kinfo_kstack *kkstp;
2242 name[1] = KERN_PROC;
2243 name[2] = KERN_PROC_KSTACK;
2247 error = sysctl(name, 4, NULL, &len, NULL, 0);
2248 if (error < 0 && errno != ESRCH && errno != EPERM && errno != ENOENT) {
2249 warn("sysctl: kern.proc.kstack: %d", pid);
2252 if (error == -1 && errno == ENOENT) {
2253 warnx("sysctl: kern.proc.kstack unavailable"
2254 " (options DDB or options STACK required in kernel)");
2259 kkstp = malloc(len);
2260 if (kkstp == NULL) {
2261 warn("malloc(%zu)", len);
2264 if (sysctl(name, 4, kkstp, &len, NULL, 0) == -1) {
2265 warn("sysctl: kern.proc.pid: %d", pid);
2269 *cntp = len / sizeof(*kkstp);
2274 struct kinfo_kstack *
2275 procstat_getkstack(struct procstat *procstat, struct kinfo_proc *kp,
2278 switch(procstat->type) {
2280 warnx("kvm method is not supported");
2282 case PROCSTAT_SYSCTL:
2283 return (procstat_getkstack_sysctl(kp->ki_pid, cntp));
2285 warnx("core method is not supported");
2288 warnx("unknown access method: %d", procstat->type);
2294 procstat_freekstack(struct procstat *procstat __unused,
2295 struct kinfo_kstack *kkstp)