+void dump_platform_storages(void){
+ unsigned int cursor;
+ xbt_dynar_t storages = MSG_storages_as_dynar();
+ msg_storage_t storage;
+ xbt_dynar_foreach(storages, cursor, storage){
+ XBT_INFO("Storage %s is attached to %s", MSG_storage_get_name(storage), MSG_storage_get_host(storage));
+ MSG_storage_set_property_value(storage, "other usage", xbt_strdup("gpfs"), xbt_free_f);
+ }
+ xbt_dynar_free(&storages);
+}
+