m_task_t task = NULL;
char *destination = NULL;
- INFO0("Setting process category");
- TRACE_msg_set_process_category(MSG_process_self(), "emigrant", "1 0 0");
MSG_process_sleep(2);
while (1){ // I am an eternal emigrant
MSG_task_receive(&(task), "master_mailbox");
destination = (char*)MSG_task_get_data (task);
if (!destination) break; //there is no destination, die
- INFO1("Migrating to %s", destination);
- MSG_process_change_host(MSG_get_host_by_name(destination));
+ XBT_INFO("Migrating to %s", destination);
+ MSG_process_migrate(MSG_process_self(), MSG_get_host_by_name(destination));
MSG_process_sleep(2); // I am tired, have to sleep for 2 seconds
- xbt_free (destination);
MSG_task_destroy (task);
task = NULL;
}
{
m_task_t task = NULL;
- TRACE_msg_set_process_category(MSG_process_self(), "master", "1 0 0");
-
// I am the master of emigrant process,
// I tell it where it must emigrate to.
- xbt_dynar_t destinations = xbt_dynar_new (sizeof(char*), xbt_free);
+ xbt_dynar_t destinations = xbt_dynar_new (sizeof(char*), &xbt_free_ref);
xbt_dynar_push_as (destinations, char*, xbt_strdup ("Tremblay"));
xbt_dynar_push_as (destinations, char*, xbt_strdup ("Jupiter"));
xbt_dynar_push_as (destinations, char*, xbt_strdup ("Fafard"));
MSG_task_send (task, "master_mailbox");
task = NULL;
}
+ xbt_dynar_free (&destinations);
return 0;
}
/* Argument checking */
MSG_global_init(&argc, argv);
if (argc < 3) {
- CRITICAL1("Usage: %s platform_file deployment_file\n", argv[0]);
- CRITICAL1("example: %s msg_platform.xml msg_deployment_suspend.xml\n",
+ XBT_CRITICAL("Usage: %s platform_file deployment_file\n", argv[0]);
+ XBT_CRITICAL("example: %s msg_platform.xml msg_deployment_suspend.xml\n",
argv[0]);
exit(1);
}
/* Run the simulation */
res = MSG_main();
- INFO1("Simulation time %g", MSG_get_clock());
+ XBT_INFO("Simulation time %g", MSG_get_clock());
if (res == MSG_OK)
res = MSG_clean();