2023-07-16 15:00:07 -07:00
// Testing to make sure backend of library is operating properly.
# ifdef gen_time
# define GEN_FEATURE_PARSING
# define GEN_DEFINE_LIBRARY_CODE_CONSTANTS
# define GEN_ENFORCE_STRONG_CODE_TYPES
# define GEN_EXPOSE_BACKEND
# define GEN_BENCHMARK
# include "gen.hpp"
void check_sanity ( )
{
using namespace gen ;
gen : : init ( ) ;
log_fmt ( " \n check_sanity: \n " ) ;
// Test string caching:
CodeType t_int_dupe = def_type ( name ( int ) ) ;
if ( t_int_dupe - > Name ! = t_int - > Name )
fatal ( " check_sanity: String caching failed! " ) ;
// Purposefully use an excessive amount of memory to make so the the memory backend doesn't break.
// This has been tested with num_iterations set to 15000000 (generates 15 million lines of code), the Global_BlockSize, along with CodePool_NumBlocks, and SizePer_StringArena
// must be adjusted to gigabytes(2), kilobytes(512), and gigabyte(1) for good performance without crashing.
/*
Typical usage ( megabytes ( 10 ) , kilobytes ( 4 ) , megabytes ( 1 ) , for 650000 ( the limit of 10 meg partition buckets in global arena ) )
2023-07-16 15:01:22 -07:00
Memory after builder :
Num Global Arenas : 14 TotalSize : 146800640 !
Num Code Pools : 794 TotalSize : 416284672 !
Num String Cache Arenas : 60 TotalSize : 62914560 !
Num String Cache : 1300007
2023-07-16 15:00:07 -07:00
Memory usage to expect at 15 mil file :
Num Global Arenas : 2 TotalSize : 4294967296 !
Num Code Pools : 144 TotalSize : 9663676416 !
Num String Cache Arenas : 2 TotalSize : 2147483648 !
Num String Cache : 30000025
*/
constexpr
s32 num_iterations = 650000 ;
Array < CodeTypedef > typedefs = Array < CodeTypedef > : : init_reserve ( Memory : : GlobalAllocator , num_iterations * 2 ) ;
s32 idx = num_iterations ;
while ( - - idx )
{
// Stress testing string allocation
String type_name = String : : fmt_buf ( Memory : : GlobalAllocator , " type_%d " , idx ) ;
String typedef_name = String : : fmt_buf ( Memory : : GlobalAllocator , " typedef_%d " , idx ) ;
CodeTypedef type_as_int = def_typedef ( type_name , t_int ) ;
CodeType type = def_type ( type_name ) ;
CodeTypedef type_def = def_typedef ( typedef_name , type ) ;
typedefs . append ( type_as_int ) ;
typedefs . append ( type_def ) ;
}
log_fmt ( " \n Memory before builder: \n " ) ;
log_fmt ( " Num Global Arenas : %llu TotalSize: %llu ! \n " , Memory : : Global_AllocatorBuckets . num ( ) , Memory : : Global_AllocatorBuckets . num ( ) * Memory : : Global_BucketSize ) ;
log_fmt ( " Num Code Pools : %llu TotalSize: %llu ! \n " , StaticData : : CodePools . num ( ) , StaticData : : CodePools . num ( ) * CodePool_NumBlocks * StaticData : : CodePools . back ( ) . BlockSize ) ;
log_fmt ( " Num String Cache Arenas : %llu TotalSize: %llu ! \n " , StaticData : : StringArenas . num ( ) , StaticData : : StringArenas . num ( ) * SizePer_StringArena ) ;
log_fmt ( " Num String Cache : %llu \n " , StaticData : : StringCache . Entries . num ( ) , StaticData : : StringCache ) ;
Builder builder ;
builder . open ( " sanity.gen.hpp " ) ;
idx = num_iterations ;
# ifdef GEN_BENCHMARK
u64 time_start = time_rel_ms ( ) ;
# endif
while ( - - idx )
{
builder . print ( typedefs [ idx ] ) ;
}
builder . write ( ) ;
# ifdef GEN_BENCHMARK
log_fmt ( " \n \n Builder finished writting. Time taken: %llu ms \n " , time_rel_ms ( ) - time_start ) ;
# endif
log_fmt ( " \n Memory after builder: \n " ) ;
log_fmt ( " Num Global Arenas : %llu TotalSize: %llu ! \n " , Memory : : Global_AllocatorBuckets . num ( ) , Memory : : Global_AllocatorBuckets . num ( ) * Memory : : Global_BucketSize ) ;
log_fmt ( " Num Code Pools : %llu TotalSize: %llu ! \n " , StaticData : : CodePools . num ( ) , StaticData : : CodePools . num ( ) * CodePool_NumBlocks * StaticData : : CodePools . back ( ) . BlockSize ) ;
log_fmt ( " Num String Cache Arenas : %llu TotalSize: %llu ! \n " , StaticData : : StringArenas . num ( ) , StaticData : : StringArenas . num ( ) * SizePer_StringArena ) ;
log_fmt ( " Num String Cache : %llu \n " , StaticData : : StringCache . Entries . num ( ) , StaticData : : StringCache ) ;
log_fmt ( " \n Sanity passed! \n " ) ;
gen : : deinit ( ) ;
}
# endif