X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a2ba3fbf10cecf8ac1da9bd7fb8d3deaf53a900e..30e3072c3212f02886f67c451e27bbb76b2b1add:/src/simgrid/host.cpp diff --git a/src/simgrid/host.cpp b/src/simgrid/host.cpp index f3954fcd37..70e54c4256 100644 --- a/src/simgrid/host.cpp +++ b/src/simgrid/host.cpp @@ -4,19 +4,45 @@ /* 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 "xbt/dict.h" #include "simgrid/host.h" #include #include +#include "src/kernel/routing/NetCard.hpp" #include "src/surf/HostImpl.hpp" -#include "surf/surf.h" // routing_get_network_element_type FIXME:killme XBT_LOG_NEW_DEFAULT_SUBCATEGORY(sg_host, sd, "Logging specific to sg_hosts"); +extern std::unordered_map + host_list; // FIXME: don't duplicate the content of s4u::Host this way + +void sg_host_exit() +{ + /* copy all names to not modify the map while iterating over it. + * + * Plus, the hosts are destroyed in the lexicographic order to ensure + * that the output is reproducible: we don't want to kill them in the + * pointer order as it could be platform-dependent, which would break + * the tests. + */ + std::vector names = std::vector(); + for (auto kv : host_list) + names.push_back(kv.second->name()); + + std::sort(names.begin(), names.end()); + + for (auto name : names) + host_list.at(name)->destroy(); + + // host_list.clear(); This would be sufficient if the dict would contain smart_ptr. It's now useless +} + size_t sg_host_count() { - return xbt_dict_length(host_list); + return host_list.size(); } /** @brief Returns the host list * @@ -28,14 +54,14 @@ size_t sg_host_count() * internally). * \see sg_host_count() */ -sg_host_t *sg_host_list(void) { +sg_host_t *sg_host_list() { xbt_assert(sg_host_count() > 0, "There is no host!"); return (sg_host_t*)xbt_dynar_to_array(sg_hosts_as_dynar()); } const char *sg_host_get_name(sg_host_t host) { - return host->name().c_str(); + return host->cname(); } void* sg_host_extension_get(sg_host_t host, size_t ext) @@ -53,21 +79,22 @@ sg_host_t sg_host_by_name(const char *name) return simgrid::s4u::Host::by_name_or_null(name); } -sg_host_t sg_host_by_name_or_create(const char *name) +static int hostcmp_voidp(const void* pa, const void* pb) { - return simgrid::s4u::Host::by_name_or_create(name); + return strcmp((*static_cast(pa))->name().c_str(), + (*static_cast(pb))->name().c_str()); } -xbt_dynar_t sg_hosts_as_dynar(void) +xbt_dynar_t sg_hosts_as_dynar() { xbt_dynar_t res = xbt_dynar_new(sizeof(sg_host_t),nullptr); - xbt_dict_cursor_t cursor = nullptr; - const char* name = nullptr; - simgrid::s4u::Host* host = nullptr; - xbt_dict_foreach(host_list, cursor, name, host) + for (auto kv : host_list) { + simgrid::s4u::Host* host = kv.second; if (host && host->pimpl_netcard && host->pimpl_netcard->isHost()) xbt_dynar_push(res, &host); + } + xbt_dynar_sort(res, hostcmp_voidp); return res; } @@ -96,23 +123,18 @@ void sg_host_msg_set(sg_host_t host, msg_host_priv_t smx_host) { } // ========== Simix layer ============= +#include "src/simix/smx_host_private.h" smx_host_priv_t sg_host_simix(sg_host_t host){ - return (smx_host_priv_t) host->extension(SIMIX_HOST_LEVEL); -} -void sg_host_simix_set(sg_host_t host, smx_host_priv_t smx_host) { - host->extension_set(SIMIX_HOST_LEVEL, smx_host); -} -void sg_host_simix_destroy(sg_host_t host) { - host->extension_set(SIMIX_HOST_LEVEL, nullptr); + return host->extension(); } // ========= storage related functions ============ xbt_dict_t sg_host_get_mounted_storage_list(sg_host_t host){ - return host->extension()->getMountedStorageList(); + return host->pimpl_->getMountedStorageList(); } xbt_dynar_t sg_host_get_attached_storage_list(sg_host_t host){ - return host->extension()->getAttachedStorageList(); + return host->pimpl_->getAttachedStorageList(); } @@ -176,10 +198,10 @@ void sg_host_dump(sg_host_t host) xbt_dict_cursor_t cursor=nullptr; char *key,*data; - XBT_INFO("Displaying host %s", sg_host_get_name(host)); + XBT_INFO("Displaying host %s", host->cname()); XBT_INFO(" - speed: %.0f", host->speed()); XBT_INFO(" - available speed: %.2f", sg_host_get_available_speed(host)); - props = sg_host_get_properties(host); + props = host->properties(); if (!xbt_dict_is_empty(props)){ XBT_INFO(" - properties:");