| //===------------------------ malloc.c ------------------*- C -*-=============// |
| // |
| // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
| // See https://llvm.org/LICENSE.txt for license information. |
| // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
| // |
| //===----------------------------------------------------------------------===// |
| // |
| // This library provides a cross-platform lock free thread caching malloc |
| // implementation in C11. |
| // |
| // |
| // This file provides overrides for the standard library malloc entry points for |
| // C and new/delete operators for C++ It also provides automatic |
| // initialization/finalization of process and threads |
| // |
| //===----------------------------------------------------------------------===// |
| |
| #if defined(__TINYC__) |
| #include <sys/types.h> |
| #endif |
| |
| #ifndef ARCH_64BIT |
| #if defined(__LLP64__) || defined(__LP64__) || defined(_WIN64) |
| #define ARCH_64BIT 1 |
| _Static_assert(sizeof(size_t) == 8, "Data type size mismatch"); |
| _Static_assert(sizeof(void *) == 8, "Data type size mismatch"); |
| #else |
| #define ARCH_64BIT 0 |
| _Static_assert(sizeof(size_t) == 4, "Data type size mismatch"); |
| _Static_assert(sizeof(void *) == 4, "Data type size mismatch"); |
| #endif |
| #endif |
| |
| #if (defined(__GNUC__) || defined(__clang__)) |
| #pragma GCC visibility push(default) |
| #endif |
| |
| #define USE_IMPLEMENT 1 |
| #define USE_INTERPOSE 0 |
| #define USE_ALIAS 0 |
| |
| #if defined(__APPLE__) |
| #undef USE_INTERPOSE |
| #define USE_INTERPOSE 1 |
| |
| typedef struct interpose_t { |
| void *new_func; |
| void *orig_func; |
| } interpose_t; |
| |
| #define MAC_INTERPOSE_PAIR(newf, oldf) {(void *)newf, (void *)oldf} |
| #define MAC_INTERPOSE_SINGLE(newf, oldf) \ |
| __attribute__((used)) static const interpose_t macinterpose##newf##oldf \ |
| __attribute__((section("__DATA, __interpose"))) = \ |
| MAC_INTERPOSE_PAIR(newf, oldf) |
| |
| #endif |
| |
| #if !defined(_WIN32) && !defined(__APPLE__) |
| #undef USE_IMPLEMENT |
| #undef USE_ALIAS |
| #define USE_IMPLEMENT 0 |
| #define USE_ALIAS 1 |
| #endif |
| |
| #ifdef _MSC_VER |
| #pragma warning(disable : 4100) |
| #undef malloc |
| #undef free |
| #undef calloc |
| #define RPMALLOC_RESTRICT __declspec(restrict) |
| #else |
| #define RPMALLOC_RESTRICT |
| #endif |
| |
| #if ENABLE_OVERRIDE |
| |
| typedef struct rp_nothrow_t { |
| int __dummy; |
| } rp_nothrow_t; |
| |
| #if USE_IMPLEMENT |
| |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL malloc(size_t size) { |
| return rpmalloc(size); |
| } |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL calloc(size_t count, |
| size_t size) { |
| return rpcalloc(count, size); |
| } |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL realloc(void *ptr, |
| size_t size) { |
| return rprealloc(ptr, size); |
| } |
| extern inline void *RPMALLOC_CDECL reallocf(void *ptr, size_t size) { |
| return rprealloc(ptr, size); |
| } |
| extern inline void *RPMALLOC_CDECL aligned_alloc(size_t alignment, |
| size_t size) { |
| return rpaligned_alloc(alignment, size); |
| } |
| extern inline void *RPMALLOC_CDECL memalign(size_t alignment, size_t size) { |
| return rpmemalign(alignment, size); |
| } |
| extern inline int RPMALLOC_CDECL posix_memalign(void **memptr, size_t alignment, |
| size_t size) { |
| return rpposix_memalign(memptr, alignment, size); |
| } |
| extern inline void RPMALLOC_CDECL free(void *ptr) { rpfree(ptr); } |
| extern inline void RPMALLOC_CDECL cfree(void *ptr) { rpfree(ptr); } |
| extern inline size_t RPMALLOC_CDECL malloc_usable_size(void *ptr) { |
| return rpmalloc_usable_size(ptr); |
| } |
| extern inline size_t RPMALLOC_CDECL malloc_size(void *ptr) { |
| return rpmalloc_usable_size(ptr); |
| } |
| |
| #ifdef _WIN32 |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL _malloc_base(size_t size) { |
| return rpmalloc(size); |
| } |
| extern inline void RPMALLOC_CDECL _free_base(void *ptr) { rpfree(ptr); } |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL _calloc_base(size_t count, |
| size_t size) { |
| return rpcalloc(count, size); |
| } |
| extern inline size_t RPMALLOC_CDECL _msize(void *ptr) { |
| return rpmalloc_usable_size(ptr); |
| } |
| extern inline size_t RPMALLOC_CDECL _msize_base(void *ptr) { |
| return rpmalloc_usable_size(ptr); |
| } |
| extern inline RPMALLOC_RESTRICT void *RPMALLOC_CDECL |
| _realloc_base(void *ptr, size_t size) { |
| return rprealloc(ptr, size); |
| } |
| #endif |
| |
| #ifdef _WIN32 |
| // For Windows, #include <rpnew.h> in one source file to get the C++ operator |
| // overrides implemented in your module |
| #else |
| // Overload the C++ operators using the mangled names |
| // (https://itanium-cxx-abi.github.io/cxx-abi/abi.html#mangling) operators |
| // delete and delete[] |
| #define RPDEFVIS __attribute__((visibility("default"))) |
| extern void _ZdlPv(void *p); |
| void RPDEFVIS _ZdlPv(void *p) { rpfree(p); } |
| extern void _ZdaPv(void *p); |
| void RPDEFVIS _ZdaPv(void *p) { rpfree(p); } |
| #if ARCH_64BIT |
| // 64-bit operators new and new[], normal and aligned |
| extern void *_Znwm(uint64_t size); |
| void *RPDEFVIS _Znwm(uint64_t size) { return rpmalloc(size); } |
| extern void *_Znam(uint64_t size); |
| void *RPDEFVIS _Znam(uint64_t size) { return rpmalloc(size); } |
| extern void *_Znwmm(uint64_t size, uint64_t align); |
| void *RPDEFVIS _Znwmm(uint64_t size, uint64_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_Znamm(uint64_t size, uint64_t align); |
| void *RPDEFVIS _Znamm(uint64_t size, uint64_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnwmSt11align_val_t(uint64_t size, uint64_t align); |
| void *RPDEFVIS _ZnwmSt11align_val_t(uint64_t size, uint64_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnamSt11align_val_t(uint64_t size, uint64_t align); |
| void *RPDEFVIS _ZnamSt11align_val_t(uint64_t size, uint64_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnwmRKSt9nothrow_t(uint64_t size, rp_nothrow_t t); |
| void *RPDEFVIS _ZnwmRKSt9nothrow_t(uint64_t size, rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpmalloc(size); |
| } |
| extern void *_ZnamRKSt9nothrow_t(uint64_t size, rp_nothrow_t t); |
| void *RPDEFVIS _ZnamRKSt9nothrow_t(uint64_t size, rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpmalloc(size); |
| } |
| extern void *_ZnwmSt11align_val_tRKSt9nothrow_t(uint64_t size, uint64_t align, |
| rp_nothrow_t t); |
| void *RPDEFVIS _ZnwmSt11align_val_tRKSt9nothrow_t(uint64_t size, uint64_t align, |
| rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnamSt11align_val_tRKSt9nothrow_t(uint64_t size, uint64_t align, |
| rp_nothrow_t t); |
| void *RPDEFVIS _ZnamSt11align_val_tRKSt9nothrow_t(uint64_t size, uint64_t align, |
| rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpaligned_alloc(align, size); |
| } |
| // 64-bit operators sized delete and delete[], normal and aligned |
| extern void _ZdlPvm(void *p, uint64_t size); |
| void RPDEFVIS _ZdlPvm(void *p, uint64_t size) { |
| rpfree(p); |
| (void)sizeof(size); |
| } |
| extern void _ZdaPvm(void *p, uint64_t size); |
| void RPDEFVIS _ZdaPvm(void *p, uint64_t size) { |
| rpfree(p); |
| (void)sizeof(size); |
| } |
| extern void _ZdlPvSt11align_val_t(void *p, uint64_t align); |
| void RPDEFVIS _ZdlPvSt11align_val_t(void *p, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(align); |
| } |
| extern void _ZdaPvSt11align_val_t(void *p, uint64_t align); |
| void RPDEFVIS _ZdaPvSt11align_val_t(void *p, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(align); |
| } |
| extern void _ZdlPvmSt11align_val_t(void *p, uint64_t size, uint64_t align); |
| void RPDEFVIS _ZdlPvmSt11align_val_t(void *p, uint64_t size, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(size); |
| (void)sizeof(align); |
| } |
| extern void _ZdaPvmSt11align_val_t(void *p, uint64_t size, uint64_t align); |
| void RPDEFVIS _ZdaPvmSt11align_val_t(void *p, uint64_t size, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(size); |
| (void)sizeof(align); |
| } |
| #else |
| // 32-bit operators new and new[], normal and aligned |
| extern void *_Znwj(uint32_t size); |
| void *RPDEFVIS _Znwj(uint32_t size) { return rpmalloc(size); } |
| extern void *_Znaj(uint32_t size); |
| void *RPDEFVIS _Znaj(uint32_t size) { return rpmalloc(size); } |
| extern void *_Znwjj(uint32_t size, uint32_t align); |
| void *RPDEFVIS _Znwjj(uint32_t size, uint32_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_Znajj(uint32_t size, uint32_t align); |
| void *RPDEFVIS _Znajj(uint32_t size, uint32_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnwjSt11align_val_t(size_t size, size_t align); |
| void *RPDEFVIS _ZnwjSt11align_val_t(size_t size, size_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnajSt11align_val_t(size_t size, size_t align); |
| void *RPDEFVIS _ZnajSt11align_val_t(size_t size, size_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnwjRKSt9nothrow_t(size_t size, rp_nothrow_t t); |
| void *RPDEFVIS _ZnwjRKSt9nothrow_t(size_t size, rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpmalloc(size); |
| } |
| extern void *_ZnajRKSt9nothrow_t(size_t size, rp_nothrow_t t); |
| void *RPDEFVIS _ZnajRKSt9nothrow_t(size_t size, rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpmalloc(size); |
| } |
| extern void *_ZnwjSt11align_val_tRKSt9nothrow_t(size_t size, size_t align, |
| rp_nothrow_t t); |
| void *RPDEFVIS _ZnwjSt11align_val_tRKSt9nothrow_t(size_t size, size_t align, |
| rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpaligned_alloc(align, size); |
| } |
| extern void *_ZnajSt11align_val_tRKSt9nothrow_t(size_t size, size_t align, |
| rp_nothrow_t t); |
| void *RPDEFVIS _ZnajSt11align_val_tRKSt9nothrow_t(size_t size, size_t align, |
| rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpaligned_alloc(align, size); |
| } |
| // 32-bit operators sized delete and delete[], normal and aligned |
| extern void _ZdlPvj(void *p, uint64_t size); |
| void RPDEFVIS _ZdlPvj(void *p, uint64_t size) { |
| rpfree(p); |
| (void)sizeof(size); |
| } |
| extern void _ZdaPvj(void *p, uint64_t size); |
| void RPDEFVIS _ZdaPvj(void *p, uint64_t size) { |
| rpfree(p); |
| (void)sizeof(size); |
| } |
| extern void _ZdlPvSt11align_val_t(void *p, uint32_t align); |
| void RPDEFVIS _ZdlPvSt11align_val_t(void *p, uint64_t a) { |
| rpfree(p); |
| (void)sizeof(align); |
| } |
| extern void _ZdaPvSt11align_val_t(void *p, uint32_t align); |
| void RPDEFVIS _ZdaPvSt11align_val_t(void *p, uint64_t a) { |
| rpfree(p); |
| (void)sizeof(align); |
| } |
| extern void _ZdlPvjSt11align_val_t(void *p, uint32_t size, uint32_t align); |
| void RPDEFVIS _ZdlPvjSt11align_val_t(void *p, uint64_t size, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(size); |
| (void)sizeof(a); |
| } |
| extern void _ZdaPvjSt11align_val_t(void *p, uint32_t size, uint32_t align); |
| void RPDEFVIS _ZdaPvjSt11align_val_t(void *p, uint64_t size, uint64_t align) { |
| rpfree(p); |
| (void)sizeof(size); |
| (void)sizeof(a); |
| } |
| #endif |
| #endif |
| #endif |
| |
| #if USE_INTERPOSE || USE_ALIAS |
| |
| static void *rpmalloc_nothrow(size_t size, rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpmalloc(size); |
| } |
| static void *rpaligned_alloc_reverse(size_t size, size_t align) { |
| return rpaligned_alloc(align, size); |
| } |
| static void *rpaligned_alloc_reverse_nothrow(size_t size, size_t align, |
| rp_nothrow_t t) { |
| (void)sizeof(t); |
| return rpaligned_alloc(align, size); |
| } |
| static void rpfree_size(void *p, size_t size) { |
| (void)sizeof(size); |
| rpfree(p); |
| } |
| static void rpfree_aligned(void *p, size_t align) { |
| (void)sizeof(align); |
| rpfree(p); |
| } |
| static void rpfree_size_aligned(void *p, size_t size, size_t align) { |
| (void)sizeof(size); |
| (void)sizeof(align); |
| rpfree(p); |
| } |
| |
| #endif |
| |
| #if USE_INTERPOSE |
| |
| __attribute__((used)) static const interpose_t macinterpose_malloc[] |
| __attribute__((section("__DATA, __interpose"))) = { |
| // new and new[] |
| MAC_INTERPOSE_PAIR(rpmalloc, _Znwm), |
| MAC_INTERPOSE_PAIR(rpmalloc, _Znam), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse, _Znwmm), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse, _Znamm), |
| MAC_INTERPOSE_PAIR(rpmalloc_nothrow, _ZnwmRKSt9nothrow_t), |
| MAC_INTERPOSE_PAIR(rpmalloc_nothrow, _ZnamRKSt9nothrow_t), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse, _ZnwmSt11align_val_t), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse, _ZnamSt11align_val_t), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse_nothrow, |
| _ZnwmSt11align_val_tRKSt9nothrow_t), |
| MAC_INTERPOSE_PAIR(rpaligned_alloc_reverse_nothrow, |
| _ZnamSt11align_val_tRKSt9nothrow_t), |
| // delete and delete[] |
| MAC_INTERPOSE_PAIR(rpfree, _ZdlPv), MAC_INTERPOSE_PAIR(rpfree, _ZdaPv), |
| MAC_INTERPOSE_PAIR(rpfree_size, _ZdlPvm), |
| MAC_INTERPOSE_PAIR(rpfree_size, _ZdaPvm), |
| MAC_INTERPOSE_PAIR(rpfree_aligned, _ZdlPvSt11align_val_t), |
| MAC_INTERPOSE_PAIR(rpfree_aligned, _ZdaPvSt11align_val_t), |
| MAC_INTERPOSE_PAIR(rpfree_size_aligned, _ZdlPvmSt11align_val_t), |
| MAC_INTERPOSE_PAIR(rpfree_size_aligned, _ZdaPvmSt11align_val_t), |
| // libc entry points |
| MAC_INTERPOSE_PAIR(rpmalloc, malloc), |
| MAC_INTERPOSE_PAIR(rpmalloc, calloc), |
| MAC_INTERPOSE_PAIR(rprealloc, realloc), |
| MAC_INTERPOSE_PAIR(rprealloc, reallocf), |
| #if defined(__MAC_10_15) && __MAC_OS_X_VERSION_MIN_REQUIRED >= __MAC_10_15 |
| MAC_INTERPOSE_PAIR(rpaligned_alloc, aligned_alloc), |
| #endif |
| MAC_INTERPOSE_PAIR(rpmemalign, memalign), |
| MAC_INTERPOSE_PAIR(rpposix_memalign, posix_memalign), |
| MAC_INTERPOSE_PAIR(rpfree, free), MAC_INTERPOSE_PAIR(rpfree, cfree), |
| MAC_INTERPOSE_PAIR(rpmalloc_usable_size, malloc_usable_size), |
| MAC_INTERPOSE_PAIR(rpmalloc_usable_size, malloc_size)}; |
| |
| #endif |
| |
| #if USE_ALIAS |
| |
| #define RPALIAS(fn) __attribute__((alias(#fn), used, visibility("default"))); |
| |
| // Alias the C++ operators using the mangled names |
| // (https://itanium-cxx-abi.github.io/cxx-abi/abi.html#mangling) |
| |
| // operators delete and delete[] |
| void _ZdlPv(void *p) RPALIAS(rpfree) void _ZdaPv(void *p) RPALIAS(rpfree) |
| |
| #if ARCH_64BIT |
| // 64-bit operators new and new[], normal and aligned |
| void *_Znwm(uint64_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) |
| RPALIAS(rpmalloc) void *_Znam(uint64_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) RPALIAS(rpmalloc) void *_Znwmm(uint64_t size, |
| uint64_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_Znamm(uint64_t size, |
| uint64_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnwmSt11align_val_t( |
| size_t size, size_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnamSt11align_val_t( |
| size_t size, size_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnwmRKSt9nothrow_t( |
| size_t size, rp_nothrow_t t) |
| RPALIAS(rpmalloc_nothrow) void *_ZnamRKSt9nothrow_t( |
| size_t size, |
| rp_nothrow_t t) RPALIAS(rpmalloc_nothrow) void |
| *_ZnwmSt11align_val_tRKSt9nothrow_t(size_t size, |
| size_t align, |
| rp_nothrow_t t) |
| RPALIAS(rpaligned_alloc_reverse_nothrow) void |
| *_ZnamSt11align_val_tRKSt9nothrow_t( |
| size_t size, size_t align, |
| rp_nothrow_t t) |
| RPALIAS(rpaligned_alloc_reverse_nothrow) |
| // 64-bit operators delete and delete[], sized and aligned |
| void _ZdlPvm(void *p, size_t n) RPALIAS(rpfree_size) void _ZdaPvm(void *p, |
| size_t n) |
| RPALIAS(rpfree_size) void _ZdlPvSt11align_val_t(void *p, size_t a) |
| RPALIAS(rpfree_aligned) void _ZdaPvSt11align_val_t(void *p, |
| size_t a) |
| RPALIAS(rpfree_aligned) void _ZdlPvmSt11align_val_t(void *p, |
| size_t n, |
| size_t a) |
| RPALIAS(rpfree_size_aligned) void _ZdaPvmSt11align_val_t( |
| void *p, size_t n, size_t a) |
| RPALIAS(rpfree_size_aligned) |
| #else |
| // 32-bit operators new and new[], normal and aligned |
| void *_Znwj(uint32_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) |
| RPALIAS(rpmalloc) void *_Znaj(uint32_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) RPALIAS(rpmalloc) void *_Znwjj(uint32_t size, |
| uint32_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_Znajj(uint32_t size, |
| uint32_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnwjSt11align_val_t( |
| size_t size, size_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnajSt11align_val_t( |
| size_t size, size_t align) |
| RPALIAS(rpaligned_alloc_reverse) void *_ZnwjRKSt9nothrow_t( |
| size_t size, rp_nothrow_t t) |
| RPALIAS(rpmalloc_nothrow) void *_ZnajRKSt9nothrow_t( |
| size_t size, |
| rp_nothrow_t t) RPALIAS(rpmalloc_nothrow) void |
| *_ZnwjSt11align_val_tRKSt9nothrow_t(size_t size, |
| size_t align, |
| rp_nothrow_t t) |
| RPALIAS(rpaligned_alloc_reverse_nothrow) void |
| *_ZnajSt11align_val_tRKSt9nothrow_t( |
| size_t size, size_t align, |
| rp_nothrow_t t) |
| RPALIAS(rpaligned_alloc_reverse_nothrow) |
| // 32-bit operators delete and delete[], sized and aligned |
| void _ZdlPvj(void *p, size_t n) RPALIAS(rpfree_size) void _ZdaPvj(void *p, |
| size_t n) |
| RPALIAS(rpfree_size) void _ZdlPvSt11align_val_t(void *p, size_t a) |
| RPALIAS(rpfree_aligned) void _ZdaPvSt11align_val_t(void *p, |
| size_t a) |
| RPALIAS(rpfree_aligned) void _ZdlPvjSt11align_val_t(void *p, |
| size_t n, |
| size_t a) |
| RPALIAS(rpfree_size_aligned) void _ZdaPvjSt11align_val_t( |
| void *p, size_t n, size_t a) |
| RPALIAS(rpfree_size_aligned) |
| #endif |
| |
| void *malloc(size_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) |
| RPALIAS(rpmalloc) void *calloc(size_t count, size_t size) |
| RPALIAS(rpcalloc) void *realloc(void *ptr, size_t size) |
| RPALIAS(rprealloc) void *reallocf(void *ptr, size_t size) |
| RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(2) |
| RPALIAS(rprealloc) void *aligned_alloc(size_t alignment, size_t size) |
| RPALIAS(rpaligned_alloc) void *memalign( |
| size_t alignment, size_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(2) |
| RPALIAS(rpmemalign) int posix_memalign(void **memptr, size_t alignment, |
| size_t size) |
| RPALIAS(rpposix_memalign) void free(void *ptr) |
| RPALIAS(rpfree) void cfree(void *ptr) RPALIAS(rpfree) |
| #if defined(__ANDROID__) || defined(__FreeBSD__) |
| size_t |
| malloc_usable_size(const void *ptr) RPALIAS(rpmalloc_usable_size) |
| #else |
| size_t |
| malloc_usable_size(void *ptr) RPALIAS(rpmalloc_usable_size) |
| #endif |
| size_t malloc_size(void *ptr) RPALIAS(rpmalloc_usable_size) |
| |
| #endif |
| |
| static inline size_t _rpmalloc_page_size(void) { |
| return _memory_page_size; |
| } |
| |
| extern void *RPMALLOC_CDECL reallocarray(void *ptr, size_t count, size_t size); |
| |
| extern void *RPMALLOC_CDECL reallocarray(void *ptr, size_t count, size_t size) { |
| size_t total; |
| #if ENABLE_VALIDATE_ARGS |
| #ifdef _MSC_VER |
| int err = SizeTMult(count, size, &total); |
| if ((err != S_OK) || (total >= MAX_ALLOC_SIZE)) { |
| errno = EINVAL; |
| return 0; |
| } |
| #else |
| int err = __builtin_umull_overflow(count, size, &total); |
| if (err || (total >= MAX_ALLOC_SIZE)) { |
| errno = EINVAL; |
| return 0; |
| } |
| #endif |
| #else |
| total = count * size; |
| #endif |
| return realloc(ptr, total); |
| } |
| |
| extern inline void *RPMALLOC_CDECL valloc(size_t size) { |
| get_thread_heap(); |
| return rpaligned_alloc(_rpmalloc_page_size(), size); |
| } |
| |
| extern inline void *RPMALLOC_CDECL pvalloc(size_t size) { |
| get_thread_heap(); |
| const size_t page_size = _rpmalloc_page_size(); |
| const size_t aligned_size = ((size + page_size - 1) / page_size) * page_size; |
| #if ENABLE_VALIDATE_ARGS |
| if (aligned_size < size) { |
| errno = EINVAL; |
| return 0; |
| } |
| #endif |
| return rpaligned_alloc(_rpmalloc_page_size(), aligned_size); |
| } |
| |
| #endif // ENABLE_OVERRIDE |
| |
| #if ENABLE_PRELOAD |
| |
| #ifdef _WIN32 |
| |
| #if defined(BUILD_DYNAMIC_LINK) && BUILD_DYNAMIC_LINK |
| |
| extern __declspec(dllexport) BOOL WINAPI DllMain(HINSTANCE instance, |
| DWORD reason, LPVOID reserved); |
| |
| extern __declspec(dllexport) BOOL WINAPI DllMain(HINSTANCE instance, |
| DWORD reason, |
| LPVOID reserved) { |
| (void)sizeof(reserved); |
| (void)sizeof(instance); |
| if (reason == DLL_PROCESS_ATTACH) |
| rpmalloc_initialize(); |
| else if (reason == DLL_PROCESS_DETACH) |
| rpmalloc_finalize(); |
| else if (reason == DLL_THREAD_ATTACH) |
| rpmalloc_thread_initialize(); |
| else if (reason == DLL_THREAD_DETACH) |
| rpmalloc_thread_finalize(1); |
| return TRUE; |
| } |
| |
| // end BUILD_DYNAMIC_LINK |
| #else |
| |
| extern void _global_rpmalloc_init(void) { |
| rpmalloc_set_main_thread(); |
| rpmalloc_initialize(); |
| } |
| |
| #if defined(__clang__) || defined(__GNUC__) |
| |
| static void __attribute__((constructor)) initializer(void) { |
| _global_rpmalloc_init(); |
| } |
| |
| #elif defined(_MSC_VER) |
| |
| static int _global_rpmalloc_xib(void) { |
| _global_rpmalloc_init(); |
| return 0; |
| } |
| |
| #pragma section(".CRT$XIB", read) |
| __declspec(allocate(".CRT$XIB")) void (*_rpmalloc_module_init)(void) = |
| _global_rpmalloc_xib; |
| #if defined(_M_IX86) || defined(__i386__) |
| #pragma comment(linker, "/include:" \ |
| "__rpmalloc_module_init") |
| #else |
| #pragma comment(linker, "/include:" \ |
| "_rpmalloc_module_init") |
| #endif |
| |
| #endif |
| |
| // end !BUILD_DYNAMIC_LINK |
| #endif |
| |
| #else |
| |
| #include <pthread.h> |
| #include <stdint.h> |
| #include <stdlib.h> |
| #include <unistd.h> |
| |
| extern void rpmalloc_set_main_thread(void); |
| |
| static pthread_key_t destructor_key; |
| |
| static void thread_destructor(void *); |
| |
| static void __attribute__((constructor)) initializer(void) { |
| rpmalloc_set_main_thread(); |
| rpmalloc_initialize(); |
| pthread_key_create(&destructor_key, thread_destructor); |
| } |
| |
| static void __attribute__((destructor)) finalizer(void) { rpmalloc_finalize(); } |
| |
| typedef struct { |
| void *(*real_start)(void *); |
| void *real_arg; |
| } thread_starter_arg; |
| |
| static void *thread_starter(void *argptr) { |
| thread_starter_arg *arg = argptr; |
| void *(*real_start)(void *) = arg->real_start; |
| void *real_arg = arg->real_arg; |
| rpmalloc_thread_initialize(); |
| rpfree(argptr); |
| pthread_setspecific(destructor_key, (void *)1); |
| return (*real_start)(real_arg); |
| } |
| |
| static void thread_destructor(void *value) { |
| (void)sizeof(value); |
| rpmalloc_thread_finalize(1); |
| } |
| |
| #ifdef __APPLE__ |
| |
| static int pthread_create_proxy(pthread_t *thread, const pthread_attr_t *attr, |
| void *(*start_routine)(void *), void *arg) { |
| rpmalloc_initialize(); |
| thread_starter_arg *starter_arg = rpmalloc(sizeof(thread_starter_arg)); |
| starter_arg->real_start = start_routine; |
| starter_arg->real_arg = arg; |
| return pthread_create(thread, attr, thread_starter, starter_arg); |
| } |
| |
| MAC_INTERPOSE_SINGLE(pthread_create_proxy, pthread_create); |
| |
| #else |
| |
| #include <dlfcn.h> |
| |
| int pthread_create(pthread_t *thread, const pthread_attr_t *attr, |
| void *(*start_routine)(void *), void *arg) { |
| #if defined(__linux__) || defined(__FreeBSD__) || defined(__OpenBSD__) || \ |
| defined(__NetBSD__) || defined(__DragonFly__) || defined(__APPLE__) || \ |
| defined(__HAIKU__) |
| char fname[] = "pthread_create"; |
| #else |
| char fname[] = "_pthread_create"; |
| #endif |
| void *real_pthread_create = dlsym(RTLD_NEXT, fname); |
| rpmalloc_thread_initialize(); |
| thread_starter_arg *starter_arg = rpmalloc(sizeof(thread_starter_arg)); |
| starter_arg->real_start = start_routine; |
| starter_arg->real_arg = arg; |
| return (*(int (*)(pthread_t *, const pthread_attr_t *, void *(*)(void *), |
| void *))real_pthread_create)(thread, attr, thread_starter, |
| starter_arg); |
| } |
| |
| #endif |
| |
| #endif |
| |
| #endif |
| |
| #if ENABLE_OVERRIDE |
| |
| #if defined(__GLIBC__) && defined(__linux__) |
| |
| void *__libc_malloc(size_t size) RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(1) |
| RPALIAS(rpmalloc) void *__libc_calloc(size_t count, size_t size) |
| RPMALLOC_ATTRIB_MALLOC RPMALLOC_ATTRIB_ALLOC_SIZE2(1, 2) |
| RPALIAS(rpcalloc) void *__libc_realloc(void *p, size_t size) |
| RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(2) RPALIAS(rprealloc) void __libc_free(void *p) |
| RPALIAS(rpfree) void __libc_cfree(void *p) |
| RPALIAS(rpfree) void *__libc_memalign(size_t align, size_t size) |
| RPMALLOC_ATTRIB_MALLOC |
| RPMALLOC_ATTRIB_ALLOC_SIZE(2) |
| RPALIAS(rpmemalign) int __posix_memalign(void **p, size_t align, |
| size_t size) |
| RPALIAS(rpposix_memalign) |
| |
| extern void *__libc_valloc(size_t size); |
| extern void *__libc_pvalloc(size_t size); |
| |
| void *__libc_valloc(size_t size) { return valloc(size); } |
| |
| void *__libc_pvalloc(size_t size) { return pvalloc(size); } |
| |
| #endif |
| |
| #endif |
| |
| #if (defined(__GNUC__) || defined(__clang__)) |
| #pragma GCC visibility pop |
| #endif |
