X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/9b8c19c2b3028ebeef9f76f159af56acd5739c6d..04444a3077f46c717719a05b0c10b39d16a8c53a:/src/smpi/instr_smpi.c diff --git a/src/smpi/instr_smpi.c b/src/smpi/instr_smpi.c index e5a163b086..527c0f0991 100644 --- a/src/smpi/instr_smpi.c +++ b/src/smpi/instr_smpi.c @@ -1,4 +1,4 @@ -/* Copyright (c) 2010. The SimGrid Team. +/* Copyright (c) 2010, 2012-2013. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it @@ -177,7 +177,7 @@ void TRACE_smpi_finalize(int rank) PJ_container_free (container); } -void TRACE_smpi_collective_in(int rank, int root, const char *operation) +void TRACE_smpi_collective_in(int rank, int root, const char *operation, int size) { if (!TRACE_smpi_is_enabled()) return; @@ -187,7 +187,7 @@ void TRACE_smpi_collective_in(int rank, int root, const char *operation) type_t type = PJ_type_get ("MPI_STATE", container->type); const char *color = instr_find_color (operation); val_t value = PJ_value_get_or_new (operation, color, type); - new_pajePushState (SIMIX_get_clock(), container, type, value); + new_pajePushStateWithSize (SIMIX_get_clock(), container, type, value, size); } void TRACE_smpi_collective_out(int rank, int root, const char *operation) @@ -212,7 +212,8 @@ void TRACE_smpi_computing_init(int rank) char str[INSTR_DEFAULT_STR_SIZE]; smpi_container(rank, str, INSTR_DEFAULT_STR_SIZE); container_t container = PJ_container_get (str); - type_t type = PJ_type_get ("MPI_STATE", container->type); + type_t mpi = PJ_type_get("MPI", PJ_container_get_root()->type); + type_t type = PJ_type_state_new ("COMPUTATION", mpi); const char *color = instr_find_color ("computing"); val_t value = PJ_value_get_or_new ("computing", color, type); new_pajePushState (SIMIX_get_clock(), container, type, value); @@ -226,22 +227,25 @@ void TRACE_smpi_computing_in(int rank) char str[INSTR_DEFAULT_STR_SIZE]; smpi_container(rank, str, INSTR_DEFAULT_STR_SIZE); container_t container = PJ_container_get (str); - type_t type = PJ_type_get ("MPI_STATE", container->type); + type_t type = PJ_type_get ("COMPUTATION", container->type); val_t value = PJ_value_get_or_new ("computing", NULL, type); new_pajePushState (SIMIX_get_clock(), container, type, value); } -void TRACE_smpi_computing_out(int rank) +void TRACE_smpi_computing_out(int rank, double flops) { if (!TRACE_smpi_is_enabled()|| !TRACE_smpi_is_computing()) return; char str[INSTR_DEFAULT_STR_SIZE]; smpi_container(rank, str, INSTR_DEFAULT_STR_SIZE); container_t container = PJ_container_get (str); - type_t type = PJ_type_get ("MPI_STATE", container->type); - new_pajePopState (SIMIX_get_clock(), container, type); + type_t type = PJ_type_get ("COMPUTATION", container->type); + xbt_dynar_t extra= xbt_dynar_new(sizeof(char*), NULL); + char* char_duration = bprintf("%g", flops); + xbt_dynar_push(extra, &char_duration); + new_pajePopStateWithExtra (SIMIX_get_clock(), container, type, extra); } -void TRACE_smpi_ptp_in(int rank, int src, int dst, const char *operation) +void TRACE_smpi_ptp_in(int rank, int src, int dst, const char *operation, int size) { if (!TRACE_smpi_is_enabled()) return; @@ -252,7 +256,7 @@ void TRACE_smpi_ptp_in(int rank, int src, int dst, const char *operation) type_t type = PJ_type_get ("MPI_STATE", container->type); const char *color = instr_find_color (operation); val_t value = PJ_value_get_or_new (operation, color, type); - new_pajePushState (SIMIX_get_clock(), container, type, value); + new_pajePushStateWithSize (SIMIX_get_clock(), container, type, value, size); } void TRACE_smpi_ptp_out(int rank, int src, int dst, const char *operation) @@ -267,12 +271,11 @@ void TRACE_smpi_ptp_out(int rank, int src, int dst, const char *operation) new_pajePopState (SIMIX_get_clock(), container, type); } -void TRACE_smpi_send(int rank, int src, int dst) +void TRACE_smpi_send(int rank, int src, int dst, int size) { if (!TRACE_smpi_is_enabled()) return; - char key[INSTR_DEFAULT_STR_SIZE]; - bzero (key, INSTR_DEFAULT_STR_SIZE); + char key[INSTR_DEFAULT_STR_SIZE] = {0}; TRACE_smpi_put_key(src, dst, key, INSTR_DEFAULT_STR_SIZE); char str[INSTR_DEFAULT_STR_SIZE]; @@ -280,15 +283,14 @@ void TRACE_smpi_send(int rank, int src, int dst) container_t container = PJ_container_get (str); type_t type = PJ_type_get ("MPI_LINK", PJ_type_get_root()); - new_pajeStartLink (SIMIX_get_clock(), PJ_container_get_root(), type, container, "PTP", key); + new_pajeStartLinkWithSize (SIMIX_get_clock(), PJ_container_get_root(), type, container, "PTP", key, size); } void TRACE_smpi_recv(int rank, int src, int dst) { if (!TRACE_smpi_is_enabled()) return; - char key[INSTR_DEFAULT_STR_SIZE]; - bzero (key, INSTR_DEFAULT_STR_SIZE); + char key[INSTR_DEFAULT_STR_SIZE] = {0}; TRACE_smpi_get_key(src, dst, key, INSTR_DEFAULT_STR_SIZE); char str[INSTR_DEFAULT_STR_SIZE];