src/msg/msg_config.c

   1 /* $Id$ */
   2
   3 /* msg_config.c - support for MSG user configuration                        */
   4
   5 /* Copyright (c) 2005 Martin Quinson.                                       */
   6 /* All rights reserved.                                                     */
   7
   8 /* This program is free software; you can redistribute it and/or modify it
   9  * under the terms of the license (GNU LGPL) which comes with this package. */
  10
  11 #include "private.h"
  12 #include "xbt/sysdep.h"
  13 #include "xbt/error.h"
  14
  15 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(msg_cfg, msg,
  16                                 "Configuration support in \ref MSG_API");
  17
  18
  19 int _msg_init_status = 0; /* 0: beginning of time;
  20                              1: pre-inited (cfg_set created);
  21                              2: inited (running) */
  22 xbt_cfg_t _msg_cfg_set = NULL;
  23
  24 /* callback of the surf_workstation_model variable */
  25 static void _msg_cfg_cb__surf_workstation_model(const char *name, int pos) {
  26   char *val;
  27
  28   xbt_assert0(_msg_init_status<2, "Cannot change the model after the initialization");
  29
  30   val = xbt_cfg_get_string (_msg_cfg_set, name);
  31
  32   xbt_assert1(!strcmp(val, "CLM03") ||
  33               !strcmp(val, "KCCFLN05"),
  34               "Unknown workstation model: %s (either 'CLM03' or 'KCCFLN05'",val);
  35 }
  36
  37 /* create the config set and register what should be */
  38 void msg_config_init(void) {
  39
  40   if (_msg_init_status)
  41     return; /* Already inited, nothing to do */
  42
  43   _msg_init_status = 1;
  44   _msg_cfg_set = xbt_cfg_new();
  45
  46   xbt_cfg_register (_msg_cfg_set,
  47                     "surf_workstation_model", xbt_cfgelm_string, 1,1,
  48                     &_msg_cfg_cb__surf_workstation_model,NULL);
  49
  50   xbt_cfg_set_string(_msg_cfg_set,"surf_workstation_model", "CLM03");
  51 }
  52
  53 /** \brief set a configuration variable
  54  *
  55  * Currently existing configuation variable:
  56  *   - surf_workstation_model (string): Model of workstation to use.
  57  *     Possible values (defaults to "CLM03"):
  58  *     - "CLM03": realistic TCP behavior + basic CPU model (see [CML03 at CCGrid03])
  59  *     - "KCCFLN05": simple network model (no latency) but interference
  60  *       between computations and communications (UNSTABLE, DONT USE)
  61  *
  62  * Example:
  63  * MSG_config("surf_workstation_model","CLM03");
  64  */
  65 void
  66 MSG_config(const char *name, ...) {
  67   va_list pa;
  68
  69   if (!_msg_init_status) {
  70     msg_config_init();
  71   }
  72   /*  xbt_cfg_dump("msg_cfg_set","",_msg_cfg_set);*/
  73   va_start(pa,name);
  74   xbt_cfg_set_vargs(_msg_cfg_set,name,pa);
  75   va_end(pa);
  76
  77 }