#include "profiling.h"

#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/time.h>

#ifdef SHOW_PERF
uint64_t tprof[LIM_THREAD_PROF_TYPE][LIM_THREAD] = {0};
uint64_t proc_freq = 1000;
uint64_t gprof[LIM_GLOBAL_PROF_TYPE] = {0};

FILE* gfp[4] = {NULL, NULL, NULL, NULL};
#endif

uint64_t realtimeMsec(void) {
    struct timeval tv;
    gettimeofday(&tv, NULL);
    return (uint64_t)1000 * (tv.tv_sec + ((1e-6) * tv.tv_usec));
}

static int calcThreadTime(uint64_t *a, int len, double *max, double *min, double *avg) {
#ifdef SHOW_PERF
    int i = 0;
    uint64_t umax = 0, umin = UINT64_MAX, uavg = 0;
    for (i = 0; i < len; i++) {
        if (a[i] > umax)
            umax = a[i];
        if (a[i] < umin)
            umin = a[i];
        uavg += a[i];
    }
    if (len > 0) *avg = uavg * 1.0 / len / proc_freq;
    else *avg = 0.0;
    *max = umax * 1.0 / proc_freq;
    *min = umin * 1.0 / proc_freq;
    
#endif
    return 1;
}

#define PRINT_GP(gpname) \
    fprintf(stderr, "time G %-15s:     %0.2lfs\n", #gpname, gprof[GP_##gpname] * 1.0 / proc_freq);

#define PRINT_TP(tpname, nthread)                                                                                 \
    {                                                                                                             \
        double maxTime, minTime, avgTime;                                                                         \
        calcThreadTime(tprof[TP_##tpname], nthread, &maxTime, &minTime, &avgTime);                                \
        fprintf(stderr, "time T %-15s:  avg %0.2lfs min %0.2lfs max %0.2lfs\n", #tpname, avgTime, minTime, maxTime); \
    }

int displayProfiling(int nthread) {

#ifdef SHOW_PERF
    fprintf(stderr, "\n");

    PRINT_GP(read);
    PRINT_GP(mem_copy);
    PRINT_GP(parse_block);
    PRINT_GP(uncompress);
    PRINT_GP(sort);
    PRINT_GP(merge);
    PRINT_GP(compress);
    PRINT_GP(write_mid);
    PRINT_GP(read_mid);
    PRINT_GP(write_final);
    PRINT_GP(mid_all);

    PRINT_TP(sort, nthread);
    PRINT_TP(mem_copy, nthread);
    fprintf(stderr, "\n");
#endif

    return 0;
}