b1d259f590e9859d3a0a187e75f0a59c5777d094
[linux-2.6-block.git] / tools / perf / util / svghelper.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * svghelper.c - helper functions for outputting svg
4  *
5  * (C) Copyright 2009 Intel Corporation
6  *
7  * Authors:
8  *     Arjan van de Ven <arjan@linux.intel.com>
9  */
10
11 #include <inttypes.h>
12 #include <stdio.h>
13 #include <stdlib.h>
14 #include <unistd.h>
15 #include <string.h>
16 #include <linux/bitmap.h>
17 #include <linux/string.h>
18 #include <linux/time64.h>
19 #include <linux/zalloc.h>
20 #include <internal/cpumap.h>
21 #include <perf/cpumap.h>
22
23 #include "env.h"
24 #include "perf.h"
25 #include "svghelper.h"
26
27 static u64 first_time, last_time;
28 static u64 turbo_frequency, max_freq;
29
30
31 #define SLOT_MULT 30.0
32 #define SLOT_HEIGHT 25.0
33 #define SLOT_HALF (SLOT_HEIGHT / 2)
34
35 int svg_page_width = 1000;
36 u64 svg_highlight;
37 const char *svg_highlight_name;
38
39 #define MIN_TEXT_SIZE 0.01
40
41 static u64 total_height;
42 static FILE *svgfile;
43
44 static double cpu2slot(int cpu)
45 {
46         return 2 * cpu + 1;
47 }
48
49 static int *topology_map;
50
51 static double cpu2y(int cpu)
52 {
53         if (topology_map)
54                 return cpu2slot(topology_map[cpu]) * SLOT_MULT;
55         else
56                 return cpu2slot(cpu) * SLOT_MULT;
57 }
58
59 static double time2pixels(u64 __time)
60 {
61         double X;
62
63         X = 1.0 * svg_page_width * (__time - first_time) / (last_time - first_time);
64         return X;
65 }
66
67 /*
68  * Round text sizes so that the svg viewer only needs a discrete
69  * number of renderings of the font
70  */
71 static double round_text_size(double size)
72 {
73         int loop = 100;
74         double target = 10.0;
75
76         if (size >= 10.0)
77                 return size;
78         while (loop--) {
79                 if (size >= target)
80                         return target;
81                 target = target / 2.0;
82         }
83         return size;
84 }
85
86 void open_svg(const char *filename, int cpus, int rows, u64 start, u64 end)
87 {
88         int new_width;
89
90         svgfile = fopen(filename, "w");
91         if (!svgfile) {
92                 fprintf(stderr, "Cannot open %s for output\n", filename);
93                 return;
94         }
95         first_time = start;
96         first_time = first_time / 100000000 * 100000000;
97         last_time = end;
98
99         /*
100          * if the recording is short, we default to a width of 1000, but
101          * for longer recordings we want at least 200 units of width per second
102          */
103         new_width = (last_time - first_time) / 5000000;
104
105         if (new_width > svg_page_width)
106                 svg_page_width = new_width;
107
108         total_height = (1 + rows + cpu2slot(cpus)) * SLOT_MULT;
109         fprintf(svgfile, "<?xml version=\"1.0\" standalone=\"no\"?> \n");
110         fprintf(svgfile, "<!DOCTYPE svg SYSTEM \"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd\">\n");
111         fprintf(svgfile, "<svg width=\"%i\" height=\"%" PRIu64 "\" version=\"1.1\" xmlns=\"http://www.w3.org/2000/svg\">\n", svg_page_width, total_height);
112
113         fprintf(svgfile, "<defs>\n  <style type=\"text/css\">\n    <![CDATA[\n");
114
115         fprintf(svgfile, "      rect          { stroke-width: 1; }\n");
116         fprintf(svgfile, "      rect.process  { fill:rgb(180,180,180); fill-opacity:0.9; stroke-width:1;   stroke:rgb(  0,  0,  0); } \n");
117         fprintf(svgfile, "      rect.process2 { fill:rgb(180,180,180); fill-opacity:0.9; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
118         fprintf(svgfile, "      rect.process3 { fill:rgb(180,180,180); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
119         fprintf(svgfile, "      rect.sample   { fill:rgb(  0,  0,255); fill-opacity:0.8; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
120         fprintf(svgfile, "      rect.sample_hi{ fill:rgb(255,128,  0); fill-opacity:0.8; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
121         fprintf(svgfile, "      rect.error    { fill:rgb(255,  0,  0); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
122         fprintf(svgfile, "      rect.net      { fill:rgb(  0,128,  0); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
123         fprintf(svgfile, "      rect.disk     { fill:rgb(  0,  0,255); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
124         fprintf(svgfile, "      rect.sync     { fill:rgb(128,128,  0); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
125         fprintf(svgfile, "      rect.poll     { fill:rgb(  0,128,128); fill-opacity:0.2; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
126         fprintf(svgfile, "      rect.blocked  { fill:rgb(255,  0,  0); fill-opacity:0.5; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
127         fprintf(svgfile, "      rect.waiting  { fill:rgb(224,214,  0); fill-opacity:0.8; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
128         fprintf(svgfile, "      rect.WAITING  { fill:rgb(255,214, 48); fill-opacity:0.6; stroke-width:0;   stroke:rgb(  0,  0,  0); } \n");
129         fprintf(svgfile, "      rect.cpu      { fill:rgb(192,192,192); fill-opacity:0.2; stroke-width:0.5; stroke:rgb(128,128,128); } \n");
130         fprintf(svgfile, "      rect.pstate   { fill:rgb(128,128,128); fill-opacity:0.8; stroke-width:0; } \n");
131         fprintf(svgfile, "      rect.c1       { fill:rgb(255,214,214); fill-opacity:0.5; stroke-width:0; } \n");
132         fprintf(svgfile, "      rect.c2       { fill:rgb(255,172,172); fill-opacity:0.5; stroke-width:0; } \n");
133         fprintf(svgfile, "      rect.c3       { fill:rgb(255,130,130); fill-opacity:0.5; stroke-width:0; } \n");
134         fprintf(svgfile, "      rect.c4       { fill:rgb(255, 88, 88); fill-opacity:0.5; stroke-width:0; } \n");
135         fprintf(svgfile, "      rect.c5       { fill:rgb(255, 44, 44); fill-opacity:0.5; stroke-width:0; } \n");
136         fprintf(svgfile, "      rect.c6       { fill:rgb(255,  0,  0); fill-opacity:0.5; stroke-width:0; } \n");
137         fprintf(svgfile, "      line.pstate   { stroke:rgb(255,255,  0); stroke-opacity:0.8; stroke-width:2; } \n");
138
139         fprintf(svgfile, "    ]]>\n   </style>\n</defs>\n");
140 }
141
142 static double normalize_height(double height)
143 {
144         if (height < 0.25)
145                 return 0.25;
146         else if (height < 0.50)
147                 return 0.50;
148         else if (height < 0.75)
149                 return 0.75;
150         else
151                 return 0.100;
152 }
153
154 void svg_ubox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges)
155 {
156         double w = time2pixels(end) - time2pixels(start);
157         height = normalize_height(height);
158
159         if (!svgfile)
160                 return;
161
162         fprintf(svgfile, "<g>\n");
163         fprintf(svgfile, "<title>fd=%d error=%d merges=%d</title>\n", fd, err, merges);
164         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"%s\"/>\n",
165                 time2pixels(start),
166                 w,
167                 Yslot * SLOT_MULT,
168                 SLOT_HALF * height,
169                 type);
170         fprintf(svgfile, "</g>\n");
171 }
172
173 void svg_lbox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges)
174 {
175         double w = time2pixels(end) - time2pixels(start);
176         height = normalize_height(height);
177
178         if (!svgfile)
179                 return;
180
181         fprintf(svgfile, "<g>\n");
182         fprintf(svgfile, "<title>fd=%d error=%d merges=%d</title>\n", fd, err, merges);
183         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"%s\"/>\n",
184                 time2pixels(start),
185                 w,
186                 Yslot * SLOT_MULT + SLOT_HEIGHT - SLOT_HALF * height,
187                 SLOT_HALF * height,
188                 type);
189         fprintf(svgfile, "</g>\n");
190 }
191
192 void svg_fbox(int Yslot, u64 start, u64 end, double height, const char *type, int fd, int err, int merges)
193 {
194         double w = time2pixels(end) - time2pixels(start);
195         height = normalize_height(height);
196
197         if (!svgfile)
198                 return;
199
200         fprintf(svgfile, "<g>\n");
201         fprintf(svgfile, "<title>fd=%d error=%d merges=%d</title>\n", fd, err, merges);
202         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"%s\"/>\n",
203                 time2pixels(start),
204                 w,
205                 Yslot * SLOT_MULT + SLOT_HEIGHT - SLOT_HEIGHT * height,
206                 SLOT_HEIGHT * height,
207                 type);
208         fprintf(svgfile, "</g>\n");
209 }
210
211 void svg_box(int Yslot, u64 start, u64 end, const char *type)
212 {
213         if (!svgfile)
214                 return;
215
216         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"%s\"/>\n",
217                 time2pixels(start), time2pixels(end)-time2pixels(start), Yslot * SLOT_MULT, SLOT_HEIGHT, type);
218 }
219
220 static char *time_to_string(u64 duration);
221 void svg_blocked(int Yslot, int cpu, u64 start, u64 end, const char *backtrace)
222 {
223         if (!svgfile)
224                 return;
225
226         fprintf(svgfile, "<g>\n");
227         fprintf(svgfile, "<title>#%d blocked %s</title>\n", cpu,
228                 time_to_string(end - start));
229         if (backtrace)
230                 fprintf(svgfile, "<desc>Blocked on:\n%s</desc>\n", backtrace);
231         svg_box(Yslot, start, end, "blocked");
232         fprintf(svgfile, "</g>\n");
233 }
234
235 void svg_running(int Yslot, int cpu, u64 start, u64 end, const char *backtrace)
236 {
237         double text_size;
238         const char *type;
239
240         if (!svgfile)
241                 return;
242
243         if (svg_highlight && end - start > svg_highlight)
244                 type = "sample_hi";
245         else
246                 type = "sample";
247         fprintf(svgfile, "<g>\n");
248
249         fprintf(svgfile, "<title>#%d running %s</title>\n",
250                 cpu, time_to_string(end - start));
251         if (backtrace)
252                 fprintf(svgfile, "<desc>Switched because:\n%s</desc>\n", backtrace);
253         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"%s\"/>\n",
254                 time2pixels(start), time2pixels(end)-time2pixels(start), Yslot * SLOT_MULT, SLOT_HEIGHT,
255                 type);
256
257         text_size = (time2pixels(end)-time2pixels(start));
258         if (cpu > 9)
259                 text_size = text_size/2;
260         if (text_size > 1.25)
261                 text_size = 1.25;
262         text_size = round_text_size(text_size);
263
264         if (text_size > MIN_TEXT_SIZE)
265                 fprintf(svgfile, "<text x=\"%.8f\" y=\"%.8f\" font-size=\"%.8fpt\">%i</text>\n",
266                         time2pixels(start), Yslot *  SLOT_MULT + SLOT_HEIGHT - 1, text_size,  cpu + 1);
267
268         fprintf(svgfile, "</g>\n");
269 }
270
271 static char *time_to_string(u64 duration)
272 {
273         static char text[80];
274
275         text[0] = 0;
276
277         if (duration < NSEC_PER_USEC) /* less than 1 usec */
278                 return text;
279
280         if (duration < NSEC_PER_MSEC) { /* less than 1 msec */
281                 sprintf(text, "%.1f us", duration / (double)NSEC_PER_USEC);
282                 return text;
283         }
284         sprintf(text, "%.1f ms", duration / (double)NSEC_PER_MSEC);
285
286         return text;
287 }
288
289 void svg_waiting(int Yslot, int cpu, u64 start, u64 end, const char *backtrace)
290 {
291         char *text;
292         const char *style;
293         double font_size;
294
295         if (!svgfile)
296                 return;
297
298         style = "waiting";
299
300         if (end-start > 10 * NSEC_PER_MSEC) /* 10 msec */
301                 style = "WAITING";
302
303         text = time_to_string(end-start);
304
305         font_size = 1.0 * (time2pixels(end)-time2pixels(start));
306
307         if (font_size > 3)
308                 font_size = 3;
309
310         font_size = round_text_size(font_size);
311
312         fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\">\n", time2pixels(start), Yslot * SLOT_MULT);
313         fprintf(svgfile, "<title>#%d waiting %s</title>\n", cpu, time_to_string(end - start));
314         if (backtrace)
315                 fprintf(svgfile, "<desc>Waiting on:\n%s</desc>\n", backtrace);
316         fprintf(svgfile, "<rect x=\"0\" width=\"%.8f\" y=\"0\" height=\"%.1f\" class=\"%s\"/>\n",
317                 time2pixels(end)-time2pixels(start), SLOT_HEIGHT, style);
318         if (font_size > MIN_TEXT_SIZE)
319                 fprintf(svgfile, "<text transform=\"rotate(90)\" font-size=\"%.8fpt\"> %s</text>\n",
320                         font_size, text);
321         fprintf(svgfile, "</g>\n");
322 }
323
324 static char *cpu_model(void)
325 {
326         static char cpu_m[255];
327         char buf[256];
328         FILE *file;
329
330         cpu_m[0] = 0;
331         /* CPU type */
332         file = fopen("/proc/cpuinfo", "r");
333         if (file) {
334                 while (fgets(buf, 255, file)) {
335                         if (strcasestr(buf, "model name")) {
336                                 strlcpy(cpu_m, &buf[13], 255);
337                                 break;
338                         }
339                 }
340                 fclose(file);
341         }
342
343         /* CPU type */
344         file = fopen("/sys/devices/system/cpu/cpu0/cpufreq/scaling_available_frequencies", "r");
345         if (file) {
346                 while (fgets(buf, 255, file)) {
347                         unsigned int freq;
348                         freq = strtoull(buf, NULL, 10);
349                         if (freq > max_freq)
350                                 max_freq = freq;
351                 }
352                 fclose(file);
353         }
354         return cpu_m;
355 }
356
357 void svg_cpu_box(int cpu, u64 __max_freq, u64 __turbo_freq)
358 {
359         char cpu_string[80];
360         if (!svgfile)
361                 return;
362
363         max_freq = __max_freq;
364         turbo_frequency = __turbo_freq;
365
366         fprintf(svgfile, "<g>\n");
367
368         fprintf(svgfile, "<rect x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\" class=\"cpu\"/>\n",
369                 time2pixels(first_time),
370                 time2pixels(last_time)-time2pixels(first_time),
371                 cpu2y(cpu), SLOT_MULT+SLOT_HEIGHT);
372
373         sprintf(cpu_string, "CPU %i", (int)cpu);
374         fprintf(svgfile, "<text x=\"%.8f\" y=\"%.8f\">%s</text>\n",
375                 10+time2pixels(first_time), cpu2y(cpu) + SLOT_HEIGHT/2, cpu_string);
376
377         fprintf(svgfile, "<text transform=\"translate(%.8f,%.8f)\" font-size=\"1.25pt\">%s</text>\n",
378                 10+time2pixels(first_time), cpu2y(cpu) + SLOT_MULT + SLOT_HEIGHT - 4, cpu_model());
379
380         fprintf(svgfile, "</g>\n");
381 }
382
383 void svg_process(int cpu, u64 start, u64 end, int pid, const char *name, const char *backtrace)
384 {
385         double width;
386         const char *type;
387
388         if (!svgfile)
389                 return;
390
391         if (svg_highlight && end - start >= svg_highlight)
392                 type = "sample_hi";
393         else if (svg_highlight_name && strstr(name, svg_highlight_name))
394                 type = "sample_hi";
395         else
396                 type = "sample";
397
398         fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\">\n", time2pixels(start), cpu2y(cpu));
399         fprintf(svgfile, "<title>%d %s running %s</title>\n", pid, name, time_to_string(end - start));
400         if (backtrace)
401                 fprintf(svgfile, "<desc>Switched because:\n%s</desc>\n", backtrace);
402         fprintf(svgfile, "<rect x=\"0\" width=\"%.8f\" y=\"0\" height=\"%.1f\" class=\"%s\"/>\n",
403                 time2pixels(end)-time2pixels(start), SLOT_MULT+SLOT_HEIGHT, type);
404         width = time2pixels(end)-time2pixels(start);
405         if (width > 6)
406                 width = 6;
407
408         width = round_text_size(width);
409
410         if (width > MIN_TEXT_SIZE)
411                 fprintf(svgfile, "<text transform=\"rotate(90)\" font-size=\"%.8fpt\">%s</text>\n",
412                         width, name);
413
414         fprintf(svgfile, "</g>\n");
415 }
416
417 void svg_cstate(int cpu, u64 start, u64 end, int type)
418 {
419         double width;
420         char style[128];
421
422         if (!svgfile)
423                 return;
424
425
426         fprintf(svgfile, "<g>\n");
427
428         if (type > 6)
429                 type = 6;
430         sprintf(style, "c%i", type);
431
432         fprintf(svgfile, "<rect class=\"%s\" x=\"%.8f\" width=\"%.8f\" y=\"%.1f\" height=\"%.1f\"/>\n",
433                 style,
434                 time2pixels(start), time2pixels(end)-time2pixels(start),
435                 cpu2y(cpu), SLOT_MULT+SLOT_HEIGHT);
436
437         width = (time2pixels(end)-time2pixels(start))/2.0;
438         if (width > 6)
439                 width = 6;
440
441         width = round_text_size(width);
442
443         if (width > MIN_TEXT_SIZE)
444                 fprintf(svgfile, "<text x=\"%.8f\" y=\"%.8f\" font-size=\"%.8fpt\">C%i</text>\n",
445                         time2pixels(start), cpu2y(cpu)+width, width, type);
446
447         fprintf(svgfile, "</g>\n");
448 }
449
450 static char *HzToHuman(unsigned long hz)
451 {
452         static char buffer[1024];
453         unsigned long long Hz;
454
455         memset(buffer, 0, 1024);
456
457         Hz = hz;
458
459         /* default: just put the Number in */
460         sprintf(buffer, "%9lli", Hz);
461
462         if (Hz > 1000)
463                 sprintf(buffer, " %6lli Mhz", (Hz+500)/1000);
464
465         if (Hz > 1500000)
466                 sprintf(buffer, " %6.2f Ghz", (Hz+5000.0)/1000000);
467
468         if (Hz == turbo_frequency)
469                 sprintf(buffer, "Turbo");
470
471         return buffer;
472 }
473
474 void svg_pstate(int cpu, u64 start, u64 end, u64 freq)
475 {
476         double height = 0;
477
478         if (!svgfile)
479                 return;
480
481         fprintf(svgfile, "<g>\n");
482
483         if (max_freq)
484                 height = freq * 1.0 / max_freq * (SLOT_HEIGHT + SLOT_MULT);
485         height = 1 + cpu2y(cpu) + SLOT_MULT + SLOT_HEIGHT - height;
486         fprintf(svgfile, "<line x1=\"%.8f\" x2=\"%.8f\" y1=\"%.1f\" y2=\"%.1f\" class=\"pstate\"/>\n",
487                 time2pixels(start), time2pixels(end), height, height);
488         fprintf(svgfile, "<text x=\"%.8f\" y=\"%.8f\" font-size=\"0.25pt\">%s</text>\n",
489                 time2pixels(start), height+0.9, HzToHuman(freq));
490
491         fprintf(svgfile, "</g>\n");
492 }
493
494
495 void svg_partial_wakeline(u64 start, int row1, char *desc1, int row2, char *desc2, const char *backtrace)
496 {
497         double height;
498
499         if (!svgfile)
500                 return;
501
502
503         fprintf(svgfile, "<g>\n");
504
505         fprintf(svgfile, "<title>%s wakes up %s</title>\n",
506                 desc1 ? desc1 : "?",
507                 desc2 ? desc2 : "?");
508
509         if (backtrace)
510                 fprintf(svgfile, "<desc>%s</desc>\n", backtrace);
511
512         if (row1 < row2) {
513                 if (row1) {
514                         fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
515                                 time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT,  time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/32);
516                         if (desc2)
517                                 fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\"><text transform=\"rotate(90)\" font-size=\"0.02pt\">%s &gt;</text></g>\n",
518                                         time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT + SLOT_HEIGHT/48, desc2);
519                 }
520                 if (row2) {
521                         fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
522                                 time2pixels(start), row2 * SLOT_MULT - SLOT_MULT/32,  time2pixels(start), row2 * SLOT_MULT);
523                         if (desc1)
524                                 fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\"><text transform=\"rotate(90)\" font-size=\"0.02pt\">%s &gt;</text></g>\n",
525                                         time2pixels(start), row2 * SLOT_MULT - SLOT_MULT/32, desc1);
526                 }
527         } else {
528                 if (row2) {
529                         fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
530                                 time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT,  time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/32);
531                         if (desc1)
532                                 fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\"><text transform=\"rotate(90)\" font-size=\"0.02pt\">%s &lt;</text></g>\n",
533                                         time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT + SLOT_MULT/48, desc1);
534                 }
535                 if (row1) {
536                         fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
537                                 time2pixels(start), row1 * SLOT_MULT - SLOT_MULT/32,  time2pixels(start), row1 * SLOT_MULT);
538                         if (desc2)
539                                 fprintf(svgfile, "<g transform=\"translate(%.8f,%.8f)\"><text transform=\"rotate(90)\" font-size=\"0.02pt\">%s &lt;</text></g>\n",
540                                         time2pixels(start), row1 * SLOT_MULT - SLOT_HEIGHT/32, desc2);
541                 }
542         }
543         height = row1 * SLOT_MULT;
544         if (row2 > row1)
545                 height += SLOT_HEIGHT;
546         if (row1)
547                 fprintf(svgfile, "<circle  cx=\"%.8f\" cy=\"%.2f\" r = \"0.01\"  style=\"fill:rgb(32,255,32)\"/>\n",
548                         time2pixels(start), height);
549
550         fprintf(svgfile, "</g>\n");
551 }
552
553 void svg_wakeline(u64 start, int row1, int row2, const char *backtrace)
554 {
555         double height;
556
557         if (!svgfile)
558                 return;
559
560
561         fprintf(svgfile, "<g>\n");
562
563         if (backtrace)
564                 fprintf(svgfile, "<desc>%s</desc>\n", backtrace);
565
566         if (row1 < row2)
567                 fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
568                         time2pixels(start), row1 * SLOT_MULT + SLOT_HEIGHT,  time2pixels(start), row2 * SLOT_MULT);
569         else
570                 fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%.2f\" style=\"stroke:rgb(32,255,32);stroke-width:0.009\"/>\n",
571                         time2pixels(start), row2 * SLOT_MULT + SLOT_HEIGHT,  time2pixels(start), row1 * SLOT_MULT);
572
573         height = row1 * SLOT_MULT;
574         if (row2 > row1)
575                 height += SLOT_HEIGHT;
576         fprintf(svgfile, "<circle  cx=\"%.8f\" cy=\"%.2f\" r = \"0.01\"  style=\"fill:rgb(32,255,32)\"/>\n",
577                         time2pixels(start), height);
578
579         fprintf(svgfile, "</g>\n");
580 }
581
582 void svg_interrupt(u64 start, int row, const char *backtrace)
583 {
584         if (!svgfile)
585                 return;
586
587         fprintf(svgfile, "<g>\n");
588
589         fprintf(svgfile, "<title>Wakeup from interrupt</title>\n");
590
591         if (backtrace)
592                 fprintf(svgfile, "<desc>%s</desc>\n", backtrace);
593
594         fprintf(svgfile, "<circle  cx=\"%.8f\" cy=\"%.2f\" r = \"0.01\"  style=\"fill:rgb(255,128,128)\"/>\n",
595                         time2pixels(start), row * SLOT_MULT);
596         fprintf(svgfile, "<circle  cx=\"%.8f\" cy=\"%.2f\" r = \"0.01\"  style=\"fill:rgb(255,128,128)\"/>\n",
597                         time2pixels(start), row * SLOT_MULT + SLOT_HEIGHT);
598
599         fprintf(svgfile, "</g>\n");
600 }
601
602 void svg_text(int Yslot, u64 start, const char *text)
603 {
604         if (!svgfile)
605                 return;
606
607         fprintf(svgfile, "<text x=\"%.8f\" y=\"%.8f\">%s</text>\n",
608                 time2pixels(start), Yslot * SLOT_MULT+SLOT_HEIGHT/2, text);
609 }
610
611 static void svg_legenda_box(int X, const char *text, const char *style)
612 {
613         double boxsize;
614         boxsize = SLOT_HEIGHT / 2;
615
616         fprintf(svgfile, "<rect x=\"%i\" width=\"%.8f\" y=\"0\" height=\"%.1f\" class=\"%s\"/>\n",
617                 X, boxsize, boxsize, style);
618         fprintf(svgfile, "<text transform=\"translate(%.8f, %.8f)\" font-size=\"%.8fpt\">%s</text>\n",
619                 X + boxsize + 5, boxsize, 0.8 * boxsize, text);
620 }
621
622 void svg_io_legenda(void)
623 {
624         if (!svgfile)
625                 return;
626
627         fprintf(svgfile, "<g>\n");
628         svg_legenda_box(0,      "Disk", "disk");
629         svg_legenda_box(100,    "Network", "net");
630         svg_legenda_box(200,    "Sync", "sync");
631         svg_legenda_box(300,    "Poll", "poll");
632         svg_legenda_box(400,    "Error", "error");
633         fprintf(svgfile, "</g>\n");
634 }
635
636 void svg_legenda(void)
637 {
638         if (!svgfile)
639                 return;
640
641         fprintf(svgfile, "<g>\n");
642         svg_legenda_box(0,      "Running", "sample");
643         svg_legenda_box(100,    "Idle","c1");
644         svg_legenda_box(200,    "Deeper Idle", "c3");
645         svg_legenda_box(350,    "Deepest Idle", "c6");
646         svg_legenda_box(550,    "Sleeping", "process2");
647         svg_legenda_box(650,    "Waiting for cpu", "waiting");
648         svg_legenda_box(800,    "Blocked on IO", "blocked");
649         fprintf(svgfile, "</g>\n");
650 }
651
652 void svg_time_grid(double min_thickness)
653 {
654         u64 i;
655
656         if (!svgfile)
657                 return;
658
659         i = first_time;
660         while (i < last_time) {
661                 int color = 220;
662                 double thickness = 0.075;
663                 if ((i % 100000000) == 0) {
664                         thickness = 0.5;
665                         color = 192;
666                 }
667                 if ((i % 1000000000) == 0) {
668                         thickness = 2.0;
669                         color = 128;
670                 }
671
672                 if (thickness >= min_thickness)
673                         fprintf(svgfile, "<line x1=\"%.8f\" y1=\"%.2f\" x2=\"%.8f\" y2=\"%" PRIu64 "\" style=\"stroke:rgb(%i,%i,%i);stroke-width:%.3f\"/>\n",
674                                 time2pixels(i), SLOT_MULT/2, time2pixels(i),
675                                 total_height, color, color, color, thickness);
676
677                 i += 10000000;
678         }
679 }
680
681 void svg_close(void)
682 {
683         if (svgfile) {
684                 fprintf(svgfile, "</svg>\n");
685                 fclose(svgfile);
686                 svgfile = NULL;
687         }
688 }
689
690 #define cpumask_bits(maskp) ((maskp)->bits)
691 typedef struct { DECLARE_BITMAP(bits, MAX_NR_CPUS); } cpumask_t;
692
693 struct topology {
694         cpumask_t *sib_core;
695         int sib_core_nr;
696         cpumask_t *sib_thr;
697         int sib_thr_nr;
698 };
699
700 static void scan_thread_topology(int *map, struct topology *t, int cpu,
701                                  int *pos, int nr_cpus)
702 {
703         int i;
704         int thr;
705
706         for (i = 0; i < t->sib_thr_nr; i++) {
707                 if (!test_bit(cpu, cpumask_bits(&t->sib_thr[i])))
708                         continue;
709
710                 for_each_set_bit(thr, cpumask_bits(&t->sib_thr[i]), nr_cpus)
711                         if (map[thr] == -1)
712                                 map[thr] = (*pos)++;
713         }
714 }
715
716 static void scan_core_topology(int *map, struct topology *t, int nr_cpus)
717 {
718         int pos = 0;
719         int i;
720         int cpu;
721
722         for (i = 0; i < t->sib_core_nr; i++)
723                 for_each_set_bit(cpu, cpumask_bits(&t->sib_core[i]), nr_cpus)
724                         scan_thread_topology(map, t, cpu, &pos, nr_cpus);
725 }
726
727 static int str_to_bitmap(char *s, cpumask_t *b, int nr_cpus)
728 {
729         int idx, ret = 0;
730         struct perf_cpu_map *map;
731         struct perf_cpu cpu;
732
733         map = perf_cpu_map__new(s);
734         if (!map)
735                 return -1;
736
737         perf_cpu_map__for_each_cpu(cpu, idx, map) {
738                 if (cpu.cpu >= nr_cpus) {
739                         ret = -1;
740                         break;
741                 }
742
743                 __set_bit(cpu.cpu, cpumask_bits(b));
744         }
745
746         perf_cpu_map__put(map);
747
748         return ret;
749 }
750
751 int svg_build_topology_map(struct perf_env *env)
752 {
753         int i, nr_cpus;
754         struct topology t;
755         char *sib_core, *sib_thr;
756         int ret = -1;
757
758         nr_cpus = min(env->nr_cpus_online, MAX_NR_CPUS);
759
760         t.sib_core_nr = env->nr_sibling_cores;
761         t.sib_thr_nr = env->nr_sibling_threads;
762         t.sib_core = calloc(env->nr_sibling_cores, sizeof(cpumask_t));
763         t.sib_thr = calloc(env->nr_sibling_threads, sizeof(cpumask_t));
764
765         sib_core = env->sibling_cores;
766         sib_thr = env->sibling_threads;
767
768         if (!t.sib_core || !t.sib_thr) {
769                 fprintf(stderr, "topology: no memory\n");
770                 goto exit;
771         }
772
773         for (i = 0; i < env->nr_sibling_cores; i++) {
774                 if (str_to_bitmap(sib_core, &t.sib_core[i], nr_cpus)) {
775                         fprintf(stderr, "topology: can't parse siblings map\n");
776                         goto exit;
777                 }
778
779                 sib_core += strlen(sib_core) + 1;
780         }
781
782         for (i = 0; i < env->nr_sibling_threads; i++) {
783                 if (str_to_bitmap(sib_thr, &t.sib_thr[i], nr_cpus)) {
784                         fprintf(stderr, "topology: can't parse siblings map\n");
785                         goto exit;
786                 }
787
788                 sib_thr += strlen(sib_thr) + 1;
789         }
790
791         topology_map = malloc(sizeof(int) * nr_cpus);
792         if (!topology_map) {
793                 fprintf(stderr, "topology: no memory\n");
794                 goto exit;
795         }
796
797         for (i = 0; i < nr_cpus; i++)
798                 topology_map[i] = -1;
799
800         scan_core_topology(topology_map, &t, nr_cpus);
801
802         ret = 0;
803
804 exit:
805         zfree(&t.sib_core);
806         zfree(&t.sib_thr);
807
808         return ret;
809 }