Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Reindent!
[simgrid.git] / src / simix / smx_config.c
1 /* $Id$ */
2
3 /* Copyright (c) 2007 Arnaud Legrand, Bruno Donassolo.
4    All rights reserved.                                          */
5
6 /* This program is free software; you can redistribute it and/or modify it
7  * under the terms of the license (GNU LGPL) which comes with this package. */
8
9 #include "private.h"
10 #include "xbt/sysdep.h"
11 #include "xbt/log.h"
12
13 int _simix_init_status = 0;     /* 0: beginning of time; 
14                                    1: pre-inited (cfg_set created); 
15                                    2: inited (running) */
16 xbt_cfg_t _simix_cfg_set = NULL;
17
18 /* callback of the workstation_model variable */
19 static void _simix_cfg_cb__workstation_model(const char *name, int pos)
20 {
21   char *val;
22
23   xbt_assert0(_simix_init_status < 2,
24               "Cannot change the model after the initialization");
25
26   val = xbt_cfg_get_string(_simix_cfg_set, name);
27   /* New Module missing */
28
29   find_resource_description(surf_workstation_resource_description,
30                             surf_workstation_resource_description_size,
31                             val);
32 }
33
34 /* callback of the cpu_model variable */
35 static void _simix_cfg_cb__cpu_model(const char *name, int pos)
36 {
37   char *val;
38
39   xbt_assert0(_simix_init_status < 2,
40               "Cannot change the model after the initialization");
41
42   val = xbt_cfg_get_string(_simix_cfg_set, name);
43   /* New Module missing */
44   find_resource_description(surf_cpu_resource_description,
45                             surf_cpu_resource_description_size, val);
46 }
47
48 /* callback of the workstation_model variable */
49 static void _simix_cfg_cb__network_model(const char *name, int pos)
50 {
51   char *val;
52
53   xbt_assert0(_simix_init_status < 2,
54               "Cannot change the model after the initialization");
55
56   val = xbt_cfg_get_string(_simix_cfg_set, name);
57   /* New Module missing */
58   find_resource_description(surf_network_resource_description,
59                             surf_network_resource_description_size, val);
60 }
61
62 /* create the config set and register what should be */
63 void simix_config_init(void)
64 {
65
66   if (_simix_init_status)
67     return;                     /* Already inited, nothing to do */
68
69   _simix_init_status = 1;
70   _simix_cfg_set = xbt_cfg_new();
71
72   xbt_cfg_register(_simix_cfg_set,
73                    "workstation_model", xbt_cfgelm_string, 1, 1,
74                    &_simix_cfg_cb__workstation_model, NULL);
75
76   xbt_cfg_register(_simix_cfg_set,
77                    "cpu_model", xbt_cfgelm_string, 1, 1,
78                    &_simix_cfg_cb__cpu_model, NULL);
79   xbt_cfg_register(_simix_cfg_set,
80                    "network_model", xbt_cfgelm_string, 1, 1,
81                    &_simix_cfg_cb__network_model, NULL);
82
83   xbt_cfg_set_string(_simix_cfg_set, "workstation_model", "KCCFLN05");
84 }
85
86 void simix_config_finalize(void)
87 {
88
89   if (!_simix_init_status)
90     return;                     /* Not initialized yet. Nothing to do */
91
92   xbt_cfg_free(&_simix_cfg_set);
93   _simix_init_status = 0;
94 }
95
96 /** \brief Set a configuration variable
97  * 
98  * FIXME
99
100  * Currently existing configuration variable:
101  *   - workstation_model (string): Model of workstation to use.  
102  *     Possible values (defaults to "KCCFLN05"):
103  *     - "CLM03": realistic TCP behavior + basic CPU model (see [CML03 at CCGrid03]) + support for parallel tasks
104  *     - "KCCFLN05": realistic TCP behavior + basic CPU model (see [CML03 at CCGrid03]) + failure handling + interference between communications and computations if precised in the platform file.
105  *     - compound 
106  *      \param name Configuration variable name that will change.
107  *      \param pa A va_list with the others parameters
108  */
109 void SIMIX_config(const char *name, va_list pa)
110 {
111   if (!_simix_init_status) {
112     simix_config_init();
113   }
114   xbt_cfg_set_vargs(_simix_cfg_set, name, pa);
115 }