X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/b3b553ed36fe1119ceee50c0c6c5ac1cc6d47fd3..ff4e6203e4fb526267cc197ee3fa41e5d075608e:/src/simdag/sd_task.cpp diff --git a/src/simdag/sd_task.cpp b/src/simdag/sd_task.cpp index ce725ece20..28df855ef5 100644 --- a/src/simdag/sd_task.cpp +++ b/src/simdag/sd_task.cpp @@ -4,43 +4,72 @@ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ +#include "src/surf/HostImpl.hpp" #include "src/surf/surf_interface.hpp" -#include "src/surf/host_interface.hpp" #include "src/simdag/simdag_private.h" #include "simgrid/simdag.h" -#include "xbt/sysdep.h" -#include "xbt/dynar.h" #include "src/instr/instr_private.h" XBT_LOG_NEW_DEFAULT_SUBCATEGORY(sd_task, sd, "Logging specific to SimDag (task)"); -static void __SD_task_remove_dependencies(SD_task_t task); -static void __SD_task_destroy_scheduling_data(SD_task_t task); +/* Destroys a dependency between two tasks. */ +static void __SD_task_dependency_destroy(void *dependency) +{ + xbt_free(((SD_dependency_t)dependency)->name); + xbt_free(dependency); +} + +/* Remove all dependencies associated with a task. This function is called when the task is destroyed. */ +static void __SD_task_remove_dependencies(SD_task_t task) +{ + /* we must destroy the dependencies carefully (with SD_dependency_remove) because each one is stored twice */ + SD_dependency_t dependency; + while (xbt_dynar_is_empty(task->tasks_before) == 0) { + xbt_dynar_get_cpy(task->tasks_before, 0, &dependency); + SD_task_dependency_remove(dependency->src, dependency->dst); + } + + while (xbt_dynar_is_empty(task->tasks_after) == 0) { + xbt_dynar_get_cpy(task->tasks_after, 0, &dependency); + SD_task_dependency_remove(dependency->src, dependency->dst); + } +} -void* SD_task_new_f(void) +/* Destroys the data memorized by SD_task_schedule. Task state must be SD_SCHEDULED or SD_RUNNABLE. */ +static void __SD_task_destroy_scheduling_data(SD_task_t task) +{ + if (task->state != SD_SCHEDULED && task->state != SD_RUNNABLE) + THROWF(arg_error, 0, "Task '%s' must be SD_SCHEDULED or SD_RUNNABLE", SD_task_get_name(task)); + + xbt_free(task->flops_amount); + xbt_free(task->bytes_amount); + task->flops_amount = nullptr; + task->bytes_amount = nullptr; +} + +void* SD_task_new_f() { SD_task_t task = xbt_new0(s_SD_task_t, 1); - task->tasks_before = xbt_dynar_new(sizeof(SD_dependency_t), NULL); - task->tasks_after = xbt_dynar_new(sizeof(SD_dependency_t), NULL); + task->tasks_before = xbt_dynar_new(sizeof(SD_dependency_t), nullptr); + task->tasks_after = xbt_dynar_new(sizeof(SD_dependency_t), nullptr); return task; } void SD_task_recycle_f(void *t) { - SD_task_t task = (SD_task_t) t; + SD_task_t task = static_cast(t); /* Reset the content */ task->kind = SD_TASK_NOT_TYPED; task->state= SD_NOT_SCHEDULED; - xbt_dynar_push(sd_global->initial_task_set,&task); - + sd_global->initial_task_set->push_back(task); task->marked = 0; task->start_time = -1.0; task->finish_time = -1.0; - task->surf_action = NULL; + task->surf_action = nullptr; task->watch_points = 0; /* dependencies */ @@ -51,15 +80,15 @@ void SD_task_recycle_f(void *t) /* scheduling parameters */ task->host_count = 0; - task->host_list = NULL; - task->flops_amount = NULL; - task->bytes_amount = NULL; + task->host_list = nullptr; + task->flops_amount = nullptr; + task->bytes_amount = nullptr; task->rate = -1; } void SD_task_free_f(void *t) { - SD_task_t task = (SD_task_t)t; + SD_task_t task = static_cast(t); xbt_dynar_free(&task->tasks_before); xbt_dynar_free(&task->tasks_after); @@ -69,15 +98,15 @@ void SD_task_free_f(void *t) /** * \brief Creates a new task. * - * \param name the name of the task (can be \c NULL) - * \param data the user data you want to associate with the task (can be \c NULL) + * \param name the name of the task (can be \c nullptr) + * \param data the user data you want to associate with the task (can be \c nullptr) * \param amount amount of the task * \return the new task * \see SD_task_destroy() */ SD_task_t SD_task_create(const char *name, void *data, double amount) { - SD_task_t task = (SD_task_t)xbt_mallocator_get(sd_global->task_mallocator); + SD_task_t task = static_cast(xbt_mallocator_get(sd_global->task_mallocator)); /* general information */ task->data = data; /* user data */ @@ -88,7 +117,7 @@ SD_task_t SD_task_create(const char *name, void *data, double amount) return task; } -static XBT_INLINE SD_task_t SD_task_create_sized(const char *name, void *data, double amount, int ws_count) +static inline SD_task_t SD_task_create_sized(const char *name, void *data, double amount, int ws_count) { SD_task_t task = SD_task_create(name, data, amount); task->bytes_amount = xbt_new0(double, ws_count * ws_count); @@ -124,8 +153,8 @@ SD_task_t SD_task_create_comm_e2e(const char *name, void *data, double amount) * * A sequential computation must be scheduled on 1 host, and the amount specified at creation to be run on hosts[0]. * - * \param name the name of the task (can be \c NULL) - * \param data the user data you want to associate with the task (can be \c NULL) + * \param name the name of the task (can be \c nullptr) + * \param data the user data you want to associate with the task (can be \c nullptr) * \param flops_amount amount of compute work to be done by the task * \return the new SD_TASK_COMP_SEQ typed task */ @@ -147,8 +176,8 @@ SD_task_t SD_task_create_comp_seq(const char *name, void *data, double flops_amo * A parallel computation can be scheduled on any number of host. * The underlying speedup model is Amdahl's law. * To be auto-scheduled, \see SD_task_distribute_comp_amdahl has to be called first. - * \param name the name of the task (can be \c NULL) - * \param data the user data you want to associate with the task (can be \c NULL) + * \param name the name of the task (can be \c nullptr) + * \param data the user data you want to associate with the task (can be \c nullptr) * \param flops_amount amount of compute work to be done by the task * \param alpha purely serial fraction of the work to be done (in [0.;1.[) * \return the new task @@ -156,7 +185,7 @@ SD_task_t SD_task_create_comp_seq(const char *name, void *data, double flops_amo SD_task_t SD_task_create_comp_par_amdahl(const char *name, void *data, double flops_amount, double alpha) { xbt_assert(alpha < 1. && alpha >= 0., "Invalid parameter: alpha must be in [0.;1.["); - + SD_task_t res = SD_task_create(name, data, flops_amount); res->alpha = alpha; res->kind = SD_TASK_COMP_PAR_AMDAHL; @@ -173,15 +202,15 @@ SD_task_t SD_task_create_comp_par_amdahl(const char *name, void *data, double fl * A data redistribution can be scheduled on any number of host. * The assumed distribution is a 1D block distribution. Each host owns the same share of the \see amount. * To be auto-scheduled, \see SD_task_distribute_comm_mxn_1d_block has to be called first. - * \param name the name of the task (can be \c NULL) - * \param data the user data you want to associate with the task (can be \c NULL) + * \param name the name of the task (can be \c nullptr) + * \param data the user data you want to associate with the task (can be \c nullptr) * \param amount amount of data to redistribute by the task * \return the new task */ SD_task_t SD_task_create_comm_par_mxn_1d_block(const char *name, void *data, double amount) { SD_task_t res = SD_task_create(name, data, amount); - res->host_list=NULL; + res->host_list=nullptr; res->kind = SD_TASK_COMM_PAR_MXN_1D_BLOCK; return res; @@ -197,7 +226,6 @@ SD_task_t SD_task_create_comm_par_mxn_1d_block(const char *name, void *data, dou */ void SD_task_destroy(SD_task_t task) { - int idx; XBT_DEBUG("Destroying task %s...", SD_task_get_name(task)); __SD_task_remove_dependencies(task); @@ -205,14 +233,14 @@ void SD_task_destroy(SD_task_t task) if (task->state == SD_SCHEDULED || task->state == SD_RUNNABLE) __SD_task_destroy_scheduling_data(task); - idx = xbt_dynar_search_or_negative(sd_global->return_set, &task); + int idx = xbt_dynar_search_or_negative(sd_global->return_set, &task); if (idx >=0) { - xbt_dynar_remove_at(sd_global->return_set, idx, NULL); + xbt_dynar_remove_at(sd_global->return_set, idx, nullptr); } xbt_free(task->name); - if (task->surf_action != NULL) + if (task->surf_action != nullptr) task->surf_action->unref(); xbt_free(task->host_list); @@ -228,7 +256,7 @@ void SD_task_destroy(SD_task_t task) * \brief Returns the user data of a task * * \param task a task - * \return the user data associated with this task (can be \c NULL) + * \return the user data associated with this task (can be \c nullptr) * \see SD_task_set_data() */ void *SD_task_get_data(SD_task_t task) @@ -239,8 +267,8 @@ void *SD_task_get_data(SD_task_t task) /** * \brief Sets the user data of a task * - * The new data can be \c NULL. The old data should have been freed first - * if it was not \c NULL. + * The new data can be \c nullptr. The old data should have been freed first + * if it was not \c nullptr. * * \param task a task * \param data the new data you want to associate with this task @@ -291,44 +319,47 @@ e_SD_task_state_t SD_task_get_state(SD_task_t task) */ void SD_task_set_state(SD_task_t task, e_SD_task_state_t new_state) { - int idx; + std::vector::iterator idx; switch (new_state) { case SD_NOT_SCHEDULED: case SD_SCHEDULABLE: if (SD_task_get_state(task) == SD_FAILED){ - xbt_dynar_remove_at(sd_global->completed_task_set, - xbt_dynar_search(sd_global->completed_task_set, &task), NULL); - xbt_dynar_push(sd_global->initial_task_set,&task); + sd_global->initial_task_set->push_back(task); + sd_global->completed_task_set->erase(std::remove(sd_global->completed_task_set->begin(), + sd_global->completed_task_set->end(), task), + sd_global->completed_task_set->end()); } break; case SD_SCHEDULED: if (SD_task_get_state(task) == SD_RUNNABLE){ - xbt_dynar_remove_at(sd_global->executable_task_set, - xbt_dynar_search(sd_global->executable_task_set, &task), NULL); - xbt_dynar_push(sd_global->initial_task_set,&task); + sd_global->initial_task_set->push_back(task); + sd_global->executable_task_set->erase(std::remove(sd_global->executable_task_set->begin(), + sd_global->executable_task_set->end(), task), + sd_global->executable_task_set->end()); } break; case SD_RUNNABLE: - idx = xbt_dynar_search_or_negative(sd_global->initial_task_set, &task); - if (idx >= 0) { - xbt_dynar_remove_at(sd_global->initial_task_set, idx, NULL); - xbt_dynar_push(sd_global->executable_task_set,&task); + idx = std::find(sd_global->initial_task_set->begin(), sd_global->initial_task_set->end(), task); + if (idx != sd_global->initial_task_set->end()) { + sd_global->executable_task_set->push_back(*idx); + sd_global->initial_task_set->erase(idx); } break; case SD_RUNNING: - xbt_dynar_remove_at(sd_global->executable_task_set, - xbt_dynar_search(sd_global->executable_task_set, &task), NULL); + sd_global->executable_task_set->erase(std::remove(sd_global->executable_task_set->begin(), + sd_global->executable_task_set->end(), task), + sd_global->executable_task_set->end()); break; case SD_DONE: - xbt_dynar_push(sd_global->completed_task_set,&task); + sd_global->completed_task_set->push_back(task); task->finish_time = task->surf_action->getFinishTime(); task->remains = 0; -#ifdef HAVE_JEDULE +#if HAVE_JEDULE jedule_log_sd_event(task); #endif break; case SD_FAILED: - xbt_dynar_push(sd_global->completed_task_set,&task); + sd_global->completed_task_set->push_back(task); break; default: xbt_die( "Invalid state"); @@ -347,7 +378,7 @@ void SD_task_set_state(SD_task_t task, e_SD_task_state_t new_state) * \brief Returns the name of a task * * \param task a task - * \return the name of this task (can be \c NULL) + * \return the name of this task (can be \c nullptr) */ const char *SD_task_get_name(SD_task_t task) { @@ -370,10 +401,9 @@ void SD_task_set_name(SD_task_t task, const char *name) xbt_dynar_t SD_task_get_parents(SD_task_t task) { unsigned int i; - xbt_dynar_t parents; SD_dependency_t dep; - parents = xbt_dynar_new(sizeof(SD_task_t), NULL); + xbt_dynar_t parents = xbt_dynar_new(sizeof(SD_task_t), nullptr); xbt_dynar_foreach(task->tasks_before, i, dep) { xbt_dynar_push(parents, &(dep->src)); } @@ -388,10 +418,9 @@ xbt_dynar_t SD_task_get_parents(SD_task_t task) xbt_dynar_t SD_task_get_children(SD_task_t task) { unsigned int i; - xbt_dynar_t children; SD_dependency_t dep; - children = xbt_dynar_new(sizeof(SD_task_t), NULL); + xbt_dynar_t children = xbt_dynar_new(sizeof(SD_task_t), nullptr); xbt_dynar_foreach(task->tasks_after, i, dep) { xbt_dynar_push(children, &(dep->dst)); } @@ -399,7 +428,7 @@ xbt_dynar_t SD_task_get_children(SD_task_t task) } /** - * \brief Returns the amount of workstations involved in a task + * \brief Returns the number of workstations involved in a task * * Only call this on already scheduled tasks! * \param task a task @@ -461,7 +490,6 @@ double SD_task_get_alpha(SD_task_t task) return task->alpha; } - /** * \brief Returns the remaining amount work to do till the completion of a task * @@ -482,15 +510,14 @@ e_SD_task_kind_t SD_task_get_kind(SD_task_t task) return task->kind; } -/** @brief Displays debugging informations about a task */ +/** @brief Displays debugging information about a task */ void SD_task_dump(SD_task_t task) { unsigned int counter; SD_dependency_t dependency; - char *statename; XBT_INFO("Displaying task %s", SD_task_get_name(task)); - statename = bprintf("%s%s%s%s%s%s%s", + char *statename = bprintf("%s%s%s%s%s%s%s", (task->state == SD_NOT_SCHEDULED ? " not scheduled" : ""), (task->state == SD_SCHEDULABLE ? " schedulable" : ""), (task->state == SD_SCHEDULED ? " scheduled" : ""), @@ -527,13 +554,13 @@ void SD_task_dump(SD_task_t task) if (task->kind == SD_TASK_COMP_PAR_AMDAHL) XBT_INFO(" - alpha: %.2f", task->alpha); XBT_INFO(" - Dependencies to satisfy: %d", task->unsatisfied_dependencies); - if (!xbt_dynar_is_empty(task->tasks_before)) { + if (xbt_dynar_is_empty(task->tasks_before) == 0) { XBT_INFO(" - pre-dependencies:"); xbt_dynar_foreach(task->tasks_before, counter, dependency) { XBT_INFO(" %s", SD_task_get_name(dependency->src)); } } - if (!xbt_dynar_is_empty(task->tasks_after)) { + if (xbt_dynar_is_empty(task->tasks_after)== 0) { XBT_INFO(" - post-dependencies:"); xbt_dynar_foreach(task->tasks_after, counter, dependency) { XBT_INFO(" %s", SD_task_get_name(dependency->dst)); @@ -546,7 +573,7 @@ void SD_task_dotty(SD_task_t task, void *out) { unsigned int counter; SD_dependency_t dependency; - FILE *fout = (FILE*)out; + FILE *fout = static_cast(out); fprintf(fout, " T%p [label=\"%.20s\"", task, task->name); switch (task->kind) { case SD_TASK_COMM_E2E: @@ -566,42 +593,29 @@ void SD_task_dotty(SD_task_t task, void *out) } } -/* Destroys a dependency between two tasks. - */ -static void __SD_task_dependency_destroy(void *dependency) -{ - xbt_free(((SD_dependency_t)dependency)->name); - xbt_free(dependency); -} - /** * \brief Adds a dependency between two tasks * * \a dst will depend on \a src, ie \a dst will not start before \a src is finished. * Their \ref e_SD_task_state_t "state" must be #SD_NOT_SCHEDULED, #SD_SCHEDULED or #SD_RUNNABLE. * - * \param name the name of the new dependency (can be \c NULL) - * \param data the user data you want to associate with this dependency (can be \c NULL) + * \param name the name of the new dependency (can be \c nullptr) + * \param data the user data you want to associate with this dependency (can be \c nullptr) * \param src the task which must be executed first * \param dst the task you want to make depend on \a src * \see SD_task_dependency_remove() */ void SD_task_dependency_add(const char *name, void *data, SD_task_t src, SD_task_t dst) { - xbt_dynar_t dynar; - unsigned long length; - int found = 0; - unsigned long i; + bool found = false; SD_dependency_t dependency; - e_SD_task_state_t state; - dynar = src->tasks_after; - length = xbt_dynar_length(dynar); + unsigned long length = xbt_dynar_length(src->tasks_after); if (src == dst) THROWF(arg_error, 0, "Cannot add a dependency between task '%s' and itself", SD_task_get_name(src)); - state = SD_task_get_state(src); + e_SD_task_state_t state = SD_task_get_state(src); if (state != SD_NOT_SCHEDULED && state != SD_SCHEDULABLE && state != SD_RUNNING && state != SD_SCHEDULED && state != SD_RUNNABLE) THROWF(arg_error, 0, "Task '%s' must be SD_NOT_SCHEDULED, SD_SCHEDULABLE, SD_SCHEDULED, SD_RUNNABLE, or SD_RUNNING", @@ -613,8 +627,8 @@ void SD_task_dependency_add(const char *name, void *data, SD_task_t src, SD_task SD_task_get_name(dst)); XBT_DEBUG("SD_task_dependency_add: src = %s, dst = %s", SD_task_get_name(src), SD_task_get_name(dst)); - for (i = 0; i < length && !found; i++) { - xbt_dynar_get_cpy(dynar, i, &dependency); + for (unsigned long i = 0; i < length && !found; i++) { + xbt_dynar_get_cpy(src->tasks_after, i, &dependency); found = (dependency->dst == dst); XBT_DEBUG("Dependency %lu: dependency->dst = %s", i, SD_task_get_name(dependency->dst)); } @@ -625,7 +639,7 @@ void SD_task_dependency_add(const char *name, void *data, SD_task_t src, SD_task dependency = xbt_new(s_SD_dependency_t, 1); - dependency->name = xbt_strdup(name); /* xbt_strdup is cleaver enough to deal with NULL args itself */ + dependency->name = xbt_strdup(name); /* xbt_strdup is cleaver enough to deal with nullptr args itself */ dependency->data = data; dependency->src = src; dependency->dst = dst; @@ -643,14 +657,15 @@ void SD_task_dependency_add(const char *name, void *data, SD_task_t src, SD_task SD_task_set_state(dst, SD_SCHEDULED); } } + /** - * \brief Returns the name given as input when dependency has been created.. + * \brief Returns the name given as input when dependency has been created. * * \param src a task * \param dst a task depending on \a src - * */ -const char *SD_task_dependency_get_name(SD_task_t src, SD_task_t dst){ +const char *SD_task_dependency_get_name(SD_task_t src, SD_task_t dst) +{ unsigned int i; SD_dependency_t dependency; @@ -658,7 +673,7 @@ const char *SD_task_dependency_get_name(SD_task_t src, SD_task_t dst){ if (dependency->dst == dst) return dependency->name; } - return NULL; + return nullptr; } /** @@ -667,18 +682,17 @@ const char *SD_task_dependency_get_name(SD_task_t src, SD_task_t dst){ * \param src a task * \param dst a task depending on \a src * - * If src is NULL, checks whether dst has any pre-dependency. - * If dst is NULL, checks whether src has any post-dependency. + * If src is nullptr, checks whether dst has any pre-dependency. + * If dst is nullptr, checks whether src has any post-dependency. */ int SD_task_dependency_exists(SD_task_t src, SD_task_t dst) { - unsigned int counter; - SD_dependency_t dependency; - - xbt_assert(src != NULL || dst != NULL, "Invalid parameter: both src and dst are NULL"); + xbt_assert(src != nullptr || dst != nullptr, "Invalid parameter: both src and dst are nullptr"); if (src) { if (dst) { + unsigned int counter; + SD_dependency_t dependency; xbt_dynar_foreach(src->tasks_after, counter, dependency) { if (dependency->dst == dst) return 1; @@ -701,21 +715,18 @@ int SD_task_dependency_exists(SD_task_t src, SD_task_t dst) */ void SD_task_dependency_remove(SD_task_t src, SD_task_t dst) { - xbt_dynar_t dynar; unsigned long length; - int found = 0; - unsigned long i; + bool found = false; SD_dependency_t dependency; /* remove the dependency from src->tasks_after */ - dynar = src->tasks_after; - length = xbt_dynar_length(dynar); + length = xbt_dynar_length(src->tasks_after); - for (i = 0; i < length && !found; i++) { - xbt_dynar_get_cpy(dynar, i, &dependency); + for (unsigned long i = 0; i < length && !found; i++) { + xbt_dynar_get_cpy(src->tasks_after, i, &dependency); if (dependency->dst == dst) { - xbt_dynar_remove_at(dynar, i, NULL); - found = 1; + xbt_dynar_remove_at(src->tasks_after, i, nullptr); + found = true; } } if (!found) @@ -723,18 +734,17 @@ void SD_task_dependency_remove(SD_task_t src, SD_task_t dst) SD_task_get_name(src), SD_task_get_name(dst), SD_task_get_name(dst), SD_task_get_name(src)); /* remove the dependency from dst->tasks_before */ - dynar = dst->tasks_before; - length = xbt_dynar_length(dynar); - found = 0; + length = xbt_dynar_length(dst->tasks_before); + found = false; - for (i = 0; i < length && !found; i++) { - xbt_dynar_get_cpy(dynar, i, &dependency); + for (unsigned long i = 0; i < length && !found; i++) { + xbt_dynar_get_cpy(dst->tasks_before, i, &dependency); if (dependency->src == src) { - xbt_dynar_remove_at(dynar, i, NULL); + xbt_dynar_remove_at(dst->tasks_before, i, nullptr); __SD_task_dependency_destroy(dependency); dst->unsatisfied_dependencies--; dst->is_not_ready--; - found = 1; + found = true; } } /* should never happen... */ @@ -742,7 +752,6 @@ void SD_task_dependency_remove(SD_task_t src, SD_task_t dst) SD_task_get_name(dst), SD_task_get_name(src), SD_task_get_name(src), SD_task_get_name(dst)); /* if the task was scheduled and dst->tasks_before is empty now, we can make it runnable */ - if (dst->unsatisfied_dependencies == 0) { if (SD_task_get_state(dst) == SD_SCHEDULED) SD_task_set_state(dst, SD_RUNNABLE); @@ -759,22 +768,18 @@ void SD_task_dependency_remove(SD_task_t src, SD_task_t dst) * * \param src a task * \param dst a task depending on \a src - * \return the user data associated with this dependency (can be \c NULL) + * \return the user data associated with this dependency (can be \c nullptr) * \see SD_task_dependency_add() */ void *SD_task_dependency_get_data(SD_task_t src, SD_task_t dst) { - xbt_dynar_t dynar; - unsigned long length; - int found = 0; - unsigned long i; + bool found = false; SD_dependency_t dependency; - dynar = src->tasks_after; - length = xbt_dynar_length(dynar); + unsigned long length = xbt_dynar_length(src->tasks_after); - for (i = 0; i < length && !found; i++) { - xbt_dynar_get_cpy(dynar, i, &dependency); + for (unsigned long i = 0; i < length && !found; i++) { + xbt_dynar_get_cpy(src->tasks_after, i, &dependency); found = (dependency->dst == dst); } if (!found) @@ -790,8 +795,7 @@ void *SD_task_dependency_get_data(SD_task_t src, SD_task_t dst) * The watch point is then automatically removed. * * \param task a task - * \param state the \ref e_SD_task_state_t "state" you want to watch - * (cannot be #SD_NOT_SCHEDULED) + * \param state the \ref e_SD_task_state_t "state" you want to watch (cannot be #SD_NOT_SCHEDULED) * \see SD_task_unwatch() */ void SD_task_watch(SD_task_t task, e_SD_task_state_t state) @@ -812,7 +816,6 @@ void SD_task_watch(SD_task_t task, e_SD_task_state_t state) void SD_task_unwatch(SD_task_t task, e_SD_task_state_t state) { xbt_assert(state != SD_NOT_SCHEDULED, "SimDag error: Cannot have a watch point for state SD_NOT_SCHEDULED"); - task->watch_points = task->watch_points & ~state; } @@ -825,26 +828,25 @@ void SD_task_unwatch(SD_task_t task, e_SD_task_state_t state) * \param task the task to evaluate * \param workstation_nb number of workstations on which the task would be executed * \param workstation_list the workstations on which the task would be executed - * \param flops_amount computation amount for each workstation - * \param bytes_amount communication amount between each pair of workstations + * \param flops_amount computation amount for each workstation (i.e., an array of workstation_nb doubles) + * \param bytes_amount communication amount between each pair of workstations (i.e., a matrix of + * workstation_nb*workstation_nb doubles) * \see SD_schedule() */ double SD_task_get_execution_time(SD_task_t task, int workstation_nb, const sg_host_t *workstation_list, const double *flops_amount, const double *bytes_amount) { - double time, max_time = 0.0; - int i, j; xbt_assert(workstation_nb > 0, "Invalid parameter"); + double max_time = 0.0; /* the task execution time is the maximum execution time of the parallel tasks */ + for (int i = 0; i < workstation_nb; i++) { + double time = 0.0; + if (flops_amount != nullptr) + time = flops_amount[i] / workstation_list[i]->speed(); - for (i = 0; i < workstation_nb; i++) { - time = 0.0; - if (flops_amount != NULL) - time = flops_amount[i] / sg_host_speed(workstation_list[i]); - - if (bytes_amount != NULL) - for (j = 0; j < workstation_nb; j++) { + if (bytes_amount != nullptr) + for (int j = 0; j < workstation_nb; j++) { if (bytes_amount[i * workstation_nb + j] !=0 ) { time += (SD_route_get_latency(workstation_list[i], workstation_list[j]) + bytes_amount[i * workstation_nb + j] / @@ -859,12 +861,11 @@ double SD_task_get_execution_time(SD_task_t task, int workstation_nb, const sg_h return max_time; } -static XBT_INLINE void SD_task_do_schedule(SD_task_t task) +static inline void SD_task_do_schedule(SD_task_t task) { if (SD_task_get_state(task) > SD_SCHEDULABLE) THROWF(arg_error, 0, "Task '%s' has already been scheduled", SD_task_get_name(task)); - /* update the task state */ if (task->unsatisfied_dependencies == 0) SD_task_set_state(task, SD_RUNNABLE); else @@ -878,40 +879,40 @@ static XBT_INLINE void SD_task_do_schedule(SD_task_t task) * Once scheduled, a task is executed as soon as possible in \see SD_simulate, i.e. when its dependencies are satisfied. * * \param task the task you want to schedule - * \param workstation_count number of workstations on which the task will be executed - * \param workstation_list the workstations on which the task will be executed - * \param flops_amount computation amount for each workstation - * \param bytes_amount communication amount between each pair of workstations + * \param host_count number of hosts on which the task will be executed + * \param workstation_list the hosts on which the task will be executed + * \param flops_amount computation amount for each hosts (i.e., an array of host_count doubles) + * \param bytes_amount communication amount between each pair of hosts (i.e., a matrix of host_count*host_count doubles) * \param rate task execution speed rate * \see SD_task_unschedule() */ -void SD_task_schedule(SD_task_t task, int workstation_count, const sg_host_t * workstation_list, +void SD_task_schedule(SD_task_t task, int host_count, const sg_host_t * workstation_list, const double *flops_amount, const double *bytes_amount, double rate) { - xbt_assert(workstation_count > 0, "workstation_nb must be positive"); + xbt_assert(host_count > 0, "workstation_nb must be positive"); - task->host_count = workstation_count; + task->host_count = host_count; task->rate = rate; if (flops_amount) { - task->flops_amount = (double*)xbt_realloc(task->flops_amount, sizeof(double) * workstation_count); - memcpy(task->flops_amount, flops_amount, sizeof(double) * workstation_count); + task->flops_amount = static_cast(xbt_realloc(task->flops_amount, sizeof(double) * host_count)); + memcpy(task->flops_amount, flops_amount, sizeof(double) * host_count); } else { xbt_free(task->flops_amount); - task->flops_amount = NULL; + task->flops_amount = nullptr; } - int communication_nb = workstation_count * workstation_count; + int communication_nb = host_count * host_count; if (bytes_amount) { - task->bytes_amount = (double*)xbt_realloc(task->bytes_amount, sizeof(double) * communication_nb); + task->bytes_amount = static_cast(xbt_realloc(task->bytes_amount, sizeof(double) * communication_nb)); memcpy(task->bytes_amount, bytes_amount, sizeof(double) * communication_nb); } else { xbt_free(task->bytes_amount); - task->bytes_amount = NULL; + task->bytes_amount = nullptr; } - task->host_list = (sg_host_t*) xbt_realloc(task->host_list, sizeof(sg_host_t) * workstation_count); - memcpy(task->host_list, workstation_list, sizeof(sg_host_t) * workstation_count); + task->host_list = static_cast(xbt_realloc(task->host_list, sizeof(sg_host_t) * host_count)); + memcpy(task->host_list, workstation_list, sizeof(sg_host_t) * host_count); SD_task_do_schedule(task); } @@ -939,7 +940,7 @@ void SD_task_unschedule(SD_task_t task) /* Don't free scheduling data for typed tasks */ __SD_task_destroy_scheduling_data(task); xbt_free(task->host_list); - task->host_list=NULL; + task->host_list=nullptr; task->host_count = 0; } @@ -956,35 +957,20 @@ void SD_task_unschedule(SD_task_t task) task->start_time = -1.0; } -/* Destroys the data memorized by SD_task_schedule. Task state must be SD_SCHEDULED or SD_RUNNABLE. - */ -static void __SD_task_destroy_scheduling_data(SD_task_t task) -{ - if (task->state != SD_SCHEDULED && task->state != SD_RUNNABLE) - THROWF(arg_error, 0, "Task '%s' must be SD_SCHEDULED or SD_RUNNABLE", SD_task_get_name(task)); - - xbt_free(task->flops_amount); - xbt_free(task->bytes_amount); - task->flops_amount = task->bytes_amount = NULL; -} - /* Runs a task. */ void SD_task_run(SD_task_t task) { - int i; - sg_host_t *hosts; - xbt_assert(SD_task_get_state(task) == SD_RUNNABLE, "Task '%s' is not runnable! Task state: %d", SD_task_get_name(task), (int)SD_task_get_state(task)); - xbt_assert(task->host_list != NULL, "Task '%s': workstation_list is NULL!", SD_task_get_name(task)); + xbt_assert(task->host_list != nullptr, "Task '%s': workstation_list is nullptr!", SD_task_get_name(task)); XBT_DEBUG("Running task '%s'", SD_task_get_name(task)); /* Copy the elements of the task into the action */ int host_nb = task->host_count; - hosts = xbt_new(sg_host_t, host_nb); + sg_host_t *hosts = xbt_new(sg_host_t, host_nb); - for (i = 0; i < host_nb; i++) + for (int i = 0; i < host_nb; i++) hosts[i] = task->host_list[i]; double *flops_amount = xbt_new0(double, host_nb); @@ -1006,27 +992,6 @@ void SD_task_run(SD_task_t task) __SD_task_destroy_scheduling_data(task); /* now the scheduling data are not useful anymore */ SD_task_set_state(task, SD_RUNNING); - xbt_assert(SD_task_get_state(task) == SD_RUNNING, "Bad state of task '%s': %d", - SD_task_get_name(task), (int)SD_task_get_state(task)); - -} - -/* - * Remove all dependencies associated with a task. This function is called when the task is destroyed. - */ -static void __SD_task_remove_dependencies(SD_task_t task) -{ - /* we must destroy the dependencies carefuly (with SD_dependency_remove) because each one is stored twice */ - SD_dependency_t dependency; - while (!xbt_dynar_is_empty(task->tasks_before)) { - xbt_dynar_get_cpy(task->tasks_before, 0, &dependency); - SD_task_dependency_remove(dependency->src, dependency->dst); - } - - while (!xbt_dynar_is_empty(task->tasks_after)) { - xbt_dynar_get_cpy(task->tasks_after, 0, &dependency); - SD_task_dependency_remove(dependency->src, dependency->dst); - } } /** @@ -1065,7 +1030,6 @@ double SD_task_get_finish_time(SD_task_t task) void SD_task_distribute_comp_amdahl(SD_task_t task, int ws_count) { - int i; xbt_assert(task->kind == SD_TASK_COMP_PAR_AMDAHL, "Task %s is not a SD_TASK_COMP_PAR_AMDAHL typed task." "Cannot use this function.", SD_task_get_name(task)); task->flops_amount = xbt_new0(double, ws_count); @@ -1074,7 +1038,7 @@ void SD_task_distribute_comp_amdahl(SD_task_t task, int ws_count) task->host_count = ws_count; task->host_list = xbt_new0(sg_host_t, ws_count); - for(i=0;iflops_amount[i] = (task->alpha + (1 - task->alpha)/ws_count) * task->amount; } } @@ -1105,6 +1069,7 @@ void SD_task_schedulev(SD_task_t task, int count, const sg_host_t * list) switch (task->kind) { case SD_TASK_COMP_PAR_AMDAHL: SD_task_distribute_comp_amdahl(task, count); + /* no break */ case SD_TASK_COMM_E2E: case SD_TASK_COMP_SEQ: xbt_assert(task->host_count == count, "Got %d locations, but were expecting %d locations", count,task->host_count); @@ -1120,10 +1085,10 @@ void SD_task_schedulev(SD_task_t task, int count, const sg_host_t * list) default: xbt_die("Kind of task %s not supported by SD_task_schedulev()", SD_task_get_name(task)); } + if (task->kind == SD_TASK_COMM_E2E) { XBT_VERB("Schedule comm task %s between %s -> %s. It costs %.f bytes", SD_task_get_name(task), sg_host_get_name(task->host_list[0]), sg_host_get_name(task->host_list[1]), task->bytes_amount[2]); - } /* Iterate over all children and parents being COMM_E2E to say where I am located (and start them if runnable) */ @@ -1175,7 +1140,7 @@ void SD_task_schedulev(SD_task_t task, int count, const sg_host_t * list) double src_start, src_end, dst_start, dst_end; src_nb = before->host_count; dst_nb = count; - before->host_list = (sg_host_t*) xbt_realloc(before->host_list, (before->host_count+count)*sizeof(sg_host_t)); + before->host_list = static_cast(xbt_realloc(before->host_list, (before->host_count+count)*sizeof(sg_host_t))); for(i=0; ihost_list[before->host_count+i] = task->host_list[i]; @@ -1204,8 +1169,7 @@ void SD_task_schedulev(SD_task_t task, int count, const sg_host_t * list) if (SD_task_get_state(before)< SD_SCHEDULED) { SD_task_do_schedule(before); - XBT_VERB - ("Auto-Schedule redistribution task %s. Send %.f bytes from %d hosts to %d hosts.", + XBT_VERB ("Auto-Schedule redistribution task %s. Send %.f bytes from %d hosts to %d hosts.", SD_task_get_name(before),before->amount, src_nb, dst_nb); } } @@ -1226,7 +1190,7 @@ void SD_task_schedulev(SD_task_t task, int count, const sg_host_t * list) double src_start, src_end, dst_start, dst_end; src_nb = count; dst_nb = after->host_count; - after->host_list = (sg_host_t*) xbt_realloc(after->host_list, (after->host_count+count)*sizeof(sg_host_t)); + after->host_list = static_cast(xbt_realloc(after->host_list, (after->host_count+count)*sizeof(sg_host_t))); for(i=after->host_count - 1; i>=0; i--) after->host_list[count+i] = after->host_list[i]; for(i=0; i