+MSG_error_t MSG_parallel_task_execute(m_task_t task)
+{
+ simdata_task_t simdata = NULL;
+ m_process_t self = MSG_process_self();
+ CHECK_HOST();
+
+ simdata = task->simdata;
+
+ xbt_assert0((!simdata->compute)
+ && (task->simdata->isused == 0),
+ "This task is executed somewhere else. Go fix your code!");
+
+ xbt_assert0(simdata->host_nb,
+ "This is not a parallel task. Go to hell.");
+
+ DEBUG1("Parallel computing on %s", MSG_process_self()->simdata->m_host->name);
+
+ simdata->isused=1;
+
+ simdata->compute =
+ SIMIX_req_host_parallel_execute(task->name, simdata->host_nb,
+ simdata->host_list,
+ simdata->comp_amount,
+ simdata->comm_amount, 1.0, -1.0);
+ DEBUG1("Parallel execution action created: %p", simdata->compute);
+
+ self->simdata->waiting_action = simdata->compute;
+ SIMIX_req_host_execution_wait(simdata->compute);
+ self->simdata->waiting_action = NULL;
+
+ DEBUG2("Finished waiting for execution of action %p, state = %d", simdata->compute, SIMIX_req_host_execution_get_state(task->simdata->compute));
+
+ simdata->isused=0;
+
+ if (SIMIX_req_host_execution_get_state(task->simdata->compute) == SIMIX_DONE) {
+ /* action ended, set comm and compute = NULL, the actions is already destroyed in the main function */
+ SIMIX_req_host_execution_destroy(task->simdata->compute);
+ simdata->computation_amount = 0.0;
+ simdata->comm = NULL;
+ simdata->compute = NULL;
+ MSG_RETURN(MSG_OK);
+ } else if (SIMIX_req_host_get_state(SIMIX_host_self()) == 0) {
+ /* action ended, set comm and compute = NULL, the actions is already destroyed in the main function */
+ SIMIX_req_host_execution_destroy(task->simdata->compute);
+ simdata->comm = NULL;
+ simdata->compute = NULL;
+ MSG_RETURN(MSG_HOST_FAILURE);
+ } else {
+ /* action ended, set comm and compute = NULL, the actions is already destroyed in the main function */
+ SIMIX_req_host_execution_destroy(task->simdata->compute);
+ simdata->comm = NULL;
+ simdata->compute = NULL;
+ MSG_RETURN(MSG_TASK_CANCELLED);
+ }
+}
+
+