/** * \brief Returns the value of a host property. * \param L a Lua state * \return number of values returned to Lua * * - Argument 1 (host): a host * - Argument 2 (string): name of the property to get * - Return value (string): the value of this property */ static int l_host_get_property_value(lua_State * L) { sg_host_t ht = sglua_check_host(L, 1); const char *prop = luaL_checkstring(L, 2); lua_pushstring(L, sg_host_get_property_value(ht,prop)); return 1; }
const char *name2 = sg_host_get_name(h2); /* Get the property list of 'host1' */ XBT_INFO("Property list for host %s", name1); xbt_dict_t props = sg_host_get_properties(h1); /* Trying to set a new property */ xbt_dict_set(props, "NewProp", strdup("newValue"), NULL); /* 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)"); /* 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); } /* Modify an existing property test. First check it exists */ XBT_INFO("Modify an existing property"); value = sg_host_get_property_value(h2, exist);