1 #define JEMALLOC_STATS_C_
2 #include "jemalloc/internal/jemalloc_internal.h"
3
4 #define CTL_GET(n, v, t) do { \
5 size_t sz = sizeof(t); \
6 xmallctl(n, v, &sz, NULL, 0); \
7 } while (0)
8
9 #define CTL_M2_GET(n, i, v, t) do { \
10 size_t mib[6]; \
11 size_t miblen = sizeof(mib) / sizeof(size_t); \
12 size_t sz = sizeof(t); \
13 xmallctlnametomib(n, mib, &miblen); \
14 mib[2] = (i); \
15 xmallctlbymib(mib, miblen, v, &sz, NULL, 0); \
16 } while (0)
17
18 #define CTL_M2_M4_GET(n, i, j, v, t) do { \
19 size_t mib[6]; \
20 size_t miblen = sizeof(mib) / sizeof(size_t); \
21 size_t sz = sizeof(t); \
22 xmallctlnametomib(n, mib, &miblen); \
23 mib[2] = (i); \
24 mib[4] = (j); \
25 xmallctlbymib(mib, miblen, v, &sz, NULL, 0); \
26 } while (0)
27
28 /******************************************************************************/
29 /* Data. */
30
31 bool opt_stats_print = false;
32
33 size_t stats_cactive = 0;
34
35 /******************************************************************************/
36 /* Function prototypes for non-inline static functions. */
37
38 static void stats_arena_bins_print(void (*write_cb)(void *, const char *),
39 void *cbopaque, unsigned i);
40 static void stats_arena_lruns_print(void (*write_cb)(void *, const char *),
41 void *cbopaque, unsigned i);
42 static void stats_arena_hchunks_print(
43 void (*write_cb)(void *, const char *), void *cbopaque, unsigned i);
44 static void stats_arena_print(void (*write_cb)(void *, const char *),
45 void *cbopaque, unsigned i, bool bins, bool large, bool huge);
46
47 /******************************************************************************/
48
49 static void
stats_arena_bins_print(void (* write_cb)(void *,const char *),void * cbopaque,unsigned i)50 stats_arena_bins_print(void (*write_cb)(void *, const char *), void *cbopaque,
51 unsigned i)
52 {
53 size_t page;
54 bool config_tcache, in_gap;
55 unsigned nbins, j;
56
57 CTL_GET("arenas.page", &page, size_t);
58
59 CTL_GET("config.tcache", &config_tcache, bool);
60 if (config_tcache) {
61 malloc_cprintf(write_cb, cbopaque,
62 "bins: size ind allocated nmalloc"
63 " ndalloc nrequests curregs curruns regs"
64 " pgs util nfills nflushes newruns"
65 " reruns\n");
66 } else {
67 malloc_cprintf(write_cb, cbopaque,
68 "bins: size ind allocated nmalloc"
69 " ndalloc nrequests curregs curruns regs"
70 " pgs util newruns reruns\n");
71 }
72 CTL_GET("arenas.nbins", &nbins, unsigned);
73 for (j = 0, in_gap = false; j < nbins; j++) {
74 uint64_t nruns;
75
76 CTL_M2_M4_GET("stats.arenas.0.bins.0.nruns", i, j, &nruns,
77 uint64_t);
78 if (nruns == 0)
79 in_gap = true;
80 else {
81 size_t reg_size, run_size, curregs, availregs, milli;
82 size_t curruns;
83 uint32_t nregs;
84 uint64_t nmalloc, ndalloc, nrequests, nfills, nflushes;
85 uint64_t reruns;
86 char util[6]; /* "x.yyy". */
87
88 if (in_gap) {
89 malloc_cprintf(write_cb, cbopaque,
90 " ---\n");
91 in_gap = false;
92 }
93 CTL_M2_GET("arenas.bin.0.size", j, ®_size, size_t);
94 CTL_M2_GET("arenas.bin.0.nregs", j, &nregs, uint32_t);
95 CTL_M2_GET("arenas.bin.0.run_size", j, &run_size,
96 size_t);
97 CTL_M2_M4_GET("stats.arenas.0.bins.0.nmalloc", i, j,
98 &nmalloc, uint64_t);
99 CTL_M2_M4_GET("stats.arenas.0.bins.0.ndalloc", i, j,
100 &ndalloc, uint64_t);
101 CTL_M2_M4_GET("stats.arenas.0.bins.0.curregs", i, j,
102 &curregs, size_t);
103 CTL_M2_M4_GET("stats.arenas.0.bins.0.nrequests", i, j,
104 &nrequests, uint64_t);
105 if (config_tcache) {
106 CTL_M2_M4_GET("stats.arenas.0.bins.0.nfills", i,
107 j, &nfills, uint64_t);
108 CTL_M2_M4_GET("stats.arenas.0.bins.0.nflushes",
109 i, j, &nflushes, uint64_t);
110 }
111 CTL_M2_M4_GET("stats.arenas.0.bins.0.nreruns", i, j,
112 &reruns, uint64_t);
113 CTL_M2_M4_GET("stats.arenas.0.bins.0.curruns", i, j,
114 &curruns, size_t);
115
116 availregs = nregs * curruns;
117 milli = (availregs != 0) ? (1000 * curregs) / availregs
118 : 1000;
119 assert(milli <= 1000);
120 if (milli < 10) {
121 malloc_snprintf(util, sizeof(util),
122 "0.00%zu", milli);
123 } else if (milli < 100) {
124 malloc_snprintf(util, sizeof(util), "0.0%zu",
125 milli);
126 } else if (milli < 1000) {
127 malloc_snprintf(util, sizeof(util), "0.%zu",
128 milli);
129 } else
130 malloc_snprintf(util, sizeof(util), "1");
131
132 if (config_tcache) {
133 malloc_cprintf(write_cb, cbopaque,
134 "%20zu %3u %12zu %12"FMTu64
135 " %12"FMTu64" %12"FMTu64" %12zu"
136 " %12zu %4u %3zu %-5s %12"FMTu64
137 " %12"FMTu64" %12"FMTu64" %12"FMTu64"\n",
138 reg_size, j, curregs * reg_size, nmalloc,
139 ndalloc, nrequests, curregs, curruns, nregs,
140 run_size / page, util, nfills, nflushes,
141 nruns, reruns);
142 } else {
143 malloc_cprintf(write_cb, cbopaque,
144 "%20zu %3u %12zu %12"FMTu64
145 " %12"FMTu64" %12"FMTu64" %12zu"
146 " %12zu %4u %3zu %-5s %12"FMTu64
147 " %12"FMTu64"\n",
148 reg_size, j, curregs * reg_size, nmalloc,
149 ndalloc, nrequests, curregs, curruns, nregs,
150 run_size / page, util, nruns, reruns);
151 }
152 }
153 }
154 if (in_gap) {
155 malloc_cprintf(write_cb, cbopaque,
156 " ---\n");
157 }
158 }
159
160 static void
stats_arena_lruns_print(void (* write_cb)(void *,const char *),void * cbopaque,unsigned i)161 stats_arena_lruns_print(void (*write_cb)(void *, const char *), void *cbopaque,
162 unsigned i)
163 {
164 unsigned nbins, nlruns, j;
165 bool in_gap;
166
167 malloc_cprintf(write_cb, cbopaque,
168 "large: size ind allocated nmalloc ndalloc"
169 " nrequests curruns\n");
170 CTL_GET("arenas.nbins", &nbins, unsigned);
171 CTL_GET("arenas.nlruns", &nlruns, unsigned);
172 for (j = 0, in_gap = false; j < nlruns; j++) {
173 uint64_t nmalloc, ndalloc, nrequests;
174 size_t run_size, curruns;
175
176 CTL_M2_M4_GET("stats.arenas.0.lruns.0.nmalloc", i, j, &nmalloc,
177 uint64_t);
178 CTL_M2_M4_GET("stats.arenas.0.lruns.0.ndalloc", i, j, &ndalloc,
179 uint64_t);
180 CTL_M2_M4_GET("stats.arenas.0.lruns.0.nrequests", i, j,
181 &nrequests, uint64_t);
182 if (nrequests == 0)
183 in_gap = true;
184 else {
185 CTL_M2_GET("arenas.lrun.0.size", j, &run_size, size_t);
186 CTL_M2_M4_GET("stats.arenas.0.lruns.0.curruns", i, j,
187 &curruns, size_t);
188 if (in_gap) {
189 malloc_cprintf(write_cb, cbopaque,
190 " ---\n");
191 in_gap = false;
192 }
193 malloc_cprintf(write_cb, cbopaque,
194 "%20zu %3u %12zu %12"FMTu64" %12"FMTu64
195 " %12"FMTu64" %12zu\n",
196 run_size, nbins + j, curruns * run_size, nmalloc,
197 ndalloc, nrequests, curruns);
198 }
199 }
200 if (in_gap) {
201 malloc_cprintf(write_cb, cbopaque,
202 " ---\n");
203 }
204 }
205
206 static void
stats_arena_hchunks_print(void (* write_cb)(void *,const char *),void * cbopaque,unsigned i)207 stats_arena_hchunks_print(void (*write_cb)(void *, const char *),
208 void *cbopaque, unsigned i)
209 {
210 unsigned nbins, nlruns, nhchunks, j;
211 bool in_gap;
212
213 malloc_cprintf(write_cb, cbopaque,
214 "huge: size ind allocated nmalloc ndalloc"
215 " nrequests curhchunks\n");
216 CTL_GET("arenas.nbins", &nbins, unsigned);
217 CTL_GET("arenas.nlruns", &nlruns, unsigned);
218 CTL_GET("arenas.nhchunks", &nhchunks, unsigned);
219 for (j = 0, in_gap = false; j < nhchunks; j++) {
220 uint64_t nmalloc, ndalloc, nrequests;
221 size_t hchunk_size, curhchunks;
222
223 CTL_M2_M4_GET("stats.arenas.0.hchunks.0.nmalloc", i, j,
224 &nmalloc, uint64_t);
225 CTL_M2_M4_GET("stats.arenas.0.hchunks.0.ndalloc", i, j,
226 &ndalloc, uint64_t);
227 CTL_M2_M4_GET("stats.arenas.0.hchunks.0.nrequests", i, j,
228 &nrequests, uint64_t);
229 if (nrequests == 0)
230 in_gap = true;
231 else {
232 CTL_M2_GET("arenas.hchunk.0.size", j, &hchunk_size,
233 size_t);
234 CTL_M2_M4_GET("stats.arenas.0.hchunks.0.curhchunks", i,
235 j, &curhchunks, size_t);
236 if (in_gap) {
237 malloc_cprintf(write_cb, cbopaque,
238 " ---\n");
239 in_gap = false;
240 }
241 malloc_cprintf(write_cb, cbopaque,
242 "%20zu %3u %12zu %12"FMTu64" %12"FMTu64
243 " %12"FMTu64" %12zu\n",
244 hchunk_size, nbins + nlruns + j,
245 curhchunks * hchunk_size, nmalloc, ndalloc,
246 nrequests, curhchunks);
247 }
248 }
249 if (in_gap) {
250 malloc_cprintf(write_cb, cbopaque,
251 " ---\n");
252 }
253 }
254
255 static void
stats_arena_print(void (* write_cb)(void *,const char *),void * cbopaque,unsigned i,bool bins,bool large,bool huge)256 stats_arena_print(void (*write_cb)(void *, const char *), void *cbopaque,
257 unsigned i, bool bins, bool large, bool huge)
258 {
259 unsigned nthreads;
260 const char *dss;
261 ssize_t lg_dirty_mult, decay_time;
262 size_t page, pactive, pdirty, mapped;
263 size_t metadata_mapped, metadata_allocated;
264 uint64_t npurge, nmadvise, purged;
265 size_t small_allocated;
266 uint64_t small_nmalloc, small_ndalloc, small_nrequests;
267 size_t large_allocated;
268 uint64_t large_nmalloc, large_ndalloc, large_nrequests;
269 size_t huge_allocated;
270 uint64_t huge_nmalloc, huge_ndalloc, huge_nrequests;
271
272 CTL_GET("arenas.page", &page, size_t);
273
274 CTL_M2_GET("stats.arenas.0.nthreads", i, &nthreads, unsigned);
275 malloc_cprintf(write_cb, cbopaque,
276 "assigned threads: %u\n", nthreads);
277 CTL_M2_GET("stats.arenas.0.dss", i, &dss, const char *);
278 malloc_cprintf(write_cb, cbopaque, "dss allocation precedence: %s\n",
279 dss);
280 CTL_M2_GET("stats.arenas.0.lg_dirty_mult", i, &lg_dirty_mult, ssize_t);
281 if (opt_purge == purge_mode_ratio) {
282 if (lg_dirty_mult >= 0) {
283 malloc_cprintf(write_cb, cbopaque,
284 "min active:dirty page ratio: %u:1\n",
285 (1U << lg_dirty_mult));
286 } else {
287 malloc_cprintf(write_cb, cbopaque,
288 "min active:dirty page ratio: N/A\n");
289 }
290 }
291 CTL_M2_GET("stats.arenas.0.decay_time", i, &decay_time, ssize_t);
292 if (opt_purge == purge_mode_decay) {
293 if (decay_time >= 0) {
294 malloc_cprintf(write_cb, cbopaque, "decay time: %zd\n",
295 decay_time);
296 } else
297 malloc_cprintf(write_cb, cbopaque, "decay time: N/A\n");
298 }
299 CTL_M2_GET("stats.arenas.0.pactive", i, &pactive, size_t);
300 CTL_M2_GET("stats.arenas.0.pdirty", i, &pdirty, size_t);
301 CTL_M2_GET("stats.arenas.0.npurge", i, &npurge, uint64_t);
302 CTL_M2_GET("stats.arenas.0.nmadvise", i, &nmadvise, uint64_t);
303 CTL_M2_GET("stats.arenas.0.purged", i, &purged, uint64_t);
304 malloc_cprintf(write_cb, cbopaque,
305 "purging: dirty: %zu, sweeps: %"FMTu64", madvises: %"FMTu64", "
306 "purged: %"FMTu64"\n", pdirty, npurge, nmadvise, purged);
307
308 malloc_cprintf(write_cb, cbopaque,
309 " allocated nmalloc ndalloc"
310 " nrequests\n");
311 CTL_M2_GET("stats.arenas.0.small.allocated", i, &small_allocated,
312 size_t);
313 CTL_M2_GET("stats.arenas.0.small.nmalloc", i, &small_nmalloc, uint64_t);
314 CTL_M2_GET("stats.arenas.0.small.ndalloc", i, &small_ndalloc, uint64_t);
315 CTL_M2_GET("stats.arenas.0.small.nrequests", i, &small_nrequests,
316 uint64_t);
317 malloc_cprintf(write_cb, cbopaque,
318 "small: %12zu %12"FMTu64" %12"FMTu64
319 " %12"FMTu64"\n",
320 small_allocated, small_nmalloc, small_ndalloc, small_nrequests);
321 CTL_M2_GET("stats.arenas.0.large.allocated", i, &large_allocated,
322 size_t);
323 CTL_M2_GET("stats.arenas.0.large.nmalloc", i, &large_nmalloc, uint64_t);
324 CTL_M2_GET("stats.arenas.0.large.ndalloc", i, &large_ndalloc, uint64_t);
325 CTL_M2_GET("stats.arenas.0.large.nrequests", i, &large_nrequests,
326 uint64_t);
327 malloc_cprintf(write_cb, cbopaque,
328 "large: %12zu %12"FMTu64" %12"FMTu64
329 " %12"FMTu64"\n",
330 large_allocated, large_nmalloc, large_ndalloc, large_nrequests);
331 CTL_M2_GET("stats.arenas.0.huge.allocated", i, &huge_allocated, size_t);
332 CTL_M2_GET("stats.arenas.0.huge.nmalloc", i, &huge_nmalloc, uint64_t);
333 CTL_M2_GET("stats.arenas.0.huge.ndalloc", i, &huge_ndalloc, uint64_t);
334 CTL_M2_GET("stats.arenas.0.huge.nrequests", i, &huge_nrequests,
335 uint64_t);
336 malloc_cprintf(write_cb, cbopaque,
337 "huge: %12zu %12"FMTu64" %12"FMTu64
338 " %12"FMTu64"\n",
339 huge_allocated, huge_nmalloc, huge_ndalloc, huge_nrequests);
340 malloc_cprintf(write_cb, cbopaque,
341 "total: %12zu %12"FMTu64" %12"FMTu64
342 " %12"FMTu64"\n",
343 small_allocated + large_allocated + huge_allocated,
344 small_nmalloc + large_nmalloc + huge_nmalloc,
345 small_ndalloc + large_ndalloc + huge_ndalloc,
346 small_nrequests + large_nrequests + huge_nrequests);
347 malloc_cprintf(write_cb, cbopaque,
348 "active: %12zu\n", pactive * page);
349 CTL_M2_GET("stats.arenas.0.mapped", i, &mapped, size_t);
350 malloc_cprintf(write_cb, cbopaque,
351 "mapped: %12zu\n", mapped);
352 CTL_M2_GET("stats.arenas.0.metadata.mapped", i, &metadata_mapped,
353 size_t);
354 CTL_M2_GET("stats.arenas.0.metadata.allocated", i, &metadata_allocated,
355 size_t);
356 malloc_cprintf(write_cb, cbopaque,
357 "metadata: mapped: %zu, allocated: %zu\n",
358 metadata_mapped, metadata_allocated);
359
360 if (bins)
361 stats_arena_bins_print(write_cb, cbopaque, i);
362 if (large)
363 stats_arena_lruns_print(write_cb, cbopaque, i);
364 if (huge)
365 stats_arena_hchunks_print(write_cb, cbopaque, i);
366 }
367
368 void
stats_print(void (* write_cb)(void *,const char *),void * cbopaque,const char * opts)369 stats_print(void (*write_cb)(void *, const char *), void *cbopaque,
370 const char *opts)
371 {
372 int err;
373 uint64_t epoch;
374 size_t u64sz;
375 bool general = true;
376 bool merged = true;
377 bool unmerged = true;
378 bool bins = true;
379 bool large = true;
380 bool huge = true;
381
382 /*
383 * Refresh stats, in case mallctl() was called by the application.
384 *
385 * Check for OOM here, since refreshing the ctl cache can trigger
386 * allocation. In practice, none of the subsequent mallctl()-related
387 * calls in this function will cause OOM if this one succeeds.
388 * */
389 epoch = 1;
390 u64sz = sizeof(uint64_t);
391 err = je_mallctl("epoch", &epoch, &u64sz, &epoch, sizeof(uint64_t));
392 if (err != 0) {
393 if (err == EAGAIN) {
394 malloc_write("<jemalloc>: Memory allocation failure in "
395 "mallctl(\"epoch\", ...)\n");
396 return;
397 }
398 malloc_write("<jemalloc>: Failure in mallctl(\"epoch\", "
399 "...)\n");
400 abort();
401 }
402
403 if (opts != NULL) {
404 unsigned i;
405
406 for (i = 0; opts[i] != '\0'; i++) {
407 switch (opts[i]) {
408 case 'g':
409 general = false;
410 break;
411 case 'm':
412 merged = false;
413 break;
414 case 'a':
415 unmerged = false;
416 break;
417 case 'b':
418 bins = false;
419 break;
420 case 'l':
421 large = false;
422 break;
423 case 'h':
424 huge = false;
425 break;
426 default:;
427 }
428 }
429 }
430
431 malloc_cprintf(write_cb, cbopaque,
432 "___ Begin jemalloc statistics ___\n");
433 if (general) {
434 const char *cpv;
435 bool bv;
436 unsigned uv;
437 ssize_t ssv;
438 size_t sv, bsz, usz, ssz, sssz, cpsz;
439
440 bsz = sizeof(bool);
441 usz = sizeof(unsigned);
442 ssz = sizeof(size_t);
443 sssz = sizeof(ssize_t);
444 cpsz = sizeof(const char *);
445
446 CTL_GET("version", &cpv, const char *);
447 malloc_cprintf(write_cb, cbopaque, "Version: %s\n", cpv);
448 CTL_GET("config.debug", &bv, bool);
449 malloc_cprintf(write_cb, cbopaque, "Assertions %s\n",
450 bv ? "enabled" : "disabled");
451 malloc_cprintf(write_cb, cbopaque,
452 "config.malloc_conf: \"%s\"\n", config_malloc_conf);
453
454 #define OPT_WRITE_BOOL(n) \
455 if (je_mallctl("opt."#n, &bv, &bsz, NULL, 0) == 0) { \
456 malloc_cprintf(write_cb, cbopaque, \
457 " opt."#n": %s\n", bv ? "true" : "false"); \
458 }
459 #define OPT_WRITE_BOOL_MUTABLE(n, m) { \
460 bool bv2; \
461 if (je_mallctl("opt."#n, &bv, &bsz, NULL, 0) == 0 && \
462 je_mallctl(#m, &bv2, &bsz, NULL, 0) == 0) { \
463 malloc_cprintf(write_cb, cbopaque, \
464 " opt."#n": %s ("#m": %s)\n", bv ? "true" \
465 : "false", bv2 ? "true" : "false"); \
466 } \
467 }
468 #define OPT_WRITE_UNSIGNED(n) \
469 if (je_mallctl("opt."#n, &uv, &usz, NULL, 0) == 0) { \
470 malloc_cprintf(write_cb, cbopaque, \
471 " opt."#n": %zu\n", sv); \
472 }
473 #define OPT_WRITE_SIZE_T(n) \
474 if (je_mallctl("opt."#n, &sv, &ssz, NULL, 0) == 0) { \
475 malloc_cprintf(write_cb, cbopaque, \
476 " opt."#n": %zu\n", sv); \
477 }
478 #define OPT_WRITE_SSIZE_T(n) \
479 if (je_mallctl("opt."#n, &ssv, &sssz, NULL, 0) == 0) { \
480 malloc_cprintf(write_cb, cbopaque, \
481 " opt."#n": %zd\n", ssv); \
482 }
483 #define OPT_WRITE_SSIZE_T_MUTABLE(n, m) { \
484 ssize_t ssv2; \
485 if (je_mallctl("opt."#n, &ssv, &sssz, NULL, 0) == 0 && \
486 je_mallctl(#m, &ssv2, &sssz, NULL, 0) == 0) { \
487 malloc_cprintf(write_cb, cbopaque, \
488 " opt."#n": %zd ("#m": %zd)\n", \
489 ssv, ssv2); \
490 } \
491 }
492 #define OPT_WRITE_CHAR_P(n) \
493 if (je_mallctl("opt."#n, &cpv, &cpsz, NULL, 0) == 0) { \
494 malloc_cprintf(write_cb, cbopaque, \
495 " opt."#n": \"%s\"\n", cpv); \
496 }
497
498 malloc_cprintf(write_cb, cbopaque,
499 "Run-time option settings:\n");
500 OPT_WRITE_BOOL(abort)
501 OPT_WRITE_SIZE_T(lg_chunk)
502 OPT_WRITE_CHAR_P(dss)
503 OPT_WRITE_UNSIGNED(narenas)
504 OPT_WRITE_CHAR_P(purge)
505 if (opt_purge == purge_mode_ratio) {
506 OPT_WRITE_SSIZE_T_MUTABLE(lg_dirty_mult,
507 arenas.lg_dirty_mult)
508 }
509 if (opt_purge == purge_mode_decay)
510 OPT_WRITE_SSIZE_T_MUTABLE(decay_time, arenas.decay_time)
511 OPT_WRITE_BOOL(stats_print)
512 OPT_WRITE_CHAR_P(junk)
513 OPT_WRITE_SIZE_T(quarantine)
514 OPT_WRITE_BOOL(redzone)
515 OPT_WRITE_BOOL(zero)
516 OPT_WRITE_BOOL(utrace)
517 OPT_WRITE_BOOL(valgrind)
518 OPT_WRITE_BOOL(xmalloc)
519 OPT_WRITE_BOOL(tcache)
520 OPT_WRITE_SSIZE_T(lg_tcache_max)
521 OPT_WRITE_BOOL(prof)
522 OPT_WRITE_CHAR_P(prof_prefix)
523 OPT_WRITE_BOOL_MUTABLE(prof_active, prof.active)
524 OPT_WRITE_BOOL_MUTABLE(prof_thread_active_init,
525 prof.thread_active_init)
526 OPT_WRITE_SSIZE_T(lg_prof_sample)
527 OPT_WRITE_BOOL(prof_accum)
528 OPT_WRITE_SSIZE_T(lg_prof_interval)
529 OPT_WRITE_BOOL(prof_gdump)
530 OPT_WRITE_BOOL(prof_final)
531 OPT_WRITE_BOOL(prof_leak)
532
533 #undef OPT_WRITE_BOOL
534 #undef OPT_WRITE_BOOL_MUTABLE
535 #undef OPT_WRITE_SIZE_T
536 #undef OPT_WRITE_SSIZE_T
537 #undef OPT_WRITE_CHAR_P
538
539 malloc_cprintf(write_cb, cbopaque, "CPUs: %u\n", ncpus);
540
541 CTL_GET("arenas.narenas", &uv, unsigned);
542 malloc_cprintf(write_cb, cbopaque, "Arenas: %u\n", uv);
543
544 malloc_cprintf(write_cb, cbopaque, "Pointer size: %zu\n",
545 sizeof(void *));
546
547 CTL_GET("arenas.quantum", &sv, size_t);
548 malloc_cprintf(write_cb, cbopaque, "Quantum size: %zu\n",
549 sv);
550
551 CTL_GET("arenas.page", &sv, size_t);
552 malloc_cprintf(write_cb, cbopaque, "Page size: %zu\n", sv);
553
554 CTL_GET("arenas.lg_dirty_mult", &ssv, ssize_t);
555 if (opt_purge == purge_mode_ratio) {
556 if (ssv >= 0) {
557 malloc_cprintf(write_cb, cbopaque,
558 "Min active:dirty page ratio per arena: "
559 "%u:1\n", (1U << ssv));
560 } else {
561 malloc_cprintf(write_cb, cbopaque,
562 "Min active:dirty page ratio per arena: "
563 "N/A\n");
564 }
565 }
566 CTL_GET("arenas.decay_time", &ssv, ssize_t);
567 if (opt_purge == purge_mode_decay) {
568 malloc_cprintf(write_cb, cbopaque,
569 "Unused dirty page decay time: %zd%s\n",
570 ssv, (ssv < 0) ? " (no decay)" : "");
571 }
572 if (je_mallctl("arenas.tcache_max", &sv, &ssz, NULL, 0) == 0) {
573 malloc_cprintf(write_cb, cbopaque,
574 "Maximum thread-cached size class: %zu\n", sv);
575 }
576 if (je_mallctl("opt.prof", &bv, &bsz, NULL, 0) == 0 && bv) {
577 CTL_GET("prof.lg_sample", &sv, size_t);
578 malloc_cprintf(write_cb, cbopaque,
579 "Average profile sample interval: %"FMTu64
580 " (2^%zu)\n", (((uint64_t)1U) << sv), sv);
581
582 CTL_GET("opt.lg_prof_interval", &ssv, ssize_t);
583 if (ssv >= 0) {
584 malloc_cprintf(write_cb, cbopaque,
585 "Average profile dump interval: %"FMTu64
586 " (2^%zd)\n",
587 (((uint64_t)1U) << ssv), ssv);
588 } else {
589 malloc_cprintf(write_cb, cbopaque,
590 "Average profile dump interval: N/A\n");
591 }
592 }
593 CTL_GET("opt.lg_chunk", &sv, size_t);
594 malloc_cprintf(write_cb, cbopaque,
595 "Chunk size: %zu (2^%zu)\n", (ZU(1) << sv), sv);
596 }
597
598 if (config_stats) {
599 size_t *cactive;
600 size_t allocated, active, metadata, resident, mapped;
601
602 CTL_GET("stats.cactive", &cactive, size_t *);
603 CTL_GET("stats.allocated", &allocated, size_t);
604 CTL_GET("stats.active", &active, size_t);
605 CTL_GET("stats.metadata", &metadata, size_t);
606 CTL_GET("stats.resident", &resident, size_t);
607 CTL_GET("stats.mapped", &mapped, size_t);
608 malloc_cprintf(write_cb, cbopaque,
609 "Allocated: %zu, active: %zu, metadata: %zu,"
610 " resident: %zu, mapped: %zu\n",
611 allocated, active, metadata, resident, mapped);
612 malloc_cprintf(write_cb, cbopaque,
613 "Current active ceiling: %zu\n",
614 atomic_read_z(cactive));
615
616 if (merged) {
617 unsigned narenas;
618
619 CTL_GET("arenas.narenas", &narenas, unsigned);
620 {
621 VARIABLE_ARRAY(bool, initialized, narenas);
622 size_t isz;
623 unsigned i, ninitialized;
624
625 isz = sizeof(bool) * narenas;
626 xmallctl("arenas.initialized", initialized,
627 &isz, NULL, 0);
628 for (i = ninitialized = 0; i < narenas; i++) {
629 if (initialized[i])
630 ninitialized++;
631 }
632
633 if (ninitialized > 1 || !unmerged) {
634 /* Print merged arena stats. */
635 malloc_cprintf(write_cb, cbopaque,
636 "\nMerged arenas stats:\n");
637 stats_arena_print(write_cb, cbopaque,
638 narenas, bins, large, huge);
639 }
640 }
641 }
642
643 if (unmerged) {
644 unsigned narenas;
645
646 /* Print stats for each arena. */
647
648 CTL_GET("arenas.narenas", &narenas, unsigned);
649 {
650 VARIABLE_ARRAY(bool, initialized, narenas);
651 size_t isz;
652 unsigned i;
653
654 isz = sizeof(bool) * narenas;
655 xmallctl("arenas.initialized", initialized,
656 &isz, NULL, 0);
657
658 for (i = 0; i < narenas; i++) {
659 if (initialized[i]) {
660 malloc_cprintf(write_cb,
661 cbopaque,
662 "\narenas[%u]:\n", i);
663 stats_arena_print(write_cb,
664 cbopaque, i, bins, large,
665 huge);
666 }
667 }
668 }
669 }
670 }
671 malloc_cprintf(write_cb, cbopaque, "--- End jemalloc statistics ---\n");
672 }
673