X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/2f810149832a2d855c33d0df5b02d736c2081e41..d7a3044c436f3e7a28abbbf06d28fab89b933010:/src/smpi/smpi_bench.c diff --git a/src/smpi/smpi_bench.c b/src/smpi/smpi_bench.c index ca1d8666a9..1f57a819ab 100644 --- a/src/smpi/smpi_bench.c +++ b/src/smpi/smpi_bench.c @@ -133,11 +133,11 @@ static void smpi_execute_flops(double flops) host = SIMIX_host_self(); XBT_DEBUG("Handle real computation time: %f flops", flops); - action = SIMIX_req_host_execute("computation", host, flops, 1); + action = simcall_host_execute("computation", host, flops, 1); #ifdef HAVE_TRACING - SIMIX_req_set_category (action, TRACE_internal_smpi_get_category()); + simcall_set_category (action, TRACE_internal_smpi_get_category()); #endif - SIMIX_req_host_execution_wait(action); + simcall_host_execution_wait(action); } static void smpi_execute(double duration) @@ -148,6 +148,9 @@ static void smpi_execute(double duration) smpi_execute_flops(duration * xbt_cfg_get_double(_surf_cfg_set, "smpi/running_power")); + } else { + XBT_DEBUG("Real computation took %f while threshold is set to %f; ignore it", + duration, xbt_cfg_get_double(_surf_cfg_set, "smpi/cpu_threshold")); } } @@ -186,6 +189,26 @@ int smpi_gettimeofday(struct timeval *tv, struct timezone *tz) return 0; } +extern double sg_maxmin_precision; +unsigned long long smpi_rastro_resolution (void) +{ + smpi_bench_end(); + double resolution = (1/sg_maxmin_precision); + smpi_bench_begin(); + return (unsigned long long)resolution; +} + +unsigned long long smpi_rastro_timestamp (void) +{ + smpi_bench_end(); + double now = SIMIX_get_clock(); + + unsigned long long sec = (unsigned long long)now; + unsigned long long pre = (now - sec) * smpi_rastro_resolution(); + smpi_bench_begin(); + return (unsigned long long)sec * smpi_rastro_resolution() + pre; +} + static char *sample_location(int global, const char *file, int line) { if (global) { @@ -225,7 +248,7 @@ int smpi_sample_2(int global, const char *file, int line) char *loc = sample_location(global, file, line); local_data_t *data; - xbt_assert(samples, "You did something very inconsistent, didn't you?"); + xbt_assert(samples, "Y U NO use SMPI_SAMPLE_* macros? Stop messing directly with smpi_sample_* functions!"); data = xbt_dict_get_or_null(samples, loc); if (!data) { xbt_assert(data, "Please, do thing in order"); @@ -254,7 +277,7 @@ void smpi_sample_3(int global, const char *file, int line) local_data_t *data; double sample, n; - xbt_assert(samples, "You did something very inconsistent, didn't you?"); + xbt_assert(samples, "Y U NO use SMPI_SAMPLE_* macros? Stop messing directly with smpi_sample_* functions!"); data = xbt_dict_get_or_null(samples, loc); smpi_bench_end(); if(data && data->started && data->count < data->iters) {