rt/gc/cdgc/opts.d

   1 /**
   2  * This module contains the options managemente code of the garbage collector.
   3  *
   4  * Copyright: Copyright (C) 2010 Leandro Lucarella <http://www.llucax.com.ar/>
   5  *            All rights reserved.
   6  *
   7  * License: Boost Software License - Version 1.0 - August 17th, 2003
   8  *
   9  * Permission is hereby granted, free of charge, to any person or organization
  10  * obtaining a copy of the software and accompanying documentation covered by
  11  * this license (the "Software") to use, reproduce, display, distribute,
  12  * execute, and transmit the Software, and to prepare derivative works of the
  13  * Software, and to permit third-parties to whom the Software is furnished to
  14  * do so, all subject to the following:
  15  *
  16  * The copyright notices in the Software and this entire statement, including
  17  * the above license grant, this restriction and the following disclaimer,
  18  * must be included in all copies of the Software, in whole or in part, and
  19  * all derivative works of the Software, unless such copies or derivative
  20  * works are solely in the form of machine-executable object code generated by
  21  * a source language processor.
  22  *
  23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  24  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  25  * FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NON-INFRINGEMENT. IN NO EVENT
  26  * SHALL THE COPYRIGHT HOLDERS OR ANYONE DISTRIBUTING THE SOFTWARE BE LIABLE
  27  * FOR ANY DAMAGES OR OTHER LIABILITY, WHETHER IN CONTRACT, TORT OR OTHERWISE,
  28  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  29  * DEALINGS IN THE SOFTWARE.
  30  *
  31  * Authors: Leandro Lucarella
  32  */
  33
  34 module rt.gc.cdgc.opts;
  35
  36 import cstdlib = tango.stdc.stdlib;
  37 import cstring = tango.stdc.string;
  38
  39
  40 private:
  41
  42
  43 const MAX_OPT_LEN = 256;
  44
  45
  46 struct Options
  47 {
  48     uint verbose = 0;
  49     char[MAX_OPT_LEN] log_file = "";
  50     char[MAX_OPT_LEN] malloc_stats_file = "";
  51     char[MAX_OPT_LEN] collect_stats_file = "";
  52     bool sentinel = false;
  53     bool mem_stomp = false;
  54 }
  55
  56 package Options options;
  57
  58
  59 void process_option(char* opt_name, char* opt_value)
  60 {
  61     if (cstring.strcmp(opt_name, "verbose") == 0)
  62     {
  63         options.verbose = cstdlib.atoi(opt_value);
  64     }
  65     else if (cstring.strcmp(opt_name, "log_file") == 0)
  66     {
  67         cstring.strcpy(options.log_file.ptr, opt_value);
  68     }
  69     else if (cstring.strcmp(opt_name, "malloc_stats_file") == 0)
  70     {
  71         cstring.strcpy(options.malloc_stats_file.ptr, opt_value);
  72     }
  73     else if (cstring.strcmp(opt_name, "collect_stats_file") == 0)
  74     {
  75         cstring.strcpy(options.collect_stats_file.ptr, opt_value);
  76     }
  77     else if (cstring.strcmp(opt_name, "sentinel") == 0)
  78     {
  79         if (opt_value[0] == '\0')
  80             options.sentinel = true;
  81         else
  82             options.sentinel = (cstdlib.atoi(opt_value) != 0);
  83     }
  84     else if (cstring.strcmp(opt_name, "mem_stomp") == 0)
  85     {
  86         if (opt_value[0] == '\0')
  87             options.mem_stomp = true;
  88         else
  89             options.mem_stomp = (cstdlib.atoi(opt_value) != 0);
  90     }
  91 }
  92
  93
  94 package void parse(char* opts_string)
  95 {
  96     char[MAX_OPT_LEN] opt_name;
  97     char[MAX_OPT_LEN] opt_value;
  98     char* curr = opt_name.ptr;
  99     size_t i = 0;
 100     if (opts_string is null)
 101         return;
 102     for (; *opts_string != '\0'; opts_string++)
 103     {
 104         char c = *opts_string;
 105         if (i == MAX_OPT_LEN)
 106         {
 107             if (c != ':')
 108                 continue;
 109             else
 110                 i--;
 111         }
 112         switch (*opts_string)
 113         {
 114         case ':':
 115             curr[i] = '\0';
 116             process_option(opt_name.ptr, opt_value.ptr);
 117             i = 0;
 118             opt_name[0] = '\0';
 119             opt_value[0] = '\0';
 120             curr = opt_name.ptr;
 121             break;
 122         case '=':
 123             opt_name[i] = '\0';
 124             curr = opt_value.ptr;
 125             i = 0;
 126             break;
 127         default:
 128             curr[i] = c;
 129             ++i;
 130         }
 131     }
 132     if (i == MAX_OPT_LEN)
 133         i--;
 134     curr[i] = '\0';
 135     process_option(opt_name.ptr, opt_value.ptr);
 136 }
 137
 138
 139 unittest
 140 {
 141     with (options) {
 142         assert (verbose == 0);
 143         assert (log_file[0] == '\0');
 144         assert (sentinel == false);
 145         assert (mem_stomp == false);
 146     }
 147     parse("mem_stomp=1:verbose=2");
 148     with (options) {
 149         assert (verbose == 2);
 150         assert (log_file[0] == '\0');
 151         assert (sentinel == false);
 152         assert (mem_stomp == true);
 153     }
 154     parse("log_file=12345 67890:verbose=1:sentinel=4:mem_stomp=0");
 155     with (options) {
 156         assert (verbose == 1);
 157         assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0);
 158         assert (sentinel == true);
 159         assert (mem_stomp == false);
 160     }
 161     parse(null);
 162     with (options) {
 163         assert (verbose == 1);
 164         assert (cstring.strcmp(log_file.ptr, "12345 67890".ptr) == 0);
 165         assert (sentinel == true);
 166         assert (mem_stomp == false);
 167     }
 168 }
 169
 170
 171 // vim: set et sw=4 sts=4 :