2 * Copyright (c) 2002 Jake Burkholder
3 * Copyright (c) 2004 Robert Watson
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.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * $DragonFly: src/usr.bin/pctrack/pctrack.c,v 1.2 2008/09/02 11:50:46 matthias Exp $
30 #include <sys/kinfo.h>
31 #include <sys/types.h>
35 #include <sys/queue.h>
51 static void usage(void);
52 static void do_output(int, int, struct kinfo_pcheader
*, struct kinfo_pctrack
*, int);
53 static void read_symbols(const char *);
54 static const char *address_to_symbol(void *);
56 static struct nlist nl
[] = {
57 { .n_name
= "_ncpus" },
58 { .n_name
= "_cputime_pcheader" },
59 { .n_name
= "_cputime_pctrack" },
63 static char corefile
[PATH_MAX
];
64 static char execfile
[PATH_MAX
];
65 static char errbuf
[_POSIX2_LINE_MAX
];
71 static int cflag
= -1;
76 * Reads the cputime_pctrack[] structure from the kernel and displays
77 * the results in a human readable format.
80 main(int ac
, char **av
)
82 struct kinfo_pcheader pchead
;
83 struct kinfo_pctrack pctrack
;
92 * Parse commandline arguments.
94 while ((c
= getopt(ac
, av
, "nsifc:N:M:")) != -1) {
97 if (strlcpy(execfile
, optarg
, sizeof(execfile
))
99 errx(1, "%s: File name too long", optarg
);
103 if (strlcpy(corefile
, optarg
, sizeof(corefile
))
105 errx(1, "%s: File name too long", optarg
);
109 cflag
= strtol(optarg
, NULL
, 0);
128 if (sflag
== 0 && iflag
== 0) {
133 read_symbols(Nflag
? execfile
: NULL
);
135 if (fflag
&& (cflag
< 0 || sflag
+ iflag
> 1)) {
136 fprintf(stderr
, "-f can only be specified with a particular cpu and just one of -i or -s\n");
142 if (ac
!= 0 && strtod(av
[0], NULL
) > 0.0) {
143 repeat
= (int)(strtod(av
[0], NULL
) * 1000000.0);
147 repeat
= 1000000 / 10;
155 * Open our execfile and corefile, resolve needed symbols and read in
158 if ((kd
= kvm_openfiles(Nflag
? execfile
: NULL
,
159 Mflag
? corefile
: NULL
, NULL
, O_RDONLY
, errbuf
)) == NULL
)
160 errx(1, "%s", errbuf
);
161 if (kvm_nlist(kd
, nl
) != 0)
162 errx(1, "%s", kvm_geterr(kd
));
164 if (kvm_read(kd
, nl
[0].n_value
, &ncpus
, sizeof(ncpus
)) == -1)
165 errx(1, "%s", kvm_geterr(kd
));
166 if (kvm_read(kd
, nl
[1].n_value
, &pchead
, sizeof(pchead
)) == -1)
167 errx(1, "%s", kvm_geterr(kd
));
170 for (cpu
= 0; cpu
< ncpus
; ++cpu
) {
171 for (ntrack
= 0; ntrack
< pchead
.pc_ntrack
; ++ntrack
) {
174 if (ntrack
== PCTRACK_SYS
&& sflag
== 0)
176 if (ntrack
== PCTRACK_INT
&& iflag
== 0)
178 if (cflag
>= 0 && cflag
!= cpu
)
181 offset
= offsetof(struct kinfo_pctrack
,
182 pc_array
[pchead
.pc_arysize
]);
183 offset
= (offset
* pchead
.pc_ntrack
* cpu
) +
185 if (kvm_read(kd
, nl
[2].n_value
+ offset
, &pctrack
, sizeof(pctrack
)) < 0)
186 errx(1, "%s", kvm_geterr(kd
));
188 printf("CPU %d %s:\n", cpu
,
189 (ntrack
== PCTRACK_SYS
) ? "SYSTEM" :
190 (ntrack
== PCTRACK_INT
) ? "INTERRUPT" : "?"
193 do_output(cpu
, ntrack
, &pchead
, &pctrack
, pctrack
.pc_index
- pchead
.pc_arysize
);
196 int last_index
= pctrack
.pc_index
;
197 kvm_read(kd
, nl
[2].n_value
+ offset
, &pctrack
,
199 do_output(cpu
, ntrack
, &pchead
, &pctrack
, last_index
);
211 do_output(int cpu __unused
, int track __unused
, struct kinfo_pcheader
*pchead
, struct kinfo_pctrack
*pctrack
, int base_index
)
216 if (pctrack
->pc_index
- base_index
> pchead
->pc_arysize
) {
217 i
= pctrack
->pc_index
- pchead
->pc_arysize
;
219 while (i
< pctrack
->pc_index
) {
220 void *data
= pctrack
->pc_array
[i
& (pchead
->pc_arysize
- 1)];
222 printf("\t%p\n", data
);
224 printf("\t%s\n", address_to_symbol(data
));
230 TAILQ_ENTRY(symdata
) link
;
236 static TAILQ_HEAD(symlist
, symdata
) symlist
;
237 static struct symdata
*symcache
;
238 static char *symbegin
;
242 read_symbols(const char *file
)
246 size_t buflen
= sizeof(buf
);
253 TAILQ_INIT(&symlist
);
256 if (sysctlbyname("kern.bootfile", buf
, &buflen
, NULL
, 0) < 0)
257 file
= "/boot/kernel";
261 snprintf(cmd
, sizeof(cmd
), "nm -n %s", file
);
262 if ((fp
= popen(cmd
, "r")) != NULL
) {
263 while (fgets(buf
, sizeof(buf
), fp
) != NULL
) {
264 s1
= strtok(buf
, " \t\n");
265 s2
= strtok(NULL
, " \t\n");
266 s3
= strtok(NULL
, " \t\n");
267 if (s1
&& s2
&& s3
) {
268 sym
= malloc(sizeof(struct symdata
));
269 sym
->symaddr
= (char *)strtoul(s1
, NULL
, 16);
270 sym
->symtype
= s2
[0];
271 sym
->symname
= strdup(s3
);
272 if (strcmp(s3
, "kernbase") == 0)
273 symbegin
= sym
->symaddr
;
274 if (strcmp(s3
, "end") == 0)
275 symend
= sym
->symaddr
;
276 TAILQ_INSERT_TAIL(&symlist
, sym
, link
);
281 symcache
= TAILQ_FIRST(&symlist
);
285 address_to_symbol(void *kptr
)
289 if (symcache
== NULL
||
290 (char *)kptr
< symbegin
|| (char *)kptr
>= symend
292 snprintf(buf
, sizeof(buf
), "%p", kptr
);
295 while ((char *)symcache
->symaddr
< (char *)kptr
) {
296 if (TAILQ_NEXT(symcache
, link
) == NULL
)
298 symcache
= TAILQ_NEXT(symcache
, link
);
300 while ((char *)symcache
->symaddr
> (char *)kptr
) {
301 if (symcache
!= TAILQ_FIRST(&symlist
))
302 symcache
= TAILQ_PREV(symcache
, symlist
, link
);
304 snprintf(buf
, sizeof(buf
), "%s+%d", symcache
->symname
,
305 (int)((char *)kptr
- symcache
->symaddr
));
312 fprintf(stderr
, "usage: pctrack [-nsi] [-c cpu] [-N execfile] "