bcc6125657e57281f938ecee0a9628b651f0be7c
2 * Slabinfo: Tool to get reports about slabs
4 * (C) 2007 sgi, Christoph Lameter
5 * (C) 2011 Linux Foundation, Christoph Lameter
9 * gcc -o slabinfo slabinfo.c
13 #include <sys/types.h>
24 #define MAX_ALIASES 500
25 #define MAX_NODES 1024
31 int aliases
, align
, cache_dma
, cpu_slabs
, destroy_by_rcu
;
32 int hwcache_align
, object_size
, objs_per_slab
;
33 int sanity_checks
, slab_size
, store_user
, trace
;
34 int order
, poison
, reclaim_account
, red_zone
;
35 unsigned long partial
, objects
, slabs
, objects_partial
, objects_total
;
36 unsigned long alloc_fastpath
, alloc_slowpath
;
37 unsigned long free_fastpath
, free_slowpath
;
38 unsigned long free_frozen
, free_add_partial
, free_remove_partial
;
39 unsigned long alloc_from_partial
, alloc_slab
, free_slab
, alloc_refill
;
40 unsigned long cpuslab_flush
, deactivate_full
, deactivate_empty
;
41 unsigned long deactivate_to_head
, deactivate_to_tail
;
42 unsigned long deactivate_remote_frees
, order_fallback
;
43 unsigned long cmpxchg_double_cpu_fail
, cmpxchg_double_fail
;
44 unsigned long alloc_node_mismatch
, deactivate_bypass
;
45 unsigned long cpu_partial_alloc
, cpu_partial_free
;
47 int numa_partial
[MAX_NODES
];
48 } slabinfo
[MAX_SLABS
];
53 struct slabinfo
*slab
;
54 } aliasinfo
[MAX_ALIASES
];
59 int alias_targets
= 0;
71 int show_first_alias
= 0;
74 int show_inverted
= 0;
75 int show_single_ref
= 0;
81 int show_activity
= 0;
94 static void fatal(const char *x
, ...)
99 vfprintf(stderr
, x
, ap
);
104 static void usage(void)
106 printf("slabinfo 4/15/2011. (c) 2007 sgi/(c) 2011 Linux Foundation.\n\n"
107 "slabinfo [-ahnpvtsz] [-d debugopts] [slab-regexp]\n"
108 "-a|--aliases Show aliases\n"
109 "-A|--activity Most active slabs first\n"
110 "-d<options>|--debug=<options> Set/Clear Debug options\n"
111 "-D|--display-active Switch line format to activity\n"
112 "-e|--empty Show empty slabs\n"
113 "-f|--first-alias Show first alias\n"
114 "-h|--help Show usage information\n"
115 "-i|--inverted Inverted list\n"
116 "-l|--slabs Show slabs\n"
117 "-n|--numa Show NUMA information\n"
118 "-o|--ops Show kmem_cache_ops\n"
119 "-s|--shrink Shrink slabs\n"
120 "-r|--report Detailed report on single slabs\n"
121 "-S|--Size Sort by size\n"
122 "-t|--tracking Show alloc/free information\n"
123 "-T|--Totals Show summary information\n"
124 "-v|--validate Validate slabs\n"
125 "-z|--zero Include empty slabs\n"
126 "-1|--1ref Single reference\n"
127 "\nValid debug options (FZPUT may be combined)\n"
128 "a / A Switch on all debug options (=FZUP)\n"
129 "- Switch off all debug options\n"
130 "f / F Sanity Checks (SLAB_DEBUG_FREE)\n"
138 static unsigned long read_obj(const char *name
)
140 FILE *f
= fopen(name
, "r");
145 if (!fgets(buffer
, sizeof(buffer
), f
))
148 if (buffer
[strlen(buffer
)] == '\n')
149 buffer
[strlen(buffer
)] = 0;
151 return strlen(buffer
);
156 * Get the contents of an attribute
158 static unsigned long get_obj(const char *name
)
166 static unsigned long get_obj_and_str(const char *name
, char **x
)
168 unsigned long result
= 0;
173 if (!read_obj(name
)) {
177 result
= strtoul(buffer
, &p
, 10);
185 static void set_obj(struct slabinfo
*s
, const char *name
, int n
)
190 snprintf(x
, 100, "%s/%s", s
->name
, name
);
193 fatal("Cannot write to %s\n", x
);
195 fprintf(f
, "%d\n", n
);
199 static unsigned long read_slab_obj(struct slabinfo
*s
, const char *name
)
205 snprintf(x
, 100, "%s/%s", s
->name
, name
);
211 l
= fread(buffer
, 1, sizeof(buffer
), f
);
220 * Put a size string together
222 static int store_size(char *buffer
, unsigned long value
)
224 unsigned long divisor
= 1;
228 if (value
> 1000000000UL) {
229 divisor
= 100000000UL;
231 } else if (value
> 1000000UL) {
234 } else if (value
> 1000UL) {
240 n
= sprintf(buffer
, "%ld",value
);
247 memmove(buffer
+ n
- 2, buffer
+ n
- 3, 4);
254 static void decode_numa_list(int *numa
, char *t
)
259 memset(numa
, 0, MAX_NODES
* sizeof(int));
266 node
= strtoul(t
, &t
, 10);
269 nr
= strtoul(t
, &t
, 10);
271 if (node
> highest_node
)
279 static void slab_validate(struct slabinfo
*s
)
281 if (strcmp(s
->name
, "*") == 0)
284 set_obj(s
, "validate", 1);
287 static void slab_shrink(struct slabinfo
*s
)
289 if (strcmp(s
->name
, "*") == 0)
292 set_obj(s
, "shrink", 1);
297 static void first_line(void)
300 printf("Name Objects Alloc Free %%Fast Fallb O CmpX UL\n");
302 printf("Name Objects Objsize Space "
303 "Slabs/Part/Cpu O/S O %%Fr %%Ef Flg\n");
307 * Find the shortest alias of a slab
309 static struct aliasinfo
*find_one_alias(struct slabinfo
*find
)
312 struct aliasinfo
*best
= NULL
;
314 for(a
= aliasinfo
;a
< aliasinfo
+ aliases
; a
++) {
315 if (a
->slab
== find
&&
316 (!best
|| strlen(best
->name
) < strlen(a
->name
))) {
318 if (strncmp(a
->name
,"kmall", 5) == 0)
325 static unsigned long slab_size(struct slabinfo
*s
)
327 return s
->slabs
* (page_size
<< s
->order
);
330 static unsigned long slab_activity(struct slabinfo
*s
)
332 return s
->alloc_fastpath
+ s
->free_fastpath
+
333 s
->alloc_slowpath
+ s
->free_slowpath
;
336 static void slab_numa(struct slabinfo
*s
, int mode
)
340 if (strcmp(s
->name
, "*") == 0)
344 printf("\n%s: No NUMA information available.\n", s
->name
);
348 if (skip_zero
&& !s
->slabs
)
352 printf("\n%-21s:", mode
? "NUMA nodes" : "Slab");
353 for(node
= 0; node
<= highest_node
; node
++)
354 printf(" %4d", node
);
355 printf("\n----------------------");
356 for(node
= 0; node
<= highest_node
; node
++)
360 printf("%-21s ", mode
? "All slabs" : s
->name
);
361 for(node
= 0; node
<= highest_node
; node
++) {
364 store_size(b
, s
->numa
[node
]);
369 printf("%-21s ", "Partial slabs");
370 for(node
= 0; node
<= highest_node
; node
++) {
373 store_size(b
, s
->numa_partial
[node
]);
381 static void show_tracking(struct slabinfo
*s
)
383 printf("\n%s: Kernel object allocation\n", s
->name
);
384 printf("-----------------------------------------------------------------------\n");
385 if (read_slab_obj(s
, "alloc_calls"))
386 printf("%s", buffer
);
390 printf("\n%s: Kernel object freeing\n", s
->name
);
391 printf("------------------------------------------------------------------------\n");
392 if (read_slab_obj(s
, "free_calls"))
393 printf("%s", buffer
);
399 static void ops(struct slabinfo
*s
)
401 if (strcmp(s
->name
, "*") == 0)
404 if (read_slab_obj(s
, "ops")) {
405 printf("\n%s: kmem_cache operations\n", s
->name
);
406 printf("--------------------------------------------\n");
407 printf("%s", buffer
);
409 printf("\n%s has no kmem_cache operations\n", s
->name
);
412 static const char *onoff(int x
)
419 static void slab_stats(struct slabinfo
*s
)
421 unsigned long total_alloc
;
422 unsigned long total_free
;
428 total_alloc
= s
->alloc_fastpath
+ s
->alloc_slowpath
;
429 total_free
= s
->free_fastpath
+ s
->free_slowpath
;
435 printf("Slab Perf Counter Alloc Free %%Al %%Fr\n");
436 printf("--------------------------------------------------\n");
437 printf("Fastpath %8lu %8lu %3lu %3lu\n",
438 s
->alloc_fastpath
, s
->free_fastpath
,
439 s
->alloc_fastpath
* 100 / total_alloc
,
440 total_free
? s
->free_fastpath
* 100 / total_free
: 0);
441 printf("Slowpath %8lu %8lu %3lu %3lu\n",
442 total_alloc
- s
->alloc_fastpath
, s
->free_slowpath
,
443 (total_alloc
- s
->alloc_fastpath
) * 100 / total_alloc
,
444 total_free
? s
->free_slowpath
* 100 / total_free
: 0);
445 printf("Page Alloc %8lu %8lu %3lu %3lu\n",
446 s
->alloc_slab
, s
->free_slab
,
447 s
->alloc_slab
* 100 / total_alloc
,
448 total_free
? s
->free_slab
* 100 / total_free
: 0);
449 printf("Add partial %8lu %8lu %3lu %3lu\n",
450 s
->deactivate_to_head
+ s
->deactivate_to_tail
,
452 (s
->deactivate_to_head
+ s
->deactivate_to_tail
) * 100 / total_alloc
,
453 total_free
? s
->free_add_partial
* 100 / total_free
: 0);
454 printf("Remove partial %8lu %8lu %3lu %3lu\n",
455 s
->alloc_from_partial
, s
->free_remove_partial
,
456 s
->alloc_from_partial
* 100 / total_alloc
,
457 total_free
? s
->free_remove_partial
* 100 / total_free
: 0);
459 printf("Cpu partial list %8lu %8lu %3lu %3lu\n",
460 s
->cpu_partial_alloc
, s
->cpu_partial_free
,
461 s
->cpu_partial_alloc
* 100 / total_alloc
,
462 total_free
? s
->cpu_partial_free
* 100 / total_free
: 0);
464 printf("RemoteObj/SlabFrozen %8lu %8lu %3lu %3lu\n",
465 s
->deactivate_remote_frees
, s
->free_frozen
,
466 s
->deactivate_remote_frees
* 100 / total_alloc
,
467 total_free
? s
->free_frozen
* 100 / total_free
: 0);
469 printf("Total %8lu %8lu\n\n", total_alloc
, total_free
);
471 if (s
->cpuslab_flush
)
472 printf("Flushes %8lu\n", s
->cpuslab_flush
);
474 total
= s
->deactivate_full
+ s
->deactivate_empty
+
475 s
->deactivate_to_head
+ s
->deactivate_to_tail
+ s
->deactivate_bypass
;
478 printf("\nSlab Deactivation Ocurrences %%\n");
479 printf("-------------------------------------------------\n");
480 printf("Slab full %7lu %3lu%%\n",
481 s
->deactivate_full
, (s
->deactivate_full
* 100) / total
);
482 printf("Slab empty %7lu %3lu%%\n",
483 s
->deactivate_empty
, (s
->deactivate_empty
* 100) / total
);
484 printf("Moved to head of partial list %7lu %3lu%%\n",
485 s
->deactivate_to_head
, (s
->deactivate_to_head
* 100) / total
);
486 printf("Moved to tail of partial list %7lu %3lu%%\n",
487 s
->deactivate_to_tail
, (s
->deactivate_to_tail
* 100) / total
);
488 printf("Deactivation bypass %7lu %3lu%%\n",
489 s
->deactivate_bypass
, (s
->deactivate_bypass
* 100) / total
);
490 printf("Refilled from foreign frees %7lu %3lu%%\n",
491 s
->alloc_refill
, (s
->alloc_refill
* 100) / total
);
492 printf("Node mismatch %7lu %3lu%%\n",
493 s
->alloc_node_mismatch
, (s
->alloc_node_mismatch
* 100) / total
);
496 if (s
->cmpxchg_double_fail
|| s
->cmpxchg_double_cpu_fail
) {
497 printf("\nCmpxchg_double Looping\n------------------------\n");
498 printf("Locked Cmpxchg Double redos %lu\nUnlocked Cmpxchg Double redos %lu\n",
499 s
->cmpxchg_double_fail
, s
->cmpxchg_double_cpu_fail
);
503 static void report(struct slabinfo
*s
)
505 if (strcmp(s
->name
, "*") == 0)
508 printf("\nSlabcache: %-20s Aliases: %2d Order : %2d Objects: %lu\n",
509 s
->name
, s
->aliases
, s
->order
, s
->objects
);
510 if (s
->hwcache_align
)
511 printf("** Hardware cacheline aligned\n");
513 printf("** Memory is allocated in a special DMA zone\n");
514 if (s
->destroy_by_rcu
)
515 printf("** Slabs are destroyed via RCU\n");
516 if (s
->reclaim_account
)
517 printf("** Reclaim accounting active\n");
519 printf("\nSizes (bytes) Slabs Debug Memory\n");
520 printf("------------------------------------------------------------------------\n");
521 printf("Object : %7d Total : %7ld Sanity Checks : %s Total: %7ld\n",
522 s
->object_size
, s
->slabs
, onoff(s
->sanity_checks
),
523 s
->slabs
* (page_size
<< s
->order
));
524 printf("SlabObj: %7d Full : %7ld Redzoning : %s Used : %7ld\n",
525 s
->slab_size
, s
->slabs
- s
->partial
- s
->cpu_slabs
,
526 onoff(s
->red_zone
), s
->objects
* s
->object_size
);
527 printf("SlabSiz: %7d Partial: %7ld Poisoning : %s Loss : %7ld\n",
528 page_size
<< s
->order
, s
->partial
, onoff(s
->poison
),
529 s
->slabs
* (page_size
<< s
->order
) - s
->objects
* s
->object_size
);
530 printf("Loss : %7d CpuSlab: %7d Tracking : %s Lalig: %7ld\n",
531 s
->slab_size
- s
->object_size
, s
->cpu_slabs
, onoff(s
->store_user
),
532 (s
->slab_size
- s
->object_size
) * s
->objects
);
533 printf("Align : %7d Objects: %7d Tracing : %s Lpadd: %7ld\n",
534 s
->align
, s
->objs_per_slab
, onoff(s
->trace
),
535 ((page_size
<< s
->order
) - s
->objs_per_slab
* s
->slab_size
) *
544 static void slabcache(struct slabinfo
*s
)
551 if (strcmp(s
->name
, "*") == 0)
554 if (actual_slabs
== 1) {
559 if (skip_zero
&& !show_empty
&& !s
->slabs
)
562 if (show_empty
&& s
->slabs
)
565 store_size(size_str
, slab_size(s
));
566 snprintf(dist_str
, 40, "%lu/%lu/%d", s
->slabs
- s
->cpu_slabs
,
567 s
->partial
, s
->cpu_slabs
);
576 if (s
->hwcache_align
)
580 if (s
->reclaim_account
)
584 if (s
->sanity_checks
)
593 unsigned long total_alloc
;
594 unsigned long total_free
;
596 total_alloc
= s
->alloc_fastpath
+ s
->alloc_slowpath
;
597 total_free
= s
->free_fastpath
+ s
->free_slowpath
;
599 printf("%-21s %8ld %10ld %10ld %3ld %3ld %5ld %1d %4ld %4ld\n",
601 total_alloc
, total_free
,
602 total_alloc
? (s
->alloc_fastpath
* 100 / total_alloc
) : 0,
603 total_free
? (s
->free_fastpath
* 100 / total_free
) : 0,
604 s
->order_fallback
, s
->order
, s
->cmpxchg_double_fail
,
605 s
->cmpxchg_double_cpu_fail
);
608 printf("%-21s %8ld %7d %8s %14s %4d %1d %3ld %3ld %s\n",
609 s
->name
, s
->objects
, s
->object_size
, size_str
, dist_str
,
610 s
->objs_per_slab
, s
->order
,
611 s
->slabs
? (s
->partial
* 100) / s
->slabs
: 100,
612 s
->slabs
? (s
->objects
* s
->object_size
* 100) /
613 (s
->slabs
* (page_size
<< s
->order
)) : 100,
618 * Analyze debug options. Return false if something is amiss.
620 static int debug_opt_scan(char *opt
)
622 if (!opt
|| !opt
[0] || strcmp(opt
, "-") == 0)
625 if (strcasecmp(opt
, "a") == 0) {
669 static int slab_empty(struct slabinfo
*s
)
675 * We may still have slabs even if there are no objects. Shrinking will
679 set_obj(s
, "shrink", 1);
684 static void slab_debug(struct slabinfo
*s
)
686 if (strcmp(s
->name
, "*") == 0)
689 if (sanity
&& !s
->sanity_checks
) {
690 set_obj(s
, "sanity", 1);
692 if (!sanity
&& s
->sanity_checks
) {
694 set_obj(s
, "sanity", 0);
696 fprintf(stderr
, "%s not empty cannot disable sanity checks\n", s
->name
);
698 if (redzone
&& !s
->red_zone
) {
700 set_obj(s
, "red_zone", 1);
702 fprintf(stderr
, "%s not empty cannot enable redzoning\n", s
->name
);
704 if (!redzone
&& s
->red_zone
) {
706 set_obj(s
, "red_zone", 0);
708 fprintf(stderr
, "%s not empty cannot disable redzoning\n", s
->name
);
710 if (poison
&& !s
->poison
) {
712 set_obj(s
, "poison", 1);
714 fprintf(stderr
, "%s not empty cannot enable poisoning\n", s
->name
);
716 if (!poison
&& s
->poison
) {
718 set_obj(s
, "poison", 0);
720 fprintf(stderr
, "%s not empty cannot disable poisoning\n", s
->name
);
722 if (tracking
&& !s
->store_user
) {
724 set_obj(s
, "store_user", 1);
726 fprintf(stderr
, "%s not empty cannot enable tracking\n", s
->name
);
728 if (!tracking
&& s
->store_user
) {
730 set_obj(s
, "store_user", 0);
732 fprintf(stderr
, "%s not empty cannot disable tracking\n", s
->name
);
734 if (tracing
&& !s
->trace
) {
736 set_obj(s
, "trace", 1);
738 fprintf(stderr
, "%s can only enable trace for one slab at a time\n", s
->name
);
740 if (!tracing
&& s
->trace
)
741 set_obj(s
, "trace", 1);
744 static void totals(void)
749 char b1
[20], b2
[20], b3
[20], b4
[20];
750 unsigned long long max
= 1ULL << 63;
753 unsigned long long min_objsize
= max
, max_objsize
= 0, avg_objsize
;
755 /* Number of partial slabs in a slabcache */
756 unsigned long long min_partial
= max
, max_partial
= 0,
757 avg_partial
, total_partial
= 0;
759 /* Number of slabs in a slab cache */
760 unsigned long long min_slabs
= max
, max_slabs
= 0,
761 avg_slabs
, total_slabs
= 0;
763 /* Size of the whole slab */
764 unsigned long long min_size
= max
, max_size
= 0,
765 avg_size
, total_size
= 0;
767 /* Bytes used for object storage in a slab */
768 unsigned long long min_used
= max
, max_used
= 0,
769 avg_used
, total_used
= 0;
771 /* Waste: Bytes used for alignment and padding */
772 unsigned long long min_waste
= max
, max_waste
= 0,
773 avg_waste
, total_waste
= 0;
774 /* Number of objects in a slab */
775 unsigned long long min_objects
= max
, max_objects
= 0,
776 avg_objects
, total_objects
= 0;
777 /* Waste per object */
778 unsigned long long min_objwaste
= max
,
779 max_objwaste
= 0, avg_objwaste
,
782 /* Memory per object */
783 unsigned long long min_memobj
= max
,
784 max_memobj
= 0, avg_memobj
,
787 /* Percentage of partial slabs per slab */
788 unsigned long min_ppart
= 100, max_ppart
= 0,
789 avg_ppart
, total_ppart
= 0;
791 /* Number of objects in partial slabs */
792 unsigned long min_partobj
= max
, max_partobj
= 0,
793 avg_partobj
, total_partobj
= 0;
795 /* Percentage of partial objects of all objects in a slab */
796 unsigned long min_ppartobj
= 100, max_ppartobj
= 0,
797 avg_ppartobj
, total_ppartobj
= 0;
800 for (s
= slabinfo
; s
< slabinfo
+ slabs
; s
++) {
801 unsigned long long size
;
803 unsigned long long wasted
;
804 unsigned long long objwaste
;
805 unsigned long percentage_partial_slabs
;
806 unsigned long percentage_partial_objs
;
808 if (!s
->slabs
|| !s
->objects
)
814 used
= s
->objects
* s
->object_size
;
815 wasted
= size
- used
;
816 objwaste
= s
->slab_size
- s
->object_size
;
818 percentage_partial_slabs
= s
->partial
* 100 / s
->slabs
;
819 if (percentage_partial_slabs
> 100)
820 percentage_partial_slabs
= 100;
822 percentage_partial_objs
= s
->objects_partial
* 100
825 if (percentage_partial_objs
> 100)
826 percentage_partial_objs
= 100;
828 if (s
->object_size
< min_objsize
)
829 min_objsize
= s
->object_size
;
830 if (s
->partial
< min_partial
)
831 min_partial
= s
->partial
;
832 if (s
->slabs
< min_slabs
)
833 min_slabs
= s
->slabs
;
836 if (wasted
< min_waste
)
838 if (objwaste
< min_objwaste
)
839 min_objwaste
= objwaste
;
840 if (s
->objects
< min_objects
)
841 min_objects
= s
->objects
;
844 if (s
->objects_partial
< min_partobj
)
845 min_partobj
= s
->objects_partial
;
846 if (percentage_partial_slabs
< min_ppart
)
847 min_ppart
= percentage_partial_slabs
;
848 if (percentage_partial_objs
< min_ppartobj
)
849 min_ppartobj
= percentage_partial_objs
;
850 if (s
->slab_size
< min_memobj
)
851 min_memobj
= s
->slab_size
;
853 if (s
->object_size
> max_objsize
)
854 max_objsize
= s
->object_size
;
855 if (s
->partial
> max_partial
)
856 max_partial
= s
->partial
;
857 if (s
->slabs
> max_slabs
)
858 max_slabs
= s
->slabs
;
861 if (wasted
> max_waste
)
863 if (objwaste
> max_objwaste
)
864 max_objwaste
= objwaste
;
865 if (s
->objects
> max_objects
)
866 max_objects
= s
->objects
;
869 if (s
->objects_partial
> max_partobj
)
870 max_partobj
= s
->objects_partial
;
871 if (percentage_partial_slabs
> max_ppart
)
872 max_ppart
= percentage_partial_slabs
;
873 if (percentage_partial_objs
> max_ppartobj
)
874 max_ppartobj
= percentage_partial_objs
;
875 if (s
->slab_size
> max_memobj
)
876 max_memobj
= s
->slab_size
;
878 total_partial
+= s
->partial
;
879 total_slabs
+= s
->slabs
;
881 total_waste
+= wasted
;
883 total_objects
+= s
->objects
;
885 total_partobj
+= s
->objects_partial
;
886 total_ppart
+= percentage_partial_slabs
;
887 total_ppartobj
+= percentage_partial_objs
;
889 total_objwaste
+= s
->objects
* objwaste
;
890 total_objsize
+= s
->objects
* s
->slab_size
;
893 if (!total_objects
) {
894 printf("No objects\n");
898 printf("No slabs\n");
902 /* Per slab averages */
903 avg_partial
= total_partial
/ used_slabs
;
904 avg_slabs
= total_slabs
/ used_slabs
;
905 avg_size
= total_size
/ used_slabs
;
906 avg_waste
= total_waste
/ used_slabs
;
908 avg_objects
= total_objects
/ used_slabs
;
909 avg_used
= total_used
/ used_slabs
;
910 avg_partobj
= total_partobj
/ used_slabs
;
911 avg_ppart
= total_ppart
/ used_slabs
;
912 avg_ppartobj
= total_ppartobj
/ used_slabs
;
914 /* Per object object sizes */
915 avg_objsize
= total_used
/ total_objects
;
916 avg_objwaste
= total_objwaste
/ total_objects
;
917 avg_partobj
= total_partobj
* 100 / total_objects
;
918 avg_memobj
= total_objsize
/ total_objects
;
920 printf("Slabcache Totals\n");
921 printf("----------------\n");
922 printf("Slabcaches : %3d Aliases : %3d->%-3d Active: %3d\n",
923 slabs
, aliases
, alias_targets
, used_slabs
);
925 store_size(b1
, total_size
);store_size(b2
, total_waste
);
926 store_size(b3
, total_waste
* 100 / total_used
);
927 printf("Memory used: %6s # Loss : %6s MRatio:%6s%%\n", b1
, b2
, b3
);
929 store_size(b1
, total_objects
);store_size(b2
, total_partobj
);
930 store_size(b3
, total_partobj
* 100 / total_objects
);
931 printf("# Objects : %6s # PartObj: %6s ORatio:%6s%%\n", b1
, b2
, b3
);
934 printf("Per Cache Average Min Max Total\n");
935 printf("---------------------------------------------------------\n");
937 store_size(b1
, avg_objects
);store_size(b2
, min_objects
);
938 store_size(b3
, max_objects
);store_size(b4
, total_objects
);
939 printf("#Objects %10s %10s %10s %10s\n",
942 store_size(b1
, avg_slabs
);store_size(b2
, min_slabs
);
943 store_size(b3
, max_slabs
);store_size(b4
, total_slabs
);
944 printf("#Slabs %10s %10s %10s %10s\n",
947 store_size(b1
, avg_partial
);store_size(b2
, min_partial
);
948 store_size(b3
, max_partial
);store_size(b4
, total_partial
);
949 printf("#PartSlab %10s %10s %10s %10s\n",
951 store_size(b1
, avg_ppart
);store_size(b2
, min_ppart
);
952 store_size(b3
, max_ppart
);
953 store_size(b4
, total_partial
* 100 / total_slabs
);
954 printf("%%PartSlab%10s%% %10s%% %10s%% %10s%%\n",
957 store_size(b1
, avg_partobj
);store_size(b2
, min_partobj
);
958 store_size(b3
, max_partobj
);
959 store_size(b4
, total_partobj
);
960 printf("PartObjs %10s %10s %10s %10s\n",
963 store_size(b1
, avg_ppartobj
);store_size(b2
, min_ppartobj
);
964 store_size(b3
, max_ppartobj
);
965 store_size(b4
, total_partobj
* 100 / total_objects
);
966 printf("%% PartObj%10s%% %10s%% %10s%% %10s%%\n",
969 store_size(b1
, avg_size
);store_size(b2
, min_size
);
970 store_size(b3
, max_size
);store_size(b4
, total_size
);
971 printf("Memory %10s %10s %10s %10s\n",
974 store_size(b1
, avg_used
);store_size(b2
, min_used
);
975 store_size(b3
, max_used
);store_size(b4
, total_used
);
976 printf("Used %10s %10s %10s %10s\n",
979 store_size(b1
, avg_waste
);store_size(b2
, min_waste
);
980 store_size(b3
, max_waste
);store_size(b4
, total_waste
);
981 printf("Loss %10s %10s %10s %10s\n",
985 printf("Per Object Average Min Max\n");
986 printf("---------------------------------------------\n");
988 store_size(b1
, avg_memobj
);store_size(b2
, min_memobj
);
989 store_size(b3
, max_memobj
);
990 printf("Memory %10s %10s %10s\n",
992 store_size(b1
, avg_objsize
);store_size(b2
, min_objsize
);
993 store_size(b3
, max_objsize
);
994 printf("User %10s %10s %10s\n",
997 store_size(b1
, avg_objwaste
);store_size(b2
, min_objwaste
);
998 store_size(b3
, max_objwaste
);
999 printf("Loss %10s %10s %10s\n",
1003 static void sort_slabs(void)
1005 struct slabinfo
*s1
,*s2
;
1007 for (s1
= slabinfo
; s1
< slabinfo
+ slabs
; s1
++) {
1008 for (s2
= s1
+ 1; s2
< slabinfo
+ slabs
; s2
++) {
1012 result
= slab_size(s1
) < slab_size(s2
);
1013 else if (sort_active
)
1014 result
= slab_activity(s1
) < slab_activity(s2
);
1016 result
= strcasecmp(s1
->name
, s2
->name
);
1024 memcpy(&t
, s1
, sizeof(struct slabinfo
));
1025 memcpy(s1
, s2
, sizeof(struct slabinfo
));
1026 memcpy(s2
, &t
, sizeof(struct slabinfo
));
1032 static void sort_aliases(void)
1034 struct aliasinfo
*a1
,*a2
;
1036 for (a1
= aliasinfo
; a1
< aliasinfo
+ aliases
; a1
++) {
1037 for (a2
= a1
+ 1; a2
< aliasinfo
+ aliases
; a2
++) {
1042 if (show_alias
&& !show_inverted
) {
1046 if (strcasecmp(n1
, n2
) > 0) {
1049 memcpy(&t
, a1
, sizeof(struct aliasinfo
));
1050 memcpy(a1
, a2
, sizeof(struct aliasinfo
));
1051 memcpy(a2
, &t
, sizeof(struct aliasinfo
));
1057 static void link_slabs(void)
1059 struct aliasinfo
*a
;
1062 for (a
= aliasinfo
; a
< aliasinfo
+ aliases
; a
++) {
1064 for (s
= slabinfo
; s
< slabinfo
+ slabs
; s
++)
1065 if (strcmp(a
->ref
, s
->name
) == 0) {
1070 if (s
== slabinfo
+ slabs
)
1071 fatal("Unresolved alias %s\n", a
->ref
);
1075 static void alias(void)
1077 struct aliasinfo
*a
;
1078 char *active
= NULL
;
1083 for(a
= aliasinfo
; a
< aliasinfo
+ aliases
; a
++) {
1085 if (!show_single_ref
&& a
->slab
->refs
== 1)
1088 if (!show_inverted
) {
1090 if (strcmp(a
->slab
->name
, active
) == 0) {
1091 printf(" %s", a
->name
);
1095 printf("\n%-12s <- %s", a
->slab
->name
, a
->name
);
1096 active
= a
->slab
->name
;
1099 printf("%-20s -> %s\n", a
->name
, a
->slab
->name
);
1106 static void rename_slabs(void)
1109 struct aliasinfo
*a
;
1111 for (s
= slabinfo
; s
< slabinfo
+ slabs
; s
++) {
1112 if (*s
->name
!= ':')
1115 if (s
->refs
> 1 && !show_first_alias
)
1118 a
= find_one_alias(s
);
1129 static int slab_mismatch(char *slab
)
1131 return regexec(&pattern
, slab
, 0, NULL
, 0);
1134 static void read_slab_dir(void)
1138 struct slabinfo
*slab
= slabinfo
;
1139 struct aliasinfo
*alias
= aliasinfo
;
1144 if (chdir("/sys/kernel/slab") && chdir("/sys/slab"))
1145 fatal("SYSFS support for SLUB not active\n");
1148 while ((de
= readdir(dir
))) {
1149 if (de
->d_name
[0] == '.' ||
1150 (de
->d_name
[0] != ':' && slab_mismatch(de
->d_name
)))
1152 switch (de
->d_type
) {
1154 alias
->name
= strdup(de
->d_name
);
1155 count
= readlink(de
->d_name
, buffer
, sizeof(buffer
)-1);
1158 fatal("Cannot read symlink %s\n", de
->d_name
);
1162 while (p
> buffer
&& p
[-1] != '/')
1164 alias
->ref
= strdup(p
);
1168 if (chdir(de
->d_name
))
1169 fatal("Unable to access slab %s\n", slab
->name
);
1170 slab
->name
= strdup(de
->d_name
);
1173 slab
->aliases
= get_obj("aliases");
1174 slab
->align
= get_obj("align");
1175 slab
->cache_dma
= get_obj("cache_dma");
1176 slab
->cpu_slabs
= get_obj("cpu_slabs");
1177 slab
->destroy_by_rcu
= get_obj("destroy_by_rcu");
1178 slab
->hwcache_align
= get_obj("hwcache_align");
1179 slab
->object_size
= get_obj("object_size");
1180 slab
->objects
= get_obj("objects");
1181 slab
->objects_partial
= get_obj("objects_partial");
1182 slab
->objects_total
= get_obj("objects_total");
1183 slab
->objs_per_slab
= get_obj("objs_per_slab");
1184 slab
->order
= get_obj("order");
1185 slab
->partial
= get_obj("partial");
1186 slab
->partial
= get_obj_and_str("partial", &t
);
1187 decode_numa_list(slab
->numa_partial
, t
);
1189 slab
->poison
= get_obj("poison");
1190 slab
->reclaim_account
= get_obj("reclaim_account");
1191 slab
->red_zone
= get_obj("red_zone");
1192 slab
->sanity_checks
= get_obj("sanity_checks");
1193 slab
->slab_size
= get_obj("slab_size");
1194 slab
->slabs
= get_obj_and_str("slabs", &t
);
1195 decode_numa_list(slab
->numa
, t
);
1197 slab
->store_user
= get_obj("store_user");
1198 slab
->trace
= get_obj("trace");
1199 slab
->alloc_fastpath
= get_obj("alloc_fastpath");
1200 slab
->alloc_slowpath
= get_obj("alloc_slowpath");
1201 slab
->free_fastpath
= get_obj("free_fastpath");
1202 slab
->free_slowpath
= get_obj("free_slowpath");
1203 slab
->free_frozen
= get_obj("free_frozen");
1204 slab
->free_add_partial
= get_obj("free_add_partial");
1205 slab
->free_remove_partial
= get_obj("free_remove_partial");
1206 slab
->alloc_from_partial
= get_obj("alloc_from_partial");
1207 slab
->alloc_slab
= get_obj("alloc_slab");
1208 slab
->alloc_refill
= get_obj("alloc_refill");
1209 slab
->free_slab
= get_obj("free_slab");
1210 slab
->cpuslab_flush
= get_obj("cpuslab_flush");
1211 slab
->deactivate_full
= get_obj("deactivate_full");
1212 slab
->deactivate_empty
= get_obj("deactivate_empty");
1213 slab
->deactivate_to_head
= get_obj("deactivate_to_head");
1214 slab
->deactivate_to_tail
= get_obj("deactivate_to_tail");
1215 slab
->deactivate_remote_frees
= get_obj("deactivate_remote_frees");
1216 slab
->order_fallback
= get_obj("order_fallback");
1217 slab
->cmpxchg_double_cpu_fail
= get_obj("cmpxchg_double_cpu_fail");
1218 slab
->cmpxchg_double_fail
= get_obj("cmpxchg_double_fail");
1219 slab
->cpu_partial_alloc
= get_obj("cpu_partial_alloc");
1220 slab
->cpu_partial_free
= get_obj("cpu_partial_free");
1221 slab
->alloc_node_mismatch
= get_obj("alloc_node_mismatch");
1222 slab
->deactivate_bypass
= get_obj("deactivate_bypass");
1224 if (slab
->name
[0] == ':')
1229 fatal("Unknown file type %lx\n", de
->d_type
);
1233 slabs
= slab
- slabinfo
;
1234 actual_slabs
= slabs
;
1235 aliases
= alias
- aliasinfo
;
1236 if (slabs
> MAX_SLABS
)
1237 fatal("Too many slabs\n");
1238 if (aliases
> MAX_ALIASES
)
1239 fatal("Too many aliases\n");
1242 static void output_slabs(void)
1244 struct slabinfo
*slab
;
1246 for (slab
= slabinfo
; slab
< slabinfo
+ slabs
; slab
++) {
1254 else if (show_track
)
1255 show_tracking(slab
);
1257 slab_validate(slab
);
1266 else if (show_report
)
1271 struct option opts
[] = {
1272 { "aliases", 0, NULL
, 'a' },
1273 { "activity", 0, NULL
, 'A' },
1274 { "debug", 2, NULL
, 'd' },
1275 { "display-activity", 0, NULL
, 'D' },
1276 { "empty", 0, NULL
, 'e' },
1277 { "first-alias", 0, NULL
, 'f' },
1278 { "help", 0, NULL
, 'h' },
1279 { "inverted", 0, NULL
, 'i'},
1280 { "numa", 0, NULL
, 'n' },
1281 { "ops", 0, NULL
, 'o' },
1282 { "report", 0, NULL
, 'r' },
1283 { "shrink", 0, NULL
, 's' },
1284 { "slabs", 0, NULL
, 'l' },
1285 { "track", 0, NULL
, 't'},
1286 { "validate", 0, NULL
, 'v' },
1287 { "zero", 0, NULL
, 'z' },
1288 { "1ref", 0, NULL
, '1'},
1289 { NULL
, 0, NULL
, 0 }
1292 int main(int argc
, char *argv
[])
1296 char *pattern_source
;
1298 page_size
= getpagesize();
1300 while ((c
= getopt_long(argc
, argv
, "aAd::Defhil1noprstvzTS",
1304 show_single_ref
= 1;
1314 if (!debug_opt_scan(optarg
))
1315 fatal("Invalid debug option '%s'\n", optarg
);
1324 show_first_alias
= 1;
1364 fatal("%s: Invalid option '%c'\n", argv
[0], optopt
);
1368 if (!show_slab
&& !show_alias
&& !show_track
&& !show_report
1369 && !validate
&& !shrink
&& !set_debug
&& !show_ops
)
1373 pattern_source
= argv
[optind
];
1375 pattern_source
= ".*";
1377 err
= regcomp(&pattern
, pattern_source
, REG_ICASE
|REG_NOSUB
);
1379 fatal("%s: Invalid pattern '%s' code %d\n",
1380 argv
[0], pattern_source
, err
);