Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Give a way to C users to not leak activities in activityset
[simgrid.git] / examples / c / activityset-waitall / activityset-waitall.c
1 /* Copyright (c) 2010-2023. The SimGrid Team. All rights reserved.          */
2
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. */
5
6 #include "simgrid/activity_set.h"
7 #include "simgrid/actor.h"
8 #include "simgrid/comm.h"
9 #include "simgrid/engine.h"
10 #include "simgrid/exec.h"
11 #include "simgrid/host.h"
12 #include "simgrid/mailbox.h"
13
14 #include "xbt/log.h"
15 #include "xbt/sysdep.h"
16
17 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_activity_waitall, "Messages specific for this s4u example");
18
19 static void bob()
20 {
21   XBT_INFO("Create my asynchronous activities");
22   sg_exec_t exec = sg_actor_exec_init(5e9);
23   sg_exec_start(exec);
24
25   sg_mailbox_t mbox = sg_mailbox_by_name("mbox");
26   void* payload     = NULL;
27   sg_comm_t comm    = sg_mailbox_get_async(mbox, &payload);
28
29   sg_activity_set_t pending_activities = sg_activity_set_init();
30   sg_activity_set_push(pending_activities, (sg_activity_t)exec);
31   sg_activity_set_push(pending_activities, (sg_activity_t)comm);
32
33   XBT_INFO("Wait for asynchronous activities to complete, all in one shot.");
34   sg_activity_set_wait_all(pending_activities);
35   sg_activity_unref((sg_activity_t)exec);
36   sg_activity_unref((sg_activity_t)comm);
37
38   XBT_INFO("All activities are completed.");
39   free(payload);
40 }
41
42 static void alice()
43 {
44   char* payload = xbt_strdup("Message");
45   XBT_INFO("Send '%s'", payload);
46   sg_mailbox_put(sg_mailbox_by_name("mbox"), payload, 6e8);
47 }
48
49 int main(int argc, char* argv[])
50 {
51   simgrid_init(&argc, argv);
52   xbt_assert(argc > 1,
53              "Usage: %s platform_file\n"
54              "\tExample: %s hosts_with_disks.xml\n",
55              argv[0], argv[0]);
56
57   simgrid_load_platform(argv[1]);
58
59   sg_actor_create("alice", sg_host_by_name("alice"), alice, 0, NULL);
60   sg_actor_create("bob", sg_host_by_name("bob"), bob, 0, NULL);
61
62   simgrid_run();
63
64   return 0;
65 }