1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
/* Copyright (c) 2010-2018. 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. */
/******************** Non-deterministic message ordering *********************/
/* Server assumes a fixed order in the reception of messages from its clients */
/* which is incorrect because the message ordering is non-deterministic */
/******************************************************************************/
#include <simgrid/msg.h>
#include <simgrid/modelchecker.h>
#define N 3
XBT_LOG_NEW_DEFAULT_CATEGORY(example, "this example");
static int server(int argc, char *argv[])
{
msg_task_t task = NULL;
int count = 0;
while (count < N) {
if (task) {
MSG_task_destroy(task);
task = NULL;
}
MSG_task_receive(&task, "mymailbox");
count++;
}
int value_got = xbt_str_parse_int(MSG_task_get_name(task), "Task names must be integers, not '%s'");
MC_assert(value_got == 3);
XBT_INFO("OK");
return 0;
}
static int client(int argc, char *argv[])
{
msg_task_t task = MSG_task_create(argv[1], 0 /*comp cost */ , 10000 /*comm size */ , NULL /*arbitrary data */ );
MSG_task_send(task, "mymailbox");
XBT_INFO("Sent!");
return 0;
}
int main(int argc, char *argv[])
{
MSG_init(&argc, argv);
MSG_create_environment("platform.xml");
MSG_function_register("server", server);
MSG_function_register("client", client);
MSG_launch_application("deploy_bugged1.xml");
MSG_main();
return 0;
}
|
