bind9/lib/isc/jemalloc_shim.h
Ondřej Surý b0194004d9
Provide more information when the memory allocation fails
Instead of just crashing when memory allocation fails, also print a
message saying "Out of memory!", the size of the allocation that failed,
total allocated memory from all memory contexts and value of errno.
2025-11-28 14:42:21 +01:00

155 lines
3.1 KiB
C

/*
* Copyright (C) Internet Systems Consortium, Inc. ("ISC")
*
* SPDX-License-Identifier: MPL-2.0
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, you can obtain one at https://mozilla.org/MPL/2.0/.
*
* See the COPYRIGHT file distributed with this work for additional
* information regarding copyright ownership.
*/
#pragma once
#if !defined(HAVE_JEMALLOC)
#include <stddef.h>
#include <stdlib.h>
#include <string.h>
#include <isc/overflow.h>
#include <isc/util.h>
const char *malloc_conf = NULL;
/*
* The MALLOCX_ZERO and MALLOCX_ZERO_GET macros were taken literal from
* jemalloc_macros.h and jemalloc_internal_types.h headers respectively.
*/
#define MALLOCX_ZERO ((int)0x40)
#define MALLOCX_ZERO_GET(flags) ((bool)(flags & MALLOCX_ZERO))
#if defined(HAVE_MALLOC_SIZE) || defined(HAVE_MALLOC_USABLE_SIZE)
#ifdef HAVE_MALLOC_SIZE
#include <malloc/malloc.h>
static inline size_t
sallocx(void *ptr, int flags ISC_ATTR_UNUSED) {
return malloc_size(ptr);
}
#elif HAVE_MALLOC_USABLE_SIZE
#ifdef __DragonFly__
/*
* On DragonFly BSD 'man 3 malloc' advises us to include the following
* header to have access to malloc_usable_size().
*/
#include <malloc_np.h>
#else
#include <malloc.h>
#endif
static inline size_t
sallocx(void *ptr, int flags ISC_ATTR_UNUSED) {
return malloc_usable_size(ptr);
}
#endif /* HAVE_MALLOC_SIZE */
static inline void *
mallocx(size_t size, int flags) {
void *ptr = malloc(size);
INSIST(ptr != NULL);
if ((flags & MALLOCX_ZERO) != 0) {
memset(ptr, 0, size);
}
return ptr;
}
static inline void
sdallocx(void *ptr, size_t size ISC_ATTR_UNUSED, int flags ISC_ATTR_UNUSED) {
free(ptr);
}
static inline void *
rallocx(void *ptr, size_t size, int flags) {
REQUIRE(size != 0);
REQUIRE((flags & MALLOCX_ZERO) == 0);
ptr = realloc(ptr, size);
INSIST(ptr != NULL);
return ptr;
}
#else
typedef union {
size_t size;
max_align_t __alignment;
} size_info;
static inline void *
mallocx(size_t size, int flags) {
void *ptr = NULL;
size_t bytes = ISC_CHECKED_ADD(size, sizeof(size_info));
size_info *si = malloc(bytes);
if (si == NULL) {
return NULL;
}
si->size = size;
ptr = &si[1];
if (MALLOCX_ZERO_GET(flags)) {
memset(ptr, 0, size);
}
return ptr;
}
static inline void
sdallocx(void *ptr, size_t size ISC_ATTR_UNUSED, int flags ISC_ATTR_UNUSED) {
size_info *si = &(((size_info *)ptr)[-1]);
free(si);
}
static inline size_t
sallocx(void *ptr, int flags ISC_ATTR_UNUSED) {
size_info *si = &(((size_info *)ptr)[-1]);
return si[0].size;
}
static inline void *
rallocx(void *ptr, size_t size, int flags) {
size_t bytes = ISC_CHECKED_ADD(size, sizeof(size_info));
size_info *si = realloc(&(((size_info *)ptr)[-1]), bytes);
if (si == NULL) {
return NULL;
}
if (MALLOCX_ZERO_GET(flags) && size > si->size) {
memset((uint8_t *)si + sizeof(*si) + si->size, 0,
size - si->size);
}
si->size = size;
ptr = &si[1];
return ptr;
}
#endif /* defined(HAVE_MALLOC_SIZE) || defined(HAVE_MALLOC_USABLE_SIZE) */
#endif /* !defined(HAVE_JEMALLOC) */