A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Cosmetics
[simgrid.git]
/
src
/
surf
/
surf_routing_rulebased.c
diff --git
a/src/surf/surf_routing_rulebased.c
b/src/surf/surf_routing_rulebased.c
index
b6c16c4
..
ca0a8aa
100644
(file)
--- a/
src/surf/surf_routing_rulebased.c
+++ b/
src/surf/surf_routing_rulebased.c
@@
-8,21
+8,19
@@
/* Global vars */
extern routing_global_t global_routing;
/* Global vars */
extern routing_global_t global_routing;
-extern routing_component_t current_routing;
-extern model_type_t current_routing_model;
-extern xbt_dynar_t link_list;
+extern xbt_dynar_t parsed_link_list;
XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_route_rulebased, surf, "Routing part of surf");
/* Routing model structure */
typedef struct {
XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_route_rulebased, surf, "Routing part of surf");
/* Routing model structure */
typedef struct {
- s_
routing_component
_t generic_routing;
+ s_
as
_t generic_routing;
xbt_dict_t dict_processing_units;
xbt_dict_t dict_autonomous_systems;
xbt_dynar_t list_route;
xbt_dynar_t list_ASroute;
xbt_dict_t dict_processing_units;
xbt_dict_t dict_autonomous_systems;
xbt_dynar_t list_route;
xbt_dynar_t list_ASroute;
-} s_
routing_component_rulebased_t, *routing_component
_rulebased_t;
+} s_
AS_rulebased_t, *AS
_rulebased_t;
typedef struct s_rule_route s_rule_route_t, *rule_route_t;
typedef struct s_rule_route_extended s_rule_route_extended_t,
typedef struct s_rule_route s_rule_route_t, *rule_route_t;
typedef struct s_rule_route_extended s_rule_route_extended_t,
@@
-67,35
+65,29
@@
static void rule_route_extended_free(void *e)
/* Parse routing model functions */
/* Parse routing model functions */
-static void model_rulebased_parse_PU(routing_component_t rc,
- const char *name)
+static void model_rulebased_parse_PU(AS_t rc, const char *name)
{
{
- routing_component_rulebased_t routing =
- (routing_component_rulebased_t) rc;
+ AS_rulebased_t routing = (AS_rulebased_t) rc;
xbt_dict_set(routing->dict_processing_units, name, (void *) (-1), NULL);
}
xbt_dict_set(routing->dict_processing_units, name, (void *) (-1), NULL);
}
-static void model_rulebased_parse_AS(routing_component_t rc,
- const char *name)
+static void model_rulebased_parse_AS(AS_t rc, const char *name)
{
{
- routing_component_rulebased_t routing =
- (routing_component_rulebased_t) rc;
- xbt_dict_set(routing->dict_autonomous_systems, name, (void *) (-1),
- NULL);
+ AS_rulebased_t routing = (AS_rulebased_t) rc;
+ xbt_dict_set(routing->dict_autonomous_systems, name, (void *) (-1), NULL);
}
}
-static void model_rulebased_parse_route(
routing_component
_t rc,
+static void model_rulebased_parse_route(
AS
_t rc,
const char *src, const char *dst,
const char *src, const char *dst,
-
name_route_extended
_t route)
+
route
_t route)
{
{
- routing_component_rulebased_t routing =
- (routing_component_rulebased_t) rc;
+ AS_rulebased_t routing = (AS_rulebased_t) rc;
rule_route_t ruleroute = xbt_new0(s_rule_route_t, 1);
const char *error;
int erroffset;
rule_route_t ruleroute = xbt_new0(s_rule_route_t, 1);
const char *error;
int erroffset;
- if(!strcmp(rc->
routing
->name,"Vivaldi")){
- if(
xbt_dynar_length(route->generic_route.link_list) != 0
)
+ if(!strcmp(rc->
model_desc
->name,"Vivaldi")){
+ if(
!xbt_dynar_is_empty(route->link_list)
)
xbt_die("You can't have link_ctn with Model Vivaldi.");
}
xbt_die("You can't have link_ctn with Model Vivaldi.");
}
@@
-107,23
+99,24
@@
static void model_rulebased_parse_route(routing_component_t rc,
xbt_assert(ruleroute->re_src,
"PCRE compilation failed at offset %d (\"%s\"): %s\n",
erroffset, dst, error);
xbt_assert(ruleroute->re_src,
"PCRE compilation failed at offset %d (\"%s\"): %s\n",
erroffset, dst, error);
- ruleroute->re_str_link = route->generic_route.link_list;
+
+ ruleroute->re_str_link = route->link_list;
+ route->link_list = NULL; // Don't free it twice in each container
+
xbt_dynar_push(routing->list_route, &ruleroute);
xbt_dynar_push(routing->list_route, &ruleroute);
- xbt_free(route);
}
}
-static void model_rulebased_parse_ASroute(
routing_component
_t rc,
+static void model_rulebased_parse_ASroute(
AS
_t rc,
const char *src, const char *dst,
const char *src, const char *dst,
-
name_route_extended
_t route)
+
route
_t route)
{
{
- routing_component_rulebased_t routing =
- (routing_component_rulebased_t) rc;
+ AS_rulebased_t routing = (AS_rulebased_t) rc;
rule_route_extended_t ruleroute_e = xbt_new0(s_rule_route_extended_t, 1);
const char *error;
int erroffset;
rule_route_extended_t ruleroute_e = xbt_new0(s_rule_route_extended_t, 1);
const char *error;
int erroffset;
- if(!strcmp(rc->
routing
->name,"Vivaldi")){
- if(
xbt_dynar_length(route->generic_route.link_list) != 0
)
+ if(!strcmp(rc->
model_desc
->name,"Vivaldi")){
+ if(
!xbt_dynar_is_empty(route->link_list)
)
xbt_die("You can't have link_ctn with Model Vivaldi.");
}
xbt_die("You can't have link_ctn with Model Vivaldi.");
}
@@
-138,19
+131,20
@@
static void model_rulebased_parse_ASroute(routing_component_t rc,
"PCRE compilation failed at offset %d (\"%s\"): %s\n",
erroffset, dst, error);
ruleroute_e->generic_rule_route.re_str_link =
"PCRE compilation failed at offset %d (\"%s\"): %s\n",
erroffset, dst, error);
ruleroute_e->generic_rule_route.re_str_link =
- route->
generic_route.
link_list;
+ route->link_list;
ruleroute_e->re_src_gateway = route->src_gateway;
ruleroute_e->re_dst_gateway = route->dst_gateway;
xbt_dynar_push(routing->list_ASroute, &ruleroute_e);
ruleroute_e->re_src_gateway = route->src_gateway;
ruleroute_e->re_dst_gateway = route->dst_gateway;
xbt_dynar_push(routing->list_ASroute, &ruleroute_e);
-// xbt_free(route->src_gateway);
-// xbt_free(route->dst_gateway);
- xbt_free(route);
+
+ /* make sure that they don't get freed */
+ route->link_list = NULL;
+ route->src_gateway = route->dst_gateway = NULL;
}
}
-static void model_rulebased_parse_bypassroute(
routing_component
_t rc,
+static void model_rulebased_parse_bypassroute(
AS
_t rc,
const char *src,
const char *dst,
const char *src,
const char *dst,
- route_
extended_
t e_route)
+ route_t e_route)
{
xbt_die("bypass routing not supported for Route-Based model");
}
{
xbt_die("bypass routing not supported for Route-Based model");
}
@@
-213,10
+207,10
@@
static char *remplace(char *value, const char **src_list, int src_size,
return memcpy(res, result, i_res);
}
return memcpy(res, result, i_res);
}
-static
route_extended_t rulebased_get_route(routing_component
_t rc,
-
const char *src
,
-
const char *ds
t);
-static xbt_dynar_t rulebased_get_onelink_routes(
routing_component
_t rc)
+static
void rulebased_get_route_and_latency(AS
_t rc,
+
const char *src, const char *dst
,
+
route_t res,double*la
t);
+static xbt_dynar_t rulebased_get_onelink_routes(
AS
_t rc)
{
xbt_dynar_t ret = xbt_dynar_new (sizeof(onelink_t), xbt_free);
{
xbt_dynar_t ret = xbt_dynar_new (sizeof(onelink_t), xbt_free);
@@
-224,7
+218,7
@@
static xbt_dynar_t rulebased_get_onelink_routes(routing_component_t rc)
if(!strcmp(surf_network_model->name,"network NS3"))
return ret;
if(!strcmp(surf_network_model->name,"network NS3"))
return ret;
-
routing_component_rulebased_t routing = (routing_component
_rulebased_t)rc;
+
AS_rulebased_t routing = (AS
_rulebased_t)rc;
xbt_dict_cursor_t c1 = NULL;
char *k1, *d1;
xbt_dict_cursor_t c1 = NULL;
char *k1, *d1;
@@
-232,19
+226,21
@@
static xbt_dynar_t rulebased_get_onelink_routes(routing_component_t rc)
//find router
char *router = NULL;
xbt_dict_foreach(routing->dict_processing_units, c1, k1, d1) {
//find router
char *router = NULL;
xbt_dict_foreach(routing->dict_processing_units, c1, k1, d1) {
- if (r
c->
get_network_element_type(k1) == SURF_NETWORK_ELEMENT_ROUTER){
+ if (r
outing_
get_network_element_type(k1) == SURF_NETWORK_ELEMENT_ROUTER){
router = k1;
router = k1;
+ break;
}
}
}
}
- if (!router)
{
+ if (!router)
xbt_die ("rulebased_get_onelink_routes works only if the AS is a cluster, sorry.");
xbt_die ("rulebased_get_onelink_routes works only if the AS is a cluster, sorry.");
- }
xbt_dict_foreach(routing->dict_processing_units, c1, k1, d1) {
xbt_dict_foreach(routing->dict_processing_units, c1, k1, d1) {
- route_extended_t route = rulebased_get_route (rc, router, k1);
+ route_t route = xbt_new0(s_route_t,1);
+ route->link_list = xbt_dynar_new(global_routing->size_of_link,NULL);
+ rulebased_get_route_and_latency (rc, router, k1, route,NULL);
- int number_of_links = xbt_dynar_length(route->
generic_route.
link_list);
+ int number_of_links = xbt_dynar_length(route->link_list);
if(number_of_links == 1) {
//loopback
if(number_of_links == 1) {
//loopback
@@
-255,7
+251,7
@@
static xbt_dynar_t rulebased_get_onelink_routes(routing_component_t rc)
}
void *link_ptr;
}
void *link_ptr;
- xbt_dynar_get_cpy (route->
generic_route.
link_list, 1, &link_ptr);
+ xbt_dynar_get_cpy (route->link_list, 1, &link_ptr);
onelink_t onelink = xbt_new0 (s_onelink_t, 1);
onelink->src = xbt_strdup (k1);
onelink->dst = xbt_strdup (router);
onelink_t onelink = xbt_new0 (s_onelink_t, 1);
onelink->src = xbt_strdup (k1);
onelink->dst = xbt_strdup (router);
@@
-267,9
+263,9
@@
static xbt_dynar_t rulebased_get_onelink_routes(routing_component_t rc)
}
/* Business methods */
}
/* Business methods */
-static
route_extended_t rulebased_get_route(routing_component
_t rc,
-
const char *src
,
-
const char *ds
t)
+static
void rulebased_get_route_and_latency(AS
_t rc,
+
const char *src, const char *dst
,
+
route_t route, double *la
t)
{
xbt_assert(rc && src
&& dst,
{
xbt_assert(rc && src
&& dst,
@@
-277,8
+273,7
@@
static route_extended_t rulebased_get_route(routing_component_t rc,
rc->name);
/* set utils vars */
rc->name);
/* set utils vars */
- routing_component_rulebased_t routing =
- (routing_component_rulebased_t) rc;
+ AS_rulebased_t routing = (AS_rulebased_t) rc;
int are_processing_units=0;
xbt_dynar_t rule_list;
int are_processing_units=0;
xbt_dynar_t rule_list;
@@
-292,17
+287,13
@@
static route_extended_t rulebased_get_route(routing_component_t rc,
are_processing_units = 0;
rule_list = routing->list_ASroute;
} else
are_processing_units = 0;
rule_list = routing->list_ASroute;
} else
- xbt_die("Ask for route \"from\"(%s) or \"to\"(%s) no found in "
- "the local table", src, dst);
+ THROWF(arg_error,0,"No route from '%s' to '%s'",src,dst);
int rc_src = -1;
int rc_dst = -1;
int src_length = (int) strlen(src);
int dst_length = (int) strlen(dst);
int rc_src = -1;
int rc_dst = -1;
int src_length = (int) strlen(src);
int dst_length = (int) strlen(dst);
- xbt_dynar_t links_list =
- xbt_dynar_new(global_routing->size_of_link, NULL);
-
rule_route_t ruleroute;
unsigned int cpt;
int ovector_src[OVECCOUNT];
rule_route_t ruleroute;
unsigned int cpt;
int ovector_src[OVECCOUNT];
@@
-329,9
+320,11
@@
static route_extended_t rulebased_get_route(routing_component_t rc,
remplace(link_name, list_src, rc_src, list_dst, rc_dst);
void *link =
xbt_lib_get_or_null(link_lib, new_link_name, SURF_LINK_LEVEL);
remplace(link_name, list_src, rc_src, list_dst, rc_dst);
void *link =
xbt_lib_get_or_null(link_lib, new_link_name, SURF_LINK_LEVEL);
- if (link)
- xbt_dynar_push(links_list, &link);
- else
+ if (link) {
+ xbt_dynar_push(route->link_list, &link);
+ if (lat)
+ *lat += surf_network_model->extension.network.get_link_latency(link);
+ } else
THROWF(mismatch_error, 0, "Link %s not found", new_link_name);
xbt_free(new_link_name);
}
THROWF(mismatch_error, 0, "Link %s not found", new_link_name);
xbt_free(new_link_name);
}
@@
-341,25
+334,24
@@
static route_extended_t rulebased_get_route(routing_component_t rc,
break;
}
break;
}
- route_extended_t new_e_route = NULL;
if (rc_src >= 0 && rc_dst >= 0) {
if (rc_src >= 0 && rc_dst >= 0) {
- new_e_route = xbt_new0(s_route_extended_t, 1);
- new_e_route->generic_route.link_list = links_list;
+ /* matched src and dest, nothing more to do (?) */
} else if (!strcmp(src, dst) && are_processing_units) {
} else if (!strcmp(src, dst) && are_processing_units) {
-
new_e_route = xbt_new0(s_route_extended_t, 1
);
- xbt_dynar_push(links_list, &(global_routing->loopback));
-
new_e_route->generic_route.link_list = links_list
;
+
xbt_dynar_push(route->link_list, &(global_routing->loopback)
);
+ if (lat)
+
*lat += surf_network_model->extension.network.get_link_latency(global_routing->loopback)
;
} else {
} else {
- xbt_dynar_free(&link_list);
+ THROWF(arg_error,0,"No route from '%s' to '%s'??",src,dst);
+ //xbt_dynar_reset(route->link_list);
}
}
- if (!are_processing_units &&
new_e_route
) {
+ if (!are_processing_units &&
!xbt_dynar_is_empty(route->link_list)
) {
rule_route_extended_t ruleroute_extended =
(rule_route_extended_t) ruleroute;
rule_route_extended_t ruleroute_extended =
(rule_route_extended_t) ruleroute;
-
new_e_
route->src_gateway =
+ route->src_gateway =
remplace(ruleroute_extended->re_src_gateway, list_src, rc_src,
list_dst, rc_dst);
remplace(ruleroute_extended->re_src_gateway, list_src, rc_src,
list_dst, rc_dst);
-
new_e_
route->dst_gateway =
+ route->dst_gateway =
remplace(ruleroute_extended->re_dst_gateway, list_src, rc_src,
list_dst, rc_dst);
}
remplace(ruleroute_extended->re_dst_gateway, list_src, rc_src,
list_dst, rc_dst);
}
@@
-368,36
+360,31
@@
static route_extended_t rulebased_get_route(routing_component_t rc,
pcre_free_substring_list(list_src);
if (list_dst)
pcre_free_substring_list(list_dst);
pcre_free_substring_list(list_src);
if (list_dst)
pcre_free_substring_list(list_dst);
-
- return new_e_route;
}
}
-static route_extended_t rulebased_get_bypass_route(routing_component_t rc,
- const char *src,
- const char *dst)
-{
+static route_t rulebased_get_bypass_route(AS_t rc, const char *src, const char *dst) {
return NULL;
}
return NULL;
}
-static void rulebased_finalize(
routing_component
_t rc)
+static void rulebased_finalize(
AS
_t rc)
{
{
-
routing_component
_rulebased_t routing =
- (
routing_component
_rulebased_t) rc;
+
AS
_rulebased_t routing =
+ (
AS
_rulebased_t) rc;
if (routing) {
xbt_dict_free(&routing->dict_processing_units);
xbt_dict_free(&routing->dict_autonomous_systems);
xbt_dynar_free(&routing->list_route);
xbt_dynar_free(&routing->list_ASroute);
if (routing) {
xbt_dict_free(&routing->dict_processing_units);
xbt_dict_free(&routing->dict_autonomous_systems);
xbt_dynar_free(&routing->list_route);
xbt_dynar_free(&routing->list_ASroute);
- /* Delete structure */
-
xbt_free(routing
);
+
+
model_generic_finalize(rc
);
}
}
/* Creation routing model functions */
}
}
/* Creation routing model functions */
-
routing_component
_t model_rulebased_create(void) {
+
AS
_t model_rulebased_create(void) {
-
routing_component_rulebased_t new_component = (routing_component
_rulebased_t)
-
routmod_generic_create(sizeof(s_routing_component
_rulebased_t));
+
AS_rulebased_t new_component = (AS
_rulebased_t)
+
model_generic_create_sized(sizeof(s_AS
_rulebased_t));
new_component->generic_routing.parse_PU = model_rulebased_parse_PU;
new_component->generic_routing.parse_AS = model_rulebased_parse_AS;
new_component->generic_routing.parse_PU = model_rulebased_parse_PU;
new_component->generic_routing.parse_AS = model_rulebased_parse_AS;
@@
-405,16
+392,16
@@
routing_component_t model_rulebased_create(void) {
new_component->generic_routing.parse_ASroute = model_rulebased_parse_ASroute;
new_component->generic_routing.parse_bypassroute = model_rulebased_parse_bypassroute;
new_component->generic_routing.get_onelink_routes = rulebased_get_onelink_routes;
new_component->generic_routing.parse_ASroute = model_rulebased_parse_ASroute;
new_component->generic_routing.parse_bypassroute = model_rulebased_parse_bypassroute;
new_component->generic_routing.get_onelink_routes = rulebased_get_onelink_routes;
- new_component->generic_routing.get_route
= rulebased_get_route
;
+ new_component->generic_routing.get_route
_and_latency = rulebased_get_route_and_latency
;
new_component->generic_routing.get_bypass_route = rulebased_get_bypass_route;
new_component->generic_routing.finalize = rulebased_finalize;
/* initialization of internal structures */
new_component->generic_routing.get_bypass_route = rulebased_get_bypass_route;
new_component->generic_routing.finalize = rulebased_finalize;
/* initialization of internal structures */
- new_component->dict_processing_units = xbt_dict_new
(
);
- new_component->dict_autonomous_systems = xbt_dict_new
(
);
+ new_component->dict_processing_units = xbt_dict_new
_homogeneous(NULL
);
+ new_component->dict_autonomous_systems = xbt_dict_new
_homogeneous(NULL
);
new_component->list_route = xbt_dynar_new(sizeof(rule_route_t), &rule_route_free);
new_component->list_ASroute =
xbt_dynar_new(sizeof(rule_route_extended_t),
&rule_route_extended_free);
new_component->list_route = xbt_dynar_new(sizeof(rule_route_t), &rule_route_free);
new_component->list_ASroute =
xbt_dynar_new(sizeof(rule_route_extended_t),
&rule_route_extended_free);
- return (
routing_component
_t) new_component;
+ return (
AS
_t) new_component;
}
}