1 /* vi: set sw=4 ts=4: */
3 * readprofile.c - used to read /proc/profile
5 * Copyright (C) 1994,1996 Alessandro Rubini (rubini@ipvvis.unipv.it)
7 * Licensed under GPLv2 or later, see file LICENSE in this source tree.
11 * 1999-02-22 Arkadiusz Mickiewicz <misiek@pld.ORG.PL>
12 * - added Native Language Support
13 * 1999-09-01 Stephane Eranian <eranian@cello.hpl.hp.com>
15 * 3Feb2001 Andrew Morton <andrewm@uow.edu.au>
16 * - -M option to write profile multiplier.
17 * 2001-11-07 Werner Almesberger <wa@almesberger.net>
18 * - byte order auto-detection and -n option
19 * 2001-11-09 Werner Almesberger <wa@almesberger.net>
20 * - skip step size (index 0)
21 * 2002-03-09 John Levon <moz@compsoc.man.ac.uk>
22 * - make maplineno do something
23 * 2002-11-28 Mads Martin Joergensen +
24 * - also try /boot/System.map-`uname -r`
25 * 2003-04-09 Werner Almesberger <wa@almesberger.net>
26 * - fixed off-by eight error and improved heuristics in byte order detection
27 * 2003-08-12 Nikita Danilov <Nikita@Namesys.COM>
28 * - added -s option; example of use:
29 * "readprofile -s -m /boot/System.map-test | grep __d_lookup | sort -n -k3"
31 * Taken from util-linux and adapted for busybox by
32 * Paul Mundt <lethal@linux-sh.org>.
35 //usage:#define readprofile_trivial_usage
37 //usage:#define readprofile_full_usage "\n\n"
38 //usage: " -m mapfile (Default: /boot/System.map)"
39 //usage: "\n -p profile (Default: /proc/profile)"
40 //usage: "\n -M NUM Set the profiling multiplier to NUM"
41 //usage: "\n -i Print only info about the sampling step"
42 //usage: "\n -v Verbose"
43 //usage: "\n -a Print all symbols, even if count is 0"
44 //usage: "\n -b Print individual histogram-bin counts"
45 //usage: "\n -s Print individual counters within functions"
46 //usage: "\n -r Reset all the counters (root only)"
47 //usage: "\n -n Disable byte order auto-detection"
50 #include <sys/utsname.h>
54 /* These are the defaults */
55 static const char defaultmap
[] ALIGN1
= "/boot/System.map";
56 static const char defaultpro
[] ALIGN1
= "/proc/profile";
58 int readprofile_main(int argc
, char **argv
) MAIN_EXTERNALLY_VISIBLE
;
59 int readprofile_main(int argc UNUSED_PARAM
, char **argv
)
62 const char *mapFile
, *proFile
;
63 unsigned long indx
= 1;
67 unsigned int *buf
, total
, fn_len
;
68 unsigned long long fn_add
, next_add
; /* current and next address */
69 char fn_name
[S_LEN
], next_name
[S_LEN
]; /* current and next name */
88 #define optMult (opt & OPT_M)
89 #define optNative (opt & OPT_n)
90 #define optAll (opt & OPT_a)
91 #define optBins (opt & OPT_b)
92 #define optSub (opt & OPT_s)
93 #define optInfo (opt & OPT_i)
94 #define optReset (opt & OPT_r)
95 #define optVerbose (opt & OPT_v)
97 #define next (current^1)
100 mapFile
= defaultmap
;
102 opt_complementary
= "M+"; /* -M N */
103 opt
= getopt32(argv
, "M:m:p:nabsirv", &multiplier
, &mapFile
, &proFile
);
105 if (opt
& (OPT_M
|OPT_r
)) { /* mult or reset, or both */
109 * When writing the multiplier, if the length of the write is
110 * not sizeof(int), the multiplier is not changed
112 to_write
= sizeof(int);
114 to_write
= 1; /* sth different from sizeof(int) */
116 fd
= xopen(defaultpro
, O_WRONLY
);
117 xwrite(fd
, &multiplier
, to_write
);
123 * Use an fd for the profiling buffer, to skip stdio overhead
125 len
= MAXINT(ssize_t
);
126 buf
= xmalloc_xopen_read_close(proFile
, &len
);
128 int entries
= len
/ sizeof(*buf
);
129 int big
= 0, small
= 0, i
;
132 for (p
= buf
+1; p
< buf
+entries
; p
++) {
133 if (*p
& ~0U << (sizeof(*buf
)*4))
135 if (*p
& ((1 << (sizeof(*buf
)*4))-1))
139 bb_error_msg("assuming reversed byte order, "
140 "use -n to force native byte order");
141 for (p
= buf
; p
< buf
+entries
; p
++)
142 for (i
= 0; i
< sizeof(*buf
)/2; i
++) {
143 unsigned char *b
= (unsigned char *) p
;
147 b
[i
] = b
[sizeof(*buf
)-i
-1];
148 b
[sizeof(*buf
)-i
-1] = tmp
;
155 printf("Sampling_step: %i\n", step
);
161 map
= xfopen_for_read(mapFile
);
163 while (fgets(mapline
, S_LEN
, map
)) {
164 if (sscanf(mapline
, "%llx %s %s", &fn_add
, mode
, fn_name
) != 3)
165 bb_error_msg_and_die("%s(%i): wrong map line",
168 if (!strcmp(fn_name
, "_stext")) /* only elf works like this */ {
176 bb_error_msg_and_die("can't find \"_stext\" in %s", mapFile
);
181 while (fgets(mapline
, S_LEN
, map
)) {
182 unsigned int this = 0;
184 if (sscanf(mapline
, "%llx %s %s", &next_add
, mode
, next_name
) != 3)
185 bb_error_msg_and_die("%s(%i): wrong map line",
190 /* ignore any LEADING (before a '[tT]' symbol is found)
192 if ((*mode
== 'A' || *mode
== '?') && total
== 0) continue;
193 if (*mode
!= 'T' && *mode
!= 't'
194 && *mode
!= 'W' && *mode
!= 'w'
196 break; /* only text is profiled */
199 if (indx
>= len
/ sizeof(*buf
))
200 bb_error_msg_and_die("profile address out of range. "
203 while (indx
< (next_add
-add0
)/step
) {
204 if (optBins
&& (buf
[indx
] || optAll
)) {
205 if (!header_printed
) {
206 printf("%s:\n", fn_name
);
209 printf("\t%"PRIx64
"\t%u\n", (indx
- 1)*step
+ add0
, buf
[indx
]);
216 if (optVerbose
|| this > 0)
217 printf(" total\t\t\t\t%u\n", this);
218 } else if ((this || optAll
)
219 && (fn_len
= next_add
-fn_add
) != 0
222 printf("%016llx %-40s %6i %8.4f\n", fn_add
,
223 fn_name
, this, this/(double)fn_len
);
225 printf("%6i %-40s %8.4f\n",
226 this, fn_name
, this/(double)fn_len
);
228 unsigned long long scan
;
230 for (scan
= (fn_add
-add0
)/step
+ 1;
231 scan
< (next_add
-add0
)/step
; scan
++) {
232 unsigned long long addr
;
234 addr
= (scan
- 1)*step
+ add0
;
235 printf("\t%#llx\t%s+%#llx\t%u\n",
236 addr
, fn_name
, addr
- fn_add
,
243 strcpy(fn_name
, next_name
);
248 /* clock ticks, out of kernel text - probably modules */
249 printf("%6i %s\n", buf
[len
/sizeof(*buf
)-1], "*unknown*");
253 printf("%016x %-40s %6i %8.4f\n",
254 0, "total", total
, total
/(double)(fn_add
-add0
));
256 printf("%6i %-40s %8.4f\n",
257 total
, "total", total
/(double)(fn_add
-add0
));