src/surf/surf_routing_cluster.c

   1 /* Copyright (c) 2009, 2010, 2011. The SimGrid Team.
   2  * All rights reserved.                                                     */
   3
   4 /* This program is free software; you can redistribute it and/or modify it
   5  * under the terms of the license (GNU LGPL) which comes with this package. */
   6 #include "surf_routing_private.h"
   7
   8 /* Global vars */
   9 extern routing_global_t global_routing;
  10
  11 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_route_cluster, surf, "Routing part of surf");
  12
  13 /* This routing is specifically setup to represent clusters, aka homogeneous sets of machines
  14  * Note that a router is created, easing the interconnexion with the rest of the world.
  15  */
  16
  17 typedef struct {
  18   s_as_t generic_routing;
  19   void *backbone;
  20 } s_as_cluster_t, *as_cluster_t;
  21
  22
  23 static xbt_dict_t cluster_host_link = NULL;
  24
  25 /* Business methods */
  26 static void cluster_get_route(AS_t as,
  27                               const char *src, const char *dst,
  28                               route_t route) {
  29
  30           surf_parsing_link_up_down_t info;
  31
  32           info = xbt_dict_get_or_null(cluster_host_link,src);
  33           if(info) xbt_dynar_push_as(route->link_list,void*,info->link_up); //link_up
  34
  35           if ( ((as_cluster_t)as)->backbone )
  36             xbt_dynar_push_as(route->link_list,void*, ((as_cluster_t)as)->backbone) ;
  37
  38           info = xbt_dict_get_or_null(cluster_host_link,dst);
  39           if(info) xbt_dynar_push_as(route->link_list,void*,info->link_down); //link_down
  40 }
  41
  42 static void model_cluster_finalize(AS_t as) {
  43   xbt_dict_free(&cluster_host_link);
  44   model_none_finalize(as);
  45 }
  46 /* Creation routing model functions */
  47 AS_t model_cluster_create(void)
  48 {
  49   AS_t result = model_none_create_sized(sizeof(s_as_cluster_t));
  50   result->get_route = cluster_get_route;
  51   result->get_latency = generic_get_link_latency;
  52   result->finalize = model_cluster_finalize;
  53
  54   return (AS_t) result;
  55 }
  56
  57 void surf_routing_cluster_add_link(const char* host_id,surf_parsing_link_up_down_t info) {
  58   if(!cluster_host_link)
  59     cluster_host_link = xbt_dict_new();
  60
  61  xbt_dict_set(cluster_host_link,host_id,info,xbt_free);
  62 }
  63
  64 void surf_routing_cluster_add_backbone(AS_t as, void* bb) {
  65   ((as_cluster_t)as)->backbone = bb;
  66 }