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/log.h"
  14
  15 int _msg_init_status = 0; /* 0: beginning of time;
  16                              1: pre-inited (cfg_set created);
  17                              2: inited (running) */
  18 xbt_cfg_t _msg_cfg_set = NULL;
  19
  20 /* callback of the surf_workstation_model variable */
  21 static void _msg_cfg_cb__surf_workstation_model(const char *name, int pos) {
  22   char *val;
  23
  24   xbt_assert0(_msg_init_status<2, "Cannot change the model after the initialization");
  25
  26   val = xbt_cfg_get_string (_msg_cfg_set, name);
  27
  28   xbt_assert1(!strcmp(val, "CLM03") ||
  29               !strcmp(val, "KCCFLN05"),
  30               "Unknown workstation model: %s (either 'CLM03' or 'KCCFLN05'",val);
  31 }
  32
  33 /* create the config set and register what should be */
  34 void msg_config_init(void) {
  35
  36   if (_msg_init_status)
  37     return; /* Already inited, nothing to do */
  38
  39   _msg_init_status = 1;
  40   _msg_cfg_set = xbt_cfg_new();
  41
  42   xbt_cfg_register (_msg_cfg_set,
  43                     "surf_workstation_model", xbt_cfgelm_string, 1,1,
  44                     &_msg_cfg_cb__surf_workstation_model,NULL);
  45
  46   xbt_cfg_set_string(_msg_cfg_set,"surf_workstation_model", "KCCFLN05");
  47 }
  48
  49 void msg_config_finalize(void) {
  50
  51   if (!_msg_init_status)
  52     return; /* Not initialized yet. Nothing to do */
  53
  54   xbt_cfg_free(&_msg_cfg_set);
  55   _msg_init_status = 0;
  56 }
  57
  58 /** \brief set a configuration variable
  59  *
  60  * Currently existing configuation variable:
  61  *   - surf_workstation_model (string): Model of workstation to use.
  62  *     Possible values (defaults to "KCCFLN05"):
  63  *     - "CLM03": realistic TCP behavior + basic CPU model (see [CML03 at CCGrid03])
  64  *     - "KCCFLN05": realistic TCP behavior + basic CPU model (see [CML03 at CCGrid03]) + failure handling + interference between communications and computations if precised in the platform file.
  65  *
  66  * Example:
  67  * MSG_config("surf_workstation_model","KCCFLN05");
  68  */
  69 void
  70 MSG_config(const char *name, ...) {
  71   va_list pa;
  72
  73   if (!_msg_init_status) {
  74     msg_config_init();
  75   }
  76   /*  xbt_cfg_dump("msg_cfg_set","",_msg_cfg_set);*/
  77   va_start(pa,name);
  78   xbt_cfg_set_vargs(_msg_cfg_set,name,pa);
  79   va_end(pa);
  80
  81 }