src/surf/network_constant.c

   1 /*      $Id$     */
   2
   3 /* Copyright (c) 2004 Arnaud Legrand. 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 #include "surf_private.h"
   9 #include "network_common.h"
  10 #include "surf/random_mgr.h"
  11 #include "xbt/dict.h"
  12 #include "xbt/str.h"
  13 #include "xbt/log.h"
  14
  15 typedef struct network_card_Constant {
  16   char *name;
  17   int id;
  18 } s_network_card_Constant_t, *network_card_Constant_t;
  19
  20 typedef struct surf_action_network_Constant {
  21   s_surf_action_t generic_action;
  22   double latency;
  23   double lat_init;
  24   int suspended;
  25   network_card_Constant_t src;
  26   network_card_Constant_t dst;
  27 } s_surf_action_network_Constant_t, *surf_action_network_Constant_t;
  28
  29 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(surf_network);
  30 static random_data_t random_latency = NULL;
  31 static int card_number = 0;
  32 static int host_number = 0;
  33
  34 static void network_card_free(void *nw_card)
  35 {
  36   free(((network_card_Constant_t) nw_card)->name);
  37   free(nw_card);
  38 }
  39
  40 static int network_card_new(const char *card_name)
  41 {
  42   network_card_Constant_t card =
  43     surf_model_resource_by_name(surf_network_model, card_name);
  44
  45   if (!card) {
  46     card = xbt_new0(s_network_card_Constant_t, 1);
  47     card->name = xbt_strdup(card_name);
  48     card->id = card_number++;
  49     xbt_dict_set(surf_model_resource_set(surf_network_model), card_name, card,
  50                  network_card_free);
  51   }
  52   return card->id;
  53 }
  54
  55 static int src_id = -1;
  56 static int dst_id = -1;
  57
  58 static void parse_route_set_endpoints(void)
  59 {
  60   src_id = network_card_new(A_surfxml_route_src);
  61   dst_id = network_card_new(A_surfxml_route_dst);
  62   route_action = A_surfxml_route_action;
  63 }
  64
  65 static void parse_route_set_route(void)
  66 {
  67   char *name;
  68   if (src_id != -1 && dst_id != -1) {
  69     name = bprintf("%x#%x", src_id, dst_id);
  70     manage_route(route_table, name, route_action, 0);
  71     free(name);
  72   }
  73 }
  74
  75 static void count_hosts(void)
  76 {
  77   host_number++;
  78 }
  79
  80 static void define_callbacks(const char *file)
  81 {
  82   /* Figuring out the network links */
  83   surfxml_add_callback(STag_surfxml_host_cb_list, &count_hosts);
  84   surfxml_add_callback(STag_surfxml_route_cb_list,
  85                        &parse_route_set_endpoints);
  86   surfxml_add_callback(ETag_surfxml_route_cb_list, &parse_route_set_route);
  87 }
  88
  89 static const char *get_resource_name(void *resource_id)
  90 {
  91   return ((network_card_Constant_t) resource_id)->name;
  92 }
  93
  94 static int resource_used(void *resource_id)
  95 {
  96   return 0;
  97 }
  98
  99 static int action_free(surf_action_t action)
 100 {
 101   action->refcount--;
 102   if (!action->refcount) {
 103     xbt_swag_remove(action, action->state_set);
 104     free(action);
 105     return 1;
 106   }
 107   return 0;
 108 }
 109
 110 static void action_use(surf_action_t action)
 111 {
 112   action->refcount++;
 113 }
 114
 115 static void action_cancel(surf_action_t action)
 116 {
 117   return;
 118 }
 119
 120 static void action_recycle(surf_action_t action)
 121 {
 122   return;
 123 }
 124
 125 static void action_change_state(surf_action_t action,
 126                                 e_surf_action_state_t state)
 127 {
 128   surf_action_change_state(action, state);
 129   return;
 130 }
 131
 132 static double share_resources(double now)
 133 {
 134   surf_action_network_Constant_t action = NULL;
 135   xbt_swag_t running_actions =
 136     surf_network_model->common_public.states.running_action_set;
 137   double min = -1.0;
 138
 139   xbt_swag_foreach(action, running_actions) {
 140     if (action->latency > 0) {
 141       if (min < 0)
 142         min = action->latency;
 143       else if (action->latency < min)
 144         min = action->latency;
 145     }
 146   }
 147
 148   return min;
 149 }
 150
 151 static void update_actions_state(double now, double delta)
 152 {
 153   surf_action_network_Constant_t action = NULL;
 154   surf_action_network_Constant_t next_action = NULL;
 155   xbt_swag_t running_actions =
 156     surf_network_model->common_public.states.running_action_set;
 157
 158   xbt_swag_foreach_safe(action, next_action, running_actions) {
 159     if (action->latency > 0) {
 160       if (action->latency > delta) {
 161         double_update(&(action->latency), delta);
 162       } else {
 163         action->latency = 0.0;
 164       }
 165     }
 166     double_update(&(action->generic_action.remains),
 167                   action->generic_action.cost * delta / action->lat_init);
 168     if (action->generic_action.max_duration != NO_MAX_DURATION)
 169       double_update(&(action->generic_action.max_duration), delta);
 170
 171     if (action->generic_action.remains <= 0) {
 172       action->generic_action.finish = surf_get_clock();
 173       action_change_state((surf_action_t) action, SURF_ACTION_DONE);
 174     } else if ((action->generic_action.max_duration != NO_MAX_DURATION) &&
 175                (action->generic_action.max_duration <= 0)) {
 176       action->generic_action.finish = surf_get_clock();
 177       action_change_state((surf_action_t) action, SURF_ACTION_DONE);
 178     }
 179   }
 180
 181   return;
 182 }
 183
 184 static void update_resource_state(void *id,
 185                                   tmgr_trace_event_t event_type,
 186                                   double value, double time)
 187 {
 188   DIE_IMPOSSIBLE;
 189 }
 190
 191 static surf_action_t communicate(void *src, void *dst, double size,
 192                                  double rate)
 193 {
 194   surf_action_network_Constant_t action = NULL;
 195   network_card_Constant_t card_src = src;
 196   network_card_Constant_t card_dst = dst;
 197
 198   XBT_IN4("(%s,%s,%g,%g)", card_src->name, card_dst->name, size, rate);
 199
 200   action = xbt_new0(s_surf_action_network_Constant_t, 1);
 201
 202   action->generic_action.refcount = 1;
 203   action->generic_action.cost = size;
 204   action->generic_action.remains = size;
 205   action->generic_action.max_duration = NO_MAX_DURATION;
 206   action->generic_action.start = surf_get_clock();
 207   action->generic_action.finish = -1.0;
 208   action->generic_action.model_type = surf_network_model;
 209   action->suspended = 0;
 210
 211   action->latency = random_generate(random_latency);
 212   action->lat_init = action->latency;
 213
 214   if (action->latency <= 0.0)
 215     action->generic_action.state_set =
 216       surf_network_model->common_public.states.done_action_set;
 217   else
 218     action->generic_action.state_set =
 219       surf_network_model->common_public.states.running_action_set;
 220
 221   xbt_swag_insert(action, action->generic_action.state_set);
 222
 223
 224   XBT_OUT;
 225
 226   return (surf_action_t) action;
 227 }
 228
 229 /* returns an array of link_Constant_t */
 230 static const void **get_route(void *src, void *dst)
 231 {
 232   xbt_assert0(0, "Calling this function does not make any sense");
 233   return (const void **) NULL;
 234 }
 235
 236 static int get_route_size(void *src, void *dst)
 237 {
 238   xbt_assert0(0, "Calling this function does not make any sense");
 239   return 0;
 240 }
 241
 242 static const char *get_link_name(const void *link)
 243 {
 244   DIE_IMPOSSIBLE;
 245 }
 246
 247 static double get_link_bandwidth(const void *link)
 248 {
 249   DIE_IMPOSSIBLE;
 250 }
 251
 252 static double get_link_latency(const void *link)
 253 {
 254   DIE_IMPOSSIBLE;
 255 }
 256
 257 static int link_shared(const void *link)
 258 {
 259   DIE_IMPOSSIBLE;
 260 }
 261
 262 static xbt_dict_t get_properties(void *link)
 263 {
 264   DIE_IMPOSSIBLE;
 265 }
 266
 267 static void action_suspend(surf_action_t action)
 268 {
 269   ((surf_action_network_Constant_t) action)->suspended = 1;
 270 }
 271
 272 static void action_resume(surf_action_t action)
 273 {
 274   if (((surf_action_network_Constant_t) action)->suspended)
 275     ((surf_action_network_Constant_t) action)->suspended = 0;
 276 }
 277
 278 static int action_is_suspended(surf_action_t action)
 279 {
 280   return ((surf_action_network_Constant_t) action)->suspended;
 281 }
 282
 283 static void action_set_max_duration(surf_action_t action, double duration)
 284 {
 285   action->max_duration = duration;
 286 }
 287
 288 static void finalize(void)
 289 {
 290   surf_model_exit(surf_network_model);
 291
 292   free(surf_network_model);
 293   surf_network_model = NULL;
 294
 295   card_number = 0;
 296 }
 297
 298 static void surf_network_model_init_internal(void)
 299 {
 300   surf_network_model = xbt_new0(s_surf_model_t, 1);
 301
 302   surf_model_init(surf_network_model);
 303
 304   surf_network_model->common_public.get_resource_name = get_resource_name;
 305   surf_network_model->common_public.action_get_state = surf_action_get_state;
 306   surf_network_model->common_public.action_get_start_time =
 307     surf_action_get_start_time;
 308   surf_network_model->common_public.action_get_finish_time =
 309     surf_action_get_finish_time;
 310   surf_network_model->common_public.action_free = action_free;
 311   surf_network_model->common_public.action_use = action_use;
 312   surf_network_model->common_public.action_cancel = action_cancel;
 313   surf_network_model->common_public.action_recycle = action_recycle;
 314   surf_network_model->common_public.action_change_state = action_change_state;
 315   surf_network_model->common_public.action_set_data = surf_action_set_data;
 316   surf_network_model->common_public.name = "network";
 317
 318   surf_network_model->common_private->resource_used = resource_used;
 319   surf_network_model->common_private->share_resources = share_resources;
 320   surf_network_model->common_private->update_actions_state =
 321     update_actions_state;
 322   surf_network_model->common_private->update_resource_state =
 323     update_resource_state;
 324   surf_network_model->common_private->finalize = finalize;
 325
 326   surf_network_model->common_public.suspend = action_suspend;
 327   surf_network_model->common_public.resume = action_resume;
 328   surf_network_model->common_public.is_suspended = action_is_suspended;
 329   surf_cpu_model->common_public.set_max_duration = action_set_max_duration;
 330
 331   surf_network_model->extension.network.communicate = communicate;
 332   surf_network_model->extension.network.get_route = get_route;
 333   surf_network_model->extension.network.get_route_size = get_route_size;
 334   surf_network_model->extension.network.get_link_name = get_link_name;
 335   surf_network_model->extension.network.get_link_bandwidth =
 336     get_link_bandwidth;
 337   surf_network_model->extension.network.get_link_latency = get_link_latency;
 338   surf_network_model->extension.network.link_shared = link_shared;
 339
 340   surf_network_model->common_public.get_properties = get_properties;
 341
 342   if (!random_latency)
 343     random_latency = random_new(RAND, 100, 0.0, 1.0, .125, .034);
 344 }
 345
 346 void surf_network_model_init_Constant(const char *filename)
 347 {
 348
 349   if (surf_network_model)
 350     return;
 351   surf_network_model_init_internal();
 352   define_callbacks(filename);
 353   xbt_dynar_push(model_list, &surf_network_model);
 354
 355   update_model_description(surf_network_model_description,
 356                            "Constant", surf_network_model);
 357 }