+void SIMIX_host_execution_set_priority(smx_action_t action, double priority)
+{
+ if(action->execution.surf_exec)
+ surf_workstation_model->set_priority(action->execution.surf_exec, priority);
+}
+
+void SIMIX_pre_host_execution_wait(smx_simcall_t simcall)
+{
+ smx_action_t action = simcall->host_execution_wait.execution;
+
+ XBT_DEBUG("Wait for execution of action %p, state %d", action, (int)action->state);
+
+ /* Associate this simcall to the action */
+ xbt_fifo_push(action->simcalls, simcall);
+ simcall->issuer->waiting_action = action;
+
+ /* set surf's action */
+ if (MC_IS_ENABLED) {
+ action->state = SIMIX_DONE;
+ SIMIX_execution_finish(action);
+ return;
+ }
+
+ /* If the action is already finished then perform the error handling */
+ if (action->state != SIMIX_RUNNING)
+ SIMIX_execution_finish(action);
+}
+
+void SIMIX_host_execution_suspend(smx_action_t action)
+{
+ if(action->execution.surf_exec)
+ surf_workstation_model->suspend(action->execution.surf_exec);
+}
+
+void SIMIX_host_execution_resume(smx_action_t action)
+{
+ if(action->execution.surf_exec)
+ surf_workstation_model->resume(action->execution.surf_exec);
+}
+
+void SIMIX_execution_finish(smx_action_t action)
+{
+ xbt_fifo_item_t item;
+ smx_simcall_t simcall;
+
+ xbt_fifo_foreach(action->simcalls, item, simcall, smx_simcall_t) {
+
+ switch (action->state) {
+
+ case SIMIX_DONE:
+ /* do nothing, action done */
+ XBT_DEBUG("SIMIX_execution_finished: execution successful");
+ break;
+
+ case SIMIX_FAILED:
+ XBT_DEBUG("SIMIX_execution_finished: host '%s' failed", simcall->issuer->smx_host->name);
+ simcall->issuer->context->iwannadie = 1;
+ //SMX_EXCEPTION(simcall->issuer, host_error, 0, "Host failed");
+ break;
+
+ case SIMIX_CANCELED:
+ XBT_DEBUG("SIMIX_execution_finished: execution canceled");
+ SMX_EXCEPTION(simcall->issuer, cancel_error, 0, "Canceled");
+ break;
+
+ default:
+ xbt_die("Internal error in SIMIX_execution_finish: unexpected action state %d",
+ (int)action->state);
+ }
+ /* check if the host is down */
+ if (surf_workstation_model->extension.
+ workstation.get_state(simcall->issuer->smx_host->host) != SURF_RESOURCE_ON) {
+ simcall->issuer->context->iwannadie = 1;
+ }
+
+ simcall->issuer->waiting_action = NULL;
+ simcall->host_execution_wait.result = action->state;
+ SIMIX_simcall_answer(simcall);
+ }
+
+ /* We no longer need it */
+ SIMIX_host_execution_destroy(action);
+}
+
+void SIMIX_post_host_execute(smx_action_t action)