1 /* Copyright (c) 2009-2018. The SimGrid Team. All rights reserved. */
3 /* This program is free software; you can redistribute it and/or modify it
4 * under the terms of the license (GNU LGPL) which comes with this package. */
6 #include "simgrid/s4u.hpp"
8 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_test, "Messages specific for this msg example");
12 simgrid::s4u::MailboxPtr mailbox = simgrid::s4u::Mailbox::by_name("mailbox");
13 int pid = simgrid::s4u::this_actor::get_pid();
14 double comm_size = 100000;
15 simgrid::s4u::this_actor::on_exit([](int, void* pid) { XBT_INFO("Process \"%d\" killed.", *(int*)pid); }, &pid);
17 XBT_INFO("Sending pid of \"%d\".", pid);
18 mailbox->put(&pid, comm_size);
19 XBT_INFO("Send of pid \"%d\" done.", pid);
21 simgrid::s4u::this_actor::suspend();
26 simgrid::s4u::MailboxPtr mailbox = simgrid::s4u::Mailbox::by_name("mailbox");
27 for (int i = 0; i < 3; i++) {
28 int* pid = static_cast<int*>(mailbox->get());
29 XBT_INFO("Killing process \"%d\".", *pid);
30 simgrid::s4u::Actor::by_pid(*pid)->kill();
34 int main(int argc, char* argv[])
36 simgrid::s4u::Engine e(&argc, argv);
37 e.load_platform(argv[1]);
39 simgrid::s4u::Actor::kill_all();
41 simgrid::s4u::Actor::create("sendpid", simgrid::s4u::Host::by_name("Tremblay"), sendpid);
42 simgrid::s4u::Actor::create("sendpid", simgrid::s4u::Host::by_name("Tremblay"), sendpid);
43 simgrid::s4u::Actor::create("sendpid", simgrid::s4u::Host::by_name("Tremblay"), sendpid);
44 simgrid::s4u::Actor::create("killall", simgrid::s4u::Host::by_name("Tremblay"), killall);