void starpu_perfmodel_debugfilepath(struct starpu_perfmodel_t *model, enum starpu_perf_archtype arch, char *path, size_t maxlen) { char archname[32]; starpu_perfmodel_get_arch_name(arch, archname, 32); STARPU_ASSERT(path); get_model_debug_path(model, archname, path, maxlen); }
static void dump_model_file(FILE *f, struct starpu_perfmodel_t *model) { fprintf(f, "#################\n"); unsigned arch; for (arch = 0; arch < STARPU_NARCH_VARIATIONS; arch++) { char archname[32]; starpu_perfmodel_get_arch_name(arch, archname, 32); fprintf(f, "# Model for %s\n", archname); dump_per_arch_model_file(f, &model->per_arch[arch]); fprintf(f, "\n##################\n"); } }
void starpu_perfmodel_print(struct starpu_perfmodel *model, struct starpu_perfmodel_arch* arch, unsigned nimpl, char *parameter, uint32_t *footprint, FILE *output) { int comb = starpu_perfmodel_arch_comb_get(arch->ndevices, arch->devices); STARPU_ASSERT(comb != -1); struct starpu_perfmodel_per_arch *arch_model = &model->state->per_arch[comb][nimpl]; char archname[32]; if (arch_model->regression.nsample || arch_model->regression.valid || arch_model->regression.nl_valid || arch_model->list) { starpu_perfmodel_get_arch_name(arch, archname, 32, nimpl); fprintf(output, "# performance model for %s\n", archname); } if (parameter == NULL) { /* no specific parameter was requested, so we display everything */ if (arch_model->regression.nsample) { fprintf(output, "\tRegression : #sample = %u\n", arch_model->regression.nsample); } /* Only display the regression model if we could actually build a model */ if (arch_model->regression.valid) { fprintf(output, "\tLinear: y = alpha size ^ beta\n"); fprintf(output, "\t\talpha = %e\n", arch_model->regression.alpha); fprintf(output, "\t\tbeta = %e\n", arch_model->regression.beta); } else { //fprintf(output, "\tLinear model is INVALID\n"); } if (arch_model->regression.nl_valid) { fprintf(output, "\tNon-Linear: y = a size ^b + c\n"); fprintf(output, "\t\ta = %e\n", arch_model->regression.a); fprintf(output, "\t\tb = %e\n", arch_model->regression.b); fprintf(output, "\t\tc = %e\n", arch_model->regression.c); } else { //fprintf(output, "\tNon-Linear model is INVALID\n"); } _starpu_perfmodel_print_history_based(arch_model, parameter, footprint, output); #if 0 char debugname[1024]; starpu_perfmodel_debugfilepath(model, arch, debugname, 1024, nimpl); printf("\t debug file path : %s\n", debugname); #endif } else { /* only display the parameter that was specifically requested */ if (strcmp(parameter, "a") == 0) { printf("%e\n", arch_model->regression.a); return; } if (strcmp(parameter, "b") == 0) { printf("%e\n", arch_model->regression.b); return; } if (strcmp(parameter, "c") == 0) { printf("%e\n", arch_model->regression.c); return; } if (strcmp(parameter, "alpha") == 0) { printf("%e\n", arch_model->regression.alpha); return; } if (strcmp(parameter, "beta") == 0) { printf("%e\n", arch_model->regression.beta); return; } if (strcmp(parameter, "path-file-debug") == 0) { char debugname[256]; starpu_perfmodel_debugfilepath(model, arch, debugname, 1024, nimpl); printf("%s\n", debugname); return; } if ((strcmp(parameter, "mean") == 0) || (strcmp(parameter, "stddev") == 0)) { _starpu_perfmodel_print_history_based(arch_model, parameter, footprint, output); return; } /* TODO display if it's valid ? */ fprintf(output, "Unknown parameter requested, aborting.\n"); exit(-1); } }