Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Move MSG and SimDag examples out of the sight of users
[simgrid.git] / examples / simdag / properties / sd_properties.c
diff --git a/examples/simdag/properties/sd_properties.c b/examples/simdag/properties/sd_properties.c
deleted file mode 100644 (file)
index 4ab268a..0000000
+++ /dev/null
@@ -1,79 +0,0 @@
-/* Copyright (c) 2007-2019. 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 "simgrid/simdag.h"
-
-XBT_LOG_NEW_DEFAULT_CATEGORY(test, "Property test");
-
-int main(int argc, char **argv)
-{
-  xbt_dict_cursor_t cursor = NULL;
-  char *key;
-  char *data;
-  char noexist[] = "NoProp";
-  const char *value;
-  char exist[] = "Hdd";
-
-  /* SD initialization */
-  SD_init(&argc, argv);
-  xbt_assert(argc > 1, "Usage: %s platform_file\n\tExample: %s ../../platforms/prop.xml", argv[0], argv[0]);
-
-  SD_create_environment(argv[1]);
-
-  /* init of platform elements */
-  sg_host_t h1 = sg_host_by_name("host1");
-  sg_host_t h2 = sg_host_by_name("host2");
-  const char *name1 = sg_host_get_name(h1);
-  const char *name2 = sg_host_get_name(h2);
-
-  /* Trying to set a new property */
-  sg_host_set_property_value(h1, "NewProp", "newValue");
-
-  /* Get the property list of 'host1'. This is only a copy of the internal data structure.*/
-  XBT_INFO("Property list for host %s", name1);
-  xbt_dict_t props = sg_host_get_properties(h1);
-
-
-  /* Print the properties of 'host1' */
-  xbt_dict_foreach (props, cursor, key, data)
-    XBT_INFO("\tProperty: %s has value: %s", key, data);
-
-  /* Try to get a property that does not exist */
-  value = sg_host_get_property_value(h1, noexist);
-  XBT_INFO("\tProperty: %s has value: %s", noexist, value?value:"Undefined (NULL)");
-
-  xbt_dict_free(&props);
-
-  /* Get the property list of 'host2' */
-  XBT_INFO("Property list for host %s", name2);
-  props = sg_host_get_properties(h2);
-
-  /* Print the properties of 'host2' */
-  xbt_dict_foreach (props, cursor, key, data)
-    XBT_INFO("\tProperty: %s on host: %s", key, data);
-
-  xbt_dict_free(&props);
-
-  /* Modify an existing property test. First check it exists */
-  XBT_INFO("Modify an existing property");
-
-  value = sg_host_get_property_value(h2, exist);
-  if (value == NULL)
-    XBT_INFO("\tProperty: %s is undefined", exist);
-  else {
-    XBT_INFO("\tProperty: %s old value: %s", exist, value);
-    sg_host_set_property_value(h2, exist, "250");
-  }
-
-  /* Test if we have changed the value */
-  value = sg_host_get_property_value(h2, exist);
-  XBT_INFO("\tProperty: %s new value: %s", exist, value?value:"Undefined (NULL)");
-
-  /* Test if properties are displayed by sg_host_dump */
-  sg_host_dump(h2);
-
-  return 0;
-}