src/surf/workstation.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 "xbt/ex.h"
   9 #include "xbt/dict.h"
  10 #include "portable.h"
  11 #include "workstation_private.h"
  12 #include "cpu_private.h"
  13 #include "network_common.h"
  14
  15 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_workstation, surf,
  16                                 "Logging specific to the SURF workstation module");
  17
  18 surf_model_t surf_workstation_model = NULL;
  19
  20 static workstation_CLM03_t workstation_new(const char *name,
  21                                            void *cpu, void *card)
  22 {
  23   workstation_CLM03_t workstation = xbt_new0(s_workstation_CLM03_t, 1);
  24
  25   workstation->generic_resource.model = surf_workstation_model;
  26   workstation->generic_resource.name = xbt_strdup(name);
  27   workstation->cpu = cpu;
  28   workstation->network_card = card;
  29
  30   xbt_dict_set(surf_model_resource_set(surf_workstation_model), name,
  31                workstation, surf_resource_free);
  32
  33   return workstation;
  34 }
  35
  36 void create_workstations(void)
  37 {
  38   xbt_dict_cursor_t cursor = NULL;
  39   char *name = NULL;
  40   void *cpu = NULL;
  41   void *nw_card = NULL;
  42
  43   xbt_dict_foreach(surf_model_resource_set(surf_cpu_model), cursor, name, cpu) {
  44     nw_card = surf_model_resource_by_name(surf_network_model, name);
  45     xbt_assert1(nw_card, "No corresponding card found for %s", name);
  46
  47     workstation_new(name, cpu, nw_card);
  48   }
  49 }
  50
  51 static int resource_used(void *resource_id)
  52 {
  53   THROW_IMPOSSIBLE;             /* This model does not implement parallel tasks */
  54 }
  55
  56 static void parallel_action_cancel(surf_action_t action)
  57 {
  58   THROW_UNIMPLEMENTED;          /* This model does not implement parallel tasks */
  59 }
  60
  61 static int parallel_action_free(surf_action_t action)
  62 {
  63   THROW_UNIMPLEMENTED;          /* This model does not implement parallel tasks */
  64 }
  65
  66 static void parallel_action_use(surf_action_t action)
  67 {
  68   THROW_UNIMPLEMENTED;          /* This model does not implement parallel tasks */
  69 }
  70
  71 static int action_free(surf_action_t action)
  72 {
  73   if (action->model_type == surf_network_model)
  74     return surf_network_model->action_free(action);
  75   else if (action->model_type == surf_cpu_model)
  76     return surf_cpu_model->action_free(action);
  77   else if (action->model_type == surf_workstation_model)
  78     return parallel_action_free(action);
  79   else
  80     DIE_IMPOSSIBLE;
  81   return 0;
  82 }
  83
  84 static void action_use(surf_action_t action)
  85 {
  86   if (action->model_type == surf_network_model)
  87     surf_network_model->action_use(action);
  88   else if (action->model_type == surf_cpu_model)
  89     surf_cpu_model->action_use(action);
  90   else if (action->model_type == surf_workstation_model)
  91     parallel_action_use(action);
  92   else
  93     DIE_IMPOSSIBLE;
  94   return;
  95 }
  96
  97 static void action_cancel(surf_action_t action)
  98 {
  99   if (action->model_type == surf_network_model)
 100     surf_network_model->action_cancel(action);
 101   else if (action->model_type == surf_cpu_model)
 102     surf_cpu_model->action_cancel(action);
 103   else if (action->model_type == surf_workstation_model)
 104     parallel_action_cancel(action);
 105   else
 106     DIE_IMPOSSIBLE;
 107   return;
 108 }
 109
 110 static void action_change_state(surf_action_t action,
 111                                 e_surf_action_state_t state)
 112 {
 113   if (action->model_type == surf_network_model)
 114     surf_network_model->action_change_state(action, state);
 115   else if (action->model_type == surf_cpu_model)
 116     surf_cpu_model->action_change_state(action, state);
 117   else if (action->model_type == surf_workstation_model)
 118     surf_action_change_state(action, state);
 119   else
 120     DIE_IMPOSSIBLE;
 121   return;
 122 }
 123
 124 static double share_resources(double now)
 125 {
 126   return -1.0;
 127 }
 128
 129 static void update_actions_state(double now, double delta)
 130 {
 131   return;
 132 }
 133
 134 static void update_resource_state(void *id,
 135                                   tmgr_trace_event_t event_type,
 136                                   double value, double date)
 137 {
 138   THROW_IMPOSSIBLE;             /* This model does not implement parallel tasks */
 139 }
 140
 141 static surf_action_t execute(void *workstation, double size)
 142 {
 143   return surf_cpu_model->extension.
 144     cpu.execute(((workstation_CLM03_t) workstation)->cpu, size);
 145 }
 146
 147 static surf_action_t action_sleep(void *workstation, double duration)
 148 {
 149   return surf_cpu_model->extension.
 150     cpu.sleep(((workstation_CLM03_t) workstation)->cpu, duration);
 151 }
 152
 153 static void action_suspend(surf_action_t action)
 154 {
 155   if (action->model_type == surf_network_model)
 156     surf_network_model->suspend(action);
 157   else if (action->model_type == surf_cpu_model)
 158     surf_cpu_model->suspend(action);
 159   else
 160     DIE_IMPOSSIBLE;
 161 }
 162
 163 static void action_resume(surf_action_t action)
 164 {
 165   if (action->model_type == surf_network_model)
 166     surf_network_model->resume(action);
 167   else if (action->model_type == surf_cpu_model)
 168     surf_cpu_model->resume(action);
 169   else
 170     DIE_IMPOSSIBLE;
 171 }
 172
 173 static int action_is_suspended(surf_action_t action)
 174 {
 175   if (action->model_type == surf_network_model)
 176     return surf_network_model->is_suspended(action);
 177   if (action->model_type == surf_cpu_model)
 178     return surf_cpu_model->is_suspended(action);
 179   DIE_IMPOSSIBLE;
 180 }
 181
 182 static void action_set_max_duration(surf_action_t action, double duration)
 183 {
 184   if (action->model_type == surf_network_model)
 185     surf_network_model->set_max_duration(action, duration);
 186   else if (action->model_type == surf_cpu_model)
 187     surf_cpu_model->set_max_duration(action, duration);
 188   else
 189     DIE_IMPOSSIBLE;
 190 }
 191
 192 static void action_set_priority(surf_action_t action, double priority)
 193 {
 194   if (action->model_type == surf_network_model)
 195     surf_network_model->set_priority(action, priority);
 196   else if (action->model_type == surf_cpu_model)
 197     surf_cpu_model->set_priority(action, priority);
 198   else
 199     DIE_IMPOSSIBLE;
 200 }
 201
 202 static surf_action_t communicate(void *workstation_src,
 203                                  void *workstation_dst, double size,
 204                                  double rate)
 205 {
 206   return surf_network_model->extension.
 207     network.communicate(((workstation_CLM03_t) workstation_src)->network_card,
 208                         ((workstation_CLM03_t) workstation_dst)->network_card,
 209                         size, rate);
 210 }
 211
 212 static e_surf_cpu_state_t get_state(void *workstation)
 213 {
 214   return surf_cpu_model->extension.
 215     cpu.get_state(((workstation_CLM03_t) workstation)->cpu);
 216 }
 217
 218 static double get_speed(void *workstation, double load)
 219 {
 220   return surf_cpu_model->extension.
 221     cpu.get_speed(((workstation_CLM03_t) workstation)->cpu, load);
 222 }
 223
 224 static double get_available_speed(void *workstation)
 225 {
 226   return surf_cpu_model->extension.
 227     cpu.get_available_speed(((workstation_CLM03_t)
 228                              workstation)->cpu);
 229 }
 230
 231 static xbt_dict_t get_properties(void *workstation)
 232 {
 233   return surf_cpu_model->get_properties(((workstation_CLM03_t) workstation)->
 234                                         cpu);
 235 }
 236
 237 static surf_action_t execute_parallel_task(int workstation_nb,
 238                                            void **workstation_list,
 239                                            double *computation_amount,
 240                                            double *communication_amount,
 241                                            double amount, double rate)
 242 {
 243   THROW_UNIMPLEMENTED;          /* This model does not implement parallel tasks */
 244 }
 245
 246
 247 /* returns an array of network_link_CM02_t */
 248 static const void **get_route(void *src, void *dst)
 249 {
 250   workstation_CLM03_t workstation_src = (workstation_CLM03_t) src;
 251   workstation_CLM03_t workstation_dst = (workstation_CLM03_t) dst;
 252   return surf_network_model->extension.network.get_route(workstation_src->
 253                                                          network_card,
 254                                                          workstation_dst->
 255                                                          network_card);
 256 }
 257
 258 static int get_route_size(void *src, void *dst)
 259 {
 260   workstation_CLM03_t workstation_src = (workstation_CLM03_t) src;
 261   workstation_CLM03_t workstation_dst = (workstation_CLM03_t) dst;
 262   return surf_network_model->extension.
 263     network.get_route_size(workstation_src->network_card,
 264                            workstation_dst->network_card);
 265 }
 266
 267 static double get_link_bandwidth(const void *link)
 268 {
 269   return surf_network_model->extension.network.get_link_bandwidth(link);
 270 }
 271
 272 static double get_link_latency(const void *link)
 273 {
 274   return surf_network_model->extension.network.get_link_latency(link);
 275 }
 276
 277 static int link_shared(const void *link)
 278 {
 279   return surf_network_model->extension.network.get_link_latency(link);
 280 }
 281
 282 static void finalize(void)
 283 {
 284   surf_model_exit(surf_workstation_model);
 285   surf_workstation_model = NULL;
 286 }
 287
 288 static void surf_workstation_model_init_internal(void)
 289 {
 290   surf_workstation_model = surf_model_init();
 291 /*   surf_workstation_model->extension_private = xbt_new0(s_surf_workstation_model_extension_private_t,1); */
 292
 293   surf_workstation_model->action_get_state = surf_action_get_state;
 294   surf_workstation_model->action_get_start_time = surf_action_get_start_time;
 295   surf_workstation_model->action_get_finish_time =
 296     surf_action_get_finish_time;
 297   surf_workstation_model->action_free = action_free;
 298   surf_workstation_model->action_use = action_use;
 299   surf_workstation_model->action_cancel = action_cancel;
 300   surf_workstation_model->action_change_state = action_change_state;
 301   surf_workstation_model->action_set_data = surf_action_set_data;
 302   surf_workstation_model->name = "Workstation";
 303
 304   surf_workstation_model->model_private->resource_used = resource_used;
 305   surf_workstation_model->model_private->share_resources = share_resources;
 306   surf_workstation_model->model_private->update_actions_state =
 307     update_actions_state;
 308   surf_workstation_model->model_private->update_resource_state =
 309     update_resource_state;
 310   surf_workstation_model->model_private->finalize = finalize;
 311
 312   surf_workstation_model->suspend = action_suspend;
 313   surf_workstation_model->resume = action_resume;
 314   surf_workstation_model->is_suspended = action_is_suspended;
 315   surf_workstation_model->set_max_duration = action_set_max_duration;
 316   surf_workstation_model->set_priority = action_set_priority;
 317
 318   surf_workstation_model->extension.workstation.execute = execute;
 319   surf_workstation_model->extension.workstation.sleep = action_sleep;
 320   surf_workstation_model->extension.workstation.get_state = get_state;
 321   surf_workstation_model->extension.workstation.get_speed = get_speed;
 322   surf_workstation_model->extension.workstation.get_available_speed =
 323     get_available_speed;
 324
 325   /*manage the properties of the workstation */
 326   surf_workstation_model->get_properties = get_properties;
 327
 328   surf_workstation_model->extension.workstation.communicate = communicate;
 329   surf_workstation_model->extension.workstation.execute_parallel_task =
 330     execute_parallel_task;
 331   surf_workstation_model->extension.workstation.get_route = get_route;
 332   surf_workstation_model->extension.workstation.get_route_size =
 333     get_route_size;
 334   surf_workstation_model->extension.workstation.get_link_bandwidth =
 335     get_link_bandwidth;
 336   surf_workstation_model->extension.workstation.get_link_latency =
 337     get_link_latency;
 338   surf_workstation_model->extension.workstation.link_shared = link_shared;
 339 }
 340
 341 /********************************************************************/
 342 /* The model used in MSG and presented at CCGrid03                  */
 343 /********************************************************************/
 344 /* @InProceedings{Casanova.CLM_03, */
 345 /*   author = {Henri Casanova and Arnaud Legrand and Loris Marchal}, */
 346 /*   title = {Scheduling Distributed Applications: the SimGrid Simulation Framework}, */
 347 /*   booktitle = {Proceedings of the third IEEE International Symposium on Cluster Computing and the Grid (CCGrid'03)}, */
 348 /*   publisher = {"IEEE Computer Society Press"}, */
 349 /*   month = {may}, */
 350 /*   year = {2003} */
 351 /* } */
 352 void surf_workstation_model_init_CLM03(const char *filename)
 353 {
 354   surf_workstation_model_init_internal();
 355   surf_cpu_model_init_Cas01(filename);
 356   surf_network_model_init_CM02(filename);
 357   update_model_description(surf_workstation_model_description,
 358                            "CLM03", surf_workstation_model);
 359   xbt_dynar_push(model_list, &surf_workstation_model);
 360 }
 361
 362 void surf_workstation_model_init_compound(const char *filename)
 363 {
 364
 365   xbt_assert0(surf_cpu_model, "No CPU model defined yet!");
 366   xbt_assert0(surf_network_model, "No network model defined yet!");
 367   surf_workstation_model_init_internal();
 368
 369   update_model_description(surf_workstation_model_description,
 370                            "compound", surf_workstation_model);
 371
 372   xbt_dynar_push(model_list, &surf_workstation_model);
 373 }