X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a9b94bc9be0c3ad5b5f816bf343152a3617a1bc2..a1bc219ec7289aa97e6231066c45ae26b7a19977:/src/msg/task.c diff --git a/src/msg/task.c b/src/msg/task.c index 80a7c72692..1fe39757dc 100644 --- a/src/msg/task.c +++ b/src/msg/task.c @@ -45,8 +45,8 @@ static char sprint_buffer[64]; * \see m_task_t * \return The new corresponding object. */ -m_task_t MSG_task_create(const char *name, long double compute_duration, - long double message_size, void *data) +m_task_t MSG_task_create(const char *name, double compute_duration, + double message_size, void *data) { simdata_task_t simdata = xbt_new0(s_simdata_task_t,1); m_task_t task = xbt_new0(s_m_task_t,1); @@ -64,7 +64,6 @@ m_task_t MSG_task_create(const char *name, long double compute_duration, simdata->using = 1; simdata->sender = NULL; - return task; } @@ -92,6 +91,17 @@ m_process_t MSG_task_get_sender(m_task_t task) return ((simdata_task_t) task->simdata)->sender; } +/** \ingroup m_task_management + * \brief Return the name of a #m_task_t. + * + * This functions returns the name of a #m_task_t as specified on creation + */ +const char *MSG_task_get_name(m_task_t task) +{ + xbt_assert0(task, "Invalid parameters"); + return task->name; +} + /** \ingroup m_task_management * \brief Destroy a #m_task_t. @@ -113,7 +123,7 @@ MSG_error_t MSG_task_destroy(m_task_t task) xbt_assert0((xbt_dynar_length(task->simdata->sleeping)==0), "Task still used. There is a problem. Cannot destroy it now!"); - if(task->name) xbt_free(task->name); + if(task->name) free(task->name); xbt_dynar_free(&(task->simdata->sleeping)); @@ -121,14 +131,40 @@ MSG_error_t MSG_task_destroy(m_task_t task) if(action) action->resource_type->common_public->action_free(action); action = task->simdata->comm; if(action) action->resource_type->common_public->action_free(action); + if(task->simdata->host_list) xbt_free(task->simdata->host_list); - - xbt_free(task->simdata); - xbt_free(task); + free(task->simdata); + free(task); return MSG_OK; } +/** \ingroup m_task_management + * \brief Returns the computation amount needed to process a task #m_task_t. + * + */ +double MSG_task_get_compute_duration(m_task_t task) +{ + simdata_task_t simdata = NULL; + + xbt_assert0((task != NULL) && (task->simdata != NULL), "Invalid parameter"); + + return task->simdata->computation_amount; +} + +/** \ingroup m_task_management + * \brief Returns the size of the data attached to a task #m_task_t. + * + */ +double MSG_task_get_data_size(m_task_t task) +{ + simdata_task_t simdata = NULL; + + xbt_assert0((task != NULL) && (task->simdata != NULL), "Invalid parameter"); + + return task->simdata->message_size; +} + /* static MSG_error_t __MSG_task_check(m_task_t task) */ /* { */ /* simdata_task_t simdata = NULL; */