X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/665b37c47175d0abd08d1252180d4d37bf9a342a..6e6af9ba860e3f607fddcdfbda94c44f8f1becbb:/src/msg/instr_msg_task.cpp diff --git a/src/msg/instr_msg_task.cpp b/src/msg/instr_msg_task.cpp index c450a220c0..0e80aa92d6 100644 --- a/src/msg/instr_msg_task.cpp +++ b/src/msg/instr_msg_task.cpp @@ -1,14 +1,16 @@ -/* Copyright (c) 2010, 2012-2015. The SimGrid Team. +/* Copyright (c) 2010, 2012-2017. The SimGrid Team. * All rights reserved. */ /* 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/instr/instr_private.h" -#include "msg_private.h" #include "mc/mc.h" +#include "src/instr/instr_private.hpp" +#include "src/msg/msg_private.hpp" -XBT_LOG_NEW_DEFAULT_SUBCATEGORY (instr_msg, instr, "MSG"); +#include + +XBT_LOG_NEW_DEFAULT_SUBCATEGORY(instr_msg, instr, "MSG instrumentation"); void TRACE_msg_set_task_category(msg_task_t task, const char *category) { @@ -31,10 +33,10 @@ void TRACE_msg_set_task_category(msg_task_t task, const char *category) /* MSG_task_create related function*/ void TRACE_msg_task_create(msg_task_t task) { - static long long counter = 0; + static std::atomic_ullong counter{0}; task->counter = counter++; task->category = nullptr; - + if(MC_is_active()) MC_ignore_heap(&(task->counter), sizeof(task->counter)); @@ -46,29 +48,18 @@ void TRACE_msg_task_execute_start(msg_task_t task) { XBT_DEBUG("EXEC,in %p, %lld, %s", task, task->counter, task->category); - if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - val_t value = PJ_value_get ("task_execute", type); - new_pajePushState (MSG_get_clock(), process_container, type, value); - } + if (TRACE_msg_process_is_enabled()) + simgrid::instr::Container::byName(instr_pid(MSG_process_self())) + ->getState("MSG_PROCESS_STATE") + ->pushEvent("task_execute"); } void TRACE_msg_task_execute_end(msg_task_t task) { XBT_DEBUG("EXEC,out %p, %lld, %s", task, task->counter, task->category); - if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - new_pajePopState (MSG_get_clock(), process_container, type); - } + if (TRACE_msg_process_is_enabled()) + simgrid::instr::Container::byName(instr_pid(MSG_process_self()))->getState("MSG_PROCESS_STATE")->popEvent(); } /* MSG_task_destroy related functions */ @@ -79,7 +70,6 @@ void TRACE_msg_task_destroy(msg_task_t task) //free category xbt_free(task->category); task->category = nullptr; - return; } /* MSG_task_get related functions */ @@ -87,33 +77,24 @@ void TRACE_msg_task_get_start() { XBT_DEBUG("GET,in"); - if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - val_t value = PJ_value_get ("receive", type); - new_pajePushState (MSG_get_clock(), process_container, type, value); - } + if (TRACE_msg_process_is_enabled()) + simgrid::instr::Container::byName(instr_pid(MSG_process_self())) + ->getState("MSG_PROCESS_STATE") + ->pushEvent("receive"); } -void TRACE_msg_task_get_end(double start_time, msg_task_t task) +void TRACE_msg_task_get_end(msg_task_t task) { XBT_DEBUG("GET,out %p, %lld, %s", task, task->counter, task->category); if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - new_pajePopState (MSG_get_clock(), process_container, type); + container_t process_container = simgrid::instr::Container::byName(instr_pid(MSG_process_self())); + process_container->getState("MSG_PROCESS_STATE")->popEvent(); - char key[INSTR_DEFAULT_STR_SIZE]; - snprintf (key, INSTR_DEFAULT_STR_SIZE, "p%lld", task->counter); - type = PJ_type_get ("MSG_PROCESS_TASK_LINK", PJ_type_get_root()); - new_pajeEndLink(MSG_get_clock(), PJ_container_get_root(), type, process_container, "SR", key); + std::string key = std::string("p") + std::to_string(task->counter); + container_t root = simgrid::instr::Container::getRootContainer(); + simgrid::instr::LinkType* link = root->getLink("MSG_PROCESS_TASK_LINK"); + link->endEvent(root, process_container, "SR", key); } } @@ -123,18 +104,13 @@ int TRACE_msg_task_put_start(msg_task_t task) XBT_DEBUG("PUT,in %p, %lld, %s", task, task->counter, task->category); if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - val_t value = PJ_value_get ("send", type); - new_pajePushState (MSG_get_clock(), process_container, type, value); - - char key[INSTR_DEFAULT_STR_SIZE]; - snprintf (key, INSTR_DEFAULT_STR_SIZE, "p%lld", task->counter); - type = PJ_type_get ("MSG_PROCESS_TASK_LINK", PJ_type_get_root()); - new_pajeStartLink(MSG_get_clock(), PJ_container_get_root(), type, process_container, "SR", key); + container_t process_container = simgrid::instr::Container::byName(instr_pid(MSG_process_self())); + process_container->getState("MSG_PROCESS_STATE")->pushEvent("send"); + + std::string key = std::string("p") + std::to_string(task->counter); + container_t root = simgrid::instr::Container::getRootContainer(); + simgrid::instr::LinkType* link = root->getLink("MSG_PROCESS_TASK_LINK"); + link->startEvent(root, process_container, "SR", key); } return 1; @@ -144,12 +120,6 @@ void TRACE_msg_task_put_end() { XBT_DEBUG("PUT,out"); - if (TRACE_msg_process_is_enabled()){ - int len = INSTR_DEFAULT_STR_SIZE; - char str[INSTR_DEFAULT_STR_SIZE]; - - container_t process_container = PJ_container_get (instr_process_id(MSG_process_self(), str, len)); - type_t type = PJ_type_get ("MSG_PROCESS_STATE", process_container->type); - new_pajePopState (MSG_get_clock(), process_container, type); - } + if (TRACE_msg_process_is_enabled()) + simgrid::instr::Container::byName(instr_pid(MSG_process_self()))->getState("MSG_PROCESS_STATE")->popEvent(); }