2023-04-01 19:21:46 -07:00
|
|
|
/*
|
|
|
|
BLOAT.
|
|
|
|
|
2023-04-03 23:04:19 -07:00
|
|
|
This contians all definitions not directly related to the project.
|
|
|
|
*/
|
2023-04-01 19:21:46 -07:00
|
|
|
#pragma once
|
|
|
|
|
|
|
|
#ifdef BLOAT_IMPL
|
|
|
|
# define ZPL_IMPLEMENTATION
|
|
|
|
#endif
|
|
|
|
|
2023-04-03 23:04:19 -07:00
|
|
|
|
2023-04-01 19:21:46 -07:00
|
|
|
#pragma region ZPL INCLUDE
|
|
|
|
#if __clang__
|
|
|
|
# pragma clang diagnostic push
|
|
|
|
# pragma clang diagnostic ignored "-Wmissing-braces"
|
|
|
|
# pragma clang diagnostic ignored "-Wbraced-scalar-init"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
// # define ZPL_HEAP_ANALYSIS
|
|
|
|
# define ZPL_NO_MATH_H
|
|
|
|
# define ZPL_CUSTOM_MODULES
|
|
|
|
# define ZPL_MODULE_ESSENTIALS
|
|
|
|
# define ZPL_MODULE_CORE
|
|
|
|
# define ZPL_MODULE_TIMER
|
2023-04-03 00:55:28 -07:00
|
|
|
# define ZPL_MODULE_HASHING
|
2023-04-03 23:04:19 -07:00
|
|
|
// # define ZPL_MODULE_REGEX
|
|
|
|
// # define ZPL_MODULE_EVENT
|
|
|
|
// # define ZPL_MODULE_DLL
|
|
|
|
// # define ZPL_MODULE_OPTS
|
|
|
|
// # define ZPL_MODULE_PROCESS
|
|
|
|
// # define ZPL_MODULE_MAT
|
|
|
|
// # define ZPL_MODULE_THREADING
|
|
|
|
// # define ZPL_MODULE_JOBS
|
|
|
|
// # define ZPL_MODULE_PARSER
|
2023-04-01 19:21:46 -07:00
|
|
|
#include "zpl.h"
|
|
|
|
|
|
|
|
#if __clang__
|
|
|
|
# pragma clang diagnostic pop
|
|
|
|
#endif
|
|
|
|
#pragma endregion ZPL INCLUDE
|
|
|
|
|
|
|
|
|
|
|
|
#if __clang__
|
|
|
|
# pragma clang diagnostic ignored "-Wunused-const-variable"
|
|
|
|
# pragma clang diagnostic ignored "-Wswitch"
|
|
|
|
# pragma clang diagnostic ignored "-Wunused-variable"
|
|
|
|
# pragma clang diagnostic ignored "-Wunknown-pragmas"
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
2023-04-03 23:04:19 -07:00
|
|
|
#if defined(__GNUC__) || defined(__clang__) || 1
|
|
|
|
// Supports 0-10 arguments
|
|
|
|
#define VA_NARGS_IMPL( _0, \
|
|
|
|
_1, _2, _3, _4, _5, _6, _7, _8, _9, _10, \
|
|
|
|
_11, _12, _13, _14, _15, _16, _17, _18, _19, _20, \
|
|
|
|
_21, _22, _23, _24, _25, _26, _27, _28, _29, _30, \
|
|
|
|
_31, _32, _33, _34, _35, _36, _37, _38, _39, _40, \
|
|
|
|
_41, _42, _43, _44, _45, _46, _47, _48, _49, _50, \
|
|
|
|
N, ...) N
|
|
|
|
// ## deletes preceding comma if _VA_ARGS__ is empty (GCC, Clang)
|
|
|
|
#define VA_NARGS(...) VA_NARGS_IMPL(_, ## __VA_ARGS__, \
|
|
|
|
50, 49, 48, 47, 46, 45, 44, 43, 42, 41, \
|
|
|
|
40, 39, 38, 37, 36, 35, 34, 33, 32, 31, \
|
|
|
|
30, 29, 28, 27, 26, 25, 24, 23, 22, 21, \
|
|
|
|
20, 19, 18, 17, 16, 15, 14, 13, 12, 11, \
|
|
|
|
10, 9, 8, 7, 6, 5, 4, 3, 2, 1, \
|
|
|
|
0)
|
|
|
|
#else
|
|
|
|
// Supports 1-10 arguments
|
|
|
|
#define VA_NARGS_IMPL(_1, _2, _3, _4, _5, _6, _7, _8, _9, _10, N, ...) N
|
|
|
|
#define VA_NARGS(...) VA_NARGS_IMPL(__VA_ARGS__, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1)
|
|
|
|
#endif
|
2023-04-01 19:21:46 -07:00
|
|
|
|
|
|
|
#define bit( Value_ ) ( 1 << Value_ )
|
|
|
|
#define bitfield_is_equal( Field_, Mask_ ) ( ( Mask_ & Field_ ) == Mask_ )
|
|
|
|
#define ct constexpr
|
|
|
|
#define forceinline ZPL_ALWAYS_INLINE
|
|
|
|
#define print_nl( _) zpl_printf("\n")
|
2023-04-03 23:04:19 -07:00
|
|
|
#define ccast( Type_, Value_ ) * const_cast< Type_* >( & Value_ )
|
2023-04-01 19:21:46 -07:00
|
|
|
#define scast( Type_, Value_ ) static_cast< Type_ >( Value_ )
|
|
|
|
#define rcast( Type_, Value_ ) reinterpret_cast< Type_ >( Value_ )
|
|
|
|
#define pcast( Type_, Value_ ) ( * (Type_*)( & Value_ ) )
|
2023-04-03 23:04:19 -07:00
|
|
|
#define txt_impl( Value_ ) #Value_
|
|
|
|
#define txt( Value_ ) txt_impl( Value_ )
|
|
|
|
#define txt_with_length( Value_ ) txt_impl( Value_ ), sizeof( txt_impl( Value_) )
|
2023-04-01 19:21:46 -07:00
|
|
|
|
|
|
|
#define do_once() \
|
|
|
|
do \
|
|
|
|
{ \
|
|
|
|
static \
|
|
|
|
bool Done = false; \
|
|
|
|
if ( Done ) \
|
|
|
|
return; \
|
|
|
|
Done = true; \
|
|
|
|
} \
|
2023-04-03 23:04:19 -07:00
|
|
|
while(0)
|
2023-04-01 19:21:46 -07:00
|
|
|
|
2023-04-02 09:35:14 -07:00
|
|
|
#define do_once_start \
|
|
|
|
do \
|
|
|
|
{ \
|
|
|
|
static \
|
|
|
|
bool Done = false; \
|
|
|
|
if ( Done ) \
|
|
|
|
break; \
|
|
|
|
Done = true;
|
|
|
|
|
|
|
|
#define do_once_end \
|
|
|
|
} \
|
|
|
|
while(0);
|
|
|
|
|
2023-04-01 19:21:46 -07:00
|
|
|
ct char const* Msg_Invalid_Value = "INVALID VALUE PROVIDED";
|
|
|
|
|
|
|
|
namespace Global
|
|
|
|
{
|
|
|
|
extern bool ShouldShowDebug;
|
|
|
|
}
|
|
|
|
|
|
|
|
namespace Memory
|
|
|
|
{
|
2023-04-01 22:07:44 -07:00
|
|
|
ct uw Initial_Reserve = megabytes(10);
|
2023-04-01 19:21:46 -07:00
|
|
|
|
|
|
|
extern arena Global_Arena;
|
2023-04-02 08:53:15 -07:00
|
|
|
// #define g_allocator arena_allocator( & Memory::Global_Arena)
|
2023-04-03 23:04:19 -07:00
|
|
|
|
|
|
|
// Heap allocator is being used for now to isolate errors from being memory related (tech debt till ready to address)
|
2023-04-02 08:53:15 -07:00
|
|
|
#define g_allocator heap()
|
2023-04-01 19:21:46 -07:00
|
|
|
|
|
|
|
void setup();
|
|
|
|
void resize( uw new_size );
|
|
|
|
void cleanup();
|
|
|
|
}
|
|
|
|
|
2023-04-03 23:04:19 -07:00
|
|
|
inline
|
|
|
|
char const* token_fmt( char const* fmt, sw num_tokens, ... )
|
|
|
|
{
|
|
|
|
local_persist thread_local
|
|
|
|
char buf[ZPL_PRINTF_MAXLEN] = { 0 };
|
|
|
|
|
|
|
|
va_list va;
|
|
|
|
va_start(va, fmt);
|
|
|
|
token_fmt_va(buf, ZPL_PRINTF_MAXLEN, fmt, num_tokens, va);
|
|
|
|
va_end(va);
|
2023-04-01 19:21:46 -07:00
|
|
|
|
2023-04-03 23:04:19 -07:00
|
|
|
return buf;
|
|
|
|
}
|
2023-04-01 19:21:46 -07:00
|
|
|
|
|
|
|
inline
|
|
|
|
sw log_fmt(char const *fmt, ...)
|
|
|
|
{
|
|
|
|
if ( Global::ShouldShowDebug == false )
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
sw res;
|
|
|
|
va_list va;
|
|
|
|
|
|
|
|
va_start(va, fmt);
|
|
|
|
res = zpl_printf_va(fmt, va);
|
|
|
|
va_end(va);
|
|
|
|
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
|
|
|
inline
|
2023-04-03 23:04:19 -07:00
|
|
|
sw fatal(char const *fmt, ...)
|
2023-04-01 19:21:46 -07:00
|
|
|
{
|
|
|
|
local_persist thread_local
|
|
|
|
char buf[ZPL_PRINTF_MAXLEN] = { 0 };
|
|
|
|
|
|
|
|
va_list va;
|
|
|
|
|
|
|
|
#if Build_Debug
|
|
|
|
va_start(va, fmt);
|
|
|
|
zpl_snprintf_va(buf, ZPL_PRINTF_MAXLEN, fmt, va);
|
|
|
|
va_end(va);
|
|
|
|
|
|
|
|
assert_crash(buf);
|
2023-04-03 23:04:19 -07:00
|
|
|
return -1;
|
2023-04-01 19:21:46 -07:00
|
|
|
#else
|
|
|
|
va_start(va, fmt);
|
|
|
|
zpl_printf_err_va( fmt, va);
|
|
|
|
va_end(va);
|
|
|
|
|
|
|
|
zpl_exit(1);
|
2023-04-03 23:04:19 -07:00
|
|
|
return -1;
|
2023-04-01 19:21:46 -07:00
|
|
|
#endif
|
|
|
|
}
|