-int alice(int argc, char *argv[])
-{
- m_host_t host1 = MSG_get_host_by_name("host1");
- xbt_dict_t props = MSG_host_get_properties(host1);
- xbt_dict_cursor_t cursor=NULL;
- char *key,*data;
- const char *noexist="Unknown";
- const char*value;
- char exist[]="SG_TEST_Hdd";
-
- INFO0("== Print the properties of the host");
- xbt_dict_foreach(props,cursor,key,data)
- INFO2(" Host property: '%s' -> '%s'",key,data);
-
- INFO0("== Try to get a host property that does not exist");
- value = MSG_host_get_property_value(host1, noexist);
- xbt_assert0(!value, "The key exists (it's not supposed to)");
-
- INFO0("== Try to get a host property that does exist");
- value = MSG_host_get_property_value(host1,exist);
- xbt_assert1(value,"\tProperty %s is undefined (where it should)", exist);
- xbt_assert2(!strcmp(value,"180"),"\tValue of property %s is defined to %s (where it should be 180)", exist, value);
- INFO2(" Property: %s old value: %s", exist, value);
-
- INFO0("== Trying to modify a host property");
- xbt_dict_set(props, exist, xbt_strdup("250"), xbt_free_f);
-