X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6760cb07d6b57be16928d95339d71e57c4e24f36..a24e5e842b10085c859c6988099e815964db2eda:/src/msg/task.c diff --git a/src/msg/task.c b/src/msg/task.c index 2b3aaaa680..cc85717242 100644 --- a/src/msg/task.c +++ b/src/msg/task.c @@ -23,6 +23,15 @@ * message size and some private data. */ +#ifdef HAVE_RUBY /* FIXME: KILLME */ +XBT_LOG_EXTERNAL_CATEGORY(ruby); +#endif + + + +XBT_LOG_NEW_DEFAULT_SUBCATEGORY(msg_task, msg, + "Logging specific to MSG (task)"); + /********************************* Task **************************************/ /** \ingroup m_task_management * \brief Creates a new #m_task_t. @@ -54,15 +63,14 @@ m_task_t MSG_task_create(const char *name, double compute_duration, task->data = data; /* Simulator Data */ + simdata->host_nb = 0; simdata->computation_amount = compute_duration; simdata->message_size = message_size; simdata->rate = -1.0; simdata->priority = 1.0; - simdata->refcount = 1; + simdata->isused = 0; simdata->sender = NULL; simdata->receiver = NULL; - simdata->cond = SIMIX_cond_init(); - simdata->mutex = SIMIX_mutex_init(); simdata->compute = NULL; simdata->comm = NULL; @@ -70,7 +78,7 @@ m_task_t MSG_task_create(const char *name, double compute_duration, simdata->comp_amount = NULL; simdata->comm_amount = NULL; #ifdef HAVE_TRACING - TRACE_msg_task_create (task); + TRACE_msg_task_create(task); #endif return task; @@ -95,7 +103,7 @@ void *MSG_task_get_data(m_task_t task) * This function allows to associate a new pointer to the user data associated of \a task. */ -void MSG_task_set_data(m_task_t task,void *data) +void MSG_task_set_data(m_task_t task, void *data) { xbt_assert0((task != NULL), "Invalid parameter"); @@ -135,6 +143,16 @@ const char *MSG_task_get_name(m_task_t task) return task->name; } +/** \ingroup m_task_management + * \brief Return the name of a #m_task_t. + * + * This functions allows to associate a name to a task + */ +void MSG_task_set_name(m_task_t task, const char *name) +{ + xbt_assert0(task, "Invalid parameters"); + task->name = xbt_strdup(name); +} /** \ingroup m_task_management * \brief Destroy a #m_task_t. @@ -148,23 +166,19 @@ MSG_error_t MSG_task_destroy(m_task_t task) xbt_assert0((task != NULL), "Invalid parameter"); /* why? if somebody is using, then you can't free! ok... but will return MSG_OK? when this task will be destroyed? isn't the user code wrong? */ - task->simdata->refcount--; - if (task->simdata->refcount > 0) + if (task->simdata->isused > 0) return MSG_OK; #ifdef HAVE_TRACING - TRACE_msg_task_destroy (task); + TRACE_msg_task_destroy(task); #endif if (task->name) free(task->name); - SIMIX_cond_destroy(task->simdata->cond); - SIMIX_mutex_destroy(task->simdata->mutex); - action = task->simdata->compute; if (action) - SIMIX_action_destroy(action); - + SIMIX_req_host_execution_destroy(action); + /* parallel tasks only */ if (task->simdata->host_list) xbt_free(task->simdata->host_list); @@ -187,11 +201,11 @@ MSG_error_t MSG_task_cancel(m_task_t task) xbt_assert0((task != NULL), "Invalid parameter"); if (task->simdata->compute) { - SIMIX_action_cancel(task->simdata->compute); + SIMIX_req_host_execution_cancel(task->simdata->compute); return MSG_OK; } if (task->simdata->comm) { - SIMIX_communication_cancel(task->simdata->comm); + SIMIX_req_comm_cancel(task->simdata->comm); return MSG_OK; } THROW_IMPOSSIBLE; @@ -209,6 +223,19 @@ double MSG_task_get_compute_duration(m_task_t task) return task->simdata->computation_amount; } + +/** \ingroup m_task_management + * \brief set the computation amount needed to process a task #m_task_t. + */ + +void MSG_task_set_compute_duration(m_task_t task, + double computation_amount) +{ + xbt_assert0(task, "Invalid parameter"); + task->simdata->computation_amount = computation_amount; + +} + /** \ingroup m_task_management * \brief Returns the remaining computation amount of a task #m_task_t. * @@ -219,25 +246,41 @@ double MSG_task_get_remaining_computation(m_task_t task) && (task->simdata != NULL), "Invalid parameter"); if (task->simdata->compute) { - return SIMIX_action_get_remains(task->simdata->compute); + return SIMIX_req_host_execution_get_remains(task->simdata->compute); } else { return task->simdata->computation_amount; } } - - /** \ingroup m_task_management * \brief Returns the total amount received by a task #m_task_t. - * + * If the communication does not exist it will return 0. + * So, if the communication has FINISHED or FAILED it returns + * zero. */ double MSG_task_get_remaining_communication(m_task_t task) { xbt_assert0((task != NULL) && (task->simdata != NULL), "Invalid parameter"); + DEBUG1("calling SIMIX_req_communication_get_remains(%p)", + task->simdata->comm); + return SIMIX_req_comm_get_remains(task->simdata->comm); +} - return SIMIX_communication_get_remains(task->simdata->comm); +#ifdef HAVE_LATENCY_BOUND_TRACKING +/** \ingroup m_task_management + * \brief Return 1 if communication task is limited by latency, 0 otherwise + * + */ +int MSG_task_is_latency_bounded(m_task_t task) +{ + xbt_assert0((task != NULL) + && (task->simdata != NULL), "Invalid parameter"); + DEBUG1("calling SIMIX_req_communication_is_latency_bounded(%p)", + task->simdata->comm); + return SIMIX_req_comm_is_latency_bounded(task->simdata->comm); } +#endif /** \ingroup m_task_management * \brief Returns the size of the data attached to a task #m_task_t. @@ -266,8 +309,6 @@ void MSG_task_set_priority(m_task_t task, double priority) task->simdata->priority = 1 / priority; if (task->simdata->compute) - SIMIX_action_set_priority(task->simdata->compute, - task->simdata->priority); + SIMIX_req_host_execution_set_priority(task->simdata->compute, + task->simdata->priority); } - -