Add '-H', 'nlwp', and 'tid' options to ps(1) to display some LWP data (inspired
[dragonfly.git] / sys / kern / kern_kinfo.c
1 /*-
2  * Copyright (c) 2007 The DragonFly Project.  All rights reserved.
3  * 
4  * This code is derived from software contributed to The DragonFly Project
5  * by Simon 'corecode' Schubert <corecode@fs.ei.tum.de>
6  * by Thomas E. Spanjaard <tgen@netphreax.net>
7  * 
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in
16  *    the documentation and/or other materials provided with the
17  *    distribution.
18  * 3. Neither the name of The DragonFly Project nor the names of its
19  *    contributors may be used to endorse or promote products derived
20  *    from this software without specific, prior written permission.
21  * 
22  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
23  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
24  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
25  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
26  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
27  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
28  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
29  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
30  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
31  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
32  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  * 
35  * $DragonFly: src/sys/kern/kern_kinfo.c,v 1.14 2007/08/14 20:29:05 dillon Exp $
36  */
37
38 /*
39  * This is a source file used by both the kernel and libkvm.
40  */
41
42 #ifndef _KERNEL
43 #define _KERNEL_STRUCTURES
44 #endif
45
46 #include <sys/proc.h>
47 #include <vm/vm_map.h>
48 #include <sys/kinfo.h>
49 #include <sys/tty.h>
50 #include <sys/conf.h>
51 #include <sys/jail.h>
52 #include <sys/globaldata.h>
53 #ifdef _KERNEL
54 #include <sys/systm.h>
55 #else
56 #include <string.h>
57 #endif
58
59
60 /*
61  * Fill in a struct kinfo_proc.
62  */
63 void
64 fill_kinfo_proc(struct proc *p, struct kinfo_proc *kp)
65 {
66         struct session *sess = p->p_pgrp->pg_session;
67
68         bzero(kp, sizeof(*kp));
69
70         kp->kp_paddr = (uintptr_t)p;
71         kp->kp_fd = (uintptr_t)p->p_fd;
72
73         kp->kp_flags = p->p_flag;
74         kp->kp_stat = p->p_stat;
75         kp->kp_lock = p->p_lock;
76         kp->kp_acflag = p->p_acflag;
77         kp->kp_traceflag = p->p_traceflag;
78         kp->kp_siglist = p->p_siglist;
79         kp->kp_sigignore = p->p_sigignore;
80         kp->kp_sigcatch = p->p_sigcatch;
81         kp->kp_sigflag = p->p_sigacts->ps_flag;
82         kp->kp_start = p->p_start;
83
84         strncpy(kp->kp_comm, p->p_comm, sizeof(kp->kp_comm) - 1);
85         kp->kp_comm[sizeof(kp->kp_comm) - 1] = 0;
86
87         kp->kp_uid = p->p_ucred->cr_uid;
88         kp->kp_ngroups = p->p_ucred->cr_ngroups;
89         bcopy(p->p_ucred->cr_groups, kp->kp_groups,
90               NGROUPS * sizeof(kp->kp_groups[0]));
91         kp->kp_ruid = p->p_ucred->cr_ruid;
92         kp->kp_svuid = p->p_ucred->cr_svuid;
93         kp->kp_rgid = p->p_ucred->cr_rgid;
94         kp->kp_svgid = p->p_ucred->cr_svgid;
95
96         kp->kp_pid = p->p_pid;
97         if (p->p_oppid != 0)
98                 kp->kp_ppid = p->p_oppid;
99         else
100                 kp->kp_ppid = p->p_pptr != NULL ? p->p_pptr->p_pid : -1;
101         kp->kp_pgid = p->p_pgrp->pg_id;
102         kp->kp_jobc = p->p_pgrp->pg_jobc;
103         kp->kp_sid = sess->s_sid;
104         bcopy(sess->s_login, kp->kp_login, MAXLOGNAME);
105         if (sess->s_ttyvp != NULL)
106                 kp->kp_auxflags |= KI_CTTY;
107         if (SESS_LEADER(p))
108                 kp->kp_auxflags |= KI_SLEADER;
109         if (((p->p_flag & P_CONTROLT) != 0) && (sess->s_ttyp != NULL)) {
110                 kp->kp_tdev = dev2udev(sess->s_ttyp->t_dev);
111                 if (sess->s_ttyp->t_pgrp != NULL)
112                         kp->kp_tpgid = sess->s_ttyp->t_pgrp->pg_id;
113                 else
114                         kp->kp_tpgid = -1;
115                 if (sess->s_ttyp->t_session != NULL)
116                         kp->kp_tsid = sess->s_ttyp->t_session->s_sid;
117                 else
118                         kp->kp_tsid = -1;
119         } else {
120                 kp->kp_tdev = NOUDEV;
121         }
122         kp->kp_exitstat = p->p_xstat;
123         kp->kp_nthreads = p->p_nthreads;
124         kp->kp_nice = p->p_nice;
125         kp->kp_swtime = p->p_swtime;
126
127         kp->kp_vm_map_size = p->p_vmspace->vm_map.size;
128         kp->kp_vm_rssize = vmspace_resident_count(p->p_vmspace);
129         kp->kp_vm_swrss = p->p_vmspace->vm_swrss;
130         kp->kp_vm_tsize = p->p_vmspace->vm_tsize;
131         kp->kp_vm_dsize = p->p_vmspace->vm_dsize;
132         kp->kp_vm_ssize = p->p_vmspace->vm_ssize;
133
134         if (jailed(p->p_ucred))
135                 kp->kp_jailid = p->p_ucred->cr_prison->pr_id;
136
137         kp->kp_ru = p->p_ru;
138         kp->kp_ru = p->p_cru;
139 }
140
141 /*
142  * Fill in a struct kinfo_lwp.
143  */
144 void
145 fill_kinfo_lwp(struct lwp *lwp, struct kinfo_lwp *kl)
146 {
147         bzero(kl, sizeof(*kl));
148
149         kl->kl_pid = lwp->lwp_proc->p_pid;
150         kl->kl_tid = lwp->lwp_tid;
151
152         kl->kl_flags = lwp->lwp_flag;
153         kl->kl_stat = lwp->lwp_stat;
154         kl->kl_lock = lwp->lwp_lock;
155         kl->kl_tdflags = lwp->lwp_thread->td_flags;
156
157         /*
158          * The process/lwp stat may not reflect whether the process is
159          * actually sleeping or not if the related thread was directly
160          * descheduled by LWKT.  Adjust the stat if the thread is not
161          * runnable and not waiting to be scheduled on a cpu by the
162          * user process scheduler.
163          */
164         if (kl->kl_stat == LSRUN) {
165                 if ((kl->kl_tdflags & TDF_RUNQ) == 0 &&
166                     (lwp->lwp_flag & LWP_ONRUNQ) == 0) {
167                         kl->kl_stat = LSSLEEP;
168                 }
169         }
170 #ifdef SMP
171         kl->kl_mpcount = lwp->lwp_thread->td_mpcount;
172 #else
173         kl->kl_mpcount = 0;
174 #endif
175
176         kl->kl_prio = lwp->lwp_usdata.bsd4.priority;    /* XXX TGEN dangerous assumption */
177         kl->kl_tdprio = lwp->lwp_thread->td_pri;
178         kl->kl_rtprio = lwp->lwp_rtprio;
179
180         kl->kl_uticks = lwp->lwp_thread->td_uticks;
181         kl->kl_sticks = lwp->lwp_thread->td_sticks;
182         kl->kl_iticks = lwp->lwp_thread->td_iticks;
183         kl->kl_cpticks = lwp->lwp_cpticks;
184         kl->kl_pctcpu = lwp->lwp_pctcpu;
185         kl->kl_slptime = lwp->lwp_slptime;
186         kl->kl_origcpu = lwp->lwp_usdata.bsd4.origcpu;  /* XXX TGEN same */
187         kl->kl_estcpu = lwp->lwp_usdata.bsd4.estcpu;
188         kl->kl_cpuid = lwp->lwp_thread->td_gd->gd_cpuid;
189
190         kl->kl_ru = lwp->lwp_ru;
191
192         kl->kl_siglist = lwp->lwp_siglist;
193         kl->kl_sigmask = lwp->lwp_sigmask;
194
195         kl->kl_wchan = (uintptr_t)lwp->lwp_thread->td_wchan;
196         if (lwp->lwp_thread->td_wmesg) {
197                 strncpy(kl->kl_wmesg, lwp->lwp_thread->td_wmesg, WMESGLEN);
198                 kl->kl_wmesg[WMESGLEN] = 0;
199         }
200 }
201
202 /*
203  * Fill in a struct kinfo_proc for kernel threads (i.e. those without proc).
204  */
205 void
206 fill_kinfo_proc_kthread(struct thread *td, struct kinfo_proc *kp)
207 {
208         bzero(kp, sizeof(*kp));
209
210         /*
211          * Fill in fake proc information and semi-fake lwp info.
212          */
213         kp->kp_pid = -1;
214         kp->kp_tdev = NOUDEV;
215         strncpy(kp->kp_comm, td->td_comm, sizeof(kp->kp_comm) - 1);
216         kp->kp_comm[sizeof(kp->kp_comm) - 1] = 0;
217         kp->kp_flags = P_SYSTEM;
218         kp->kp_stat = SACTIVE;
219
220         kp->kp_lwp.kl_pid = -1;
221         kp->kp_lwp.kl_tid = -1;
222         kp->kp_lwp.kl_tdflags = td->td_flags;
223 #ifdef SMP
224         kp->kp_lwp.kl_mpcount = td->td_mpcount;
225 #else /* !SMP */
226         kp->kp_lwp.kl_mpcount = 0;
227 #endif /* SMP */
228
229         kp->kp_lwp.kl_tdprio = td->td_pri;
230         kp->kp_lwp.kl_rtprio.type = RTP_PRIO_THREAD;
231         kp->kp_lwp.kl_rtprio.prio = td->td_pri & TDPRI_MASK;
232
233         kp->kp_lwp.kl_uticks = td->td_uticks;
234         kp->kp_lwp.kl_sticks = td->td_sticks;
235         kp->kp_lwp.kl_iticks = td->td_iticks;
236         kp->kp_lwp.kl_cpuid = td->td_gd->gd_cpuid;
237
238         kp->kp_lwp.kl_wchan = (uintptr_t)td->td_wchan;
239         if (td->td_flags & TDF_RUNQ)
240                 kp->kp_lwp.kl_stat = LSRUN;
241         else 
242                 kp->kp_lwp.kl_stat = LSSLEEP;
243         if (td->td_wmesg) {
244                 strncpy(kp->kp_lwp.kl_wmesg, td->td_wmesg, WMESGLEN);
245                 kp->kp_lwp.kl_wmesg[WMESGLEN] = 0;
246         }
247 }