src/surf/surf_config.c

   1 /*      $Id$     */
   2
   3 /* Copyright (c) 2009 The SimGrid team. All rights reserved.                */
   4
   5 /* This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the license (GNU LGPL) which comes with this package. */
   7
   8 /* surf_config: configuration infrastructure for the simulation world       */
   9
  10 #include "xbt/config.h"
  11 #include "xbt/str.h"
  12 #include "surf/surf_private.h"
  13
  14 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_config, surf,
  15                                 "About the configuration of surf (and the rest of the simulation)");
  16
  17 xbt_cfg_t _surf_cfg_set = NULL;
  18
  19
  20 /* Parse the command line, looking for options */
  21 static void surf_config_cmd_line(int *argc, char **argv)
  22 {
  23   int i, j;
  24   char *opt;
  25
  26   for (i = 1; i < *argc; i++) {
  27     int remove_it = 0;
  28     if (!strncmp(argv[i], "--cfg=", strlen("--cfg="))) {
  29       opt = strchr(argv[i], '=');
  30       opt++;
  31
  32       xbt_cfg_set_parse(_surf_cfg_set, opt);
  33       DEBUG1("Did apply '%s' as config setting", opt);
  34       remove_it = 1;
  35     } else if (!strncmp(argv[i], "--cfg-help", strlen("--cfg-help") + 1) ||
  36                !strncmp(argv[i], "--help", strlen("--help") + 1)) {
  37       printf
  38         ("Description of the configuration accepted by this simulator:\n");
  39       xbt_cfg_help(_surf_cfg_set);
  40       remove_it = 1;
  41       exit(0);
  42     }
  43     if (remove_it) {            /*remove this from argv */
  44       for (j = i + 1; j < *argc; j++) {
  45         argv[j - 1] = argv[j];
  46       }
  47
  48       argv[j - 1] = NULL;
  49       (*argc)--;
  50       i--;                      /* compensate effect of next loop incrementation */
  51     }
  52   }
  53 }
  54
  55
  56 int _surf_init_status = 0;      /* 0: beginning of time;
  57                                    1: pre-inited (cfg_set created);
  58                                    2: inited (running) */
  59
  60 /* callback of the workstation_model variable */
  61 static void _surf_cfg_cb__workstation_model(const char *name, int pos)
  62 {
  63   char *val;
  64
  65   xbt_assert0(_surf_init_status < 2,
  66               "Cannot change the model after the initialization");
  67
  68   val = xbt_cfg_get_string(_surf_cfg_set, name);
  69   /* New Module missing */
  70
  71   find_model_description(surf_workstation_model_description, val);
  72 }
  73
  74 /* callback of the cpu_model variable */
  75 static void _surf_cfg_cb__cpu_model(const char *name, int pos)
  76 {
  77   char *val;
  78
  79   xbt_assert0(_surf_init_status < 2,
  80               "Cannot change the model after the initialization");
  81
  82   val = xbt_cfg_get_string(_surf_cfg_set, name);
  83   /* New Module missing */
  84   find_model_description(surf_cpu_model_description, val);
  85 }
  86
  87 /* callback of the workstation_model variable */
  88 static void _surf_cfg_cb__network_model(const char *name, int pos)
  89 {
  90   char *val;
  91
  92   xbt_assert0(_surf_init_status < 2,
  93               "Cannot change the model after the initialization");
  94
  95   val = xbt_cfg_get_string(_surf_cfg_set, name);
  96   /* New Module missing */
  97   find_model_description(surf_network_model_description, val);
  98 }
  99
 100 /* callback of the tcp gamma variable */
 101 static void _surf_cfg_cb__tcp_gamma(const char *name, int pos)
 102 {
 103   sg_tcp_gamma = xbt_cfg_get_double(_surf_cfg_set, name);
 104 }
 105
 106 static void _surf_cfg_cb__surf_path(const char *name, int pos)
 107 {
 108   char *path = xbt_cfg_get_string_at(_surf_cfg_set, name, pos);
 109   xbt_dynar_push(surf_path, &path);
 110 }
 111
 112 static void _surf_cfg_cb__surf_maxmin_selective_update(const char *name, int pos)
 113 {
 114         sg_maxmin_selective_update = xbt_cfg_get_int(_surf_cfg_set, name);
 115 }
 116
 117 #ifdef HAVE_GTNETS
 118 static void _surf_cfg_cb__gtnets_jitter(const char *name, int pos){
 119         sg_gtnets_jitter = xbt_cfg_get_double(_surf_cfg_set, name);
 120 }
 121 static void _surf_cfg_cb__gtnets_jitter_seed(const char *name, int pos){
 122         sg_gtnets_jitter_seed = xbt_cfg_get_int(_surf_cfg_set, name);
 123 }
 124 #endif
 125
 126 /* create the config set, register what should be and parse the command line*/
 127 void surf_config_init(int *argc, char **argv)
 128 {
 129
 130   /* Create the configuration support */
 131   if (_surf_init_status == 0) { /* Only create stuff if not already inited */
 132     _surf_init_status = 1;
 133
 134     char *description = xbt_malloc(1024), *p = description;
 135     char *default_value;
 136         int default_value_int;
 137     int i;
 138
 139     sprintf(description, "The model to use for the CPU. Possible values: ");
 140     p = description;
 141     while (*(++p) != '\0');
 142     for (i = 0; surf_cpu_model_description[i].name; i++)
 143       p +=
 144         sprintf(p, "%s%s", (i == 0 ? "" : ", "),
 145                 surf_cpu_model_description[i].name);
 146     default_value = xbt_strdup("Cas01");
 147     xbt_cfg_register(&_surf_cfg_set,
 148                      "cpu_model", description, xbt_cfgelm_string,
 149                      &default_value, 1, 1, &_surf_cfg_cb__cpu_model, NULL);
 150
 151     sprintf(description,
 152             "The model to use for the network. Possible values: ");
 153     p = description;
 154     while (*(++p) != '\0');
 155     for (i = 0; surf_network_model_description[i].name; i++)
 156       p +=
 157         sprintf(p, "%s%s", (i == 0 ? "" : ", "),
 158                 surf_network_model_description[i].name);
 159     default_value = xbt_strdup("LV08");
 160     xbt_cfg_register(&_surf_cfg_set,
 161                      "network_model", description, xbt_cfgelm_string,
 162                      &default_value, 1, 1, &_surf_cfg_cb__network_model,
 163                      NULL);
 164
 165     sprintf(description,
 166             "The model to use for the workstation. Possible values: ");
 167     p = description;
 168     while (*(++p) != '\0');
 169     for (i = 0; surf_workstation_model_description[i].name; i++)
 170       p +=
 171         sprintf(p, "%s%s", (i == 0 ? "" : ", "),
 172                 surf_workstation_model_description[i].name);
 173     default_value = xbt_strdup("CLM03");
 174     xbt_cfg_register(&_surf_cfg_set,
 175                      "workstation_model", description, xbt_cfgelm_string,
 176                      &default_value, 1, 1, &_surf_cfg_cb__workstation_model,
 177                      NULL);
 178
 179     xbt_free(description);
 180
 181     default_value = xbt_strdup("Full");
 182     xbt_cfg_register(&_surf_cfg_set, "routing",
 183                      "Model to use to store the routing information",
 184                      xbt_cfgelm_string, &default_value, 1, 1, NULL,
 185                      NULL);
 186
 187     xbt_cfg_register(&_surf_cfg_set, "TCP_gamma",
 188                      "Size of the biggest TCP window", xbt_cfgelm_double,
 189                      NULL, 1, 1, _surf_cfg_cb__tcp_gamma, NULL);
 190     xbt_cfg_set_double(_surf_cfg_set, "TCP_gamma", 20000.0);
 191
 192     xbt_cfg_register(&_surf_cfg_set, "path",
 193                      "Lookup path for inclusions in platform and deployment XML files",
 194                      xbt_cfgelm_string, NULL, 0, 0, _surf_cfg_cb__surf_path,
 195                      NULL);
 196
 197                 default_value_int = 0;
 198     xbt_cfg_register(&_surf_cfg_set, "maxmin_selective_update",
 199                      "Update the constraint set propagating recursively to others constraints",
 200                      xbt_cfgelm_int, &default_value_int, 0, 1, _surf_cfg_cb__surf_maxmin_selective_update, NULL);
 201
 202 #ifdef HAVE_GTNETS
 203     xbt_cfg_register(&_surf_cfg_set, "gtnets_jitter",
 204                      "Double value to oscillate the link latency, uniformly in random interval [-latency*gtnets_jitter,latency*gtnets_jitter)", xbt_cfgelm_double,
 205                      NULL, 1, 1, _surf_cfg_cb__gtnets_jitter, NULL);
 206     xbt_cfg_set_double(_surf_cfg_set, "gtnets_jitter", 0.0);
 207
 208     default_value_int = 10;
 209     xbt_cfg_register(&_surf_cfg_set, "gtnets_jitter_seed",
 210                      "Use a positive seed to reproduce jitted results, value must be in [1,1e8], default is 10",
 211                      xbt_cfgelm_int, &default_value_int, 0, 1, _surf_cfg_cb__gtnets_jitter_seed, NULL);
 212 #endif
 213
 214     if (!surf_path) {
 215       /* retrieves the current directory of the        current process */
 216       const char *initial_path = __surf_get_initial_path();
 217       xbt_assert0((initial_path),
 218                   "__surf_get_initial_path() failed! Can't resolves current Windows directory");
 219
 220       surf_path = xbt_dynar_new(sizeof(char *), NULL);
 221       xbt_cfg_set_string(_surf_cfg_set, "path", initial_path);
 222     }
 223
 224
 225     surf_config_cmd_line(argc, argv);
 226   }
 227 }
 228
 229 void surf_config_finalize(void)
 230 {
 231   if (!_surf_init_status)
 232     return;                     /* Not initialized yet. Nothing to do */
 233
 234   xbt_cfg_free(&_surf_cfg_set);
 235   _surf_init_status = 0;
 236 }
 237
 238 void surf_config_models_setup(const char *platform_file)
 239 {
 240   char *workstation_model_name;
 241   int workstation_id = -1;
 242
 243   surf_timer_model_init(platform_file);
 244
 245   workstation_model_name =
 246     xbt_cfg_get_string(_surf_cfg_set, "workstation_model");
 247   char *network_model_name = xbt_cfg_get_string(_surf_cfg_set, "network_model");
 248   char *cpu_model_name = xbt_cfg_get_string(_surf_cfg_set, "cpu_model");
 249
 250   if ((strcmp(network_model_name,"LV08") || strcmp(cpu_model_name,"Cas01"))
 251       && !strcmp(workstation_model_name, "CLM03")){
 252     const char *val = "compound";
 253     INFO0("Switching workstation model to compound since you changed the network and/or cpu model(s)");
 254     xbt_cfg_set_string(_surf_cfg_set,"workstation_model",val);
 255     workstation_model_name = (char*)"compound";
 256   }
 257
 258   DEBUG1("Workstation model: %s", workstation_model_name);
 259   workstation_id =
 260     find_model_description(surf_workstation_model_description,
 261                            workstation_model_name);
 262   if (!strcmp(workstation_model_name, "compound")) {
 263     int network_id = -1;
 264     int cpu_id = -1;
 265
 266     xbt_assert0(cpu_model_name,
 267         "Set a cpu model to use with the 'compound' workstation model");
 268
 269     xbt_assert0(network_model_name,
 270         "Set a network model to use with the 'compound' workstation model");
 271
 272     network_id =
 273       find_model_description(surf_network_model_description,
 274                              network_model_name);
 275     cpu_id =
 276       find_model_description(surf_cpu_model_description, cpu_model_name);
 277
 278     surf_cpu_model_description[cpu_id].model_init_preparse(platform_file);
 279     surf_network_model_description[network_id].
 280       model_init_preparse(platform_file);
 281   }
 282
 283   DEBUG0("Call workstation_model_init");
 284   surf_workstation_model_description[workstation_id].model_init_preparse
 285     (platform_file);
 286 }
 287
 288 void surf_config_models_create_elms(void)
 289 {
 290   char *workstation_model_name =
 291     xbt_cfg_get_string(_surf_cfg_set, "workstation_model");
 292   int workstation_id =
 293     find_model_description(surf_workstation_model_description,
 294                            workstation_model_name);
 295   if (surf_workstation_model_description[workstation_id].
 296       model_init_postparse != NULL)
 297     surf_workstation_model_description[workstation_id].model_init_postparse();
 298 }