// SPDX-License-Identifier: GPL-2.0-only /* * svghelper.c - helper functions for outputting svg * * (C) Copyright 2009 Intel Corporation * * Authors: * Arjan van de Ven */ #include #include #include #include #include #include #include #include #include #include #include #include "env.h" #include "svghelper.h" static u64 first_time, last_time; static u64 turbo_frequency, max_freq; #define SLOT_MULT 30.0 #define SLOT_HEIGHT 25.0 #define SLOT_HALF (SLOT_HEIGHT / 2) int svg_page_width = 1000; u64 svg_highlight; const char *svg_highlight_name; #define MIN_TEXT_SIZE 0.01 static u64 total_height; static FILE *svgfile; static double cpu2slot(int cpu) { return 2 * cpu + 1; } static int *topology_map; static double cpu2y(int cpu) { if (topology_map) return cpu2slot(topology_map[cpu]) * SLOT_MULT; else return cpu2slot(cpu) * SLOT_MULT; } static double time2pixels(u64 __time) { double X; X = 1.0 * svg_page_width * (__time - first_time) / (last_time - first_time); return X; } /* * Round text sizes so that the svg viewer only needs a discrete * number of renderings of the font */ static double round_text_size(double size) { int loop = 100; double target = 10.0; if (size >= 10.0) return size; while (loop--) { if (size >= target) return target; target = target / 2.0; } return size; } void open_svg(const char *filename, int cpus, int rows, u64 start, u64 end) { int new_width; svgfile = fopen(filename, "w"); if (!svgfile) { fprintf(stderr, "Cannot open %s for output\n", filename); return; } first_time = start; first_time = first_time / 100000000 * 100000000; last_time = end; /* * if the recording is short, we default to a width of 1000, but * for longer recordings we want at least 200 units of width per second */ new_width = (last_time - first_time) / 5000000; if (new_width > svg_page_width) svg_page_width = new_width; total_height = (1 + rows + cpu2slot(cpus)) * SLOT_MULT; fprintf(svgfile, " \n"); fprintf(svgfile, "\n"); fprintf(svgfile, "\n", svg_page_width, total_height); fprintf(svgfile, "\n \n\n"); } static double normalize_height(double height) { if (height < 0.25) return 0.25; else if (height < 0.50) return 0.50; else if (height < 0.75) return 0.75; else return 0.100; } void svg_ubox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges) { double w = time2pixels(end) - time2pixels(start); height = normalize_height(height); if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "fd=%d error=%d merges=%d\n", fd, err, merges); fprintf(svgfile, "\n", time2pixels(start), w, Yslot * SLOT_MULT, SLOT_HALF * height, type); fprintf(svgfile, "\n"); } void svg_lbox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges) { double w = time2pixels(end) - time2pixels(start); height = normalize_height(height); if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "fd=%d error=%d merges=%d\n", fd, err, merges); fprintf(svgfile, "\n", time2pixels(start), w, Yslot * SLOT_MULT + SLOT_HEIGHT - SLOT_HALF * height, SLOT_HALF * height, type); fprintf(svgfile, "\n"); } void svg_fbox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges) { double w = time2pixels(end) - time2pixels(start); height = normalize_height(height); if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "fd=%d error=%d merges=%d\n", fd, err, merges); fprintf(svgfile, "\n", time2pixels(start), w, Yslot * SLOT_MULT + SLOT_HEIGHT - SLOT_HEIGHT * height, SLOT_HEIGHT * height, type); fprintf(svgfile, "\n"); } void svg_box(int Yslot, u64 start, u64 end, const char *type) { if (!svgfile) return; fprintf(svgfile, "\n", time2pixels(start), time2pixels(end)-time2pixels(start), Yslot * SLOT_MULT, SLOT_HEIGHT, type); } static char *time_to_string(u64 duration); void svg_blocked(int Yslot, int cpu, u64 start, u64 end, const char *backtrace) { if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "#%d blocked %s\n", cpu, time_to_string(end - start)); if (backtrace) fprintf(svgfile, "Blocked on:\n%s\n", backtrace); svg_box(Yslot, start, end, "blocked"); fprintf(svgfile, "\n"); } void svg_running(int Yslot, int cpu, u64 start, u64 end, const char *backtrace) { double text_size; const char *type; if (!svgfile) return; if (svg_highlight && end - start > svg_highlight) type = "sample_hi"; else type = "sample"; fprintf(svgfile, "\n"); fprintf(svgfile, "#%d running %s\n", cpu, time_to_string(end - start)); if (backtrace) fprintf(svgfile, "Switched because:\n%s\n", backtrace); fprintf(svgfile, "\n", time2pixels(start), time2pixels(end)-time2pixels(start), Yslot * SLOT_MULT, SLOT_HEIGHT, type); text_size = (time2pixels(end)-time2pixels(start)); if (cpu > 9) text_size = text_size/2; if (text_size > 1.25) text_size = 1.25; text_size = round_text_size(text_size); if (text_size > MIN_TEXT_SIZE) fprintf(svgfile, "%i\n", time2pixels(start), Yslot * SLOT_MULT + SLOT_HEIGHT - 1, text_size, cpu + 1); fprintf(svgfile, "\n"); } static char *time_to_string(u64 duration) { static char text[80]; text[0] = 0; if (duration < NSEC_PER_USEC) /* less than 1 usec */ return text; if (duration < NSEC_PER_MSEC) { /* less than 1 msec */ sprintf(text, "%.1f us", duration / (double)NSEC_PER_USEC); return text; } sprintf(text, "%.1f ms", duration / (double)NSEC_PER_MSEC); return text; } void svg_waiting(int Yslot, int cpu, u64 start, u64 end, const char *backtrace) { char *text; const char *style; double font_size; if (!svgfile) return; style = "waiting"; if (end-start > 10 * NSEC_PER_MSEC) /* 10 msec */ style = "WAITING"; text = time_to_string(end-start); font_size = 1.0 * (time2pixels(end)-time2pixels(start)); if (font_size > 3) font_size = 3; font_size = round_text_size(font_size); fprintf(svgfile, "\n", time2pixels(start), Yslot * SLOT_MULT); fprintf(svgfile, "#%d waiting %s\n", cpu, time_to_string(end - start)); if (backtrace) fprintf(svgfile, "Waiting on:\n%s\n", backtrace); fprintf(svgfile, "\n", time2pixels(end)-time2pixels(start), SLOT_HEIGHT, style); if (font_size > MIN_TEXT_SIZE) fprintf(svgfile, " %s\n", font_size, text); fprintf(svgfile, "\n"); } static char *cpu_model(void) { static char cpu_m[255]; char buf[256]; FILE *file; cpu_m[0] = 0; /* CPU type */ file = fopen("/proc/cpuinfo", "r"); if (file) { while (fgets(buf, 255, file)) { if (strstr(buf, "model name")) { strlcpy(cpu_m, &buf[13], 255); break; } } fclose(file); } /* CPU type */ file = fopen("/sys/devices/system/cpu/cpu0/cpufreq/scaling_available_frequencies", "r"); if (file) { while (fgets(buf, 255, file)) { unsigned int freq; freq = strtoull(buf, NULL, 10); if (freq > max_freq) max_freq = freq; } fclose(file); } return cpu_m; } void svg_cpu_box(int cpu, u64 __max_freq, u64 __turbo_freq) { char cpu_string[80]; if (!svgfile) return; max_freq = __max_freq; turbo_frequency = __turbo_freq; fprintf(svgfile, "\n"); fprintf(svgfile, "\n", time2pixels(first_time), time2pixels(last_time)-time2pixels(first_time), cpu2y(cpu), SLOT_MULT+SLOT_HEIGHT); sprintf(cpu_string, "CPU %i", (int)cpu); fprintf(svgfile, "%s\n", 10+time2pixels(first_time), cpu2y(cpu) + SLOT_HEIGHT/2, cpu_string); fprintf(svgfile, "%s\n", 10+time2pixels(first_time), cpu2y(cpu) + SLOT_MULT + SLOT_HEIGHT - 4, cpu_model()); fprintf(svgfile, "\n"); } void svg_process(int cpu, u64 start, u64 end, int pid, const char *name, const char *backtrace) { double width; const char *type; if (!svgfile) return; if (svg_highlight && end - start >= svg_highlight) type = "sample_hi"; else if (svg_highlight_name && strstr(name, svg_highlight_name)) type = "sample_hi"; else type = "sample"; fprintf(svgfile, "\n", time2pixels(start), cpu2y(cpu)); fprintf(svgfile, "%d %s running %s\n", pid, name, time_to_string(end - start)); if (backtrace) fprintf(svgfile, "Switched because:\n%s\n", backtrace); fprintf(svgfile, "\n", time2pixels(end)-time2pixels(start), SLOT_MULT+SLOT_HEIGHT, type); width = time2pixels(end)-time2pixels(start); if (width > 6) width = 6; width = round_text_size(width); if (width > MIN_TEXT_SIZE) fprintf(svgfile, "%s\n", width, name); fprintf(svgfile, "\n"); } void svg_cstate(int cpu, u64 start, u64 end, int type) { double width; char style[128]; if (!svgfile) return; fprintf(svgfile, "\n"); if (type > 6) type = 6; sprintf(style, "c%i", type); fprintf(svgfile, "\n", style, time2pixels(start), time2pixels(end)-time2pixels(start), cpu2y(cpu), SLOT_MULT+SLOT_HEIGHT); width = (time2pixels(end)-time2pixels(start))/2.0; if (width > 6) width = 6; width = round_text_size(width); if (width > MIN_TEXT_SIZE) fprintf(svgfile, "C%i\n", time2pixels(start), cpu2y(cpu)+width, width, type); fprintf(svgfile, "\n"); } static char *HzToHuman(unsigned long hz) { static char buffer[1024]; unsigned long long Hz; memset(buffer, 0, 1024); Hz = hz; /* default: just put the Number in */ sprintf(buffer, "%9lli", Hz); if (Hz > 1000) sprintf(buffer, " %6lli Mhz", (Hz+500)/1000); if (Hz > 1500000) sprintf(buffer, " %6.2f Ghz", (Hz+5000.0)/1000000); if (Hz == turbo_frequency) sprintf(buffer, "Turbo"); return buffer; } void svg_pstate(int cpu, u64 start, u64 end, u64 freq) { double height = 0; if (!svgfile) return; fprintf(svgfile, "\n"); if (max_freq) height = freq * 1.0 / max_freq * (SLOT_HEIGHT + SLOT_MULT); height = 1 + cpu2y(cpu) + SLOT_MULT + SLOT_HEIGHT - height; fprintf(svgfile, "\n", time2pixels(start), time2pixels(end), height, height); fprintf(svgfile, "%s\n", time2pixels(start), height+0.9, HzToHuman(freq)); fprintf(svgfile, "\n"); } void svg_partial_wakeline(u64 start, int row1, char *desc1, int row2, char *desc2, const char *backtrace) { double height; if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "%s wakes up %s\n", desc1 ? desc1 : "?", desc2 ? desc2 : "?"); if (backtrace) fprintf(svgfile, "%s\n", backtrace); if (row1 < row2) { if (row1) { fprintf(svgfile, "\n", time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT, time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/32); if (desc2) fprintf(svgfile, "%s >\n", time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT + SLOT_HEIGHT/48, desc2); } if (row2) { fprintf(svgfile, "\n", time2pixels(start), row2 * SLOT_MULT - SLOT_MULT/32, time2pixels(start), row2 * SLOT_MULT); if (desc1) fprintf(svgfile, "%s >\n", time2pixels(start), row2 * SLOT_MULT - SLOT_MULT/32, desc1); } } else { if (row2) { fprintf(svgfile, "\n", time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT, time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/32); if (desc1) fprintf(svgfile, "%s <\n", time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/48, desc1); } if (row1) { fprintf(svgfile, "\n", time2pixels(start), row1 * SLOT_MULT - SLOT_MULT/32, time2pixels(start), row1 * SLOT_MULT); if (desc2) fprintf(svgfile, "%s <\n", time2pixels(start), row1 * SLOT_MULT - SLOT_HEIGHT/32, desc2); } } height = row1 * SLOT_MULT; if (row2 > row1) height += SLOT_HEIGHT; if (row1) fprintf(svgfile, "\n", time2pixels(start), height); fprintf(svgfile, "\n"); } void svg_wakeline(u64 start, int row1, int row2, const char *backtrace) { double height; if (!svgfile) return; fprintf(svgfile, "\n"); if (backtrace) fprintf(svgfile, "%s\n", backtrace); if (row1 < row2) fprintf(svgfile, "\n", time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT, time2pixels(start), row2 * SLOT_MULT); else fprintf(svgfile, "\n", time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT, time2pixels(start), row1 * SLOT_MULT); height = row1 * SLOT_MULT; if (row2 > row1) height += SLOT_HEIGHT; fprintf(svgfile, "\n", time2pixels(start), height); fprintf(svgfile, "\n"); } void svg_interrupt(u64 start, int row, const char *backtrace) { if (!svgfile) return; fprintf(svgfile, "\n"); fprintf(svgfile, "Wakeup from interrupt\n"); if (backtrace) fprintf(svgfile, "%s\n", backtrace); fprintf(svgfile, "\n", time2pixels(start), row * SLOT_MULT); fprintf(svgfile, "\n", time2pixels(start), row * SLOT_MULT + SLOT_HEIGHT); fprintf(svgfile, "\n"); } void svg_text(int Yslot, u64 start, const char *text) { if (!svgfile) return; fprintf(svgfile, "%s\n", time2pixels(start), Yslot * SLOT_MULT+SLOT_HEIGHT/2, text); } static void svg_legenda_box(int X, const char *text, const char *style) { double boxsize; boxsize = SLOT_HEIGHT / 2; fprintf(svgfile, "\n", X, boxsize, boxsize, style); fprintf(svgfile, "%s\n", X + boxsize + 5, boxsize, 0.8 * boxsize, text); } void svg_io_legenda(void) { if (!svgfile) return; fprintf(svgfile, "\n"); svg_legenda_box(0, "Disk", "disk"); svg_legenda_box(100, "Network", "net"); svg_legenda_box(200, "Sync", "sync"); svg_legenda_box(300, "Poll", "poll"); svg_legenda_box(400, "Error", "error"); fprintf(svgfile, "\n"); } void svg_legenda(void) { if (!svgfile) return; fprintf(svgfile, "\n"); svg_legenda_box(0, "Running", "sample"); svg_legenda_box(100, "Idle","c1"); svg_legenda_box(200, "Deeper Idle", "c3"); svg_legenda_box(350, "Deepest Idle", "c6"); svg_legenda_box(550, "Sleeping", "process2"); svg_legenda_box(650, "Waiting for cpu", "waiting"); svg_legenda_box(800, "Blocked on IO", "blocked"); fprintf(svgfile, "\n"); } void svg_time_grid(double min_thickness) { u64 i; if (!svgfile) return; i = first_time; while (i < last_time) { int color = 220; double thickness = 0.075; if ((i % 100000000) == 0) { thickness = 0.5; color = 192; } if ((i % 1000000000) == 0) { thickness = 2.0; color = 128; } if (thickness >= min_thickness) fprintf(svgfile, "\n", time2pixels(i), SLOT_MULT/2, time2pixels(i), total_height, color, color, color, thickness); i += 10000000; } } void svg_close(void) { if (svgfile) { fprintf(svgfile, "\n"); fclose(svgfile); svgfile = NULL; } } #define cpumask_bits(maskp) ((maskp)->bits) typedef struct { DECLARE_BITMAP(bits, MAX_NR_CPUS); } cpumask_t; struct topology { cpumask_t *sib_core; int sib_core_nr; cpumask_t *sib_thr; int sib_thr_nr; }; static void scan_thread_topology(int *map, struct topology *t, int cpu, int *pos, int nr_cpus) { int i; int thr; for (i = 0; i < t->sib_thr_nr; i++) { if (!test_bit(cpu, cpumask_bits(&t->sib_thr[i]))) continue; for_each_set_bit(thr, cpumask_bits(&t->sib_thr[i]), nr_cpus) if (map[thr] == -1) map[thr] = (*pos)++; } } static void scan_core_topology(int *map, struct topology *t, int nr_cpus) { int pos = 0; int i; int cpu; for (i = 0; i < t->sib_core_nr; i++) for_each_set_bit(cpu, cpumask_bits(&t->sib_core[i]), nr_cpus) scan_thread_topology(map, t, cpu, &pos, nr_cpus); } static int str_to_bitmap(char *s, cpumask_t *b, int nr_cpus) { int i; int ret = 0; struct perf_cpu_map *m; struct perf_cpu c; m = perf_cpu_map__new(s); if (!m) return -1; for (i = 0; i < perf_cpu_map__nr(m); i++) { c = perf_cpu_map__cpu(m, i); if (c.cpu >= nr_cpus) { ret = -1; break; } set_bit(c.cpu, cpumask_bits(b)); } perf_cpu_map__put(m); return ret; } int svg_build_topology_map(struct perf_env *env) { int i, nr_cpus; struct topology t; char *sib_core, *sib_thr; nr_cpus = min(env->nr_cpus_online, MAX_NR_CPUS); t.sib_core_nr = env->nr_sibling_cores; t.sib_thr_nr = env->nr_sibling_threads; t.sib_core = calloc(env->nr_sibling_cores, sizeof(cpumask_t)); t.sib_thr = calloc(env->nr_sibling_threads, sizeof(cpumask_t)); sib_core = env->sibling_cores; sib_thr = env->sibling_threads; if (!t.sib_core || !t.sib_thr) { fprintf(stderr, "topology: no memory\n"); goto exit; } for (i = 0; i < env->nr_sibling_cores; i++) { if (str_to_bitmap(sib_core, &t.sib_core[i], nr_cpus)) { fprintf(stderr, "topology: can't parse siblings map\n"); goto exit; } sib_core += strlen(sib_core) + 1; } for (i = 0; i < env->nr_sibling_threads; i++) { if (str_to_bitmap(sib_thr, &t.sib_thr[i], nr_cpus)) { fprintf(stderr, "topology: can't parse siblings map\n"); goto exit; } sib_thr += strlen(sib_thr) + 1; } topology_map = malloc(sizeof(int) * nr_cpus); if (!topology_map) { fprintf(stderr, "topology: no memory\n"); goto exit; } for (i = 0; i < nr_cpus; i++) topology_map[i] = -1; scan_core_topology(topology_map, &t, nr_cpus); return 0; exit: zfree(&t.sib_core); zfree(&t.sib_thr); return -1; }