void starpu_profiling_worker_helper_display_summary(void)
{
const char *stats;
double sum_consumed = 0.;
int profiling = starpu_profiling_status_get();
double overall_time = 0;
int workerid;
int worker_cnt = starpu_worker_get_count();
if (!((stats = getenv("STARPU_WORKER_STATS")) && atoi(stats))) return;
fprintf(stderr, "\nWorker statistics:\n");
fprintf(stderr, "******************\n");
for (workerid = 0; workerid < worker_cnt; workerid++)
{
struct starpu_profiling_worker_info info;
starpu_profiling_worker_get_info(workerid, &info);
char name[64];
starpu_worker_get_name(workerid, name, sizeof(name));
if (profiling)
{
double total_time = starpu_timing_timespec_to_us(&info.total_time) / 1000.;
double executing_time = starpu_timing_timespec_to_us(&info.executing_time) / 1000.;
double sleeping_time = starpu_timing_timespec_to_us(&info.sleeping_time) / 1000.;
if (total_time > overall_time)
overall_time = total_time;
fprintf(stderr, "%-32s\n", name);
fprintf(stderr, "\t%d task(s)\n\ttotal: %.2lf ms executing: %.2lf ms sleeping: %.2lf ms overhead %.2lf ms\n", info.executed_tasks, total_time, executing_time, sleeping_time, total_time - executing_time - sleeping_time);
if (info.used_cycles || info.stall_cycles)
fprintf(stderr, "\t%lu Mcy %lu Mcy stall\n", info.used_cycles/1000000, info.stall_cycles/1000000);
if (info.power_consumed)
fprintf(stderr, "\t%f J consumed\n", info.power_consumed);
}
else
{
fprintf(stderr, "\t%-32s\t%d task(s)\n", name, info.executed_tasks);
}
sum_consumed += info.power_consumed;
}
if (profiling)
{
const char *strval_idle_power = getenv("STARPU_IDLE_POWER");
if (strval_idle_power)
{
double idle_power = atof(strval_idle_power); /* Watt */
double idle_consumption = idle_power * overall_time / 1000.; /* J */
fprintf(stderr, "Idle consumption: %.2lf J\n", idle_consumption);
sum_consumed += idle_consumption;
}
}
if (profiling && sum_consumed)
fprintf(stderr, "Total consumption: %.2lf J\n", sum_consumed);
}
double _starpu_timing_now(void)
{
struct timespec now;
starpu_clock_gettime(&now);
return starpu_timing_timespec_to_us(&now);
}
void _starpu_driver_update_job_feedback(starpu_job_t j, struct starpu_worker_s *worker_args,
unsigned calibrate_model,
struct timespec *codelet_start, struct timespec *codelet_end)
{
struct timespec measured_ts;
double measured;
int event_prof = starpu_event_profiling_enabled(j->event);
if (event_prof || calibrate_model)
{
starpu_timespec_sub(codelet_end, codelet_start, &measured_ts);
measured = starpu_timing_timespec_to_us(&measured_ts);
if (event_prof)
{
_starpu_event_profiling_start_time_set(j->event, codelet_start);
_starpu_event_profiling_end_time_set(j->event, codelet_end);
int workerid = worker_args->workerid;
_starpu_event_profiling_worker_id_set(j->event, workerid);
_starpu_worker_update_profiling_info_executing(workerid, &measured_ts, 1);
}
if (calibrate_model)
_starpu_update_perfmodel_history(j, worker_args->perf_arch, worker_args->devid, measured);
}
}
void starpu_profiling_bus_helper_display_summary(void)
{
const char *stats;
int long long sum_transferred = 0;
if (!((stats = getenv("STARPU_BUS_STATS")) && atoi(stats))) return;
fprintf(stderr, "\nData transfer statistics:\n");
fprintf(stderr, "*************************\n");
int busid;
int bus_cnt = starpu_bus_get_count();
for (busid = 0; busid < bus_cnt; busid++)
{
int src, dst;
src = starpu_bus_get_src(busid);
dst = starpu_bus_get_dst(busid);
struct starpu_profiling_bus_info bus_info;
starpu_bus_get_profiling_info(busid, &bus_info);
int long long transferred = bus_info.transferred_bytes;
int long long transfer_cnt = bus_info.transfer_count;
double elapsed_time = starpu_timing_timespec_to_us(&bus_info.total_time);
fprintf(stderr, "\t%d -> %d\t%.2lf MB\t%.2lfMB/s\t(transfers : %lld - avg %.2lf MB)\n", src, dst, (1.0*transferred)/(1024*1024), transferred/elapsed_time, transfer_cnt, (1.0*transferred)/(transfer_cnt*1024*1024));
sum_transferred += transferred;
}
fprintf(stderr, "Total transfers: %.2lf MB\n", (1.0*sum_transferred)/(1024*1024));
}
