1 /* Copyright (c) 2007, 2008, 2009, 2010. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
11 #include "xbt/asserts.h"
13 XBT_LOG_NEW_DEFAULT_CATEGORY(msg_test,
14 "Messages specific for this msg example");
16 int master(int argc, char *argv[]);
17 int slave(int argc, char *argv[]);
18 MSG_error_t test_all(const char *platform_file, const char *application_file);
25 //keep a pointer to all surf running tasks.
28 double start_time, end_time, elapsed_time;
29 double gl_data_size[NTASKS];
30 m_task_t gl_task_array[NTASKS];
31 const char *slavenames[NTASKS];
32 const char *masternames[NTASKS];
33 int gl_task_array_id = 0;
35 #define FINALIZE ((void*)221297) /* a magic number to tell people to stop working */
38 int master(int argc, char *argv[])
40 char *slavename = NULL;
41 double task_comm_size = 0;
45 //unique id to control statistics
49 INFO1("Strange number of arguments expected 3 got %d", argc - 1);
53 xbt_assert1(sscanf(argv[1], "%lg", &task_comm_size),
54 "Invalid argument %s\n", argv[1]);
59 sprintf(id_alias, "%d", id);
60 slavenames[id] = slavename;
62 TRACE_category (slavename);
64 masternames[id] = MSG_host_get_name(MSG_host_self());
66 { /* Task creation. */
67 char sprintf_buffer[64] = "Task_0";
68 todo = MSG_task_create(sprintf_buffer, 0, task_comm_size, NULL);
69 TRACE_msg_set_task_category(todo,slavename);
70 //keep track of running tasks
71 gl_task_array[id] = todo;
72 gl_data_size[id] = task_comm_size;
75 { /* Process organisation */
76 slave = MSG_get_host_by_name(slavename);
79 /* time measurement */
80 start_time = MSG_get_clock();
81 MSG_task_send(todo, id_alias);
82 end_time = MSG_get_clock();
86 INFO3("Send completed (to %s). Transfer time: %f\t Agregate bandwidth: %f",
87 slave->name, (end_time - start_time),
88 task_comm_size / (end_time - start_time));
89 INFO2("Completed peer: %s time: %f", slave->name, (end_time - start_time));
94 /** Receiver function */
95 int slave(int argc, char *argv[])
101 double remaining = 0;
105 INFO1("Strange number of arguments expected 1 got %d", argc - 1);
109 sprintf(id_alias, "%d", id);
111 a = MSG_task_receive(&(task), id_alias);
114 INFO0("Hey?! What's up?");
115 xbt_assert0(0, "Unexpected behavior.");
118 elapsed_time = MSG_get_clock() - start_time;
122 for (id = 0; id < NTASKS; id++) {
123 if (gl_task_array[id] == NULL) {
124 } else if (gl_task_array[id] == task) {
126 ("===> Estimated Bw of FLOW[%d] : %f ; message from %s to %s with remaining : %f",
127 id, gl_data_size[id] / elapsed_time, masternames[id],
128 slavenames[id], 0.0);
130 remaining = MSG_task_get_remaining_communication(gl_task_array[id]);
132 ("===> Estimated Bw of FLOW[%d] : %f ; message from %s to %s with remaining : %f",
133 id, (gl_data_size[id] - remaining) / elapsed_time, masternames[id],
134 slavenames[id], remaining);
139 MSG_task_destroy(task);
144 MSG_error_t test_all(const char *platform_file, const char *application_file)
146 MSG_error_t res = MSG_OK;
148 /* MSG_config("workstation/model", "GTNETS"); */
149 /* MSG_config("workstation/model","KCCFLN05"); */
150 { /* Simulation setting */
151 MSG_set_channel_number(MAX_CHANNEL);
152 MSG_create_environment(platform_file);
154 { /* Application deployment */
155 MSG_function_register("master", master);
156 MSG_function_register("slave", slave);
157 MSG_launch_application(application_file);
161 } /* end_of_test_all */
164 int main(int argc, char *argv[])
166 MSG_error_t res = MSG_OK;
169 TRACE_start ("z_gtnets.trace");
171 MSG_global_init(&argc, argv);
173 printf("Usage: %s platform_file deployment_file\n", argv[0]);
176 res = test_all(argv[1], argv[2]);