X-Git-Url: https://git.llucax.com/software/dgc/cdgc.git/blobdiff_plain/ed2b4ee35ae9c3c6fb0f9c0a808c2945a843701a..fcae2848ff5191cadae251c0a1c5ce3ea66a02b8:/rt/gc/cdgc/opts.d?ds=inline diff --git a/rt/gc/cdgc/opts.d b/rt/gc/cdgc/opts.d index f6012b3..5f93cd0 100644 --- a/rt/gc/cdgc/opts.d +++ b/rt/gc/cdgc/opts.d @@ -35,6 +35,7 @@ module rt.gc.cdgc.opts; import cstdlib = tango.stdc.stdlib; import cstring = tango.stdc.string; +import cerrno = tango.stdc.errno; private: @@ -51,6 +52,11 @@ struct Options char[MAX_OPT_LEN] collect_stats_file = ""; bool sentinel = false; bool mem_stomp = false; + bool conservative = false; + bool fork = true; + bool eager_alloc = true; + size_t prealloc_psize = 0; + size_t prealloc_npools = 0; } package Options options; @@ -70,6 +76,31 @@ bool parse_bool(char* value) } +void parse_prealloc(char* value) +{ + char* end; + cerrno.errno = 0; + long size = cstdlib.strtol(value, &end, 10); + if (end == value || cerrno.errno) // error parsing + return; + size *= 1024 * 1024; // size is supposed to be in MiB + long npools = 1; + if (*end == 'x') { // number of pools specified + char* start = end + 1; + npools = cstdlib.strtol(start, &end, 10); + if (*end != '\0' || end == start || cerrno.errno) // error parsing + return; + } + else if (*end != '\0') { // don't accept trailing garbage + return; + } + if (size > 0 && npools > 0) { + options.prealloc_psize = size; + options.prealloc_npools = npools; + } +} + + void process_option(char* opt_name, char* opt_value) { if (cstr_eq(opt_name, "verbose")) @@ -84,6 +115,14 @@ void process_option(char* opt_name, char* opt_value) options.sentinel = parse_bool(opt_value); else if (cstr_eq(opt_name, "mem_stomp")) options.mem_stomp = parse_bool(opt_value); + else if (cstr_eq(opt_name, "conservative")) + options.conservative = parse_bool(opt_value); + else if (cstr_eq(opt_name, "fork")) + options.fork = parse_bool(opt_value); + else if (cstr_eq(opt_name, "eager_alloc")) + options.eager_alloc = parse_bool(opt_value); + else if (cstr_eq(opt_name, "pre_alloc")) + parse_prealloc(opt_value); } @@ -141,6 +180,11 @@ unittest assert (log_file[0] == '\0'); assert (sentinel == false); assert (mem_stomp == false); + assert (conservative == false); + assert (fork == true); + assert (eager_alloc == true); + assert (prealloc_psize == 0); + assert (prealloc_npools == 0); } parse("mem_stomp"); with (options) { @@ -148,13 +192,23 @@ unittest assert (log_file[0] == '\0'); assert (sentinel == false); assert (mem_stomp == true); + assert (conservative == false); + assert (fork == true); + assert (eager_alloc == true); + assert (prealloc_psize == 0); + assert (prealloc_npools == 0); } - parse("mem_stomp=0:verbose=2"); + parse("mem_stomp=0:verbose=2:conservative:fork=0:eager_alloc=0"); with (options) { assert (verbose == 2); assert (log_file[0] == '\0'); assert (sentinel == false); assert (mem_stomp == false); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 0); + assert (prealloc_npools == 0); } parse("log_file=12345 67890:verbose=1:sentinel=4:mem_stomp=1"); with (options) { @@ -162,6 +216,119 @@ unittest assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); assert (sentinel == true); assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 0); + assert (prealloc_npools == 0); + } + parse("pre_alloc"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 0); + assert (prealloc_npools == 0); + } + parse("pre_alloc=1"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 1 * 1024 * 1024); + assert (prealloc_npools == 1); + } + parse("pre_alloc=5a"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 1 * 1024 * 1024); + assert (prealloc_npools == 1); + } + parse("pre_alloc=5x"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 1 * 1024 * 1024); + assert (prealloc_npools == 1); + } + parse("pre_alloc=09x010"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 9 * 1024 * 1024); + assert (prealloc_npools == 10); + } + parse("pre_alloc=5x2"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse("pre_alloc=9x5x"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse("pre_alloc=9x-5"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse("pre_alloc=0x3x0x4"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); } parse(null); with (options) { @@ -169,6 +336,47 @@ unittest assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); assert (sentinel == true); assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse(""); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse(":"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); + } + parse("::::"); + with (options) { + assert (verbose == 1); + assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0); + assert (sentinel == true); + assert (mem_stomp == true); + assert (conservative == true); + assert (fork == false); + assert (eager_alloc == false); + assert (prealloc_psize == 5 * 1024 * 1024); + assert (prealloc_npools == 2); } }