X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/3cb7565abeaa2a0e48daac342e7e2291c5a98138..16925d4563b0fd3a17dc7c05f91c9439e6fb2462:/teshsuite/simdag/flatifier/flatifier.cpp diff --git a/teshsuite/simdag/flatifier/flatifier.cpp b/teshsuite/simdag/flatifier/flatifier.cpp index 4a68e5e64b..338f43b87f 100644 --- a/teshsuite/simdag/flatifier/flatifier.cpp +++ b/teshsuite/simdag/flatifier/flatifier.cpp @@ -1,202 +1,228 @@ -/* Copyright (c) 2008-2015. The SimGrid Team. - * All rights reserved. */ +/* Copyright (c) 2008-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 "src/surf/network_interface.hpp" +#include + +#include "simgrid/kernel/routing/NetPoint.hpp" +#include "simgrid/s4u/Engine.hpp" +#include "simgrid/s4u/Host.hpp" #include "simgrid/simdag.h" -#include "xbt/xbt_os_time.h" +#include "src/surf/network_interface.hpp" -XBT_LOG_NEW_DEFAULT_CATEGORY(flatifier, "Logging specific to this platform parsing tool"); +#include -static int name_compare_hosts(const void *n1, const void *n2) -{ - return strcmp(sg_host_get_name(*(sg_host_t *) n1), sg_host_get_name(*(sg_host_t *) n2)); -} - -static int name_compare_links(const void *n1, const void *n2) -{ - return strcmp(sg_link_name(*(SD_link_t *) n1),sg_link_name(*(SD_link_t *) n2)); -} +XBT_LOG_NEW_DEFAULT_CATEGORY(flatifier, "Logging specific to this platform parsing tool"); -static int parse_cmdline(int *timings, char **platformFile, int argc, char **argv) +static bool parse_cmdline(int* timings, char** platformFile, int argc, char** argv) { - int wrong_option = 0; + bool parse_ok = true; for (int i = 1; i < argc; i++) { - if (strlen(argv[i]) > 1 && argv[i][0] == '-' && argv[i][1] == '-') { - if (!strcmp(argv[i], "--timings")) { + if (std::strlen(argv[i]) > 1 && argv[i][0] == '-' && argv[i][1] == '-') { + if (not std::strcmp(argv[i], "--timings")) { *timings = 1; } else { - wrong_option = 1; - break; + parse_ok = false; + break; } } else { *platformFile = argv[i]; } } - return wrong_option; + return parse_ok; } static void create_environment(xbt_os_timer_t parse_time, const char *platformFile) { - try { - xbt_os_cputimer_start(parse_time); - SD_create_environment(platformFile); - xbt_os_cputimer_stop(parse_time); - } - catch (std::exception& e) { - xbt_die("Error while loading %s: %s", platformFile, e.what()); + xbt_os_cputimer_start(parse_time); + SD_create_environment(platformFile); + xbt_os_cputimer_stop(parse_time); +} + +static void dump_hosts() +{ + unsigned int totalHosts = sg_host_count(); + sg_host_t* hosts = sg_host_list(); + std::sort(hosts, hosts + totalHosts, + [](sg_host_t a, sg_host_t b) { return strcmp(sg_host_get_name(a), sg_host_get_name(b)) < 0; }); + + for (unsigned int i = 0; i < totalHosts; i++) { + std::printf(" get_cname(), sg_host_speed(hosts[i])); + const std::unordered_map* props = hosts[i]->get_properties(); + if (hosts[i]->get_core_count() > 1) { + std::printf(" core=\"%d\"", hosts[i]->get_core_count()); + } + // Sort the properties before displaying them, so that the tests are perfectly reproducible + std::vector keys; + for (auto const& kv : *props) + keys.push_back(kv.first); + if (not keys.empty()) { + std::printf(">\n"); + std::sort(keys.begin(), keys.end()); + for (const std::string& key : keys) + std::printf(" \n", key.c_str(), props->at(key).c_str()); + std::printf(" \n"); + } else { + std::printf("/>\n"); + } } + xbt_free(hosts); } -int main(int argc, char **argv) +static void dump_links() { - char *platformFile = nullptr; - int timings=0; - int version = 4; - unsigned int i; - xbt_dict_t props = nullptr; - xbt_dict_cursor_t cursor = nullptr; - xbt_lib_cursor_t cursor_src = nullptr; - xbt_lib_cursor_t cursor_dst = nullptr; - char *src,*dst,*key,*data; - sg_netcard_t value1; - sg_netcard_t value2; + unsigned int totalLinks = sg_link_count(); + simgrid::s4u::Link** links = sg_link_list(); - xbt_os_timer_t parse_time = xbt_os_timer_new(); + std::sort(links, links + totalLinks, + [](simgrid::s4u::Link* a, simgrid::s4u::Link* b) { return strcmp(sg_link_name(a), sg_link_name(b)) < 0; }); - SD_init(&argc, argv); + for (unsigned int i = 0; i < totalLinks; i++) { + simgrid::s4u::Link* link = links[i]; + std::printf(" get_cname(), link->get_bandwidth(), link->get_latency()); + if (sg_link_is_shared(link)) { + std::printf("/>\n"); + } else { + std::printf(" sharing_policy=\"FATPIPE\"/>\n"); + } } - XBT_DEBUG("%d,%s", timings, platformFile); + xbt_free(links); +} - create_environment(parse_time, platformFile); +static void dump_routers() +{ + std::vector netpoints = + simgrid::s4u::Engine::get_instance()->get_all_netpoints(); + std::sort(netpoints.begin(), netpoints.end(), + [](simgrid::kernel::routing::NetPoint* a, simgrid::kernel::routing::NetPoint* b) { + return a->get_name() < b->get_name(); + }); + + for (auto const& src : netpoints) + if (src->is_router()) + std::printf(" \n", src->get_cname()); +} - if (timings) { - XBT_INFO("Parsing time: %fs (%zu hosts, %d links)", xbt_os_timer_elapsed(parse_time), - sg_host_count(), sg_link_count()); - } else { - printf("\n"); - printf("\n"); - printf("\n", version); - printf("\n"); - - // Hosts - unsigned int totalHosts = sg_host_count(); - sg_host_t *hosts = sg_host_list(); - qsort((void *) hosts, totalHosts, sizeof(sg_host_t), name_compare_hosts); - - for (i = 0; i < totalHosts; i++) { - printf(" coresCount()>1) { - printf(" core=\"%d\"", hosts[i]->coresCount()); +static void dump_routes() +{ + unsigned int totalHosts = sg_host_count(); + sg_host_t* hosts = sg_host_list(); + std::sort(hosts, hosts + totalHosts, + [](sg_host_t a, sg_host_t b) { return strcmp(sg_host_get_name(a), sg_host_get_name(b)) < 0; }); + std::vector netpoints = + simgrid::s4u::Engine::get_instance()->get_all_netpoints(); + std::sort(netpoints.begin(), netpoints.end(), + [](simgrid::kernel::routing::NetPoint* a, simgrid::kernel::routing::NetPoint* b) { + return a->get_name() < b->get_name(); + }); + + for (unsigned int it_src = 0; it_src < totalHosts; it_src++) { // Routes from host + const simgrid::s4u::Host* host1 = hosts[it_src]; + simgrid::kernel::routing::NetPoint* src = host1->get_netpoint(); + for (unsigned int it_dst = 0; it_dst < totalHosts; it_dst++) { // Routes to host + const simgrid::s4u::Host* host2 = hosts[it_dst]; + std::vector route; + simgrid::kernel::routing::NetPoint* dst = host2->get_netpoint(); + simgrid::kernel::routing::NetZoneImpl::get_global_route(src, dst, route, nullptr); + if (not route.empty()) { + std::printf(" \n ", host1->get_cname(), host2->get_cname()); + for (auto const& link : route) + std::printf("", link->get_cname()); + std::printf("\n \n"); } - if (props && !xbt_dict_is_empty(props)) { - printf(">\n"); - xbt_dict_foreach(props, cursor, key, data) { - printf(" \n", key, data); - } - printf(" \n"); - } else { - printf("/>\n"); + } + + for (auto const& dst : netpoints) { // to router + if (dst->is_router()) { + std::printf(" \n ", host1->get_cname(), dst->get_cname()); + std::vector route; + simgrid::kernel::routing::NetZoneImpl::get_global_route(src, dst, route, nullptr); + for (auto const& link : route) + std::printf("", link->get_cname()); + std::printf("\n \n"); } } + } - // Routers - xbt_lib_foreach(as_router_lib, cursor_src, key, value1) { - value1 = (sg_netcard_t)xbt_lib_get_or_null(as_router_lib, key, ROUTING_ASR_LEVEL); - if(value1->isRouter()) { - printf(" \n",key); + for (auto const& value1 : netpoints) { // Routes from router + if (value1->is_router()) { + for (auto const& value2 : netpoints) { // to router + if (value2->is_router()) { + std::printf(" \n ", value1->get_cname(), value2->get_cname()); + std::vector route; + simgrid::kernel::routing::NetZoneImpl::get_global_route(value1, value2, route, nullptr); + for (auto const& link : route) + std::printf("", link->get_cname()); + std::printf("\n \n"); + } + } + for (unsigned int it_dst = 0; it_dst < totalHosts; it_dst++) { // Routes to host + const simgrid::s4u::Host* host2 = hosts[it_dst]; + std::printf(" \n ", value1->get_cname(), host2->get_cname()); + std::vector route; + simgrid::kernel::routing::NetPoint* netcardDst = host2->get_netpoint(); + simgrid::kernel::routing::NetZoneImpl::get_global_route(value1, netcardDst, route, nullptr); + for (auto const& link : route) + std::printf("", link->get_cname()); + std::printf("\n \n"); } } + } + xbt_free(hosts); +} - // Links - unsigned int totalLinks = sg_link_count(); - SD_link_t *links = sg_link_list(); +static void dump_platform() +{ + int version = 4; - qsort((void *) links, totalLinks, sizeof(SD_link_t), name_compare_links); + std::printf("\n"); + std::printf("\n"); + std::printf("\n", version); + std::printf("\n"); - for (i = 0; i < totalLinks; i++) { - printf(" \n"); - } else { - printf(" sharing_policy=\"FATPIPE\"/>\n"); - } - } + // Routers + dump_routers(); - sg_host_t host1, host2; - xbt_dict_foreach(host_list, cursor_src, src, host1){ // Routes from host - value1 = sg_host_by_name(src)->pimpl_netcard; - xbt_dict_foreach(host_list, cursor_dst, dst, host2){ //to host - std::vector *route = new std::vector(); - value2 = sg_host_by_name(dst)->pimpl_netcard; - routing_platf->getRouteAndLatency(value1, value2, route,nullptr); - if (! route->empty()){ - printf(" \n ", src, dst); - for (auto link: *route) - printf("",link->getName()); - printf("\n \n"); - } - delete route; - } - xbt_lib_foreach(as_router_lib, cursor_dst, dst, value2){ //to router - value2 = (sg_netcard_t)xbt_lib_get_or_null(as_router_lib,dst,ROUTING_ASR_LEVEL); - if(value2->isRouter()){ - printf(" \n ", src, dst); - std::vector *route = new std::vector(); - routing_platf->getRouteAndLatency((sg_netcard_t)value1,(sg_netcard_t)value2,route,nullptr); - for (auto link : *route) - printf("",link->getName()); - delete route; - printf("\n \n"); - } - } - } + // Links + dump_links(); - xbt_lib_foreach(as_router_lib, cursor_src, src, value1){ // Routes from router - value1 = (sg_netcard_t)xbt_lib_get_or_null(as_router_lib,src,ROUTING_ASR_LEVEL); - if (value1->isRouter()){ - xbt_lib_foreach(as_router_lib, cursor_dst, dst, value2){ //to router - value2 = (sg_netcard_t)xbt_lib_get_or_null(as_router_lib,dst,ROUTING_ASR_LEVEL); - if(value2->isRouter()){ - printf(" \n ", src, dst); - std::vector *route = new std::vector(); - routing_platf->getRouteAndLatency((sg_netcard_t)value1,(sg_netcard_t)value2,route,nullptr); - for(auto link :*route) - printf("",link->getName()); - delete route; - printf("\n \n"); - } - } - xbt_dict_foreach(host_list, cursor_dst, dst, value2){ //to host - printf(" \n ",src, dst); - std::vector *route = new std::vector(); - value2 = sg_host_by_name(dst)->pimpl_netcard; - routing_platf->getRouteAndLatency((sg_netcard_t)value1,(sg_netcard_t)value2,route, nullptr); - for(auto link : *route) - printf("",link->getName()); - delete route; - printf("\n \n"); - } - } - } + // Routes + dump_routes(); + + std::printf("\n"); + std::printf("\n"); +} + +int main(int argc, char** argv) +{ + char* platformFile = nullptr; + int timings = 0; + + xbt_os_timer_t parse_time = xbt_os_timer_new(); + + SD_init(&argc, argv); - printf("\n"); - printf("\n"); - free(hosts); - free(links); + if (not parse_cmdline(&timings, &platformFile, argc, argv) || not platformFile) + xbt_die("Invalid command line arguments: expected [--timings] platformFile"); + + XBT_DEBUG("%d,%s", timings, platformFile); + + create_environment(parse_time, platformFile); + + if (timings) { + XBT_INFO("Parsing time: %fs (%zu hosts, %d links)", xbt_os_timer_elapsed(parse_time), sg_host_count(), + sg_link_count()); + } else { + dump_platform(); } - SD_exit(); xbt_os_timer_free(parse_time); return 0;