cbe915571c0e8f3c7d28db2ce44940f57ae101c9
[blktrace.git] / iowatcher / main.c
1 /*
2  * Copyright (C) 2012 Fusion-io
3  *
4  *  This program is free software; you can redistribute it and/or
5  *  modify it under the terms of the GNU General Public
6  *  License v2 as published by the Free Software Foundation.
7  *
8  *  This program is distributed in the hope that it will be useful,
9  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
10  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  *  GNU General Public License for more details.
12  *
13  *  You should have received a copy of the GNU General Public License
14  *  along with this program; if not, write to the Free Software
15  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
16  *
17  *  Parts of this file were imported from Jens Axboe's blktrace sources (also GPL)
18  */
19 #include <sys/types.h>
20 #include <sys/stat.h>
21 #include <fcntl.h>
22 #include <unistd.h>
23 #include <stdlib.h>
24 #include <stdio.h>
25 #include <math.h>
26 #include <inttypes.h>
27 #include <string.h>
28 #include <asm/types.h>
29 #include <errno.h>
30 #include <sys/mman.h>
31 #include <time.h>
32 #include <math.h>
33 #include <getopt.h>
34 #include <limits.h>
35 #include <float.h>
36 #include <signal.h>
37
38 #include "plot.h"
39 #include "blkparse.h"
40 #include "list.h"
41 #include "tracers.h"
42 #include "mpstat.h"
43 #include "fio.h"
44
45 LIST_HEAD(all_traces);
46 LIST_HEAD(fio_traces);
47
48 static char line[1024];
49 static int line_len = 1024;
50 static int found_mpstat = 0;
51 static int make_movie = 0;
52 static int keep_movie_svgs = 0;
53 static int opt_graph_width = 0;
54 static int opt_graph_height = 0;
55
56 static int columns = 1;
57 static int num_xticks = 9;
58 static int num_yticks = 4;
59
60 static double min_time = 0;
61 static double max_time = DBL_MAX;
62 static unsigned long long min_mb = 0;
63 static unsigned long long max_mb = ULLONG_MAX >> 20;
64
65 int plot_io_action = 0;
66 int io_per_process = 0;
67 unsigned int longest_proc_name = 0;
68
69 /*
70  * this doesn't include the IO graph,
71  * but it counts the other graphs as they go out
72  */
73 static int total_graphs_written = 1;
74
75 enum {
76         IO_GRAPH_INDEX = 0,
77         TPUT_GRAPH_INDEX,
78         FIO_GRAPH_INDEX,
79         CPU_SYS_GRAPH_INDEX,
80         CPU_IO_GRAPH_INDEX,
81         CPU_IRQ_GRAPH_INDEX,
82         CPU_SOFT_GRAPH_INDEX,
83         CPU_USER_GRAPH_INDEX,
84         LATENCY_GRAPH_INDEX,
85         QUEUE_DEPTH_GRAPH_INDEX,
86         IOPS_GRAPH_INDEX,
87         TOTAL_GRAPHS
88 };
89
90 enum {
91         MPSTAT_SYS = 0,
92         MPSTAT_IRQ,
93         MPSTAT_IO,
94         MPSTAT_SOFT,
95         MPSTAT_USER,
96         MPSTAT_GRAPHS
97 };
98
99 static char *graphs_by_name[] = {
100         "io",
101         "tput",
102         "fio",
103         "cpu-sys",
104         "cpu-io",
105         "cpu-irq",
106         "cpu-soft",
107         "cpu-user",
108         "latency",
109         "queue-depth",
110         "iops",
111 };
112
113 enum {
114         MOVIE_SPINDLE,
115         MOVIE_RECT,
116         NUM_MOVIE_STYLES,
117 };
118
119 char *movie_styles[] = {
120         "spindle",
121         "rect",
122         NULL
123 };
124
125 static int movie_style = 0;
126
127 static int lookup_movie_style(char *str)
128 {
129         int i;
130
131         for (i = 0; i < NUM_MOVIE_STYLES; i++) {
132                 if (strcmp(str, movie_styles[i]) == 0)
133                         return i;
134         }
135         return -1;
136 }
137
138 static int active_graphs[TOTAL_GRAPHS];
139 static int last_active_graph = IOPS_GRAPH_INDEX;
140
141 static int label_index = 0;
142 static int num_traces = 0;
143 static int num_fio_traces = 0;
144 static int longest_label = 0;
145
146 static char *graph_title = "";
147 static char *output_filename = "trace.svg";
148 static char *blktrace_devices[MAX_DEVICES_PER_TRACE];
149 static int num_blktrace_devices = 0;
150 static char *blktrace_outfile = "trace";
151 static char *blktrace_dest_dir = ".";
152 static char **prog_argv = NULL;
153 static int prog_argc = 0;
154 static char *ffmpeg_codec = "libx264";
155
156 static void alloc_mpstat_gld(struct trace_file *tf)
157 {
158         struct graph_line_data **ptr;
159
160         if (tf->trace->mpstat_num_cpus == 0)
161                 return;
162
163         ptr = calloc((tf->trace->mpstat_num_cpus + 1) * MPSTAT_GRAPHS,
164                      sizeof(struct graph_line_data *));
165         if (!ptr) {
166                 perror("Unable to allocate mpstat arrays\n");
167                 exit(1);
168         }
169         tf->mpstat_gld = ptr;
170 }
171
172 static void enable_all_graphs(void)
173 {
174         int i;
175         for (i = 0; i < TOTAL_GRAPHS; i++)
176                 active_graphs[i] = 1;
177 }
178
179 static void disable_all_graphs(void)
180 {
181         int i;
182         for (i = 0; i < TOTAL_GRAPHS; i++)
183                 active_graphs[i] = 0;
184 }
185
186 static int enable_one_graph(char *name)
187 {
188         int i;
189         for (i = 0; i < TOTAL_GRAPHS; i++) {
190                 if (strcmp(name, graphs_by_name[i]) == 0) {
191                         active_graphs[i] = 1;
192                         return 0;
193                 }
194         }
195         return -ENOENT;
196 }
197
198 static int disable_one_graph(char *name)
199 {
200         int i;
201         for (i = 0; i < TOTAL_GRAPHS; i++) {
202                 if (strcmp(name, graphs_by_name[i]) == 0) {
203                         active_graphs[i] = 0;
204                         return 0;
205                 }
206         }
207         return -ENOENT;
208 }
209
210 static int last_graph(void)
211 {
212         int i;
213         for (i = TOTAL_GRAPHS - 1; i >= 0; i--) {
214                 if (active_graphs[i]) {
215                         return i;
216                 }
217         }
218         return -ENOENT;
219 }
220
221 static int graphs_left(int cur)
222 {
223         int i;
224         int left = 0;
225         for (i = cur; i < TOTAL_GRAPHS; i++) {
226                 if (active_graphs[i])
227                         left++;
228         }
229         return left;
230 }
231
232 static char * join_path(char *dest_dir, char *filename)
233 {
234         /* alloc 2 extra bytes for '/' and '\0' */
235         char *path = malloc(strlen(dest_dir) + strlen(filename) + 2);
236         sprintf(path, "%s%s%s", dest_dir, "/", filename);
237
238         return path;
239 }
240
241 static void add_trace_file(char *filename)
242 {
243         struct trace_file *tf;
244
245         tf = calloc(1, sizeof(*tf));
246         if (!tf) {
247                 fprintf(stderr, "Unable to allocate memory\n");
248                 exit(1);
249         }
250         tf->label = "";
251         tf->filename = strdup(filename);
252         list_add_tail(&tf->list, &all_traces);
253         tf->line_color = "black";
254         num_traces++;
255 }
256
257 static void add_fio_trace_file(char *filename)
258 {
259         struct trace_file *tf;
260
261         tf = calloc(1, sizeof(*tf));
262         if (!tf) {
263                 fprintf(stderr, "Unable to allocate memory\n");
264                 exit(1);
265         }
266         tf->label = "";
267         tf->filename = strdup(filename);
268         list_add_tail(&tf->list, &fio_traces);
269         tf->line_color = pick_fio_color();
270         tf->fio_trace = 1;
271         num_fio_traces++;
272 }
273
274 static void setup_trace_file_graphs(void)
275 {
276         struct trace_file *tf;
277         int i;
278         int alloc_ptrs;
279
280         if (io_per_process)
281                 alloc_ptrs = 16;
282         else
283                 alloc_ptrs = 1;
284
285         list_for_each_entry(tf, &all_traces, list) {
286                 tf->tput_reads_gld = alloc_line_data(tf->min_seconds, tf->max_seconds, tf->stop_seconds);
287                 tf->tput_writes_gld = alloc_line_data(tf->min_seconds, tf->max_seconds, tf->stop_seconds);
288                 tf->latency_gld = alloc_line_data(tf->min_seconds, tf->max_seconds, tf->stop_seconds);
289                 tf->queue_depth_gld = alloc_line_data(tf->min_seconds, tf->max_seconds, tf->stop_seconds);
290
291                 tf->iop_gld = alloc_line_data(tf->min_seconds, tf->max_seconds, tf->stop_seconds);
292                 tf->gdd_writes = calloc(alloc_ptrs, sizeof(struct graph_dot_data *));
293                 tf->gdd_reads = calloc(alloc_ptrs, sizeof(struct graph_dot_data *));
294                 tf->io_plots_allocated = alloc_ptrs;
295
296                 if (tf->trace->mpstat_num_cpus == 0)
297                         continue;
298
299                 alloc_mpstat_gld(tf);
300                 for (i = 0; i < (tf->trace->mpstat_num_cpus + 1) * MPSTAT_GRAPHS; i++) {
301                         tf->mpstat_gld[i] =
302                                 alloc_line_data(tf->mpstat_min_seconds,
303                                                 tf->mpstat_max_seconds,
304                                                 tf->mpstat_max_seconds);
305                         tf->mpstat_gld[i]->max = 100;
306                 }
307         }
308
309         list_for_each_entry(tf, &fio_traces, list) {
310                 if (tf->trace->fio_seconds > 0) {
311                         tf->fio_gld = alloc_line_data(tf->min_seconds,
312                                                       tf->max_seconds,
313                                                       tf->stop_seconds);
314                 }
315         }
316
317 }
318
319 static void read_traces(void)
320 {
321         struct trace_file *tf;
322         struct trace *trace;
323         u64 last_time;
324         u64 ymin;
325         u64 ymax;
326         u64 max_bank;
327         u64 max_bank_offset;
328         char *path = NULL;
329
330         list_for_each_entry(tf, &all_traces, list) {
331                 path = join_path(blktrace_dest_dir, tf->filename);
332
333                 trace = open_trace(path);
334                 if (!trace)
335                         exit(1);
336
337                 last_time = find_last_time(trace);
338                 tf->trace = trace;
339                 tf->max_seconds = SECONDS(last_time) + 1;
340                 tf->stop_seconds = SECONDS(last_time) + 1;
341
342                 find_extreme_offsets(trace, &tf->min_offset, &tf->max_offset,
343                                     &max_bank, &max_bank_offset);
344                 filter_outliers(trace, tf->min_offset, tf->max_offset, &ymin, &ymax);
345                 tf->min_offset = ymin;
346                 tf->max_offset = ymax;
347
348                 read_mpstat(trace, path);
349                 tf->mpstat_stop_seconds = trace->mpstat_seconds;
350                 tf->mpstat_max_seconds = trace->mpstat_seconds;
351                 if (tf->mpstat_max_seconds)
352                         found_mpstat = 1;
353
354                 free(path);
355         }
356
357         list_for_each_entry(tf, &fio_traces, list) {
358                 trace = open_fio_trace(tf->filename);
359                 if (!trace)
360                         exit(1);
361                 tf->trace = trace;
362                 tf->max_seconds = tf->trace->fio_seconds;
363                 tf->stop_seconds = tf->trace->fio_seconds;
364         }
365 }
366
367 static void pick_line_graph_color(void)
368 {
369         struct trace_file *tf;
370         int i;
371
372         list_for_each_entry(tf, &all_traces, list) {
373                 for (i = 0; i < tf->io_plots; i++) {
374                         if (tf->gdd_reads[i]) {
375                                 tf->line_color = tf->gdd_reads[i]->color;
376                                 tf->reads_color = tf->gdd_reads[i]->color;
377                         }
378                         if (tf->gdd_writes[i]) {
379                                 tf->line_color = tf->gdd_writes[i]->color;
380                                 tf->writes_color = tf->gdd_writes[i]->color;
381                         }
382                         if (tf->writes_color && tf->reads_color)
383                                 break;
384                 }
385                 if (!tf->reads_color)
386                         tf->reads_color = tf->line_color;
387                 if (!tf->writes_color)
388                         tf->writes_color = tf->line_color;
389         }
390 }
391
392 static void read_fio_events(struct trace_file *tf)
393 {
394         u64 bw = 0;
395         int time = 0;
396         int dir = 0;
397         int ret;
398
399         first_fio(tf->trace);
400         while (1) {
401                 ret = read_fio_event(tf->trace, &time, &bw, &dir);
402                 if (ret)
403                         break;
404
405                 if (dir <= 1)
406                         add_fio_gld(time, bw, tf->fio_gld);
407                 if (next_fio_line(tf->trace))
408                         break;
409         }
410 }
411
412 static void read_trace_events(void)
413 {
414
415         struct trace_file *tf;
416         struct trace *trace;
417         int ret;
418         int i;
419         unsigned int time;
420         double user, sys, iowait, irq, soft;
421         double max_user = 0, max_sys = 0, max_iowait = 0,
422                max_irq = 0, max_soft = 0;
423
424         list_for_each_entry(tf, &fio_traces, list)
425                 read_fio_events(tf);
426
427         list_for_each_entry(tf, &all_traces, list) {
428                 trace = tf->trace;
429
430                 first_record(trace);
431                 do {
432                         if (SECONDS(get_record_time(trace)) > tf->max_seconds)
433                                 continue;
434                         check_record(trace);
435                         add_tput(trace, tf->tput_writes_gld, tf->tput_reads_gld);
436                         add_iop(trace, tf->iop_gld);
437                         add_io(trace, tf);
438                         add_pending_io(trace, tf->queue_depth_gld);
439                         add_completed_io(trace, tf->latency_gld);
440                 } while (!(ret = next_record(trace)));
441         }
442         list_for_each_entry(tf, &all_traces, list) {
443                 trace = tf->trace;
444
445                 if (trace->mpstat_num_cpus == 0)
446                         continue;
447
448                 first_mpstat(trace);
449
450                 for (time = 0; time < tf->mpstat_stop_seconds; time++) {
451                         for (i = 0; i < (trace->mpstat_num_cpus + 1) * MPSTAT_GRAPHS; i += MPSTAT_GRAPHS) {
452                                 ret = read_mpstat_event(trace, &user, &sys,
453                                                         &iowait, &irq, &soft);
454                                 if (ret)
455                                         goto mpstat_done;
456                                 if (next_mpstat_line(trace))
457                                         goto mpstat_done;
458
459                                 if (sys > max_sys)
460                                         max_sys = sys;
461                                 if (user > max_user)
462                                         max_user = user;
463                                 if (irq > max_irq)
464                                         max_irq = irq;
465                                 if (iowait > max_iowait)
466                                         max_iowait = iowait;
467
468                                 add_mpstat_gld(time, sys, tf->mpstat_gld[i + MPSTAT_SYS]);
469                                 add_mpstat_gld(time, irq, tf->mpstat_gld[i + MPSTAT_IRQ]);
470                                 add_mpstat_gld(time, soft, tf->mpstat_gld[i + MPSTAT_SOFT]);
471                                 add_mpstat_gld(time, user, tf->mpstat_gld[i + MPSTAT_USER]);
472                                 add_mpstat_gld(time, iowait, tf->mpstat_gld[i + MPSTAT_IO]);
473                         }
474                         if (next_mpstat(trace) == NULL)
475                                 break;
476                 }
477         }
478
479 mpstat_done:
480         list_for_each_entry(tf, &all_traces, list) {
481                 trace = tf->trace;
482
483                 if (trace->mpstat_num_cpus == 0)
484                         continue;
485
486                 tf->mpstat_gld[MPSTAT_SYS]->max = max_sys;
487                 tf->mpstat_gld[MPSTAT_IRQ]->max = max_irq;
488                 tf->mpstat_gld[MPSTAT_SOFT]->max = max_soft;
489                 tf->mpstat_gld[MPSTAT_USER]->max = max_user;
490                 tf->mpstat_gld[MPSTAT_IO]->max = max_iowait;;
491         }
492         return;
493 }
494
495 static void set_trace_label(char *label)
496 {
497         int cur = 0;
498         struct trace_file *tf;
499         int len = strlen(label);
500
501         if (len > longest_label)
502                 longest_label = len;
503
504         list_for_each_entry(tf, &all_traces, list) {
505                 if (cur == label_index) {
506                         tf->label = strdup(label);
507                         label_index++;
508                         return;
509                         break;
510                 }
511                 cur++;
512         }
513         list_for_each_entry(tf, &fio_traces, list) {
514                 if (cur == label_index) {
515                         tf->label = strdup(label);
516                         label_index++;
517                         break;
518                 }
519                 cur++;
520         }
521 }
522
523 static void set_blktrace_outfile(char *arg)
524 {
525         char *s = strdup(arg);
526         char *last_dot = strrchr(s, '.');
527
528         if (last_dot) {
529                 if (strcmp(last_dot, ".dump") == 0)
530                         *last_dot = '\0';
531         }
532         blktrace_outfile = s;
533 }
534
535
536 static void compare_minmax_tf(struct trace_file *tf, unsigned int *max_seconds,
537                               u64 *min_offset, u64 *max_offset)
538 {
539         if (tf->max_seconds > *max_seconds)
540                 *max_seconds = tf->max_seconds;
541         if (tf->max_offset > *max_offset)
542                 *max_offset = tf->max_offset;
543         if (tf->min_offset < *min_offset)
544                 *min_offset = tf->min_offset;
545 }
546
547 static void set_all_minmax_tf(unsigned int min_seconds,
548                               unsigned int max_seconds,
549                               u64 min_offset, u64 max_offset)
550 {
551         struct trace_file *tf;
552         struct list_head *traces = &all_traces;
553 again:
554         list_for_each_entry(tf, traces, list) {
555                 tf->min_seconds = min_seconds;
556                 tf->max_seconds = max_seconds;
557                 if (tf->stop_seconds > max_seconds)
558                         tf->stop_seconds = max_seconds;
559                 if (tf->mpstat_max_seconds) {
560                         tf->mpstat_min_seconds = min_seconds;
561                         tf->mpstat_max_seconds = max_seconds;
562                         if (tf->mpstat_stop_seconds > max_seconds)
563                                 tf->mpstat_stop_seconds = max_seconds;
564                 }
565                 tf->min_offset = min_offset;
566                 tf->max_offset = max_offset;
567         }
568         if (traces == &all_traces) {
569                 traces = &fio_traces;
570                 goto again;
571         }
572 }
573
574 static struct pid_plot_history *alloc_pid_plot_history(char *color)
575 {
576         struct pid_plot_history *pph;
577
578         pph = calloc(1, sizeof(struct pid_plot_history));
579         if (!pph) {
580                 perror("memory allocation failed");
581                 exit(1);
582         }
583         pph->history = malloc(sizeof(double) * 4096);
584         if (!pph->history) {
585                 perror("memory allocation failed");
586                 exit(1);
587         }
588         pph->history_len = 4096;
589         pph->color = color;
590
591         return pph;
592 }
593
594 static struct plot_history *alloc_plot_history(struct trace_file *tf)
595 {
596         struct plot_history *ph = calloc(1, sizeof(struct plot_history));
597         int i;
598
599         if (!ph) {
600                 perror("memory allocation failed");
601                 exit(1);
602         }
603         ph->read_pid_history = calloc(tf->io_plots, sizeof(struct pid_plot_history *));
604         if (!ph->read_pid_history) {
605                 perror("memory allocation failed");
606                 exit(1);
607         }
608         ph->write_pid_history = calloc(tf->io_plots, sizeof(struct pid_plot_history *));
609         if (!ph->write_pid_history) {
610                 perror("memory allocation failed");
611                 exit(1);
612         }
613         ph->pid_history_count = tf->io_plots;
614         for (i = 0; i < tf->io_plots; i++) {
615                 if (tf->gdd_reads[i])
616                         ph->read_pid_history[i] = alloc_pid_plot_history(tf->gdd_reads[i]->color);
617                 if (tf->gdd_writes[i])
618                         ph->write_pid_history[i] = alloc_pid_plot_history(tf->gdd_writes[i]->color);
619         }
620         return ph;
621 }
622
623 LIST_HEAD(movie_history);
624 int num_histories = 0;
625
626 static void free_plot_history(struct plot_history *ph)
627 {
628         int pid;
629
630         for (pid = 0; pid < ph->pid_history_count; pid++) {
631                 if (ph->read_pid_history[pid])
632                         free(ph->read_pid_history[pid]);
633                 if (ph->write_pid_history[pid])
634                         free(ph->write_pid_history[pid]);
635         }
636         free(ph->read_pid_history);
637         free(ph->write_pid_history);
638         free(ph);
639 }
640
641 static void add_history(struct plot_history *ph, struct list_head *list)
642 {
643         struct plot_history *entry;
644
645         list_add_tail(&ph->list, list);
646         num_histories++;
647
648         if (num_histories > 12) {
649                 num_histories--;
650                 entry = list_entry(list->next, struct plot_history, list);
651                 list_del(&entry->list);
652                 free_plot_history(entry);
653         }
654 }
655
656 static void plot_movie_history(struct plot *plot, struct list_head *list)
657 {
658         struct plot_history *ph;
659         int pid;
660
661         if (num_histories > 2)
662                 rewind_spindle_steps(num_histories - 1);
663
664         list_for_each_entry(ph, list, list) {
665                 for (pid = 0; pid < ph->pid_history_count; pid++) {
666                         if (ph->read_pid_history[pid]) {
667                                 if (movie_style == MOVIE_SPINDLE) {
668                                         svg_io_graph_movie_array_spindle(plot,
669                                                 ph->read_pid_history[pid]);
670                                 } else {
671                                         svg_io_graph_movie_array(plot,
672                                                 ph->read_pid_history[pid]);
673                                 }
674                         }
675                         if (ph->write_pid_history[pid]) {
676                                 if (movie_style == MOVIE_SPINDLE) {
677                                         svg_io_graph_movie_array_spindle(plot,
678                                                 ph->write_pid_history[pid]);
679                                 } else {
680                                         svg_io_graph_movie_array(plot,
681                                                 ph->write_pid_history[pid]);
682                                 }
683                         }
684                 }
685          }
686 }
687
688 static void free_all_plot_history(struct list_head *head)
689 {
690         struct plot_history *entry;
691
692         while (!list_empty(head)) {
693                 entry = list_entry(head->next, struct plot_history, list);
694                 list_del(&entry->list);
695                 free_plot_history(entry);
696         }
697 }
698
699 static int count_io_plot_types(void)
700 {
701         struct trace_file *tf;
702         int i;
703         int total_io_types = 0;
704
705         list_for_each_entry(tf, &all_traces, list) {
706                 for (i = 0; i < tf->io_plots; i++) {
707                         if (tf->gdd_reads[i])
708                                 total_io_types++;
709                         if (tf->gdd_writes[i])
710                                 total_io_types++;
711                 }
712         }
713         return total_io_types;
714 }
715
716 static void plot_io_legend(struct plot *plot, struct graph_dot_data *gdd, char *prefix, char *rw)
717 {
718         int ret = 0;
719         char *label = NULL;
720         if (io_per_process)
721                 ret = asprintf(&label, "%s %s", prefix, gdd->label);
722         else
723                 ret = asprintf(&label, "%s", prefix);
724         if (ret < 0) {
725                 perror("Failed to process labels");
726                 exit(1);
727         }
728         svg_add_legend(plot, label, rw, gdd->color);
729         free(label);
730 }
731
732 static void plot_io(struct plot *plot, unsigned int min_seconds,
733                     unsigned int max_seconds, u64 min_offset, u64 max_offset)
734 {
735         struct trace_file *tf;
736         int i;
737
738         if (active_graphs[IO_GRAPH_INDEX] == 0)
739                 return;
740
741         setup_axis(plot);
742
743         svg_alloc_legend(plot, count_io_plot_types() * 2);
744
745         set_plot_label(plot, "Device IO");
746         set_ylabel(plot, "Offset (MB)");
747         set_yticks(plot, num_yticks, min_offset / (1024 * 1024),
748                    max_offset / (1024 * 1024), "");
749         set_xticks(plot, num_xticks, min_seconds, max_seconds);
750
751         list_for_each_entry(tf, &all_traces, list) {
752                 char *prefix = tf->label ? tf->label : "";
753
754                 for (i = 0; i < tf->io_plots; i++) {
755                         if (tf->gdd_writes[i]) {
756                                 svg_io_graph(plot, tf->gdd_writes[i]);
757                                 plot_io_legend(plot, tf->gdd_writes[i], prefix, " Writes");
758                         }
759                         if (tf->gdd_reads[i]) {
760                                 svg_io_graph(plot, tf->gdd_reads[i]);
761                                 plot_io_legend(plot, tf->gdd_reads[i], prefix, " Reads");
762                         }
763                 }
764         }
765         if (plot->add_xlabel)
766                 set_xlabel(plot, "Time (seconds)");
767         svg_write_legend(plot);
768         close_plot(plot);
769 }
770
771 static void plot_tput(struct plot *plot, unsigned int min_seconds,
772                       unsigned int max_seconds, int with_legend)
773 {
774         struct trace_file *tf;
775         char *units;
776         char line[128];
777         u64 max = 0, val;
778
779         if (active_graphs[TPUT_GRAPH_INDEX] == 0)
780                 return;
781
782         if (with_legend)
783                 svg_alloc_legend(plot, num_traces * 2);
784
785         list_for_each_entry(tf, &all_traces, list) {
786                 val = line_graph_roll_avg_max(tf->tput_writes_gld);
787                 if (val > max)
788                         max = val;
789                 val = line_graph_roll_avg_max(tf->tput_reads_gld);
790                 if (val > max)
791                         max = val;
792         }
793         list_for_each_entry(tf, &all_traces, list) {
794                 if (tf->tput_writes_gld->max > 0)
795                         tf->tput_writes_gld->max = max;
796                 if (tf->tput_reads_gld->max > 0)
797                         tf->tput_reads_gld->max = max;
798         }
799
800         setup_axis(plot);
801         set_plot_label(plot, "Throughput");
802
803         tf = list_entry(all_traces.next, struct trace_file, list);
804
805         scale_line_graph_bytes(&max, &units, 1024);
806         sprintf(line, "%sB/s", units);
807         set_ylabel(plot, line);
808         set_yticks(plot, num_yticks, 0, max, "");
809         set_xticks(plot, num_xticks, min_seconds, max_seconds);
810
811         list_for_each_entry(tf, &all_traces, list) {
812                 if (tf->tput_writes_gld->max > 0) {
813                         svg_line_graph(plot, tf->tput_writes_gld, tf->writes_color, 0, 0);
814                         if (with_legend)
815                                 svg_add_legend(plot, tf->label, "Writes", tf->writes_color);
816                 }
817                 if (tf->tput_reads_gld->max > 0) {
818                         svg_line_graph(plot, tf->tput_reads_gld, tf->reads_color, 0, 0);
819                         if (with_legend)
820                                 svg_add_legend(plot, tf->label, "Reads", tf->reads_color);
821                 }
822         }
823
824         if (plot->add_xlabel)
825                 set_xlabel(plot, "Time (seconds)");
826
827         if (with_legend)
828                 svg_write_legend(plot);
829
830         close_plot(plot);
831         total_graphs_written++;
832 }
833
834 static void plot_fio_tput(struct plot *plot,
835                           unsigned int min_seconds, unsigned int max_seconds)
836 {
837         struct trace_file *tf;
838         char *units;
839         char line[128];
840         u64 max = 0, val;
841
842         if (num_fio_traces == 0 || active_graphs[FIO_GRAPH_INDEX] == 0)
843                 return;
844
845         if (num_fio_traces > 1)
846                 svg_alloc_legend(plot, num_fio_traces);
847
848         list_for_each_entry(tf, &fio_traces, list) {
849                 val = line_graph_roll_avg_max(tf->fio_gld);
850                 if (val > max)
851                         max = val;
852         }
853
854         list_for_each_entry(tf, &fio_traces, list) {
855                 if (tf->fio_gld->max > 0)
856                         tf->fio_gld->max = max;
857         }
858
859         setup_axis(plot);
860         set_plot_label(plot, "Fio Throughput");
861
862         tf = list_entry(all_traces.next, struct trace_file, list);
863
864         scale_line_graph_bytes(&max, &units, 1024);
865         sprintf(line, "%sB/s", units);
866         set_ylabel(plot, line);
867         set_yticks(plot, num_yticks, 0, max, "");
868
869         set_xticks(plot, num_xticks, min_seconds, max_seconds);
870         list_for_each_entry(tf, &fio_traces, list) {
871                 if (tf->fio_gld->max > 0) {
872                         svg_line_graph(plot, tf->fio_gld, tf->line_color, 0, 0);
873                         if (num_fio_traces > 1)
874                                 svg_add_legend(plot, tf->label, "", tf->line_color);
875                 }
876         }
877
878         if (plot->add_xlabel)
879                 set_xlabel(plot, "Time (seconds)");
880
881         if (num_fio_traces > 1)
882                 svg_write_legend(plot);
883         close_plot(plot);
884         total_graphs_written++;
885 }
886
887 static void plot_cpu(struct plot *plot, unsigned int max_seconds, char *label,
888                      int active_index, int gld_index)
889 {
890         struct trace_file *tf;
891         int max = 0;
892         int i;
893         unsigned int gld_i;
894         char *color;
895         double avg = 0;
896         int ymax;
897         int plotted = 0;
898
899         if (active_graphs[active_index] == 0)
900                 return;
901
902         list_for_each_entry(tf, &all_traces, list) {
903                 if (tf->trace->mpstat_num_cpus > max)
904                         max = tf->trace->mpstat_num_cpus;
905         }
906         if (max == 0)
907                 return;
908
909         tf = list_entry(all_traces.next, struct trace_file, list);
910
911         ymax = tf->mpstat_gld[gld_index]->max;
912         if (ymax == 0)
913                 return;
914
915         svg_alloc_legend(plot, num_traces * max);
916
917         setup_axis(plot);
918         set_plot_label(plot, label);
919
920         max_seconds = tf->mpstat_max_seconds;
921
922         set_yticks(plot, num_yticks, 0, tf->mpstat_gld[gld_index]->max, "");
923         set_ylabel(plot, "Percent");
924         set_xticks(plot, num_xticks, tf->mpstat_min_seconds, max_seconds);
925
926         reset_cpu_color();
927         list_for_each_entry(tf, &all_traces, list) {
928                 if (tf->mpstat_gld == 0)
929                         break;
930                 for (gld_i = tf->mpstat_gld[0]->min_seconds;
931                      gld_i < tf->mpstat_gld[0]->stop_seconds; gld_i++) {
932                         if (tf->mpstat_gld[gld_index]->data[gld_i].count) {
933                                 avg += (tf->mpstat_gld[gld_index]->data[gld_i].sum /
934                                         tf->mpstat_gld[gld_index]->data[gld_i].count);
935                         }
936                 }
937                 avg /= tf->mpstat_gld[gld_index]->stop_seconds -
938                        tf->mpstat_gld[gld_index]->min_seconds;
939                 color = pick_cpu_color();
940                 svg_line_graph(plot, tf->mpstat_gld[0], color, 0, 0);
941                 svg_add_legend(plot, tf->label, " avg", color);
942
943                 for (i = 1; i < tf->trace->mpstat_num_cpus + 1; i++) {
944                         struct graph_line_data *gld = tf->mpstat_gld[i * MPSTAT_GRAPHS + gld_index];
945                         double this_avg = 0;
946
947                         for (gld_i = gld->min_seconds;
948                              gld_i < gld->stop_seconds; gld_i++) {
949                                 if (gld->data[i].count) {
950                                         this_avg += gld->data[i].sum /
951                                                 gld->data[i].count;
952                                 }
953                         }
954
955                         this_avg /= gld->stop_seconds - gld->min_seconds;
956
957                         for (gld_i = gld->min_seconds;
958                              gld_i < gld->stop_seconds; gld_i++) {
959                                 double val;
960
961                                 if (gld->data[gld_i].count == 0)
962                                         continue;
963                                 val = (double)gld->data[gld_i].sum /
964                                         gld->data[gld_i].count;
965
966                                 if (this_avg > avg + 30 || val > 95) {
967                                         color = pick_cpu_color();
968                                         svg_line_graph(plot, gld, color, avg + 30, 95);
969                                         snprintf(line, line_len, " CPU %d\n", i - 1);
970                                         svg_add_legend(plot, tf->label, line, color);
971                                         plotted++;
972                                         break;
973                                 }
974
975                         }
976                 }
977         }
978
979         if (plot->add_xlabel)
980                 set_xlabel(plot, "Time (seconds)");
981
982         if (!plot->no_legend) {
983                 svg_write_legend(plot);
984                 svg_free_legend(plot);
985         }
986         close_plot(plot);
987         total_graphs_written++;
988 }
989
990 static void plot_queue_depth(struct plot *plot, unsigned int min_seconds,
991                              unsigned int max_seconds)
992 {
993         struct trace_file *tf;
994
995         if (active_graphs[QUEUE_DEPTH_GRAPH_INDEX] == 0)
996                 return;
997
998         setup_axis(plot);
999         set_plot_label(plot, "Queue Depth");
1000         if (num_traces > 1)
1001                 svg_alloc_legend(plot, num_traces);
1002
1003         tf = list_entry(all_traces.next, struct trace_file, list);
1004         set_ylabel(plot, "Pending IO");
1005         set_yticks(plot, num_yticks, 0, tf->queue_depth_gld->max, "");
1006         set_xticks(plot, num_xticks, min_seconds, max_seconds);
1007
1008         list_for_each_entry(tf, &all_traces, list) {
1009                 svg_line_graph(plot, tf->queue_depth_gld, tf->line_color, 0, 0);
1010                 if (num_traces > 1)
1011                         svg_add_legend(plot, tf->label, "", tf->line_color);
1012         }
1013
1014         if (plot->add_xlabel)
1015                 set_xlabel(plot, "Time (seconds)");
1016         if (num_traces > 1)
1017                 svg_write_legend(plot);
1018         close_plot(plot);
1019         total_graphs_written++;
1020 }
1021
1022 static void system_check(const char *cmd)
1023 {
1024         if (system(cmd) < 0) {
1025                 int err = errno;
1026
1027                 fprintf(stderr, "system exec failed (%d): %s\n", err, cmd);
1028                 exit(1);
1029         }
1030 }
1031
1032 static void convert_movie_files(char *movie_dir)
1033 {
1034         fprintf(stderr, "Converting svg files in %s\n", movie_dir);
1035         snprintf(line, line_len, "find %s -name \\*.svg | xargs -I{} -n 1 -P 8 rsvg-convert -o {}.png {}",
1036                  movie_dir);
1037         system_check(line);
1038 }
1039
1040 static void mencode_movie(char *movie_dir)
1041 {
1042         fprintf(stderr, "Creating movie %s with ffmpeg\n", movie_dir);
1043         snprintf(line, line_len, "ffmpeg -r 20 -y -i %s/%%10d-%s.svg.png -b:v 250k "
1044                  "-vcodec %s %s", movie_dir, output_filename, ffmpeg_codec,
1045                  output_filename);
1046         system_check(line);
1047 }
1048
1049 static void tencode_movie(char *movie_dir)
1050 {
1051         fprintf(stderr, "Creating movie %s with png2theora\n", movie_dir);
1052         snprintf(line, line_len, "png2theora -o %s %s/%%010d-%s.svg.png",
1053                         output_filename, movie_dir, output_filename);
1054         system_check(line);
1055 }
1056
1057 static void encode_movie(char *movie_dir)
1058 {
1059         char *last_dot = strrchr(output_filename, '.');
1060
1061         if (last_dot &&
1062             (!strncmp(last_dot, ".ogg", 4) || !strncmp(last_dot, ".ogv", 4))) {
1063                 tencode_movie(movie_dir);
1064         } else
1065                 mencode_movie(movie_dir);
1066 }
1067
1068 static void cleanup_movie(char *movie_dir)
1069 {
1070         if (keep_movie_svgs) {
1071                 fprintf(stderr, "Keeping movie dir %s\n", movie_dir);
1072                 return;
1073         }
1074         fprintf(stderr, "Removing movie dir %s\n", movie_dir);
1075         snprintf(line, line_len, "rm %s/*", movie_dir);
1076         system_check(line);
1077
1078         snprintf(line, line_len, "rmdir %s", movie_dir);
1079         system_check(line);
1080 }
1081
1082 static void plot_io_movie(struct plot *plot)
1083 {
1084         struct trace_file *tf;
1085         int i, pid;
1086         struct plot_history *history;
1087         int batch_i;
1088         int movie_len = 30;
1089         int movie_frames_per_sec = 20;
1090         int total_frames = movie_len * movie_frames_per_sec;
1091         int rows, cols;
1092         int batch_count;
1093         int graph_width_factor = 5;
1094         int orig_y_offset;
1095         char movie_dir[] = "io-movie-XXXXXX";
1096
1097         if (mkdtemp(movie_dir) == NULL) {
1098                 perror("Unable to create temp directory for movie files");
1099                 exit(1);
1100         }
1101
1102         get_graph_size(&cols, &rows);
1103         batch_count = cols / total_frames;
1104
1105         if (batch_count == 0)
1106                 batch_count = 1;
1107
1108         list_for_each_entry(tf, &all_traces, list) {
1109                 char *prefix = tf->label ? tf->label : "";
1110
1111                 i = 0;
1112                 while (i < cols) {
1113                         snprintf(line, line_len, "%s/%010d-%s.svg", movie_dir, i, output_filename);
1114                         set_plot_output(plot, line);
1115                         set_plot_title(plot, graph_title);
1116                         orig_y_offset = plot->start_y_offset;
1117
1118                         plot->no_legend = 1;
1119
1120                         set_graph_size(cols / graph_width_factor, rows / 8);
1121                         plot->timeline = i / graph_width_factor;
1122
1123                         plot_tput(plot, tf->min_seconds, tf->max_seconds, 0);
1124
1125                         plot_cpu(plot, tf->max_seconds,
1126                                    "CPU System Time", CPU_SYS_GRAPH_INDEX, MPSTAT_SYS);
1127
1128                         plot->direction = PLOT_ACROSS;
1129                         plot_queue_depth(plot, tf->min_seconds, tf->max_seconds);
1130
1131                         /* movie graph starts here */
1132                         plot->start_y_offset = orig_y_offset;
1133                         set_graph_size(cols - cols / graph_width_factor, rows);
1134                         plot->no_legend = 0;
1135                         plot->timeline = 0;
1136                         plot->direction = PLOT_DOWN;;
1137
1138                         if (movie_style == MOVIE_SPINDLE)
1139                                 setup_axis_spindle(plot);
1140                         else
1141                                 setup_axis(plot);
1142
1143                         svg_alloc_legend(plot, count_io_plot_types() * 2);
1144
1145                         history = alloc_plot_history(tf);
1146                         history->col = i;
1147
1148                         for (pid = 0; pid < tf->io_plots; pid++) {
1149                                 if (tf->gdd_reads[pid])
1150                                         plot_io_legend(plot, tf->gdd_reads[pid], prefix, " Reads");
1151                                 if (tf->gdd_writes[pid])
1152                                         plot_io_legend(plot, tf->gdd_writes[pid], prefix, " Writes");
1153                         }
1154
1155                         batch_i = 0;
1156                         while (i < cols && batch_i < batch_count) {
1157                                 for (pid = 0; pid < tf->io_plots; pid++) {
1158                                         if (tf->gdd_reads[pid]) {
1159                                                 svg_io_graph_movie(tf->gdd_reads[pid],
1160                                                                    history->read_pid_history[pid],
1161                                                                    i);
1162                                         }
1163                                         if (tf->gdd_writes[pid]) {
1164                                                 svg_io_graph_movie(tf->gdd_writes[pid],
1165                                                                    history->write_pid_history[pid],
1166                                                                    i);
1167                                         }
1168                                 }
1169                                 i++;
1170                                 batch_i++;
1171                         }
1172
1173                         add_history(history, &movie_history);
1174
1175                         plot_movie_history(plot, &movie_history);
1176
1177                         svg_write_legend(plot);
1178                         close_plot(plot);
1179                         close_plot(plot);
1180
1181                         close_plot_file(plot);
1182                 }
1183                 free_all_plot_history(&movie_history);
1184         }
1185         convert_movie_files(movie_dir);
1186         encode_movie(movie_dir);
1187         cleanup_movie(movie_dir);
1188 }
1189
1190 static void plot_latency(struct plot *plot, unsigned int min_seconds,
1191                          unsigned int max_seconds)
1192 {
1193         struct trace_file *tf;
1194         char *units;
1195         char line[128];
1196         u64 max = 0, val;
1197
1198         if (active_graphs[LATENCY_GRAPH_INDEX] == 0)
1199                 return;
1200
1201         if (num_traces > 1)
1202                 svg_alloc_legend(plot, num_traces);
1203
1204         list_for_each_entry(tf, &all_traces, list) {
1205                 val = line_graph_roll_avg_max(tf->latency_gld);
1206                 if (val > max)
1207                         max = val;
1208         }
1209
1210         list_for_each_entry(tf, &all_traces, list)
1211                 tf->latency_gld->max = max;
1212
1213         setup_axis(plot);
1214         set_plot_label(plot, "IO Latency");
1215
1216         tf = list_entry(all_traces.next, struct trace_file, list);
1217
1218         scale_line_graph_time(&max, &units);
1219         sprintf(line, "latency (%ss)", units);
1220         set_ylabel(plot, line);
1221         set_yticks(plot, num_yticks, 0, max, "");
1222         set_xticks(plot, num_xticks, min_seconds, max_seconds);
1223
1224         list_for_each_entry(tf, &all_traces, list) {
1225                 svg_line_graph(plot, tf->latency_gld, tf->line_color, 0, 0);
1226                 if (num_traces > 1)
1227                         svg_add_legend(plot, tf->label, "", tf->line_color);
1228         }
1229
1230         if (plot->add_xlabel)
1231                 set_xlabel(plot, "Time (seconds)");
1232         if (num_traces > 1)
1233                 svg_write_legend(plot);
1234         close_plot(plot);
1235         total_graphs_written++;
1236 }
1237
1238 static void plot_iops(struct plot *plot, unsigned int min_seconds,
1239                       unsigned int max_seconds)
1240 {
1241         struct trace_file *tf;
1242         char *units;
1243         u64 max = 0, val;
1244
1245         if (active_graphs[IOPS_GRAPH_INDEX] == 0)
1246                 return;
1247
1248         list_for_each_entry(tf, &all_traces, list) {
1249                 val = line_graph_roll_avg_max(tf->iop_gld);
1250                 if (val > max)
1251                         max = val;
1252         }
1253
1254         list_for_each_entry(tf, &all_traces, list)
1255                 tf->iop_gld->max = max;
1256
1257         setup_axis(plot);
1258         set_plot_label(plot, "IOPs");
1259         if (num_traces > 1)
1260                 svg_alloc_legend(plot, num_traces);
1261
1262         tf = list_entry(all_traces.next, struct trace_file, list);
1263
1264         scale_line_graph_bytes(&max, &units, 1000);
1265         set_ylabel(plot, "IO/s");
1266
1267         set_yticks(plot, num_yticks, 0, max, units);
1268         set_xticks(plot, num_xticks, min_seconds, max_seconds);
1269
1270         list_for_each_entry(tf, &all_traces, list) {
1271                 svg_line_graph(plot, tf->iop_gld, tf->line_color, 0, 0);
1272                 if (num_traces > 1)
1273                         svg_add_legend(plot, tf->label, "", tf->line_color);
1274         }
1275
1276         if (plot->add_xlabel)
1277                 set_xlabel(plot, "Time (seconds)");
1278         if (num_traces > 1)
1279                 svg_write_legend(plot);
1280
1281         close_plot(plot);
1282         total_graphs_written++;
1283 }
1284
1285 static void check_plot_columns(struct plot *plot, int index)
1286 {
1287         int count;
1288
1289         if (columns > 1 && (total_graphs_written == 0 ||
1290             total_graphs_written % columns != 0)) {
1291                 count = graphs_left(index);
1292                 if (plot->direction == PLOT_DOWN) {
1293                         plot->start_x_offset = 0;
1294                         if (count <= columns)
1295                                 plot->add_xlabel = 1;
1296                 }
1297                 plot->direction = PLOT_ACROSS;
1298
1299         } else {
1300                 plot->direction = PLOT_DOWN;
1301                 if (index == last_active_graph)
1302                         plot->add_xlabel = 1;
1303         }
1304
1305 }
1306
1307 enum {
1308         HELP_LONG_OPT = 1,
1309 };
1310
1311 char *option_string = "+F:T:t:o:l:r:O:N:d:D:pm::h:w:c:x:y:a:C:PK";
1312 static struct option long_options[] = {
1313         {"columns", required_argument, 0, 'c'},
1314         {"fio-trace", required_argument, 0, 'F'},
1315         {"title", required_argument, 0, 'T'},
1316         {"trace", required_argument, 0, 't'},
1317         {"output", required_argument, 0, 'o'},
1318         {"label", required_argument, 0, 'l'},
1319         {"rolling", required_argument, 0, 'r'},
1320         {"no-graph", required_argument, 0, 'N'},
1321         {"only-graph", required_argument, 0, 'O'},
1322         {"device", required_argument, 0, 'd'},
1323         {"blktrace-destination", required_argument, 0, 'D'},
1324         {"prog", no_argument, 0, 'p'},
1325         {"movie", optional_argument, 0, 'm'},
1326         {"codec", optional_argument, 0, 'C'},
1327         {"keep-movie-svgs", no_argument, 0, 'K'},
1328         {"width", required_argument, 0, 'w'},
1329         {"height", required_argument, 0, 'h'},
1330         {"xzoom", required_argument, 0, 'x'},
1331         {"yzoom", required_argument, 0, 'y'},
1332         {"io-plot-action", required_argument, 0, 'a'},
1333         {"per-process-io", no_argument, 0, 'P'},
1334         {"help", no_argument, 0, HELP_LONG_OPT},
1335         {0, 0, 0, 0}
1336 };
1337
1338 static void print_usage(void)
1339 {
1340         fprintf(stderr, "iowatcher usage:\n"
1341                 "\t-d (--device): device for blktrace to trace\n"
1342                 "\t-D (--blktrace-destination): destination for blktrace\n"
1343                 "\t-t (--trace): trace file name (more than one allowed)\n"
1344                 "\t-F (--fio-trace): fio bandwidth trace (more than one allowed)\n"
1345                 "\t-l (--label): trace label in the graph\n"
1346                 "\t-o (--output): output file name for the SVG image or video\n"
1347                 "\t-p (--prog): run a program while blktrace is run\n"
1348                 "\t-K (--keep-movie-svgs keep svgs generated for movie mode\n"
1349                 "\t-m (--movie [=spindle|rect]): create IO animations\n"
1350                 "\t-C (--codec): ffmpeg codec. Use ffmpeg -codecs to list\n"
1351                 "\t-r (--rolling): number of seconds in the rolling averge\n"
1352                 "\t-T (--title): graph title\n"
1353                 "\t-N (--no-graph): skip a single graph (io, tput, latency, queue_depth, \n"
1354                 "\t\t\tiops, cpu-sys, cpu-io, cpu-irq cpu-soft cpu-user)\n"
1355                 "\t-O (--only-graph): add a single graph to the output\n"
1356                 "\t-h (--height): set the height of each graph\n"
1357                 "\t-w (--width): set the width of each graph\n"
1358                 "\t-c (--columns): numbers of columns in graph output\n"
1359                 "\t-x (--xzoom): limit processed time to min:max\n"
1360                 "\t-y (--yzoom): limit processed sectors to min:max\n"
1361                 "\t-a (--io-plot-action): plot given action (one of Q,D,C) in IO graph\n"
1362                 "\t-P (--per-process-io): distinguish between processes in IO graph\n"
1363                );
1364         exit(1);
1365 }
1366
1367 static int parse_double_range(char *str, double *min, double *max)
1368 {
1369         char *end;
1370
1371         /* Empty lower bound - leave original value */
1372         if (str[0] != ':') {
1373                 *min = strtod(str, &end);
1374                 if (*min == HUGE_VAL || *min == -HUGE_VAL)
1375                         return -ERANGE;
1376                 if (*end != ':')
1377                         return -EINVAL;
1378         } else
1379                 end = str;
1380         /* Empty upper bound - leave original value */
1381         if (end[1]) {
1382                 *max = strtod(end+1, &end);
1383                 if (*max == HUGE_VAL || *max == -HUGE_VAL)
1384                         return -ERANGE;
1385                 if (*end != 0)
1386                         return -EINVAL;
1387         }
1388         if (*min > *max)
1389                 return -EINVAL;
1390         return 0;
1391 }
1392
1393 static int parse_ull_range(char *str, unsigned long long *min,
1394                            unsigned long long *max)
1395 {
1396         char *end;
1397
1398         /* Empty lower bound - leave original value */
1399         if (str[0] != ':') {
1400                 *min = strtoull(str, &end, 10);
1401                 if (*min == ULLONG_MAX && errno == ERANGE)
1402                         return -ERANGE;
1403                 if (*end != ':')
1404                         return -EINVAL;
1405         } else
1406                 end = str;
1407         /* Empty upper bound - leave original value */
1408         if (end[1]) {
1409                 *max = strtoull(end+1, &end, 10);
1410                 if (*max == ULLONG_MAX && errno == ERANGE)
1411                         return -ERANGE;
1412                 if (*end != 0)
1413                         return -EINVAL;
1414         }
1415         if (*min > *max)
1416                 return -EINVAL;
1417         return 0;
1418 }
1419
1420 static int parse_options(int ac, char **av)
1421 {
1422         int c;
1423         int disabled = 0;
1424         int p_flagged = 0;
1425
1426         while (1) {
1427                 int option_index = 0;
1428
1429                 c = getopt_long(ac, av, option_string,
1430                                 long_options, &option_index);
1431
1432                 if (c == -1)
1433                         break;
1434
1435                 switch(c) {
1436                 case 'T':
1437                         graph_title = strdup(optarg);
1438                         break;
1439                 case 't':
1440                         add_trace_file(optarg);
1441                         set_blktrace_outfile(optarg);
1442                         break;
1443                 case 'F':
1444                         add_fio_trace_file(optarg);
1445                         break;
1446                 case 'o':
1447                         output_filename = strdup(optarg);
1448                         break;
1449                 case 'l':
1450                         set_trace_label(optarg);
1451                         break;
1452                 case 'r':
1453                         set_rolling_avg(atoi(optarg));
1454                         break;
1455                 case 'O':
1456                         if (!disabled) {
1457                                 disable_all_graphs();
1458                                 disabled = 1;
1459                         }
1460                         enable_one_graph(optarg);
1461                         break;
1462                 case 'N':
1463                         disable_one_graph(optarg);
1464                         break;
1465                 case 'd':
1466                         if (num_blktrace_devices == MAX_DEVICES_PER_TRACE - 1) {
1467                                 fprintf(stderr, "Too many blktrace devices provided\n");
1468                                 exit(1);
1469                         }
1470                         blktrace_devices[num_blktrace_devices++] = strdup(optarg);
1471                         break;
1472                 case 'D':
1473                         blktrace_dest_dir = strdup(optarg);
1474                         if (!strcmp(blktrace_dest_dir, "")) {
1475                                 fprintf(stderr, "Need a directory\n");
1476                                 print_usage();
1477                         }
1478                         break;
1479                 case 'p':
1480                         p_flagged = 1;
1481                         break;
1482                 case 'K':
1483                         keep_movie_svgs = 1;
1484                         break;
1485                 case 'm':
1486                         make_movie = 1;
1487                         if (optarg) {
1488                                 movie_style = lookup_movie_style(optarg);
1489                                 if (movie_style < 0) {
1490                                         fprintf(stderr, "Unknown movie style %s\n", optarg);
1491                                         print_usage();
1492                                 }
1493                         }
1494                         fprintf(stderr, "Using movie style: %s\n",
1495                                 movie_styles[movie_style]);
1496                         break;
1497                 case 'C':
1498                         ffmpeg_codec = strdup(optarg);
1499                         break;
1500                 case 'h':
1501                         opt_graph_height = atoi(optarg);
1502                         break;
1503                 case 'w':
1504                         opt_graph_width = atoi(optarg);
1505                         break;
1506                 case 'c':
1507                         columns = atoi(optarg);
1508                         break;
1509                 case 'x':
1510                         if (parse_double_range(optarg, &min_time, &max_time)
1511                             < 0) {
1512                                 fprintf(stderr, "Cannot parse time range %s\n",
1513                                         optarg);
1514                                 exit(1);
1515                         }
1516                         break;
1517                 case 'y':
1518                         if (parse_ull_range(optarg, &min_mb, &max_mb)
1519                             < 0) {
1520                                 fprintf(stderr,
1521                                         "Cannot parse offset range %s\n",
1522                                         optarg);
1523                                 exit(1);
1524                         }
1525                         if (max_mb > ULLONG_MAX >> 20) {
1526                                 fprintf(stderr,
1527                                         "Upper range limit too big."
1528                                         " Maximum is %llu.\n", ULLONG_MAX >> 20);
1529                                 exit(1);
1530                         }
1531                         break;
1532                 case 'a':
1533                         if (strlen(optarg) != 1) {
1534 action_err:
1535                                 fprintf(stderr, "Action must be one of Q, D, C.");
1536                                 exit(1);
1537                         }
1538                         plot_io_action = action_char_to_num(optarg[0]);
1539                         if (plot_io_action < 0)
1540                                 goto action_err;
1541                         break;
1542                 case 'P':
1543                         io_per_process = 1;
1544                         break;
1545                 case '?':
1546                 case HELP_LONG_OPT:
1547                         print_usage();
1548                         break;
1549                 default:
1550                         break;
1551                 }
1552         }
1553
1554         if (optind < ac && p_flagged) {
1555                 prog_argv = &av[optind];
1556                 prog_argc = ac - optind;
1557         } else if (p_flagged) {
1558                 fprintf(stderr, "--prog or -p given but no program specified\n");
1559                 exit(1);
1560         } else if (optind < ac) {
1561                 fprintf(stderr, "Extra arguments '%s'... (and --prog not specified)\n", av[optind]);
1562                 exit(1);
1563         }
1564
1565         return 0;
1566 }
1567
1568 static void dest_mkdir(char *dir)
1569 {
1570         int ret;
1571
1572         ret = mkdir(dir, 0777);
1573         if (ret && errno != EEXIST) {
1574                 fprintf(stderr, "failed to mkdir error %s\n", strerror(errno));
1575                 exit(errno);
1576         }
1577 }
1578
1579 int main(int ac, char **av)
1580 {
1581         struct plot *plot;
1582         unsigned int min_seconds = 0;
1583         unsigned int max_seconds = 0;
1584         u64 max_offset = 0;
1585         u64 min_offset = ~(u64)0;
1586         struct trace_file *tf;
1587         int ret;
1588         int rows, cols;
1589
1590         init_io_hash_table();
1591         init_process_hash_table();
1592
1593         enable_all_graphs();
1594
1595         parse_options(ac, av);
1596
1597         last_active_graph = last_graph();
1598         if (make_movie) {
1599                 set_io_graph_scale(256);
1600                 if (movie_style == MOVIE_SPINDLE)
1601                         set_graph_size(750, 550);
1602                 else
1603                         set_graph_size(700, 400);
1604
1605                 /*
1606                  * the plots in the movie don't have a seconds
1607                  * line yet, this makes us skip it
1608                  */
1609                 last_active_graph = TOTAL_GRAPHS + 1;
1610         }
1611         if (opt_graph_height)
1612                 set_graph_height(opt_graph_height);
1613
1614         if (opt_graph_width)
1615                 set_graph_width(opt_graph_width);
1616
1617         if (list_empty(&all_traces) && list_empty(&fio_traces)) {
1618                 fprintf(stderr, "No traces found, exiting\n");
1619                 exit(1);
1620         }
1621
1622         if (num_blktrace_devices) {
1623                 char *path = join_path(blktrace_dest_dir, blktrace_outfile);
1624                 dest_mkdir(blktrace_dest_dir);
1625                 dest_mkdir(path);
1626
1627                 snprintf(line, line_len, "%s.dump", path);
1628                 unlink(line);
1629
1630                 ret = start_blktrace(blktrace_devices, num_blktrace_devices,
1631                                      blktrace_outfile, blktrace_dest_dir);
1632                 if (ret) {
1633                         perror("Exiting due to blktrace failure");
1634                         exit(ret);
1635                 }
1636
1637                 snprintf(line, line_len, "%s.mpstat", path);
1638                 ret = start_mpstat(line);
1639                 if (ret) {
1640                         perror("Exiting due to mpstat failure");
1641                         exit(ret);
1642                 }
1643
1644                 if (prog_argv && prog_argc) {
1645                         run_program(prog_argc, prog_argv, 1, NULL, NULL);
1646                         wait_for_tracers(SIGINT);
1647                 } else {
1648                         printf("Tracing until interrupted...\n");
1649                         wait_for_tracers(0);
1650                 }
1651                 free(path);
1652         }
1653
1654         /* step one, read all the traces */
1655         read_traces();
1656
1657         /* step two, find the maxes for time and offset */
1658         list_for_each_entry(tf, &all_traces, list)
1659                 compare_minmax_tf(tf, &max_seconds, &min_offset, &max_offset);
1660         list_for_each_entry(tf, &fio_traces, list)
1661                 compare_minmax_tf(tf, &max_seconds, &min_offset, &max_offset);
1662         min_seconds = min_time;
1663         if (max_seconds > max_time)
1664                 max_seconds = ceil(max_time);
1665         if (min_offset < min_mb << 20)
1666                 min_offset = min_mb << 20;
1667         if (max_offset > max_mb << 20)
1668                 max_offset = max_mb << 20;
1669
1670         /* push the max we found into all the tfs */
1671         set_all_minmax_tf(min_seconds, max_seconds, min_offset, max_offset);
1672
1673         /* alloc graphing structs for all the traces */
1674         setup_trace_file_graphs();
1675
1676         /* run through all the traces and read their events */
1677         read_trace_events();
1678
1679         pick_line_graph_color();
1680
1681         plot = alloc_plot();
1682
1683         if (make_movie) {
1684                 set_legend_width(longest_label + longest_proc_name + 1 + strlen("writes"));
1685                 plot_io_movie(plot);
1686                 exit(0);
1687         }
1688
1689         set_plot_output(plot, output_filename);
1690
1691         if (active_graphs[IO_GRAPH_INDEX] || found_mpstat)
1692                 set_legend_width(longest_label + longest_proc_name + 1 + strlen("writes"));
1693         else if (num_traces >= 1 || num_fio_traces >= 1)
1694                 set_legend_width(longest_label);
1695         else
1696                 set_legend_width(0);
1697
1698         get_graph_size(&cols, &rows);
1699         if (columns > 1)
1700                 plot->add_xlabel = 1;
1701         set_plot_title(plot, graph_title);
1702
1703         check_plot_columns(plot, IO_GRAPH_INDEX);
1704         plot_io(plot, min_seconds, max_seconds, min_offset, max_offset);
1705         plot->add_xlabel = 0;
1706
1707         if (columns > 1) {
1708                 set_graph_size(cols / columns, rows);
1709                 num_xticks /= columns;
1710                 if (num_xticks < 2)
1711                         num_xticks = 2;
1712         }
1713         if (rows <= 50)
1714                 num_yticks--;
1715
1716         check_plot_columns(plot, TPUT_GRAPH_INDEX);
1717         plot_tput(plot, min_seconds, max_seconds, 1);
1718
1719         check_plot_columns(plot, FIO_GRAPH_INDEX);
1720         plot_fio_tput(plot, min_seconds, max_seconds);
1721
1722         check_plot_columns(plot, CPU_IO_GRAPH_INDEX);
1723         plot_cpu(plot, max_seconds, "CPU IO Wait Time",
1724                  CPU_IO_GRAPH_INDEX, MPSTAT_IO);
1725
1726         check_plot_columns(plot, CPU_SYS_GRAPH_INDEX);
1727         plot_cpu(plot, max_seconds, "CPU System Time",
1728                  CPU_SYS_GRAPH_INDEX, MPSTAT_SYS);
1729
1730         check_plot_columns(plot, CPU_IRQ_GRAPH_INDEX);
1731         plot_cpu(plot, max_seconds, "CPU IRQ Time",
1732                  CPU_IRQ_GRAPH_INDEX, MPSTAT_IRQ);
1733
1734         check_plot_columns(plot, CPU_SOFT_GRAPH_INDEX);
1735         plot_cpu(plot, max_seconds, "CPU SoftIRQ Time",
1736                  CPU_SOFT_GRAPH_INDEX, MPSTAT_SOFT);
1737
1738         check_plot_columns(plot, CPU_USER_GRAPH_INDEX);
1739         plot_cpu(plot, max_seconds, "CPU User Time",
1740                  CPU_USER_GRAPH_INDEX, MPSTAT_USER);
1741
1742         check_plot_columns(plot, LATENCY_GRAPH_INDEX);
1743         plot_latency(plot, min_seconds, max_seconds);
1744
1745         check_plot_columns(plot, QUEUE_DEPTH_GRAPH_INDEX);
1746         plot_queue_depth(plot, min_seconds, max_seconds);
1747
1748         check_plot_columns(plot, IOPS_GRAPH_INDEX);
1749         plot_iops(plot, min_seconds, max_seconds);
1750
1751         /* once for all */
1752         close_plot(plot);
1753         close_plot_file(plot);
1754         return 0;
1755 }