xref: /freebsd/cddl/lib/libdtrace/psinfo.d (revision ddd5b8e9b4d8957fce018c520657cdfa4ecffad3)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  *
22  * Portions Copyright 2006 John Birrell jb@freebsd.org
23  *
24  * $FreeBSD$
25  */
26 /*
27  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
28  * Use is subject to license terms.
29  */
30 
31 typedef struct psinfo {
32 	int	pr_nlwp;	/* number of threads */
33 	pid_t	pr_pid;		/* unique process id */
34 	pid_t	pr_ppid;	/* process id of parent */
35 	pid_t	pr_pgid;	/* pid of process group leader */
36 	pid_t	pr_sid;		/* session id */
37 	uid_t	pr_uid;		/* real user id */
38 	uid_t	pr_euid;	/* effective user id */
39 	gid_t	pr_gid;		/* real group id */
40 	gid_t	pr_egid;	/* effective group id */
41 	uintptr_t
42 		pr_addr;	/* address of process */
43 	string	pr_psargs;	/* process arguments */
44 	u_int	pr_arglen;	/* process argument length */
45 	u_int	pr_jailid;	/* jail id */
46 } psinfo_t;
47 
48 #pragma D binding "1.0" translator
49 translator psinfo_t < struct proc *T > {
50 	pr_nlwp = T->p_numthreads;
51 	pr_pid = T->p_pid;
52 	pr_ppid = (T->p_pptr == 0) ? 0 : T->p_pptr->p_pid;
53 	pr_pgid = (T->p_leader == 0) ? 0 : T->p_leader->p_pid;
54 	pr_sid = (T->p_pgrp == 0) ? 0 : ((T->p_pgrp->pg_session == 0) ? 0 : T->p_pgrp->pg_session->s_sid);
55 	pr_uid = T->p_ucred->cr_ruid;
56 	pr_euid = T->p_ucred->cr_uid;
57 	pr_gid = T->p_ucred->cr_rgid;
58 	pr_egid = T->p_ucred->cr_groups[0];
59 	pr_addr = 0;
60 	pr_psargs = stringof(T->p_args->ar_args);
61 	pr_arglen = T->p_args->ar_length;
62 	pr_jailid = T->p_ucred->cr_prison->pr_id;
63 };
64 
65 typedef struct lwpsinfo {
66 	id_t	pr_lwpid;	/* thread ID. */
67 	int	pr_flag;	/* thread flags. */
68 	int	pr_pri;		/* thread priority. */
69 	char	pr_state;	/* numeric lwp state */
70 	char	pr_sname;	/* printable character for pr_state */
71 	short	pr_syscall;	/* system call number (if in syscall) */
72 	uintptr_t
73 		pr_addr;	/* internal address of lwp */
74 	uintptr_t
75 		pr_wchan;	/* sleep address */
76 } lwpsinfo_t;
77 
78 #pragma D binding "1.0" translator
79 translator lwpsinfo_t < struct thread *T > {
80 	pr_lwpid = T->td_tid;
81 	pr_pri = T->td_priority;
82 	pr_flag = T->td_flags;
83 	pr_state = 0; /* XXX */
84 	pr_sname = '?'; /* XXX */
85 	pr_syscall = 0; /* XXX */
86 	pr_addr = (uintptr_t)T;
87 	pr_wchan = (uintptr_t)T->td_wchan;
88 };
89 
90 inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread->td_proc);
91 #pragma D attributes Stable/Stable/Common curpsinfo
92 #pragma D binding "1.0" curpsinfo
93 
94 inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
95 #pragma D attributes Stable/Stable/Common curlwpsinfo
96 #pragma D binding "1.0" curlwpsinfo
97 
98