70 lines
2.0 KiB
C
70 lines
2.0 KiB
C
#include "libc/mem/mem.h"
|
|
#include "third_party/dlmalloc/dlmalloc.internal.h"
|
|
|
|
/**
|
|
* Returns (by copy) a struct containing various summary statistics:
|
|
*
|
|
* - arena: current total non-mmapped bytes allocated from system
|
|
*
|
|
* - ordblks: the number of free chunks
|
|
*
|
|
* - smblks: always zero.
|
|
*
|
|
* - hblks: current number of mmapped regions
|
|
*
|
|
* - hblkhd: total bytes held in mmapped regions
|
|
*
|
|
* - usmblks: the maximum total allocated space. This will be greater
|
|
* than current total if trimming has occurred.
|
|
*
|
|
* - fsmblks: always zero
|
|
*
|
|
* - uordblks: current total allocated space (normal or mmapped)
|
|
*
|
|
* - fordblks: total free space
|
|
*
|
|
* - keepcost: the maximum number of bytes that could ideally be
|
|
* released back to system via malloc_trim. ("ideally" means that it
|
|
* ignores page restrictions etc.)
|
|
*
|
|
* Because these fields are ints, but internal bookkeeping may
|
|
* be kept as longs, the reported values may wrap around zero and
|
|
* thus be inaccurate.
|
|
*/
|
|
struct mallinfo mallinfo(void) {
|
|
struct mallinfo nm = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
|
|
ensure_initialization();
|
|
if (!PREACTION(g_dlmalloc)) {
|
|
check_malloc_state(g_dlmalloc);
|
|
if (is_initialized(g_dlmalloc)) {
|
|
size_t nfree = SIZE_T_ONE; /* top always free */
|
|
size_t mfree = g_dlmalloc->topsize + TOP_FOOT_SIZE;
|
|
size_t sum = mfree;
|
|
msegmentptr s = &g_dlmalloc->seg;
|
|
while (s != 0) {
|
|
mchunkptr q = align_as_chunk(s->base);
|
|
while (segment_holds(s, q) && q != g_dlmalloc->top &&
|
|
q->head != FENCEPOST_HEAD) {
|
|
size_t sz = chunksize(q);
|
|
sum += sz;
|
|
if (!is_inuse(q)) {
|
|
mfree += sz;
|
|
++nfree;
|
|
}
|
|
q = next_chunk(q);
|
|
}
|
|
s = s->next;
|
|
}
|
|
nm.arena = sum;
|
|
nm.ordblks = nfree;
|
|
nm.hblkhd = g_dlmalloc->footprint - sum;
|
|
nm.usmblks = g_dlmalloc->max_footprint;
|
|
nm.uordblks = g_dlmalloc->footprint - mfree;
|
|
nm.fordblks = mfree;
|
|
nm.keepcost = g_dlmalloc->topsize;
|
|
}
|
|
POSTACTION(g_dlmalloc);
|
|
}
|
|
return nm;
|
|
}
|