X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/3bd1f7386ddad36c4ad2a12e131e224afe2551a6..a252f252b068c05c631fca63de412148ad81ee69:/examples/simdag/properties/sd_prop.c diff --git a/examples/simdag/properties/sd_prop.c b/examples/simdag/properties/sd_prop.c old mode 100755 new mode 100644 index 0ab21cb207..089e89c9ab --- a/examples/simdag/properties/sd_prop.c +++ b/examples/simdag/properties/sd_prop.c @@ -1,4 +1,8 @@ -/* $Id$ */ +/* Copyright (c) 2007, 2008, 2009, 2010. The SimGrid Team. + * All rights reserved. */ + +/* This program is free software; you can redistribute it and/or modify it + * under the terms of the license (GNU LGPL) which comes with this package. */ #include #include @@ -8,11 +12,10 @@ #include "xbt/dynar.h" #include "xbt/dict.h" -XBT_LOG_NEW_DEFAULT_CATEGORY(test, - "Property test"); +XBT_LOG_NEW_DEFAULT_CATEGORY(test, "Property test"); -int main(int argc, char **argv) { - int i; +int main(int argc, char **argv) +{ const SD_workstation_t *workstations; SD_workstation_t w1; SD_workstation_t w2; @@ -20,16 +23,13 @@ int main(int argc, char **argv) { const char *name2; xbt_dict_t props; xbt_dict_cursor_t cursor = NULL; - char *key,*data; - char noexist[]="NoProp"; + char *key, *data; + char noexist[] = "NoProp"; const char *value; - char exist[]="SG_TEST_Hdd"; - - const SD_link_t *route; - int route_size; + char exist[] = "SG_TEST_Hdd"; /* initialisation of SD */ - SD_init(&argc, argv); + SD_init(&argc, argv); if (argc < 2) { INFO1("Usage: %s platform_file", argv[0]); INFO1("example: %s sd_platform.xml", argv[0]); @@ -47,24 +47,24 @@ int main(int argc, char **argv) { /* The host properties can be retrived from all interfaces */ - + INFO1("Property list for workstation %s", name1); /* Get the property list of the workstation 1 */ props = SD_workstation_get_properties(w1); - - /* Trying to set a new property */ + + /* Trying to set a new property */ xbt_dict_set(props, xbt_strdup("NewProp"), strdup("newValue"), free); /* Print the properties of the workstation 1 */ - xbt_dict_foreach(props,cursor,key,data) { - INFO2("\tProperty: %s has value: %s",key,data); + xbt_dict_foreach(props, cursor, key, data) { + INFO2("\tProperty: %s has value: %s", key, data); } - + /* Try to get a property that does not exist */ - - value = SD_workstation_get_property_value(w1,noexist); - if ( value == NULL) + + value = SD_workstation_get_property_value(w1, noexist); + if (value == NULL) INFO1("\tProperty: %s is undefined", noexist); else INFO2("\tProperty: %s has value: %s", noexist, value); @@ -76,54 +76,28 @@ int main(int argc, char **argv) { cursor = NULL; /* Print the properties of the workstation 2 */ - xbt_dict_foreach(props,cursor,key,data) { - INFO2("\tProperty: %s on host: %s",key,data); + xbt_dict_foreach(props, cursor, key, data) { + INFO2("\tProperty: %s on host: %s", key, data); } - /* Modify an existing property test. First check it exists */\ + /* Modify an existing property test. First check it exists */ INFO0("Modify an existing property"); - - value = SD_workstation_get_property_value(w2,exist); - if ( value == NULL) + + value = SD_workstation_get_property_value(w2, exist); + if (value == NULL) INFO1("\tProperty: %s is undefined", exist); else { INFO2("\tProperty: %s old value: %s", exist, value); - xbt_dict_set(props, exist, strdup("250"), free); + xbt_dict_set(props, exist, strdup("250"), free); } - + /* Test if we have changed the value */ - value = SD_workstation_get_property_value(w2,exist); - if ( value == NULL) + value = SD_workstation_get_property_value(w2, exist); + if (value == NULL) INFO1("\tProperty: %s is undefined", exist); else INFO2("\tProperty: %s new value: %s", exist, value); - /* NOTE: The link properties can be retrieved only from the SimDag interface */ - route = SD_route_get_list(w1, w2); - route_size = SD_route_get_size(w1, w2); - for (i = 0; i < route_size; i++) { - xbt_dict_cursor_t cursor = NULL; - char *key,*data; - char noexist1[]="Other"; - props = SD_link_get_properties(route[i]); - - - /* Print the properties of the current link */ - xbt_dict_foreach(props,cursor,key,data) { - INFO3("\tLink %s property: %s has value: %s",SD_link_get_name(route[i]),key,data); - - /* Try to get a property that does not exist */ - - value = SD_link_get_property_value(route[i], noexist1); - if ( value == NULL) - INFO2("\tProperty: %s for link %s is undefined", noexist, SD_link_get_name(route[i])); - else - INFO3("\tLink %s property: %s has value: %s",SD_link_get_name(route[i]),noexist,value); - } - - } - SD_exit(); return 0; } -