long slaves_count = atol(argv[4]);
//setting the variable "is_master" (previously declared) to value 1
- TRACE_host_variable_set(MSG_host_self()->name, "is_master", 1);
+ TRACE_host_variable_set(MSG_host_get_name(MSG_host_self()), "is_master", 1);
TRACE_mark("msmark", "start_send_tasks");
int i;
task = MSG_task_create("task", task_comp_size, task_comm_size, NULL);
//setting the variable "task_creation" to value i
- TRACE_host_variable_set(MSG_host_self()->name, "task_creation", i);
+ TRACE_host_variable_set(MSG_host_get_name(MSG_host_self()), "task_creation", i);
//setting the category of task to "compute"
//the category of a task must be defined before it is sent or executed
- TRACE_msg_set_task_category(task, "compute");
+ MSG_task_set_category(task, "compute");
MSG_task_send(task, "master_mailbox");
}
TRACE_mark("msmark", "finish_send_tasks");
for (i = 0; i < slaves_count; i++) {
m_task_t finalize = MSG_task_create("finalize", 0, 0, 0);
- TRACE_msg_set_task_category(finalize, "finalize");
+ MSG_task_set_category(finalize, "finalize");
MSG_task_send(finalize, "master_mailbox");
}
{
m_task_t task = NULL;
- TRACE_host_variable_set(MSG_host_self()->name, "is_slave", 1);
+ TRACE_host_variable_set(MSG_host_get_name(MSG_host_self()), "is_slave", 1);
+ TRACE_host_variable_set(MSG_host_get_name(MSG_host_self()),
+ "task_computation",
+ 0);
while (1) {
MSG_task_receive(&(task), "master_mailbox");
}
//adding the value returned by MSG_task_get_compute_duration(task)
//to the variable "task_computation"
- TRACE_host_variable_add(MSG_host_self()->name,
+ TRACE_host_variable_add(MSG_host_get_name(MSG_host_self()),
"task_computation",
MSG_task_get_compute_duration(task));
MSG_task_execute(task);
MSG_launch_application(deployment_file);
MSG_main();
+
+ unsigned int cursor;
+ xbt_dynar_t categories = TRACE_get_categories ();
+ if (categories){
+ XBT_INFO ("Declared tracing categories:");
+ char *category;
+ xbt_dynar_foreach (categories, cursor, category){
+ XBT_INFO ("%s", category);
+ }
+ xbt_dynar_free (&categories);
+ }
+
+ xbt_dynar_t marks = TRACE_get_marks ();
+ if (marks){
+ XBT_INFO ("Declared marks:");
+ char *mark;
+ xbt_dynar_foreach (marks, cursor, mark){
+ XBT_INFO ("%s", mark);
+ }
+ xbt_dynar_free (&marks);
+ }
+
MSG_clean();
return 0;
} /* end_of_main */