| /* ---------------------------------------------------------------------------- | |
| Copyright (c) 2018-2023, Microsoft Research, Daan Leijen | |
| This is free software; you can redistribute it and/or modify it under the | |
| terms of the MIT license. A copy of the license can be found in the file | |
| "LICENSE" at the root of this distribution. | |
| -----------------------------------------------------------------------------*/ | |
| // Select the implementation of the primitives | |
| // depending on the OS. | |
| #if defined(_WIN32) | |
| #include "windows/prim.c" // VirtualAlloc (Windows) | |
| #elif defined(__APPLE__) | |
| #include "osx/prim.c" // macOSX (actually defers to mmap in unix/prim.c) | |
| #elif defined(__wasi__) | |
| #define MI_USE_SBRK | |
| #include "wasi/prim.c" // memory-grow or sbrk (Wasm) | |
| // CPython: use the unix prim on Emscripten (emmalloc is not linked) | |
| #elif defined(__EMSCRIPTEN__) && 0 | |
| #include "emscripten/prim.c" // emmalloc_*, + pthread support | |
| #else | |
| #include "unix/prim.c" // mmap() (Linux, macOSX, BSD, Illumnos, Haiku, DragonFly, etc.) | |
| #endif | |
| // Generic process initialization | |
| #ifndef MI_PRIM_HAS_PROCESS_ATTACH | |
| #if defined(__GNUC__) || defined(__clang__) | |
| // gcc,clang: use the constructor/destructor attribute | |
| // which for both seem to run before regular constructors/destructors | |
| #if defined(__clang__) | |
| #define mi_attr_constructor __attribute__((constructor(101))) | |
| #define mi_attr_destructor __attribute__((destructor(101))) | |
| #else | |
| #define mi_attr_constructor __attribute__((constructor)) | |
| #define mi_attr_destructor __attribute__((destructor)) | |
| #endif | |
| static void mi_attr_constructor mi_process_attach(void) { | |
| _mi_auto_process_init(); | |
| } | |
| static void mi_attr_destructor mi_process_detach(void) { | |
| _mi_auto_process_done(); | |
| } | |
| #elif defined(__cplusplus) | |
| // C++: use static initialization to detect process start/end | |
| // This is not guaranteed to be first/last but the best we can generally do? | |
| struct mi_init_done_t { | |
| mi_init_done_t() { | |
| _mi_auto_process_init(); | |
| } | |
| ~mi_init_done_t() { | |
| _mi_auto_process_done(); | |
| } | |
| }; | |
| static mi_init_done_t mi_init_done; | |
| #else | |
| #pragma message("define a way to call _mi_auto_process_init/done on your platform") | |
| #endif | |
| #endif | |
| // Generic allocator init/done callback | |
| #ifndef MI_PRIM_HAS_ALLOCATOR_INIT | |
| bool _mi_is_redirected(void) { | |
| return false; | |
| } | |
| bool _mi_allocator_init(const char** message) { | |
| if (message != NULL) { *message = NULL; } | |
| return true; | |
| } | |
| void _mi_allocator_done(void) { | |
| // nothing to do | |
| } | |
| #endif |