X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/38f7ddbf61f574a934f191ef2d8358d9f8be1f96..f847ab286b6955e371f08e5536a8fcb83362e714:/teshsuite/s4u/comm-pt2pt/comm-pt2pt.cpp diff --git a/teshsuite/s4u/comm-pt2pt/comm-pt2pt.cpp b/teshsuite/s4u/comm-pt2pt/comm-pt2pt.cpp index 0eebb04af4..07838b53aa 100644 --- a/teshsuite/s4u/comm-pt2pt/comm-pt2pt.cpp +++ b/teshsuite/s4u/comm-pt2pt/comm-pt2pt.cpp @@ -1,4 +1,4 @@ -/* Copyright (c) 2010-2017. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2010-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. */ @@ -16,11 +16,9 @@ XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_test, "Messages specific for this s4u example"); -using namespace simgrid::s4u; - static void usage(const char* binaryName, const char* defaultSend, const char* defaultRecv) { - std::fprintf(stderr, "Usage: %s examples/platforms/cluster.xml \n" + std::fprintf(stderr, "Usage: %s examples/platforms/cluster_backbone.xml \n" "where spec is a list of letters giving the kind of tests you want to see.\n" "Existing sender spec:\n" " r regular send\n" @@ -39,54 +37,53 @@ static void usage(const char* binaryName, const char* defaultSend, const char* d " j irecv on permanent mailbox (after a little delay)\n" " J irecv on permanent mailbox (after a little delay)\n" "\n" - "Example 1: %s examples/platforms/cluster.xml rRiIdD rrrrrr # testing all send functions\n" + "Example 1: %s examples/platforms/cluster_backbone.xml rRiIdD rrrrrr # testing all send functions\n" "Default specs: %s %s (all possible pairs)\n", binaryName, binaryName, defaultSend, defaultRecv); - exit(1); } static void sender(std::vector args) { XBT_INFO("Sender spec: %s", args[0].c_str()); for (unsigned int test = 1; test <= args[0].size(); test++) { - this_actor::sleep_until(test * 5 - 5); - char* mboxName = bprintf("Test #%u", test); - simgrid::s4u::MailboxPtr mbox = simgrid::s4u::Mailbox::byName(mboxName); + simgrid::s4u::this_actor::sleep_until(test * 5 - 5); + std::string* mboxName = new std::string("Test #" + std::to_string(test)); + simgrid::s4u::Mailbox* mbox = simgrid::s4u::Mailbox::by_name(*mboxName); switch (args[0][test - 1]) { case 'r': - XBT_INFO("Test %d: r (regular send)", test); - simgrid::s4u::this_actor::send(mbox, (void*)mboxName, 42.0); + XBT_INFO("Test %u: r (regular send)", test); + mbox->put((void*)mboxName, 42.0); break; case 'R': - XBT_INFO("Test %d: R (sleep + regular send)", test); + XBT_INFO("Test %u: R (sleep + regular send)", test); simgrid::s4u::this_actor::sleep_for(0.5); - simgrid::s4u::this_actor::send(mbox, (void*)mboxName, 42.0); + mbox->put((void*)mboxName, 42.0); break; case 'i': - XBT_INFO("Test %d: i (asynchronous isend)", test); - simgrid::s4u::this_actor::isend(mbox, (void*)mboxName, 42.0)->wait(); + XBT_INFO("Test %u: i (asynchronous isend)", test); + mbox->put_async((void*)mboxName, 42.0)->wait(); break; case 'I': - XBT_INFO("Test %d: I (sleep + isend)", test); + XBT_INFO("Test %u: I (sleep + isend)", test); simgrid::s4u::this_actor::sleep_for(0.5); - simgrid::s4u::this_actor::isend(mbox, (void*)mboxName, 42.0)->wait(); + mbox->put_async((void*)mboxName, 42.0)->wait(); break; case 'd': - XBT_INFO("Test %d: d (detached send)", test); - simgrid::s4u::this_actor::dsend(mbox, (void*)mboxName, 42.0); + XBT_INFO("Test %u: d (detached send)", test); + mbox->put_init((void*)mboxName, 42.0)->detach(); break; case 'D': - XBT_INFO("Test %d: D (sleep + detached send)", test); + XBT_INFO("Test %u: D (sleep + detached send)", test); simgrid::s4u::this_actor::sleep_for(0.5); - simgrid::s4u::this_actor::dsend(mbox, (void*)mboxName, 42.0); + mbox->put_init((void*)mboxName, 42.0)->detach(); break; default: - xbt_die("Unknown sender spec for test %d: '%c'", test, args[0][test - 1]); + xbt_die("Unknown sender spec for test %u: '%c'", test, args[0][test - 1]); } - XBT_INFO("Test %d OK", test); + XBT_INFO("Test %u OK", test); } simgrid::s4u::this_actor::sleep_for(0.5); // FIXME: we should test what happens when the process ends before the end of remote comm instead of hiding it @@ -96,61 +93,60 @@ static void receiver(std::vector args) { XBT_INFO("Receiver spec: %s", args[0].c_str()); for (unsigned int test = 1; test <= args[0].size(); test++) { - this_actor::sleep_until(test * 5 - 5); - char* mboxName = bprintf("Test #%u", test); - simgrid::s4u::MailboxPtr mbox = simgrid::s4u::Mailbox::byName(mboxName); + simgrid::s4u::this_actor::sleep_until(test * 5 - 5); + std::string mboxName = "Test #" + std::to_string(test); + simgrid::s4u::Mailbox* mbox = simgrid::s4u::Mailbox::by_name(mboxName); void* received = nullptr; switch (args[0][test - 1]) { case 'r': - XBT_INFO("Test %d: r (regular receive)", test); - received = simgrid::s4u::this_actor::recv(mbox); + XBT_INFO("Test %u: r (regular receive)", test); + received = mbox->get(); break; case 'R': - XBT_INFO("Test %d: R (sleep + regular receive)", test); + XBT_INFO("Test %u: R (sleep + regular receive)", test); simgrid::s4u::this_actor::sleep_for(0.5); - received = simgrid::s4u::this_actor::recv(mbox); + received = mbox->get(); break; case 'i': - XBT_INFO("Test %d: i (asynchronous irecv)", test); - simgrid::s4u::this_actor::irecv(mbox, &received)->wait(); + XBT_INFO("Test %u: i (asynchronous irecv)", test); + mbox->get_async(&received)->wait(); break; case 'I': - XBT_INFO("Test %d: I (sleep + asynchronous irecv)", test); + XBT_INFO("Test %u: I (sleep + asynchronous irecv)", test); simgrid::s4u::this_actor::sleep_for(0.5); - simgrid::s4u::this_actor::irecv(mbox, &received)->wait(); + mbox->get_async(&received)->wait(); break; case 'p': - XBT_INFO("Test %d: p (regular receive on permanent mailbox)", test); - mbox->setReceiver(Actor::self()); - received = simgrid::s4u::this_actor::recv(mbox); + XBT_INFO("Test %u: p (regular receive on permanent mailbox)", test); + mbox->set_receiver(simgrid::s4u::Actor::self()); + received = mbox->get(); break; case 'P': - XBT_INFO("Test %d: P (sleep + regular receive on permanent mailbox)", test); + XBT_INFO("Test %u: P (sleep + regular receive on permanent mailbox)", test); simgrid::s4u::this_actor::sleep_for(0.5); - mbox->setReceiver(Actor::self()); - received = simgrid::s4u::this_actor::recv(mbox); + mbox->set_receiver(simgrid::s4u::Actor::self()); + received = mbox->get(); break; case 'j': - XBT_INFO("Test %d: j (irecv on permanent mailbox)", test); - mbox->setReceiver(Actor::self()); - simgrid::s4u::this_actor::irecv(mbox, &received)->wait(); + XBT_INFO("Test %u: j (irecv on permanent mailbox)", test); + mbox->set_receiver(simgrid::s4u::Actor::self()); + mbox->get_async(&received)->wait(); break; case 'J': - XBT_INFO("Test %d: J (sleep + irecv on permanent mailbox)", test); + XBT_INFO("Test %u: J (sleep + irecv on permanent mailbox)", test); simgrid::s4u::this_actor::sleep_for(0.5); - mbox->setReceiver(Actor::self()); - simgrid::s4u::this_actor::irecv(mbox, &received)->wait(); + mbox->set_receiver(simgrid::s4u::Actor::self()); + mbox->get_async(&received)->wait(); break; default: - xbt_die("Unknown receiver spec for test %d: '%c'", test, args[0][test - 1]); + xbt_die("Unknown receiver spec for test %u: '%c'", test, args[0][test - 1]); } - - xbt_assert(strcmp(static_cast(received), mboxName) == 0); - xbt_free(received); - xbt_free(mboxName); - XBT_INFO("Test %d OK", test); + std::string* receivedStr = static_cast(received); + xbt_assert(*receivedStr == mboxName); + delete receivedStr; + XBT_INFO("Test %u OK", test); } simgrid::s4u::this_actor::sleep_for(0.5); } @@ -167,11 +163,13 @@ int main(int argc, char* argv[]) std::vector argSend{specSend.c_str()}; std::vector argRecv{specRecv.c_str()}; - simgrid::s4u::Engine* e = new simgrid::s4u::Engine(&argc, argv); - if (argc < 2) + simgrid::s4u::Engine e(&argc, argv); + if (argc < 2) { usage(argv[0], specSend.c_str(), specRecv.c_str()); + return 1; + } - e->loadPlatform(argv[1]); + e.load_platform(argv[1]); if (argc >= 3) { argSend.clear(); @@ -183,13 +181,13 @@ int main(int argc, char* argv[]) } xbt_assert(argSend.front().size() == argRecv.front().size(), "Sender and receiver spec must be of the same size"); - simgrid::s4u::Host** hosts = sg_host_list(); - simgrid::s4u::Actor::createActor("sender", hosts[0], sender, argSend); - simgrid::s4u::Actor::createActor("recver", hosts[1], receiver, argRecv); - xbt_free(hosts); + std::vector hosts = e.get_all_hosts(); + + simgrid::s4u::Actor::create("sender", hosts[0], sender, argSend); + simgrid::s4u::Actor::create("recver", hosts[1], receiver, argRecv); - e->run(); - XBT_INFO("Simulation time %g", e->getClock()); + e.run(); + XBT_INFO("Simulation time %g", e.get_clock()); return 0; }