1 /* 2 * Copyright (C) 2014 The Android Open Source Project 3 * 4 * Licensed under the Apache License, Version 2.0 (the "License"); 5 * you may not use this file except in compliance with the License. 6 * You may obtain a copy of the License at 7 * 8 * http://www.apache.org/licenses/LICENSE-2.0 9 * 10 * Unless required by applicable law or agreed to in writing, software 11 * distributed under the License is distributed on an "AS IS" BASIS, 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 13 * See the License for the specific language governing permissions and 14 * limitations under the License. 15 */ 16 17 #include "malloc_info.h" 18 19 #include <errno.h> 20 #include "private/bionic_macros.h" 21 22 class __LIBC_HIDDEN__ Elem { 23 public: 24 // name must be valid throughout lifetime of the object. 25 explicit Elem(FILE* fp, const char* name, 26 const char* attr_fmt = nullptr, ...) { 27 this->fp = fp; 28 this->name = name; 29 30 fprintf(fp, "<%s", name); 31 if (attr_fmt != nullptr) { 32 va_list args; 33 va_start(args, attr_fmt); 34 fputc(' ', fp); 35 vfprintf(fp, attr_fmt, args); 36 va_end(args); 37 } 38 fputc('>', fp); 39 } 40 41 ~Elem() noexcept { 42 fprintf(fp, "</%s>", name); 43 } 44 45 void contents(const char* fmt, ...) { 46 va_list args; 47 va_start(args, fmt); 48 vfprintf(fp, fmt, args); 49 va_end(args); 50 } 51 52 private: 53 FILE* fp; 54 const char* name; 55 56 DISALLOW_COPY_AND_ASSIGN(Elem); 57 }; 58 59 int malloc_info(int options, FILE* fp) { 60 if (options != 0) { 61 errno = EINVAL; 62 return -1; 63 } 64 65 Elem root(fp, "malloc", "version=\"jemalloc-1\""); 66 67 // Dump all of the large allocations in the arenas. 68 for (size_t i = 0; i < __mallinfo_narenas(); i++) { 69 struct mallinfo mi = __mallinfo_arena_info(i); 70 if (mi.hblkhd != 0) { 71 Elem arena_elem(fp, "heap", "nr=\"%d\"", i); 72 { 73 Elem(fp, "allocated-large").contents("%zu", mi.ordblks); 74 Elem(fp, "allocated-huge").contents("%zu", mi.uordblks); 75 Elem(fp, "allocated-bins").contents("%zu", mi.fsmblks); 76 77 size_t total = 0; 78 for (size_t j = 0; j < __mallinfo_nbins(); j++) { 79 struct mallinfo mi = __mallinfo_bin_info(i, j); 80 if (mi.ordblks != 0) { 81 Elem bin_elem(fp, "bin", "nr=\"%d\"", j); 82 Elem(fp, "allocated").contents("%zu", mi.ordblks); 83 Elem(fp, "nmalloc").contents("%zu", mi.uordblks); 84 Elem(fp, "ndalloc").contents("%zu", mi.fordblks); 85 total += mi.ordblks; 86 } 87 } 88 Elem(fp, "bins-total").contents("%zu", total); 89 } 90 } 91 } 92 93 return 0; 94 } 95
