contrib/collection.cgi: Don't show all the plugins on the host's page.
[collectd.git] / contrib / collection.cgi
1 #!/usr/bin/perl
2
3 use strict;
4 use warnings;
5
6 use Carp (qw(cluck confess));
7 use CGI (':cgi');
8 use CGI::Carp ('fatalsToBrowser');
9 use HTML::Entities ('encode_entities');
10 use URI::Escape ('uri_escape');
11 use RRDs ();
12 use Data::Dumper ();
13
14 our $Config = "/etc/collection.conf";
15 our @DataDirs = ();
16 our $LibDir;
17
18 our $ValidTimespan =
19 {
20   hour => 3600,
21   day => 86400,
22   week => 7 * 86400,
23   month => 31 * 86400,
24   year => 366 * 86400
25 };
26
27 our @RRDDefaultArgs = ('-w', '400');
28
29 our $Args = {};
30
31 our $GraphDefs;
32 our $MetaGraphDefs = {};
33 load_graph_definitions ();
34
35 for (qw(action host plugin plugin_instance type type_instance timespan))
36 {
37         $Args->{$_} = param ($_);
38 }
39
40 exit (main ());
41
42 sub read_config
43 {
44         my $fh;
45         open ($fh, "< $Config") or confess ("open ($Config): $!");
46         while (my $line = <$fh>)
47         {
48                 chomp ($line);
49                 next if (!$line);
50                 next if ($line =~ m/^\s*#/);
51                 next if ($line =~ m/^\s*$/);
52
53                 my $key;
54                 my $value;
55
56                 if ($line =~ m/^([A-Za-z]+):\s*"((?:[^"\\]+|\\.)*)"$/)
57                 {
58                         $key = lc ($1); $value = $2;
59                         $value =~ s/\\(.)/$1/g;
60                 }
61                 elsif ($line =~ m/([A-Za-z]+):\s*([0-9]+)$/)
62                 {
63                         $key = lc ($1); $value = 0 + $2;
64                 }
65                 else
66                 {
67                         print STDERR "Cannot parse line: $line\n";
68                         next;
69                 }
70
71                 if ($key eq 'datadir')
72                 {
73                         $value =~ s#/*$##;
74                         push (@DataDirs, $value);
75                 }
76                 elsif ($key eq 'libdir')
77                 {
78                         $value =~ s#/*$##;
79                         $LibDir = $value;
80                 }
81                 else
82                 {
83                         print STDERR "Unknown key: $key\n";
84                 }
85         }
86         close ($fh);
87 } # read_config
88
89 sub validate_args
90 {
91         if ($Args->{'action'} && ($Args->{'action'} =~ m/^(overview|show_host|show_plugin|show_type|show_graph)$/))
92         {
93                 $Args->{'action'} = $1;
94         }
95         else
96         {
97                 $Args->{'action'} = 'overview';
98         }
99
100         if ($Args->{'host'} && ($Args->{'host'} =~ m#/#))
101         {
102                 delete ($Args->{'host'});
103         }
104
105         if ($Args->{'plugin'} && ($Args->{'plugin'} =~ m#/#))
106         {
107                 delete ($Args->{'plugin'});
108         }
109
110         if ($Args->{'type'} && ($Args->{'type'} =~ m#/#))
111         {
112                 delete ($Args->{'type'});
113         }
114
115         if (!$Args->{'plugin'} || ($Args->{'plugin_instance'}
116                 && ($Args->{'plugin_instance'} =~ m#/#)))
117         {
118                 delete ($Args->{'plugin_instance'});
119         }
120
121         if (!$Args->{'type'} || ($Args->{'type_instance'}
122                 && ($Args->{'type_instance'} =~ m#/#)))
123         {
124                 delete ($Args->{'type_instance'});
125         }
126
127         if (defined ($Args->{'timespan'})
128           && ($Args->{'timespan'} =~ m/^(hour|day|week|month|year)$/))
129         {
130           $Args->{'timespan'} = $1;
131         }
132         else
133         {
134           $Args->{'timespan'} = 'day';
135         }
136 } # validate_args
137
138 {
139   my $hosts;
140   sub _find_hosts
141   {
142     if (defined ($hosts))
143     {
144       return (keys %$hosts);
145     }
146
147     $hosts = {};
148
149     for (my $i = 0; $i < @DataDirs; $i++)
150     {
151       my @tmp;
152       my $dh;
153
154       opendir ($dh, $DataDirs[$i]) or next;
155       @tmp = grep { ($_ !~ m/^\./) && (-d $DataDirs[$i] . '/' . $_) } (readdir ($dh));
156       closedir ($dh);
157
158       $hosts->{$_} = 1 for (@tmp);
159     } # for (@DataDirs)
160
161     return (keys %$hosts);
162   } # _find_hosts
163 }
164
165 sub _get_param_host
166 {
167   my %all_hosts = map { $_ => 1 } (_find_hosts ());
168   my @selected_hosts = ();
169   for (param ('host'))
170   {
171     if (defined ($all_hosts{$_}))
172     {
173       push (@selected_hosts, "$_");
174     }
175   }
176   return (@selected_hosts);
177 } # _get_param_host
178
179 sub _get_param_timespan
180 {
181   my $timespan = param ('timespan');
182
183   $timespan ||= 'day';
184   $timespan = lc ($timespan);
185
186   if (!defined ($ValidTimespan->{$timespan}))
187   {
188     $timespan = 'day';
189   }
190
191   return ($timespan);
192 } # _get_param_timespan
193
194 sub _find_plugins
195 {
196   my $host = shift;
197   my %plugins = ();
198
199   for (my $i = 0; $i < @DataDirs; $i++)
200   {
201     my $dir = $DataDirs[$i] . "/$host";
202     my @tmp;
203     my $dh;
204
205     opendir ($dh, $dir) or next;
206     @tmp = grep { ($_ !~ m/^\./) && (-d "$dir/$_") } (readdir ($dh));
207     closedir ($dh);
208
209     for (@tmp)
210     {
211       my ($plugin, $instance) = split (m/-/, $_, 2);
212       $plugins{$plugin} = [] if (!$plugins{$plugin});
213       push (@{$plugins{$plugin}}, $instance) if (defined ($instance));
214     }
215   } # for (@DataDirs)
216
217   return (%plugins);
218 } # _find_plugins
219
220 sub _find_types
221 {
222   my $host = shift;
223   my $plugin = shift;
224   my $plugin_instance = shift;
225   my %types = ();
226
227   for (my $i = 0; $i < @DataDirs; $i++)
228   {
229     my $dir = $DataDirs[$i] . "/$host/$plugin" . (defined ($plugin_instance) ? "-$plugin_instance" : '');
230     my @tmp;
231     my $dh;
232
233     opendir ($dh, $dir) or next;
234     @tmp = grep { ($_ !~ m/^\./) && ($_ =~ m/\.rrd$/i) && (-f "$dir/$_") } (readdir ($dh));
235     closedir ($dh);
236
237     for (@tmp)
238     {
239       my $name = "$_";
240       $name =~ s/\.rrd$//i;
241       my ($type, $instance) = split (m/-/, $name, 2);
242       $types{$type} = [] if (!$types{$type});
243       push (@{$types{$type}}, $instance) if (defined ($instance));
244     }
245   } # for (@DataDirs)
246
247   return (%types);
248 } # _find_types
249
250 sub _find_files_for_host
251 {
252   my $host = shift;
253   my $ret = {};
254
255   my %plugins = _find_plugins ($host);
256   for (keys %plugins)
257   {
258     my $plugin = $_;
259     my $plugin_instances = $plugins{$plugin};
260
261     if (!$plugin_instances || !@$plugin_instances)
262     {
263       $plugin_instances = ['-'];
264     }
265
266     $ret->{$plugin} = {};
267
268     for (@$plugin_instances)
269     {
270       my $plugin_instance = $_;
271       my %types = _find_types ($host, $plugin,
272         ($plugin_instance ne '-') ? $plugin_instance : undef);
273
274       $ret->{$plugin}{$plugin_instance} = {};
275
276       for (keys %types)
277       {
278         my $type = $_;
279         my $type_instances = $types{$type};
280
281         $ret->{$plugin}{$plugin_instance}{$type} = {};
282
283         for (@$type_instances)
284         {
285           $ret->{$plugin}{$plugin_instance}{$type}{$_} = 1;
286         }
287
288         if (!@$type_instances)
289         {
290           $ret->{$plugin}{$plugin_instance}{$type}{'-'} = 1;
291         }
292       } # for (keys %types)
293     } # for (@$plugin_instances)
294   } # for (keys %plugins)
295
296   return ($ret);
297 } # _find_files_for_host
298
299 sub _find_files_for_hosts
300 {
301   my @hosts = @_;
302   my $all_plugins = {};
303
304   for (my $i = 0; $i < @hosts; $i++)
305   {
306     my $tmp = _find_files_for_host ($hosts[$i]);
307     _files_union ($all_plugins, $tmp);
308   }
309
310   return ($all_plugins);
311 } # _find_files_for_hosts
312
313 sub _files_union
314 {
315   my $dest = shift;
316   my $src = shift;
317
318   for (keys %$src)
319   {
320     my $plugin = $_;
321     $dest->{$plugin} ||= {};
322
323     for (keys %{$src->{$plugin}})
324     {
325       my $pinst = $_;
326       $dest->{$plugin}{$pinst} ||= {};
327
328       for (keys %{$src->{$plugin}{$pinst}})
329       {
330         my $type = $_;
331         $dest->{$plugin}{$pinst}{$type} ||= {};
332
333         for (keys %{$src->{$plugin}{$pinst}{$type}})
334         {
335           my $tinst = $_;
336           $dest->{$plugin}{$pinst}{$type}{$tinst} = 1;
337         }
338       }
339     }
340   }
341 } # _files_union
342
343 sub _files_plugin_inst_count
344 {
345   my $src = shift;
346   my $i = 0;
347
348   for (keys %$src)
349   {
350     if (exists ($MetaGraphDefs->{$_}))
351     {
352       $i++;
353     }
354     else
355     {
356       $i = $i + keys %{$src->{$_}};
357     }
358   }
359   return ($i);
360 } # _files_plugin_count
361
362 sub list_hosts
363 {
364   my @hosts = _find_hosts ();
365   @hosts = sort (@hosts);
366
367   print "<ul>\n";
368   for (my $i = 0; $i < @hosts; $i++)
369   {
370     my $host_html = encode_entities ($hosts[$i]);
371     my $host_url = uri_escape ($hosts[$i]);
372
373     print qq(  <li><a href="${\script_name ()}?action=show_host;host=$host_url">$host_html</a></li>\n);
374   }
375   print "</ul>\n";
376 } # list_hosts
377
378 sub _string_to_color
379 {
380   my $color = shift;
381   if ($color =~ m/([0-9A-Fa-f][0-9A-Fa-f])([0-9A-Fa-f][0-9A-Fa-f])([0-9A-Fa-f][0-9A-Fa-f])/)
382   {
383     return ([hex ($1) / 255.0, hex ($2) / 255.0, hex ($3) / 255.0]);
384   }
385   return;
386 } # _string_to_color
387
388 sub _color_to_string
389 {
390   confess ("Wrong number of arguments") if (@_ != 1);
391   return (sprintf ('%02hx%02hx%02hx', map { int (255.0 * $_) } @{$_[0]}));
392 } # _color_to_string
393
394 sub _get_random_color
395 {
396   my ($r, $g, $b) = (rand (), rand ());
397   my $min = 0.0;
398   my $max = 1.0;
399
400   if (($r + $g) < 1.0)
401   {
402     $min = 1.0 - ($r + $g);
403   }
404   else
405   {
406     $max = 2.0 - ($r + $g);
407   }
408
409   $b = $min + (rand () * ($max - $min));
410
411   return ([$r, $g, $b]);
412 } # _get_random_color
413
414 sub _get_faded_color
415 {
416   my $fg = shift;
417   my $bg;
418   my %opts = @_;
419   my $ret = [undef, undef, undef];
420
421   $opts{'background'} ||= [1.0, 1.0, 1.0];
422   $opts{'alpha'} ||= 0.25;
423
424   if (!ref ($opts{'background'}))
425   {
426     $opts{'background'} = _string_to_color ($opts{'background'})
427       or confess ("Cannot parse background color " . $opts{'background'});
428   }
429   $bg = $opts{'background'};
430
431   for (my $i = 0; $i < 3; $i++)
432   {
433     $ret->[$i] = ($opts{'alpha'} * $fg->[$i])
434        + ((1.0 - $opts{'alpha'}) * $bg->[$i]);
435   }
436
437   return ($ret);
438 } # _get_faded_color
439
440 sub _custom_sort_arrayref
441 {
442   my $array_ref = shift;
443   my $array_sort = shift;
444
445   my %elements = map { $_ => 1 } (@$array_ref);
446   splice (@$array_ref, 0);
447
448   for (@$array_sort)
449   {
450     next if (!exists ($elements{$_}));
451     push (@$array_ref, $_);
452     delete ($elements{$_});
453   }
454   push (@$array_ref, sort (keys %elements));
455 } # _custom_sort_arrayref
456
457 sub action_show_host
458 {
459   my @hosts = _get_param_host ();
460   @hosts = sort (@hosts);
461
462   my $timespan = _get_param_timespan ();
463   my $all_plugins = _find_files_for_hosts (@hosts);
464
465   my $url_prefix = script_name () . '?action=show_plugin'
466   . join ('', map { ';host=' . uri_escape ($_) } (@hosts))
467   . ';timespan=' . uri_escape ($timespan);
468
469   print qq(    <div><a href="${\script_name ()}?action=overview">Back to list of hosts</a></div>\n);
470
471   print "    <p>Available plugins:</p>\n"
472   . "    <ul>\n";
473   for (sort (keys %$all_plugins))
474   {
475     my $plugin = $_;
476     my $plugin_html = encode_entities ($plugin);
477     my $url_plugin = $url_prefix . ';plugin=' . uri_escape ($plugin);
478     print qq(      <li><a href="$url_plugin">$plugin_html</a></li>\n);
479   }
480   print "   </ul>\n";
481 } # action_show_host
482
483 sub action_show_plugin
484 {
485   my @hosts = _get_param_host ();
486   my $plugin = shift;
487   my $plugin_instance = shift;
488   my $timespan = _get_param_timespan ();
489
490   my $hosts_url = join (';', map { 'host=' . uri_escape ($_) } (@hosts));
491   my $url_prefix = script_name () . "?$hosts_url";
492
493   my $all_plugins = {};
494   my $plugins_per_host = {};
495   my $selected_plugins = {};
496
497   for (my $i = 0; $i < @hosts; $i++)
498   {
499     $plugins_per_host->{$hosts[$i]} = _find_files_for_host ($hosts[$i]);
500     _files_union ($all_plugins, $plugins_per_host->{$hosts[$i]});
501   }
502
503   for (param ('plugin'))
504   {
505     if (defined ($all_plugins->{$_}))
506     {
507       $selected_plugins->{$_} = 1;
508     }
509   }
510
511   print qq(    <div><a href="${\script_name ()}?action=show_host;$hosts_url">Back to list of plugins</a></div>\n);
512
513   # Print table header
514   print <<HTML;
515     <table class="graphs">
516       <tr>
517         <th>Plugins</th>
518 HTML
519   for (@hosts)
520   {
521     print "\t<th>", encode_entities ($_), "</th>\n";
522   }
523   print "      </tr>\n";
524
525   for (sort (keys %$selected_plugins))
526   {
527     my $plugin = $_;
528     my $plugin_html = encode_entities ($plugin);
529     my $plugin_url = "$url_prefix;plugin=" . uri_escape ($plugin);
530     my $all_pinst = $all_plugins->{$plugin};
531
532     for (sort (keys %$all_pinst))
533     {
534       my $pinst = $_;
535       my $pinst_html = '';
536       my $pinst_url = $plugin_url;
537
538       if ($pinst ne '-')
539       {
540         $pinst_html = encode_entities ($pinst);
541         $pinst_url .= ';plugin_instance=' . uri_escape ($pinst);
542       }
543
544       my $files_printed = 0;
545       my $files_num = _files_plugin_inst_count ($all_pinst->{$pinst});
546       if ($files_num < 1)
547       {
548         next;
549       }
550       my $rowspan = ($files_num == 1) ? '' : qq( rowspan="$files_num");
551
552       for (sort (keys %{$all_plugins->{$plugin}{$pinst}}))
553       {
554         my $type = $_;
555         my $type_html = encode_entities ($type);
556         my $type_url = "$pinst_url;type=" . uri_escape ($type);
557
558         if ($files_printed == 0)
559         {
560           my $title = $plugin_html;
561           if ($pinst ne '-')
562           {
563             $title .= " ($pinst_html)";
564           }
565           print "      <tr>\n";
566           print "\t<td$rowspan>$title</td>\n";
567         }
568
569         if (exists ($MetaGraphDefs->{$type}))
570         {
571           my $graph_url = script_name () . '?action=show_graph'
572           . ';plugin=' . uri_escape ($plugin)
573           . ';type=' . uri_escape ($type)
574           . ';timespan=' . uri_escape ($timespan);
575           if ($pinst ne '-')
576           {
577             $graph_url .= ';plugin_instance=' . uri_escape ($pinst);
578           }
579
580           if ($files_printed != 0)
581           {
582             print "      <tr>\n";
583           }
584
585           for (@hosts)
586           {
587             my $host = $_;
588             my $host_graph_url = $graph_url . ';host=' . uri_escape ($host);
589
590             print "\t<td>";
591             if (exists $plugins_per_host->{$host}{$plugin}{$pinst}{$type})
592             {
593               print qq(<img src="$host_graph_url" />);
594               #print encode_entities (qq(<img src="${\script_name ()}?action=show_graph;host=$host_esc;$param_plugin;$param_type;timespan=$timespan" />));
595             }
596             print "</td>\n";
597           } # for (my $k = 0; $k < @hosts; $k++)
598
599           print "      </tr>\n";
600
601           $files_printed++;
602           next; # pinst
603         } # if (exists ($MetaGraphDefs->{$type}))
604
605         for (sort (keys %{$all_plugins->{$plugin}{$pinst}{$type}}))
606         {
607           my $tinst = $_;
608           my $tinst_esc = encode_entities ($tinst);
609           my $graph_url = script_name () . '?action=show_graph'
610           . ';plugin=' . uri_escape ($plugin)
611           . ';type=' . uri_escape ($type)
612           . ';timespan=' . uri_escape ($timespan);
613           if ($pinst ne '-')
614           {
615             $graph_url .= ';plugin_instance=' . uri_escape ($pinst);
616           }
617           if ($tinst ne '-')
618           {
619             $graph_url .= ';type_instance=' . uri_escape ($tinst);
620           }
621
622           if ($files_printed != 0)
623           {
624             print "      <tr>\n";
625           }
626
627           for (my $k = 0; $k < @hosts; $k++)
628           {
629             my $host = $hosts[$k];
630             my $host_graph_url = $graph_url . ';host=' . uri_escape ($host);
631
632             print "\t<td>";
633             if ($plugins_per_host->{$host}{$plugin}{$pinst}{$type}{$tinst})
634             {
635               print qq(<img src="$host_graph_url" />);
636               #print encode_entities (qq(<img src="${\script_name ()}?action=show_graph;host=$host_esc;$param_plugin;$param_type;timespan=$timespan" />));
637             }
638             print "</td>\n";
639           } # for (my $k = 0; $k < @hosts; $k++)
640
641           print "      </tr>\n";
642
643           $files_printed++;
644         } # for ($tinst)
645       } # for ($type)
646     } # for ($pinst)
647   } # for ($plugin)
648   print "   </table>\n";
649 } # action_show_plugin
650
651 sub action_show_type
652 {
653   my $host = shift;
654   my $plugin = shift;
655   my $plugin_instance = shift;
656   my $type = shift;
657   my $type_instance = shift;
658
659   my $host_url = uri_escape ($host);
660   my $plugin_url = uri_escape ($plugin);
661   my $plugin_html = encode_entities ($plugin);
662   my $plugin_instance_url = defined ($plugin_instance) ? uri_escape ($plugin_instance) : undef;
663   my $type_url = uri_escape ($type);
664   my $type_instance_url = defined ($type_instance) ? uri_escape ($type_instance) : undef;
665
666   my $url_prefix = script_name () . "?action=show_plugin;host=$host_url;plugin=$plugin_url";
667   $url_prefix .= ";plugin_instance=$plugin_instance_url" if (defined ($plugin_instance));
668
669   print qq(    <div><a href="$url_prefix">Back to plugin &quot;$plugin_html&quot;</a></div>\n);
670
671   $url_prefix = script_name () . "?action=show_graph;host=$host_url;plugin=$plugin_url";
672   $url_prefix .= ";plugin_instance=$plugin_instance_url" if (defined ($plugin_instance));
673   $url_prefix .= ";type=$type_url";
674   $url_prefix .= ";type_instance=$type_instance_url" if (defined ($type_instance));
675
676   for (qw(hour day week month year))
677   {
678     my $timespan = $_;
679
680     print qq#  <div><img src="$url_prefix;timespan=$timespan" /></div>\n#;
681   }
682 } # action_show_type
683
684 sub action_show_graph
685 {
686   my $host = shift;
687   my $plugin = shift;
688   my $plugin_instance = shift;
689   my $type = shift;
690   my $type_instance = shift;
691   my @rrd_args;
692   my $title;
693   
694   my %times = (hour => -3600, day => -86400, week => 7 * -86400, month => 31 * -86400, year => 366 * -86400);
695   my $start_time = $times{$Args->{'timespan'}} || -86400;
696
697   #print STDERR Data::Dumper->Dump ([$Args], ['Args']);
698
699   # FIXME
700   if (exists ($MetaGraphDefs->{$type}))
701   {
702     my %types = _find_types ($host, $plugin, $plugin_instance);
703     return $MetaGraphDefs->{$type}->($host, $plugin, $plugin_instance, $type, $types{$type});
704   }
705
706   return if (!defined ($GraphDefs->{$type}));
707   @rrd_args = @{$GraphDefs->{$type}};
708
709   $title = "$host/$plugin" . (defined ($plugin_instance) ? "-$plugin_instance" : '')
710   . "/$type" . (defined ($type_instance) ? "-$type_instance" : '');
711
712   for (my $i = 0; $i < @DataDirs; $i++)
713   {
714     my $file = $DataDirs[$i] . "/$title.rrd";
715     next if (!-f $file);
716
717     $file =~ s/:/\\:/g;
718     s/{file}/$file/ for (@rrd_args);
719
720     RRDs::graph ('-', '-a', 'PNG', '-s', $start_time, '-t', $title, @RRDDefaultArgs, @rrd_args);
721     if (my $err = RRDs::error ())
722     {
723       die ("RRDs::graph: $err");
724     }
725   }
726 } # action_show_graph
727
728 sub print_selector
729 {
730   my @hosts = _find_hosts ();
731   @hosts = sort (@hosts);
732
733   my %selected_hosts = map { $_ => 1 } (_get_param_host ());
734   my $timespan_selected = _get_param_timespan ();
735
736   print <<HTML;
737     <form action="${\script_name ()}" method="get">
738       <fieldset>
739         <legend>Selector</legend>
740         <select name="host" multiple="multiple" size="10">
741 HTML
742   for (my $i = 0; $i < @hosts; $i++)
743   {
744     my $host = encode_entities ($hosts[$i]);
745     my $selected = defined ($selected_hosts{$hosts[$i]}) ? ' selected="selected"' : '';
746     print qq(\t  <option value="$host"$selected>$host</option>\n);
747   }
748   print "\t</select>\n";
749
750   if (keys %selected_hosts)
751   {
752     my $all_plugins = _find_files_for_hosts (keys %selected_hosts);
753     my %selected_plugins = map { $_ => 1 } (param ('plugin'));
754
755     print qq(\t<select name="plugin" multiple="multiple" size="10">\n);
756     for (sort (keys %$all_plugins))
757     {
758       my $plugin = $_;
759       my $plugin_html = encode_entities ($plugin);
760       my $selected = (defined ($selected_plugins{$plugin})
761         ? ' selected="selected"' : '');
762       print qq(\t  <option value="$plugin_html"$selected>$plugin</option>\n);
763     }
764     print "</select>\n";
765   } # if (keys %selected_hosts)
766
767   print qq(\t<select name="timespan">\n);
768   for (qw(Hour Day Week Month Year))
769   {
770     my $timespan_uc = $_;
771     my $timespan_lc = lc ($_);
772     my $selected = ($timespan_selected eq $timespan_lc)
773       ? ' selected="selected"' : '';
774     print qq(\t  <option value="$timespan_lc"$selected>$timespan_uc</option>\n);
775   }
776   print <<HTML;
777         </select>
778         <input type="submit" name="button" value="Ok" />
779       </fieldset>
780     </form>
781 HTML
782 }
783
784 sub print_header
785 {
786   print <<HEAD;
787 Content-Type: application/xhtml+xml; charset=utf-8
788 Cache-Control: no-cache
789
790 <?xml version="1.0" encoding="utf-8"?>
791 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
792   "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
793
794 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
795   <head>
796     <title>collection.cgi, Version 2</title>
797     <style type="text/css">
798       img
799       {
800         border: none;
801       }
802       table.graphs
803       {
804         border-collapse: collapse;
805       }
806       table.graphs td,
807       table.graphs th
808       {
809         border: 1px solid black;
810         empty-cells: hide;
811       }
812     </style>
813   </head>
814
815   <body>
816 HEAD
817   print_selector ();
818 } # print_header
819
820 sub print_footer
821 {
822   print <<FOOT;
823   </body>
824 </html>
825 FOOT
826 } # print_footer
827
828 sub main
829 {
830         read_config ();
831         validate_args ();
832
833         if (defined ($Args->{'host'})
834           && defined ($Args->{'plugin'})
835           && defined ($Args->{'type'})
836           && ($Args->{'action'} eq 'show_graph'))
837         {
838           $| = 1;
839           print STDOUT header (-Content_Type => 'image/png');
840           action_show_graph ($Args->{'host'},
841             $Args->{'plugin'}, $Args->{'plugin_instance'},
842             $Args->{'type'}, $Args->{'type_instance'});
843           return (0);
844         }
845
846         print_header ();
847
848         if (!$Args->{'host'})
849         {
850           list_hosts ();
851         }
852         elsif (!$Args->{'plugin'})
853         {
854           action_show_host ($Args->{'host'});
855         }
856         elsif (!$Args->{'type'})
857         {
858           action_show_plugin ($Args->{'plugin'}, $Args->{'plugin_instance'});
859         }
860         else
861         {
862           action_show_type ($Args->{'host'},
863             $Args->{'plugin'}, $Args->{'plugin_instance'},
864             $Args->{'type'}, $Args->{'type_instance'});
865         }
866
867         print_footer ();
868
869         return (0);
870 }
871
872 sub load_graph_definitions
873 {
874   my $Canvas = 'FFFFFF';
875
876   my $FullRed    = 'FF0000';
877   my $FullGreen  = '00E000';
878   my $FullBlue   = '0000FF';
879   my $FullYellow = 'F0A000';
880   my $FullCyan   = '00A0FF';
881   my $FullMagenta= 'A000FF';
882
883   my $HalfRed    = 'F7B7B7';
884   my $HalfGreen  = 'B7EFB7';
885   my $HalfBlue   = 'B7B7F7';
886   my $HalfYellow = 'F3DFB7';
887   my $HalfCyan   = 'B7DFF7';
888   my $HalfMagenta= 'DFB7F7';
889
890   my $HalfBlueGreen = '89B3C9';
891
892   $GraphDefs =
893   {
894     apache_bytes => ['DEF:min_raw={file}:count:MIN',
895     'DEF:avg_raw={file}:count:AVERAGE',
896     'DEF:max_raw={file}:count:MAX',
897     'CDEF:min=min_raw,8,*',
898     'CDEF:avg=avg_raw,8,*',
899     'CDEF:max=max_raw,8,*',
900     'CDEF:mytime=avg_raw,TIME,TIME,IF',
901     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
902     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
903     'CDEF:avg_sample=avg_raw,UN,0,avg_raw,IF,sample_len,*',
904     'CDEF:avg_sum=PREV,UN,0,PREV,IF,avg_sample,+',
905     "AREA:avg#$HalfBlue",
906     "LINE1:avg#$FullBlue:Bit/s",
907     'GPRINT:min:MIN:%5.1lf%s Min,',
908     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
909     'GPRINT:max:MAX:%5.1lf%s Max,',
910     'GPRINT:avg:LAST:%5.1lf%s Last',
911     'GPRINT:avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
912     ],
913     apache_requests => ['DEF:min={file}:count:MIN',
914     'DEF:avg={file}:count:AVERAGE',
915     'DEF:max={file}:count:MAX',
916     "AREA:max#$HalfBlue",
917     "AREA:min#$Canvas",
918     "LINE1:avg#$FullBlue:Requests/s",
919     'GPRINT:min:MIN:%6.2lf Min,',
920     'GPRINT:avg:AVERAGE:%6.2lf Avg,',
921     'GPRINT:max:MAX:%6.2lf Max,',
922     'GPRINT:avg:LAST:%6.2lf Last'
923     ],
924     apache_scoreboard => ['DEF:min={file}:count:MIN',
925     'DEF:avg={file}:count:AVERAGE',
926     'DEF:max={file}:count:MAX',
927     "AREA:max#$HalfBlue",
928     "AREA:min#$Canvas",
929     "LINE1:avg#$FullBlue:Processes",
930     'GPRINT:min:MIN:%6.2lf Min,',
931     'GPRINT:avg:AVERAGE:%6.2lf Avg,',
932     'GPRINT:max:MAX:%6.2lf Max,',
933     'GPRINT:avg:LAST:%6.2lf Last'
934     ],
935     bitrate => ['-v', 'Bits/s',
936     'DEF:avg={file}:value:AVERAGE',
937     'DEF:min={file}:value:MIN',
938     'DEF:max={file}:value:MAX',
939     "AREA:max#$HalfBlue",
940     "AREA:min#$Canvas",
941     "LINE1:avg#$FullBlue:Bits/s",
942     'GPRINT:min:MIN:%5.1lf%s Min,',
943     'GPRINT:avg:AVERAGE:%5.1lf%s Average,',
944     'GPRINT:max:MAX:%5.1lf%s Max,',
945     'GPRINT:avg:LAST:%5.1lf%s Last\l'
946     ],
947     charge => [
948     'DEF:avg={file}:charge:AVERAGE',
949     'DEF:min={file}:charge:MIN',
950     'DEF:max={file}:charge:MAX',
951     "AREA:max#$HalfBlue",
952     "AREA:min#$Canvas",
953     "LINE1:avg#$FullBlue:Charge",
954     'GPRINT:min:MIN:%5.1lf%sAh Min,',
955     'GPRINT:avg:AVERAGE:%5.1lf%sAh Avg,',
956     'GPRINT:max:MAX:%5.1lf%sAh Max,',
957     'GPRINT:avg:LAST:%5.1lf%sAh Last\l'
958     ],
959     charge_percent => [
960     'DEF:avg={file}:percent:AVERAGE',
961     'DEF:min={file}:percent:MIN',
962     'DEF:max={file}:percent:MAX',
963     "AREA:max#$HalfBlue",
964     "AREA:min#$Canvas",
965     "LINE1:avg#$FullBlue:Charge",
966     'GPRINT:min:MIN:%5.1lf%s%% Min,',
967     'GPRINT:avg:AVERAGE:%5.1lf%s%% Avg,',
968     'GPRINT:max:MAX:%5.1lf%s%% Max,',
969     'GPRINT:avg:LAST:%5.1lf%s%% Last\l'
970     ],
971     cpu => ['-v', 'CPU load',
972     'DEF:avg={file}:value:AVERAGE',
973     'DEF:min={file}:value:MIN',
974     'DEF:max={file}:value:MAX',
975     "AREA:max#$HalfBlue",
976     "AREA:min#$Canvas",
977     "LINE1:avg#$FullBlue:Percent",
978     'GPRINT:min:MIN:%6.2lf%% Min,',
979     'GPRINT:avg:AVERAGE:%6.2lf%% Avg,',
980     'GPRINT:max:MAX:%6.2lf%% Max,',
981     'GPRINT:avg:LAST:%6.2lf%% Last\l'
982     ],
983     current => [
984     'DEF:avg={file}:current:AVERAGE',
985     'DEF:min={file}:current:MIN',
986     'DEF:max={file}:current:MAX',
987     "AREA:max#$HalfBlue",
988     "AREA:min#$Canvas",
989     "LINE1:avg#$FullBlue:Current",
990     'GPRINT:min:MIN:%5.1lf%sA Min,',
991     'GPRINT:avg:AVERAGE:%5.1lf%sA Avg,',
992     'GPRINT:max:MAX:%5.1lf%sA Max,',
993     'GPRINT:avg:LAST:%5.1lf%sA Last\l'
994     ],
995     df => ['-v', 'Percent', '-l', '0',
996     'DEF:free_avg={file}:free:AVERAGE',
997     'DEF:free_min={file}:free:MIN',
998     'DEF:free_max={file}:free:MAX',
999     'DEF:used_avg={file}:used:AVERAGE',
1000     'DEF:used_min={file}:used:MIN',
1001     'DEF:used_max={file}:used:MAX',
1002     'CDEF:total=free_avg,used_avg,+',
1003     'CDEF:free_pct=100,free_avg,*,total,/',
1004     'CDEF:used_pct=100,used_avg,*,total,/',
1005     'CDEF:free_acc=free_pct,used_pct,+',
1006     'CDEF:used_acc=used_pct',
1007     "AREA:free_acc#$HalfGreen",
1008     "AREA:used_acc#$HalfRed",
1009     "LINE1:free_acc#$FullGreen:Free",
1010     'GPRINT:free_min:MIN:%5.1lf%sB Min,',
1011     'GPRINT:free_avg:AVERAGE:%5.1lf%sB Avg,',
1012     'GPRINT:free_max:MAX:%5.1lf%sB Max,',
1013     'GPRINT:free_avg:LAST:%5.1lf%sB Last\l',
1014     "LINE1:used_acc#$FullRed:Used",
1015     'GPRINT:used_min:MIN:%5.1lf%sB Min,',
1016     'GPRINT:used_avg:AVERAGE:%5.1lf%sB Avg,',
1017     'GPRINT:used_max:MAX:%5.1lf%sB Max,',
1018     'GPRINT:used_avg:LAST:%5.1lf%sB Last\l'
1019     ],
1020     disk => [
1021     'DEF:rtime_avg={file}:rtime:AVERAGE',
1022     'DEF:rtime_min={file}:rtime:MIN',
1023     'DEF:rtime_max={file}:rtime:MAX',
1024     'DEF:wtime_avg={file}:wtime:AVERAGE',
1025     'DEF:wtime_min={file}:wtime:MIN',
1026     'DEF:wtime_max={file}:wtime:MAX',
1027     'CDEF:rtime_avg_ms=rtime_avg,1000,/',
1028     'CDEF:rtime_min_ms=rtime_min,1000,/',
1029     'CDEF:rtime_max_ms=rtime_max,1000,/',
1030     'CDEF:wtime_avg_ms=wtime_avg,1000,/',
1031     'CDEF:wtime_min_ms=wtime_min,1000,/',
1032     'CDEF:wtime_max_ms=wtime_max,1000,/',
1033     'CDEF:total_avg_ms=rtime_avg_ms,wtime_avg_ms,+',
1034     'CDEF:total_min_ms=rtime_min_ms,wtime_min_ms,+',
1035     'CDEF:total_max_ms=rtime_max_ms,wtime_max_ms,+',
1036     "AREA:total_max_ms#$HalfRed",
1037     "AREA:total_min_ms#$Canvas",
1038     "LINE1:wtime_avg_ms#$FullGreen:Write",
1039     'GPRINT:wtime_min_ms:MIN:%5.1lf%s Min,',
1040     'GPRINT:wtime_avg_ms:AVERAGE:%5.1lf%s Avg,',
1041     'GPRINT:wtime_max_ms:MAX:%5.1lf%s Max,',
1042     'GPRINT:wtime_avg_ms:LAST:%5.1lf%s Last\n',
1043     "LINE1:rtime_avg_ms#$FullBlue:Read ",
1044     'GPRINT:rtime_min_ms:MIN:%5.1lf%s Min,',
1045     'GPRINT:rtime_avg_ms:AVERAGE:%5.1lf%s Avg,',
1046     'GPRINT:rtime_max_ms:MAX:%5.1lf%s Max,',
1047     'GPRINT:rtime_avg_ms:LAST:%5.1lf%s Last\n',
1048     "LINE1:total_avg_ms#$FullRed:Total",
1049     'GPRINT:total_min_ms:MIN:%5.1lf%s Min,',
1050     'GPRINT:total_avg_ms:AVERAGE:%5.1lf%s Avg,',
1051     'GPRINT:total_max_ms:MAX:%5.1lf%s Max,',
1052     'GPRINT:total_avg_ms:LAST:%5.1lf%s Last'
1053     ],
1054     disk_octets => ['-v', 'Bytes/s',
1055     'DEF:out_min={file}:write:MIN',
1056     'DEF:out_avg={file}:write:AVERAGE',
1057     'DEF:out_max={file}:write:MAX',
1058     'DEF:inc_min={file}:read:MIN',
1059     'DEF:inc_avg={file}:read:AVERAGE',
1060     'DEF:inc_max={file}:read:MAX',
1061     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
1062     'CDEF:mytime=out_avg,TIME,TIME,IF',
1063     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1064     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1065     'CDEF:out_avg_sample=out_avg,UN,0,out_avg,IF,sample_len,*',
1066     'CDEF:out_avg_sum=PREV,UN,0,PREV,IF,out_avg_sample,+',
1067     'CDEF:inc_avg_sample=inc_avg,UN,0,inc_avg,IF,sample_len,*',
1068     'CDEF:inc_avg_sum=PREV,UN,0,PREV,IF,inc_avg_sample,+',
1069     "AREA:out_avg#$HalfGreen",
1070     "AREA:inc_avg#$HalfBlue",
1071     "AREA:overlap#$HalfBlueGreen",
1072     "LINE1:out_avg#$FullGreen:Written",
1073     'GPRINT:out_avg:AVERAGE:%5.1lf%s Avg,',
1074     'GPRINT:out_max:MAX:%5.1lf%s Max,',
1075     'GPRINT:out_avg:LAST:%5.1lf%s Last',
1076     'GPRINT:out_avg_sum:LAST:(ca. %5.1lf%sB Total)\l',
1077     "LINE1:inc_avg#$FullBlue:Read   ",
1078     'GPRINT:inc_avg:AVERAGE:%5.1lf%s Avg,',
1079     'GPRINT:inc_max:MAX:%5.1lf%s Max,',
1080     'GPRINT:inc_avg:LAST:%5.1lf%s Last',
1081     'GPRINT:inc_avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
1082     ],
1083     disk_merged => ['-v', 'Merged Ops/s',
1084     'DEF:out_min={file}:write:MIN',
1085     'DEF:out_avg={file}:write:AVERAGE',
1086     'DEF:out_max={file}:write:MAX',
1087     'DEF:inc_min={file}:read:MIN',
1088     'DEF:inc_avg={file}:read:AVERAGE',
1089     'DEF:inc_max={file}:read:MAX',
1090     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
1091     "AREA:out_avg#$HalfGreen",
1092     "AREA:inc_avg#$HalfBlue",
1093     "AREA:overlap#$HalfBlueGreen",
1094     "LINE1:out_avg#$FullGreen:Written",
1095     'GPRINT:out_avg:AVERAGE:%6.2lf Avg,',
1096     'GPRINT:out_max:MAX:%6.2lf Max,',
1097     'GPRINT:out_avg:LAST:%6.2lf Last\l',
1098     "LINE1:inc_avg#$FullBlue:Read   ",
1099     'GPRINT:inc_avg:AVERAGE:%6.2lf Avg,',
1100     'GPRINT:inc_max:MAX:%6.2lf Max,',
1101     'GPRINT:inc_avg:LAST:%6.2lf Last\l'
1102     ],
1103     disk_ops => ['-v', 'Ops/s',
1104     'DEF:out_min={file}:write:MIN',
1105     'DEF:out_avg={file}:write:AVERAGE',
1106     'DEF:out_max={file}:write:MAX',
1107     'DEF:inc_min={file}:read:MIN',
1108     'DEF:inc_avg={file}:read:AVERAGE',
1109     'DEF:inc_max={file}:read:MAX',
1110     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
1111     "AREA:out_avg#$HalfGreen",
1112     "AREA:inc_avg#$HalfBlue",
1113     "AREA:overlap#$HalfBlueGreen",
1114     "LINE1:out_avg#$FullGreen:Written",
1115     'GPRINT:out_avg:AVERAGE:%6.2lf Avg,',
1116     'GPRINT:out_max:MAX:%6.2lf Max,',
1117     'GPRINT:out_avg:LAST:%6.2lf Last\l',
1118     "LINE1:inc_avg#$FullBlue:Read   ",
1119     'GPRINT:inc_avg:AVERAGE:%6.2lf Avg,',
1120     'GPRINT:inc_max:MAX:%6.2lf Max,',
1121     'GPRINT:inc_avg:LAST:%6.2lf Last\l'
1122     ],
1123     disk_time => ['-v', 'Seconds/s',
1124     'DEF:out_min_raw={file}:write:MIN',
1125     'DEF:out_avg_raw={file}:write:AVERAGE',
1126     'DEF:out_max_raw={file}:write:MAX',
1127     'DEF:inc_min_raw={file}:read:MIN',
1128     'DEF:inc_avg_raw={file}:read:AVERAGE',
1129     'DEF:inc_max_raw={file}:read:MAX',
1130     'CDEF:out_min=out_min_raw,1000,/',
1131     'CDEF:out_avg=out_avg_raw,1000,/',
1132     'CDEF:out_max=out_max_raw,1000,/',
1133     'CDEF:inc_min=inc_min_raw,1000,/',
1134     'CDEF:inc_avg=inc_avg_raw,1000,/',
1135     'CDEF:inc_max=inc_max_raw,1000,/',
1136     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
1137     "AREA:out_avg#$HalfGreen",
1138     "AREA:inc_avg#$HalfBlue",
1139     "AREA:overlap#$HalfBlueGreen",
1140     "LINE1:out_avg#$FullGreen:Written",
1141     'GPRINT:out_avg:AVERAGE:%5.1lf%ss Avg,',
1142     'GPRINT:out_max:MAX:%5.1lf%ss Max,',
1143     'GPRINT:out_avg:LAST:%5.1lf%ss Last\l',
1144     "LINE1:inc_avg#$FullBlue:Read   ",
1145     'GPRINT:inc_avg:AVERAGE:%5.1lf%ss Avg,',
1146     'GPRINT:inc_max:MAX:%5.1lf%ss Max,',
1147     'GPRINT:inc_avg:LAST:%5.1lf%ss Last\l'
1148     ],
1149     dns_traffic => ['DEF:rsp_min_raw={file}:responses:MIN',
1150     'DEF:rsp_avg_raw={file}:responses:AVERAGE',
1151     'DEF:rsp_max_raw={file}:responses:MAX',
1152     'DEF:qry_min_raw={file}:queries:MIN',
1153     'DEF:qry_avg_raw={file}:queries:AVERAGE',
1154     'DEF:qry_max_raw={file}:queries:MAX',
1155     'CDEF:rsp_min=rsp_min_raw,8,*',
1156     'CDEF:rsp_avg=rsp_avg_raw,8,*',
1157     'CDEF:rsp_max=rsp_max_raw,8,*',
1158     'CDEF:qry_min=qry_min_raw,8,*',
1159     'CDEF:qry_avg=qry_avg_raw,8,*',
1160     'CDEF:qry_max=qry_max_raw,8,*',
1161     'CDEF:overlap=rsp_avg,qry_avg,GT,qry_avg,rsp_avg,IF',
1162     'CDEF:mytime=rsp_avg_raw,TIME,TIME,IF',
1163     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1164     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1165     'CDEF:rsp_avg_sample=rsp_avg_raw,UN,0,rsp_avg_raw,IF,sample_len,*',
1166     'CDEF:rsp_avg_sum=PREV,UN,0,PREV,IF,rsp_avg_sample,+',
1167     'CDEF:qry_avg_sample=qry_avg_raw,UN,0,qry_avg_raw,IF,sample_len,*',
1168     'CDEF:qry_avg_sum=PREV,UN,0,PREV,IF,qry_avg_sample,+',
1169     "AREA:rsp_avg#$HalfGreen",
1170     "AREA:qry_avg#$HalfBlue",
1171     "AREA:overlap#$HalfBlueGreen",
1172     "LINE1:rsp_avg#$FullGreen:Responses",
1173     'GPRINT:rsp_avg:AVERAGE:%5.1lf%s Avg,',
1174     'GPRINT:rsp_max:MAX:%5.1lf%s Max,',
1175     'GPRINT:rsp_avg:LAST:%5.1lf%s Last',
1176     'GPRINT:rsp_avg_sum:LAST:(ca. %5.1lf%sB Total)\l',
1177     "LINE1:qry_avg#$FullBlue:Queries  ",
1178     #'GPRINT:qry_min:MIN:%5.1lf %s Min,',
1179     'GPRINT:qry_avg:AVERAGE:%5.1lf%s Avg,',
1180     'GPRINT:qry_max:MAX:%5.1lf%s Max,',
1181     'GPRINT:qry_avg:LAST:%5.1lf%s Last',
1182     'GPRINT:qry_avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
1183     ],
1184     email_count => ['-v', 'Mails',
1185     'DEF:avg={file}:value:AVERAGE',
1186     'DEF:min={file}:value:MIN',
1187     'DEF:max={file}:value:MAX',
1188     "AREA:max#$HalfMagenta",
1189     "AREA:min#$Canvas",
1190     "LINE1:avg#$FullMagenta:Count ",
1191     'GPRINT:min:MIN:%4.1lf Min,',
1192     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1193     'GPRINT:max:MAX:%4.1lf Max,',
1194     'GPRINT:avg:LAST:%4.1lf Last\l'
1195     ],
1196     email_size => ['-v', 'Bytes',
1197     'DEF:avg={file}:value:AVERAGE',
1198     'DEF:min={file}:value:MIN',
1199     'DEF:max={file}:value:MAX',
1200     "AREA:max#$HalfMagenta",
1201     "AREA:min#$Canvas",
1202     "LINE1:avg#$FullMagenta:Count ",
1203     'GPRINT:min:MIN:%4.1lf Min,',
1204     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1205     'GPRINT:max:MAX:%4.1lf Max,',
1206     'GPRINT:avg:LAST:%4.1lf Last\l'
1207     ],
1208     spam_score => ['-v', 'Score',
1209     'DEF:avg={file}:value:AVERAGE',
1210     'DEF:min={file}:value:MIN',
1211     'DEF:max={file}:value:MAX',
1212     "AREA:max#$HalfBlue",
1213     "AREA:min#$Canvas",
1214     "LINE1:avg#$FullBlue:Score ",
1215     'GPRINT:min:MIN:%4.1lf Min,',
1216     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1217     'GPRINT:max:MAX:%4.1lf Max,',
1218     'GPRINT:avg:LAST:%4.1lf Last\l'
1219     ],
1220     spam_check => [
1221     'DEF:avg={file}:hits:AVERAGE',
1222     'DEF:min={file}:hits:MIN',
1223     'DEF:max={file}:hits:MAX',
1224     "AREA:max#$HalfMagenta",
1225     "AREA:min#$Canvas",
1226     "LINE1:avg#$FullMagenta:Count ",
1227     'GPRINT:min:MIN:%4.1lf Min,',
1228     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1229     'GPRINT:max:MAX:%4.1lf Max,',
1230     'GPRINT:avg:LAST:%4.1lf Last\l'
1231     ],
1232     entropy => ['-v', 'Bits',
1233     'DEF:avg={file}:entropy:AVERAGE',
1234     'DEF:min={file}:entropy:MIN',
1235     'DEF:max={file}:entropy:MAX',
1236     "AREA:max#$HalfBlue",
1237     "AREA:min#$Canvas",
1238     "LINE1:avg#$FullBlue:Bits",
1239     'GPRINT:min:MIN:%4.0lfbit Min,',
1240     'GPRINT:avg:AVERAGE:%4.0lfbit Avg,',
1241     'GPRINT:max:MAX:%4.0lfbit Max,',
1242     'GPRINT:avg:LAST:%4.0lfbit Last\l'
1243     ],
1244     fanspeed => ['-v', 'RPM',
1245     'DEF:avg={file}:value:AVERAGE',
1246     'DEF:min={file}:value:MIN',
1247     'DEF:max={file}:value:MAX',
1248     "AREA:max#$HalfMagenta",
1249     "AREA:min#$Canvas",
1250     "LINE1:avg#$FullMagenta:RPM",
1251     'GPRINT:min:MIN:%4.1lf Min,',
1252     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1253     'GPRINT:max:MAX:%4.1lf Max,',
1254     'GPRINT:avg:LAST:%4.1lf Last\l'
1255     ],
1256     frequency => ['-v', 'Hertz',
1257     'DEF:avg={file}:frequency:AVERAGE',
1258     'DEF:min={file}:frequency:MIN',
1259     'DEF:max={file}:frequency:MAX',
1260     "AREA:max#$HalfBlue",
1261     "AREA:min#$Canvas",
1262     "LINE1:avg#$FullBlue:Frequency [Hz]",
1263     'GPRINT:min:MIN:%4.1lf Min,',
1264     'GPRINT:avg:AVERAGE:%4.1lf Avg,',
1265     'GPRINT:max:MAX:%4.1lf Max,',
1266     'GPRINT:avg:LAST:%4.1lf Last\l'
1267     ],
1268     frequency_offset => [ # NTPd
1269     'DEF:ppm_avg={file}:ppm:AVERAGE',
1270     'DEF:ppm_min={file}:ppm:MIN',
1271     'DEF:ppm_max={file}:ppm:MAX',
1272     "AREA:ppm_max#$HalfBlue",
1273     "AREA:ppm_min#$Canvas",
1274     "LINE1:ppm_avg#$FullBlue:{inst}",
1275     'GPRINT:ppm_min:MIN:%5.2lf Min,',
1276     'GPRINT:ppm_avg:AVERAGE:%5.2lf Avg,',
1277     'GPRINT:ppm_max:MAX:%5.2lf Max,',
1278     'GPRINT:ppm_avg:LAST:%5.2lf Last'
1279     ],
1280     gauge => ['-v', 'Exec value',
1281     'DEF:temp_avg={file}:value:AVERAGE',
1282     'DEF:temp_min={file}:value:MIN',
1283     'DEF:temp_max={file}:value:MAX',
1284     "AREA:temp_max#$HalfBlue",
1285     "AREA:temp_min#$Canvas",
1286     "LINE1:temp_avg#$FullBlue:Exec value",
1287     'GPRINT:temp_min:MIN:%6.2lf Min,',
1288     'GPRINT:temp_avg:AVERAGE:%6.2lf Avg,',
1289     'GPRINT:temp_max:MAX:%6.2lf Max,',
1290     'GPRINT:temp_avg:LAST:%6.2lf Last\l'
1291     ],
1292     hddtemp => [
1293     'DEF:temp_avg={file}:value:AVERAGE',
1294     'DEF:temp_min={file}:value:MIN',
1295     'DEF:temp_max={file}:value:MAX',
1296     "AREA:temp_max#$HalfRed",
1297     "AREA:temp_min#$Canvas",
1298     "LINE1:temp_avg#$FullRed:Temperature",
1299     'GPRINT:temp_min:MIN:%4.1lf Min,',
1300     'GPRINT:temp_avg:AVERAGE:%4.1lf Avg,',
1301     'GPRINT:temp_max:MAX:%4.1lf Max,',
1302     'GPRINT:temp_avg:LAST:%4.1lf Last\l'
1303     ],
1304     if_errors => ['-v', 'Errors/s',
1305     'DEF:tx_min={file}:tx:MIN',
1306     'DEF:tx_avg={file}:tx:AVERAGE',
1307     'DEF:tx_max={file}:tx:MAX',
1308     'DEF:rx_min={file}:rx:MIN',
1309     'DEF:rx_avg={file}:rx:AVERAGE',
1310     'DEF:rx_max={file}:rx:MAX',
1311     'CDEF:overlap=tx_avg,rx_avg,GT,rx_avg,tx_avg,IF',
1312     'CDEF:mytime=tx_avg,TIME,TIME,IF',
1313     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1314     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1315     'CDEF:tx_avg_sample=tx_avg,UN,0,tx_avg,IF,sample_len,*',
1316     'CDEF:tx_avg_sum=PREV,UN,0,PREV,IF,tx_avg_sample,+',
1317     'CDEF:rx_avg_sample=rx_avg,UN,0,rx_avg,IF,sample_len,*',
1318     'CDEF:rx_avg_sum=PREV,UN,0,PREV,IF,rx_avg_sample,+',
1319     "AREA:tx_avg#$HalfGreen",
1320     "AREA:rx_avg#$HalfBlue",
1321     "AREA:overlap#$HalfBlueGreen",
1322     "LINE1:tx_avg#$FullGreen:TX",
1323     'GPRINT:tx_avg:AVERAGE:%5.1lf%s Avg,',
1324     'GPRINT:tx_max:MAX:%5.1lf%s Max,',
1325     'GPRINT:tx_avg:LAST:%5.1lf%s Last',
1326     'GPRINT:tx_avg_sum:LAST:(ca. %4.0lf%s Total)\l',
1327     "LINE1:rx_avg#$FullBlue:RX",
1328     #'GPRINT:rx_min:MIN:%5.1lf %s Min,',
1329     'GPRINT:rx_avg:AVERAGE:%5.1lf%s Avg,',
1330     'GPRINT:rx_max:MAX:%5.1lf%s Max,',
1331     'GPRINT:rx_avg:LAST:%5.1lf%s Last',
1332     'GPRINT:rx_avg_sum:LAST:(ca. %4.0lf%s Total)\l'
1333     ],
1334     if_collisions => ['-v', 'Collisions/s',
1335     'DEF:min_raw={file}:value:MIN',
1336     'DEF:avg_raw={file}:value:AVERAGE',
1337     'DEF:max_raw={file}:value:MAX',
1338     'CDEF:min=min_raw,8,*',
1339     'CDEF:avg=avg_raw,8,*',
1340     'CDEF:max=max_raw,8,*',
1341     "AREA:max#$HalfBlue",
1342     "AREA:min#$Canvas",
1343     "LINE1:avg#$FullBlue:Collisions/s",
1344     'GPRINT:min:MIN:%5.1lf %s Min,',
1345     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
1346     'GPRINT:max:MAX:%5.1lf%s Max,',
1347     'GPRINT:avg:LAST:%5.1lf%s Last\l'
1348     ],
1349     if_dropped => ['-v', 'Packets/s',
1350     'DEF:tx_min={file}:tx:MIN',
1351     'DEF:tx_avg={file}:tx:AVERAGE',
1352     'DEF:tx_max={file}:tx:MAX',
1353     'DEF:rx_min={file}:rx:MIN',
1354     'DEF:rx_avg={file}:rx:AVERAGE',
1355     'DEF:rx_max={file}:rx:MAX',
1356     'CDEF:overlap=tx_avg,rx_avg,GT,rx_avg,tx_avg,IF',
1357     'CDEF:mytime=tx_avg,TIME,TIME,IF',
1358     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1359     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1360     'CDEF:tx_avg_sample=tx_avg,UN,0,tx_avg,IF,sample_len,*',
1361     'CDEF:tx_avg_sum=PREV,UN,0,PREV,IF,tx_avg_sample,+',
1362     'CDEF:rx_avg_sample=rx_avg,UN,0,rx_avg,IF,sample_len,*',
1363     'CDEF:rx_avg_sum=PREV,UN,0,PREV,IF,rx_avg_sample,+',
1364     "AREA:tx_avg#$HalfGreen",
1365     "AREA:rx_avg#$HalfBlue",
1366     "AREA:overlap#$HalfBlueGreen",
1367     "LINE1:tx_avg#$FullGreen:TX",
1368     'GPRINT:tx_avg:AVERAGE:%5.1lf%s Avg,',
1369     'GPRINT:tx_max:MAX:%5.1lf%s Max,',
1370     'GPRINT:tx_avg:LAST:%5.1lf%s Last',
1371     'GPRINT:tx_avg_sum:LAST:(ca. %4.0lf%s Total)\l',
1372     "LINE1:rx_avg#$FullBlue:RX",
1373     #'GPRINT:rx_min:MIN:%5.1lf %s Min,',
1374     'GPRINT:rx_avg:AVERAGE:%5.1lf%s Avg,',
1375     'GPRINT:rx_max:MAX:%5.1lf%s Max,',
1376     'GPRINT:rx_avg:LAST:%5.1lf%s Last',
1377     'GPRINT:rx_avg_sum:LAST:(ca. %4.0lf%s Total)\l'
1378     ],
1379     if_packets => ['-v', 'Packets/s',
1380     'DEF:tx_min={file}:tx:MIN',
1381     'DEF:tx_avg={file}:tx:AVERAGE',
1382     'DEF:tx_max={file}:tx:MAX',
1383     'DEF:rx_min={file}:rx:MIN',
1384     'DEF:rx_avg={file}:rx:AVERAGE',
1385     'DEF:rx_max={file}:rx:MAX',
1386     'CDEF:overlap=tx_avg,rx_avg,GT,rx_avg,tx_avg,IF',
1387     'CDEF:mytime=tx_avg,TIME,TIME,IF',
1388     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1389     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1390     'CDEF:tx_avg_sample=tx_avg,UN,0,tx_avg,IF,sample_len,*',
1391     'CDEF:tx_avg_sum=PREV,UN,0,PREV,IF,tx_avg_sample,+',
1392     'CDEF:rx_avg_sample=rx_avg,UN,0,rx_avg,IF,sample_len,*',
1393     'CDEF:rx_avg_sum=PREV,UN,0,PREV,IF,rx_avg_sample,+',
1394     "AREA:tx_avg#$HalfGreen",
1395     "AREA:rx_avg#$HalfBlue",
1396     "AREA:overlap#$HalfBlueGreen",
1397     "LINE1:tx_avg#$FullGreen:TX",
1398     'GPRINT:tx_avg:AVERAGE:%5.1lf%s Avg,',
1399     'GPRINT:tx_max:MAX:%5.1lf%s Max,',
1400     'GPRINT:tx_avg:LAST:%5.1lf%s Last',
1401     'GPRINT:tx_avg_sum:LAST:(ca. %4.0lf%s Total)\l',
1402     "LINE1:rx_avg#$FullBlue:RX",
1403     #'GPRINT:rx_min:MIN:%5.1lf %s Min,',
1404     'GPRINT:rx_avg:AVERAGE:%5.1lf%s Avg,',
1405     'GPRINT:rx_max:MAX:%5.1lf%s Max,',
1406     'GPRINT:rx_avg:LAST:%5.1lf%s Last',
1407     'GPRINT:rx_avg_sum:LAST:(ca. %4.0lf%s Total)\l'
1408     ],
1409     if_rx_errors => ['-v', 'Errors/s',
1410     'DEF:min={file}:value:MIN',
1411     'DEF:avg={file}:value:AVERAGE',
1412     'DEF:max={file}:value:MAX',
1413     'CDEF:mytime=avg,TIME,TIME,IF',
1414     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1415     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1416     'CDEF:avg_sample=avg,UN,0,avg,IF,sample_len,*',
1417     'CDEF:avg_sum=PREV,UN,0,PREV,IF,avg_sample,+',
1418     "AREA:avg#$HalfBlue",
1419     "LINE1:avg#$FullBlue:Errors/s",
1420     'GPRINT:avg:AVERAGE:%3.1lf%s Avg,',
1421     'GPRINT:max:MAX:%3.1lf%s Max,',
1422     'GPRINT:avg:LAST:%3.1lf%s Last',
1423     'GPRINT:avg_sum:LAST:(ca. %2.0lf%s Total)\l'
1424     ],
1425     ipt_bytes => ['-v', 'Bits/s',
1426     'DEF:min_raw={file}:value:MIN',
1427     'DEF:avg_raw={file}:value:AVERAGE',
1428     'DEF:max_raw={file}:value:MAX',
1429     'CDEF:min=min_raw,8,*',
1430     'CDEF:avg=avg_raw,8,*',
1431     'CDEF:max=max_raw,8,*',
1432     'CDEF:mytime=avg_raw,TIME,TIME,IF',
1433     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1434     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1435     'CDEF:avg_sample=avg_raw,UN,0,avg_raw,IF,sample_len,*',
1436     'CDEF:avg_sum=PREV,UN,0,PREV,IF,avg_sample,+',
1437     "AREA:max#$HalfBlue",
1438     "AREA:min#$Canvas",
1439     "LINE1:avg#$FullBlue:Bits/s",
1440     #'GPRINT:min:MIN:%5.1lf %s Min,',
1441     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
1442     'GPRINT:max:MAX:%5.1lf%s Max,',
1443     'GPRINT:avg:LAST:%5.1lf%s Last',
1444     'GPRINT:avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
1445     ],
1446     ipt_packets => ['-v', 'Packets/s',
1447     'DEF:min_raw={file}:value:MIN',
1448     'DEF:avg_raw={file}:value:AVERAGE',
1449     'DEF:max_raw={file}:value:MAX',
1450     'CDEF:min=min_raw,8,*',
1451     'CDEF:avg=avg_raw,8,*',
1452     'CDEF:max=max_raw,8,*',
1453     "AREA:max#$HalfBlue",
1454     "AREA:min#$Canvas",
1455     "LINE1:avg#$FullBlue:Packets/s",
1456     'GPRINT:min:MIN:%5.1lf %s Min,',
1457     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
1458     'GPRINT:max:MAX:%5.1lf%s Max,',
1459     'GPRINT:avg:LAST:%5.1lf%s Last\l'
1460     ],
1461     irq => ['-v', 'Issues/s',
1462     'DEF:avg={file}:value:AVERAGE',
1463     'DEF:min={file}:value:MIN',
1464     'DEF:max={file}:value:MAX',
1465     "AREA:max#$HalfBlue",
1466     "AREA:min#$Canvas",
1467     "LINE1:avg#$FullBlue:Issues/s",
1468     'GPRINT:min:MIN:%6.2lf Min,',
1469     'GPRINT:avg:AVERAGE:%6.2lf Avg,',
1470     'GPRINT:max:MAX:%6.2lf Max,',
1471     'GPRINT:avg:LAST:%6.2lf Last\l'
1472     ],
1473     load => ['-v', 'System load',
1474     'DEF:s_avg={file}:shortterm:AVERAGE',
1475     'DEF:s_min={file}:shortterm:MIN',
1476     'DEF:s_max={file}:shortterm:MAX',
1477     'DEF:m_avg={file}:midterm:AVERAGE',
1478     'DEF:m_min={file}:midterm:MIN',
1479     'DEF:m_max={file}:midterm:MAX',
1480     'DEF:l_avg={file}:longterm:AVERAGE',
1481     'DEF:l_min={file}:longterm:MIN',
1482     'DEF:l_max={file}:longterm:MAX',
1483     "AREA:s_max#$HalfGreen",
1484     "AREA:s_min#$Canvas",
1485     "LINE1:s_avg#$FullGreen: 1m average",
1486     'GPRINT:s_min:MIN:%4.2lf Min,',
1487     'GPRINT:s_avg:AVERAGE:%4.2lf Avg,',
1488     'GPRINT:s_max:MAX:%4.2lf Max,',
1489     'GPRINT:s_avg:LAST:%4.2lf Last\n',
1490     "LINE1:m_avg#$FullBlue: 5m average",
1491     'GPRINT:m_min:MIN:%4.2lf Min,',
1492     'GPRINT:m_avg:AVERAGE:%4.2lf Avg,',
1493     'GPRINT:m_max:MAX:%4.2lf Max,',
1494     'GPRINT:m_avg:LAST:%4.2lf Last\n',
1495     "LINE1:l_avg#$FullRed:15m average",
1496     'GPRINT:l_min:MIN:%4.2lf Min,',
1497     'GPRINT:l_avg:AVERAGE:%4.2lf Avg,',
1498     'GPRINT:l_max:MAX:%4.2lf Max,',
1499     'GPRINT:l_avg:LAST:%4.2lf Last'
1500     ],
1501     load_percent => [
1502     'DEF:avg={file}:percent:AVERAGE',
1503     'DEF:min={file}:percent:MIN',
1504     'DEF:max={file}:percent:MAX',
1505     "AREA:max#$HalfBlue",
1506     "AREA:min#$Canvas",
1507     "LINE1:avg#$FullBlue:Load",
1508     'GPRINT:min:MIN:%5.1lf%s%% Min,',
1509     'GPRINT:avg:AVERAGE:%5.1lf%s%% Avg,',
1510     'GPRINT:max:MAX:%5.1lf%s%% Max,',
1511     'GPRINT:avg:LAST:%5.1lf%s%% Last\l'
1512     ],
1513     mails => ['DEF:rawgood={file}:good:AVERAGE',
1514     'DEF:rawspam={file}:spam:AVERAGE',
1515     'CDEF:good=rawgood,UN,0,rawgood,IF',
1516     'CDEF:spam=rawspam,UN,0,rawspam,IF',
1517     'CDEF:negspam=spam,-1,*',
1518     "AREA:good#$HalfGreen",
1519     "LINE1:good#$FullGreen:Good mails",
1520     'GPRINT:good:AVERAGE:%4.1lf Avg,',
1521     'GPRINT:good:MAX:%4.1lf Max,',
1522     'GPRINT:good:LAST:%4.1lf Last\n',
1523     "AREA:negspam#$HalfRed",
1524     "LINE1:negspam#$FullRed:Spam mails",
1525     'GPRINT:spam:AVERAGE:%4.1lf Avg,',
1526     'GPRINT:spam:MAX:%4.1lf Max,',
1527     'GPRINT:spam:LAST:%4.1lf Last',
1528     'HRULE:0#000000'
1529     ],
1530     memory => ['-b', '1024', '-v', 'Bytes',
1531     'DEF:avg={file}:value:AVERAGE',
1532     'DEF:min={file}:value:MIN',
1533     'DEF:max={file}:value:MAX',
1534     "AREA:max#$HalfBlue",
1535     "AREA:min#$Canvas",
1536     "LINE1:avg#$FullBlue:Memory",
1537     'GPRINT:min:MIN:%5.1lf%sbyte Min,',
1538     'GPRINT:avg:AVERAGE:%5.1lf%sbyte Avg,',
1539     'GPRINT:max:MAX:%5.1lf%sbyte Max,',
1540     'GPRINT:avg:LAST:%5.1lf%sbyte Last\l'
1541     ],
1542     old_memory => [
1543     'DEF:used_avg={file}:used:AVERAGE',
1544     'DEF:free_avg={file}:free:AVERAGE',
1545     'DEF:buffers_avg={file}:buffers:AVERAGE',
1546     'DEF:cached_avg={file}:cached:AVERAGE',
1547     'DEF:used_min={file}:used:MIN',
1548     'DEF:free_min={file}:free:MIN',
1549     'DEF:buffers_min={file}:buffers:MIN',
1550     'DEF:cached_min={file}:cached:MIN',
1551     'DEF:used_max={file}:used:MAX',
1552     'DEF:free_max={file}:free:MAX',
1553     'DEF:buffers_max={file}:buffers:MAX',
1554     'DEF:cached_max={file}:cached:MAX',
1555     'CDEF:cached_avg_nn=cached_avg,UN,0,cached_avg,IF',
1556     'CDEF:buffers_avg_nn=buffers_avg,UN,0,buffers_avg,IF',
1557     'CDEF:free_cached_buffers_used=free_avg,cached_avg_nn,+,buffers_avg_nn,+,used_avg,+',
1558     'CDEF:cached_buffers_used=cached_avg,buffers_avg_nn,+,used_avg,+',
1559     'CDEF:buffers_used=buffers_avg,used_avg,+',
1560     "AREA:free_cached_buffers_used#$HalfGreen",
1561     "AREA:cached_buffers_used#$HalfBlue",
1562     "AREA:buffers_used#$HalfYellow",
1563     "AREA:used_avg#$HalfRed",
1564     "LINE1:free_cached_buffers_used#$FullGreen:Free        ",
1565     'GPRINT:free_min:MIN:%5.1lf%s Min,',
1566     'GPRINT:free_avg:AVERAGE:%5.1lf%s Avg,',
1567     'GPRINT:free_max:MAX:%5.1lf%s Max,',
1568     'GPRINT:free_avg:LAST:%5.1lf%s Last\n',
1569     "LINE1:cached_buffers_used#$FullBlue:Page cache  ",
1570     'GPRINT:cached_min:MIN:%5.1lf%s Min,',
1571     'GPRINT:cached_avg:AVERAGE:%5.1lf%s Avg,',
1572     'GPRINT:cached_max:MAX:%5.1lf%s Max,',
1573     'GPRINT:cached_avg:LAST:%5.1lf%s Last\n',
1574     "LINE1:buffers_used#$FullYellow:Buffer cache",
1575     'GPRINT:buffers_min:MIN:%5.1lf%s Min,',
1576     'GPRINT:buffers_avg:AVERAGE:%5.1lf%s Avg,',
1577     'GPRINT:buffers_max:MAX:%5.1lf%s Max,',
1578     'GPRINT:buffers_avg:LAST:%5.1lf%s Last\n',
1579     "LINE1:used_avg#$FullRed:Used        ",
1580     'GPRINT:used_min:MIN:%5.1lf%s Min,',
1581     'GPRINT:used_avg:AVERAGE:%5.1lf%s Avg,',
1582     'GPRINT:used_max:MAX:%5.1lf%s Max,',
1583     'GPRINT:used_avg:LAST:%5.1lf%s Last'
1584     ],
1585     mysql_commands => ['-v', 'Issues/s',
1586     "DEF:val_avg={file}:value:AVERAGE",
1587     "DEF:val_min={file}:value:MIN",
1588     "DEF:val_max={file}:value:MAX",
1589     "AREA:val_max#$HalfBlue",
1590     "AREA:val_min#$Canvas",
1591     "LINE1:val_avg#$FullBlue:{inst}",
1592     'GPRINT:val_min:MIN:%5.2lf Min,',
1593     'GPRINT:val_avg:AVERAGE:%5.2lf Avg,',
1594     'GPRINT:val_max:MAX:%5.2lf Max,',
1595     'GPRINT:val_avg:LAST:%5.2lf Last'
1596     ],
1597     mysql_handler => ['-v', 'Issues/s',
1598     "DEF:val_avg={file}:value:AVERAGE",
1599     "DEF:val_min={file}:value:MIN",
1600     "DEF:val_max={file}:value:MAX",
1601     "AREA:val_max#$HalfBlue",
1602     "AREA:val_min#$Canvas",
1603     "LINE1:val_avg#$FullBlue:{inst}",
1604     'GPRINT:val_min:MIN:%5.2lf Min,',
1605     'GPRINT:val_avg:AVERAGE:%5.2lf Avg,',
1606     'GPRINT:val_max:MAX:%5.2lf Max,',
1607     'GPRINT:val_avg:LAST:%5.2lf Last'
1608     ],
1609     mysql_octets => ['-v', 'Bytes/s',
1610     'DEF:out_min={file}:tx:MIN',
1611     'DEF:out_avg={file}:tx:AVERAGE',
1612     'DEF:out_max={file}:tx:MAX',
1613     'DEF:inc_min={file}:rx:MIN',
1614     'DEF:inc_avg={file}:rx:AVERAGE',
1615     'DEF:inc_max={file}:rx:MAX',
1616     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
1617     'CDEF:mytime=out_avg,TIME,TIME,IF',
1618     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
1619     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
1620     'CDEF:out_avg_sample=out_avg,UN,0,out_avg,IF,sample_len,*',
1621     'CDEF:out_avg_sum=PREV,UN,0,PREV,IF,out_avg_sample,+',
1622     'CDEF:inc_avg_sample=inc_avg,UN,0,inc_avg,IF,sample_len,*',
1623     'CDEF:inc_avg_sum=PREV,UN,0,PREV,IF,inc_avg_sample,+',
1624     "AREA:out_avg#$HalfGreen",
1625     "AREA:inc_avg#$HalfBlue",
1626     "AREA:overlap#$HalfBlueGreen",
1627     "LINE1:out_avg#$FullGreen:Written",
1628     'GPRINT:out_avg:AVERAGE:%5.1lf%s Avg,',
1629     'GPRINT:out_max:MAX:%5.1lf%s Max,',
1630     'GPRINT:out_avg:LAST:%5.1lf%s Last',
1631     'GPRINT:out_avg_sum:LAST:(ca. %5.1lf%sB Total)\l',
1632     "LINE1:inc_avg#$FullBlue:Read   ",
1633     'GPRINT:inc_avg:AVERAGE:%5.1lf%s Avg,',
1634     'GPRINT:inc_max:MAX:%5.1lf%s Max,',
1635     'GPRINT:inc_avg:LAST:%5.1lf%s Last',
1636     'GPRINT:inc_avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
1637     ],
1638     mysql_qcache => ['-v', 'Queries/s',
1639     "DEF:hits_min={file}:hits:MIN",
1640     "DEF:hits_avg={file}:hits:AVERAGE",
1641     "DEF:hits_max={file}:hits:MAX",
1642     "DEF:inserts_min={file}:inserts:MIN",
1643     "DEF:inserts_avg={file}:inserts:AVERAGE",
1644     "DEF:inserts_max={file}:inserts:MAX",
1645     "DEF:not_cached_min={file}:not_cached:MIN",
1646     "DEF:not_cached_avg={file}:not_cached:AVERAGE",
1647     "DEF:not_cached_max={file}:not_cached:MAX",
1648     "DEF:lowmem_prunes_min={file}:lowmem_prunes:MIN",
1649     "DEF:lowmem_prunes_avg={file}:lowmem_prunes:AVERAGE",
1650     "DEF:lowmem_prunes_max={file}:lowmem_prunes:MAX",
1651     "DEF:queries_min={file}:queries_in_cache:MIN",
1652     "DEF:queries_avg={file}:queries_in_cache:AVERAGE",
1653     "DEF:queries_max={file}:queries_in_cache:MAX",
1654     "CDEF:unknown=queries_avg,UNKN,+",
1655     "CDEF:not_cached_agg=hits_avg,inserts_avg,+,not_cached_avg,+",
1656     "CDEF:inserts_agg=hits_avg,inserts_avg,+",
1657     "CDEF:hits_agg=hits_avg",
1658     "AREA:not_cached_agg#$HalfYellow",
1659     "AREA:inserts_agg#$HalfBlue",
1660     "AREA:hits_agg#$HalfGreen",
1661     "LINE1:not_cached_agg#$FullYellow:Not Cached      ",
1662     'GPRINT:not_cached_min:MIN:%5.2lf Min,',
1663     'GPRINT:not_cached_avg:AVERAGE:%5.2lf Avg,',
1664     'GPRINT:not_cached_max:MAX:%5.2lf Max,',
1665     'GPRINT:not_cached_avg:LAST:%5.2lf Last\l',
1666     "LINE1:inserts_agg#$FullBlue:Inserts         ",
1667     'GPRINT:inserts_min:MIN:%5.2lf Min,',
1668     'GPRINT:inserts_avg:AVERAGE:%5.2lf Avg,',
1669     'GPRINT:inserts_max:MAX:%5.2lf Max,',
1670     'GPRINT:inserts_avg:LAST:%5.2lf Last\l',
1671     "LINE1:hits_agg#$FullGreen:Hits            ",
1672     'GPRINT:hits_min:MIN:%5.2lf Min,',
1673     'GPRINT:hits_avg:AVERAGE:%5.2lf Avg,',
1674     'GPRINT:hits_max:MAX:%5.2lf Max,',
1675     'GPRINT:hits_avg:LAST:%5.2lf Last\l',
1676     "LINE1:lowmem_prunes_avg#$FullRed:Lowmem Prunes   ",
1677     'GPRINT:lowmem_prunes_min:MIN:%5.2lf Min,',
1678     'GPRINT:lowmem_prunes_avg:AVERAGE:%5.2lf Avg,',
1679     'GPRINT:lowmem_prunes_max:MAX:%5.2lf Max,',
1680     'GPRINT:lowmem_prunes_avg:LAST:%5.2lf Last\l',
1681     "LINE1:unknown#$Canvas:Queries in cache",
1682     'GPRINT:queries_min:MIN:%5.0lf Min,',
1683     'GPRINT:queries_avg:AVERAGE:%5.0lf Avg,',
1684     'GPRINT:queries_max:MAX:%5.0lf Max,',
1685     'GPRINT:queries_avg:LAST:%5.0lf Last\l'
1686     ],
1687     mysql_threads => ['-v', 'Threads',
1688     "DEF:running_min={file}:running:MIN",
1689     "DEF:running_avg={file}:running:AVERAGE",
1690     "DEF:running_max={file}:running:MAX",
1691     "DEF:connected_min={file}:connected:MIN",
1692     "DEF:connected_avg={file}:connected:AVERAGE",
1693     "DEF:connected_max={file}:connected:MAX",
1694     "DEF:cached_min={file}:cached:MIN",
1695     "DEF:cached_avg={file}:cached:AVERAGE",
1696     "DEF:cached_max={file}:cached:MAX",
1697     "DEF:created_min={file}:created:MIN",
1698     "DEF:created_avg={file}:created:AVERAGE",
1699     "DEF:created_max={file}:created:MAX",
1700     "CDEF:unknown=created_avg,UNKN,+",
1701     "CDEF:cached_agg=connected_avg,cached_avg,+",
1702     "AREA:cached_agg#$HalfGreen",
1703     "AREA:connected_avg#$HalfBlue",
1704     "AREA:running_avg#$HalfRed",
1705     "LINE1:cached_agg#$FullGreen:Cached   ",
1706     'GPRINT:cached_min:MIN:%5.1lf Min,',
1707     'GPRINT:cached_avg:AVERAGE:%5.1lf Avg,',
1708     'GPRINT:cached_max:MAX:%5.1lf Max,',
1709     'GPRINT:cached_avg:LAST:%5.1lf Last\l',
1710     "LINE1:connected_avg#$FullBlue:Connected",
1711     'GPRINT:connected_min:MIN:%5.1lf Min,',
1712     'GPRINT:connected_avg:AVERAGE:%5.1lf Avg,',
1713     'GPRINT:connected_max:MAX:%5.1lf Max,',
1714     'GPRINT:connected_avg:LAST:%5.1lf Last\l',
1715     "LINE1:running_avg#$FullRed:Running  ",
1716     'GPRINT:running_min:MIN:%5.1lf Min,',
1717     'GPRINT:running_avg:AVERAGE:%5.1lf Avg,',
1718     'GPRINT:running_max:MAX:%5.1lf Max,',
1719     'GPRINT:running_avg:LAST:%5.1lf Last\l',
1720     "LINE1:unknown#$Canvas:Created  ",
1721     'GPRINT:created_min:MIN:%5.0lf Min,',
1722     'GPRINT:created_avg:AVERAGE:%5.0lf Avg,',
1723     'GPRINT:created_max:MAX:%5.0lf Max,',
1724     'GPRINT:created_avg:LAST:%5.0lf Last\l'
1725     ],
1726     nfs_procedure => ['-v', 'Issues/s',
1727     'DEF:avg={file}:value:AVERAGE',
1728     'DEF:min={file}:value:MIN',
1729     'DEF:max={file}:value:MAX',
1730     "AREA:max#$HalfBlue",
1731     "AREA:min#$Canvas",
1732     "LINE1:avg#$FullBlue:Issues/s",
1733     'GPRINT:min:MIN:%6.2lf Min,',
1734     'GPRINT:avg:AVERAGE:%6.2lf Avg,',
1735     'GPRINT:max:MAX:%6.2lf Max,',
1736     'GPRINT:avg:LAST:%6.2lf Last\l'
1737     ],
1738     nfs3_procedures => [
1739     "DEF:null_avg={file}:null:AVERAGE",
1740     "DEF:getattr_avg={file}:getattr:AVERAGE",
1741     "DEF:setattr_avg={file}:setattr:AVERAGE",
1742     "DEF:lookup_avg={file}:lookup:AVERAGE",
1743     "DEF:access_avg={file}:access:AVERAGE",
1744     "DEF:readlink_avg={file}:readlink:AVERAGE",
1745     "DEF:read_avg={file}:read:AVERAGE",
1746     "DEF:write_avg={file}:write:AVERAGE",
1747     "DEF:create_avg={file}:create:AVERAGE",
1748     "DEF:mkdir_avg={file}:mkdir:AVERAGE",
1749     "DEF:symlink_avg={file}:symlink:AVERAGE",
1750     "DEF:mknod_avg={file}:mknod:AVERAGE",
1751     "DEF:remove_avg={file}:remove:AVERAGE",
1752     "DEF:rmdir_avg={file}:rmdir:AVERAGE",
1753     "DEF:rename_avg={file}:rename:AVERAGE",
1754     "DEF:link_avg={file}:link:AVERAGE",
1755     "DEF:readdir_avg={file}:readdir:AVERAGE",
1756     "DEF:readdirplus_avg={file}:readdirplus:AVERAGE",
1757     "DEF:fsstat_avg={file}:fsstat:AVERAGE",
1758     "DEF:fsinfo_avg={file}:fsinfo:AVERAGE",
1759     "DEF:pathconf_avg={file}:pathconf:AVERAGE",
1760     "DEF:commit_avg={file}:commit:AVERAGE",
1761     "DEF:null_max={file}:null:MAX",
1762     "DEF:getattr_max={file}:getattr:MAX",
1763     "DEF:setattr_max={file}:setattr:MAX",
1764     "DEF:lookup_max={file}:lookup:MAX",
1765     "DEF:access_max={file}:access:MAX",
1766     "DEF:readlink_max={file}:readlink:MAX",
1767     "DEF:read_max={file}:read:MAX",
1768     "DEF:write_max={file}:write:MAX",
1769     "DEF:create_max={file}:create:MAX",
1770     "DEF:mkdir_max={file}:mkdir:MAX",
1771     "DEF:symlink_max={file}:symlink:MAX",
1772     "DEF:mknod_max={file}:mknod:MAX",
1773     "DEF:remove_max={file}:remove:MAX",
1774     "DEF:rmdir_max={file}:rmdir:MAX",
1775     "DEF:rename_max={file}:rename:MAX",
1776     "DEF:link_max={file}:link:MAX",
1777     "DEF:readdir_max={file}:readdir:MAX",
1778     "DEF:readdirplus_max={file}:readdirplus:MAX",
1779     "DEF:fsstat_max={file}:fsstat:MAX",
1780     "DEF:fsinfo_max={file}:fsinfo:MAX",
1781     "DEF:pathconf_max={file}:pathconf:MAX",
1782     "DEF:commit_max={file}:commit:MAX",
1783     "CDEF:other_avg=null_avg,readlink_avg,create_avg,mkdir_avg,symlink_avg,mknod_avg,remove_avg,rmdir_avg,rename_avg,link_avg,readdir_avg,readdirplus_avg,fsstat_avg,fsinfo_avg,pathconf_avg,+,+,+,+,+,+,+,+,+,+,+,+,+,+",
1784     "CDEF:other_max=null_max,readlink_max,create_max,mkdir_max,symlink_max,mknod_max,remove_max,rmdir_max,rename_max,link_max,readdir_max,readdirplus_max,fsstat_max,fsinfo_max,pathconf_max,+,+,+,+,+,+,+,+,+,+,+,+,+,+",
1785     "CDEF:stack_read=read_avg",
1786     "CDEF:stack_getattr=stack_read,getattr_avg,+",
1787     "CDEF:stack_access=stack_getattr,access_avg,+",
1788     "CDEF:stack_lookup=stack_access,lookup_avg,+",
1789     "CDEF:stack_write=stack_lookup,write_avg,+",
1790     "CDEF:stack_commit=stack_write,commit_avg,+",
1791     "CDEF:stack_setattr=stack_commit,setattr_avg,+",
1792     "CDEF:stack_other=stack_setattr,other_avg,+",
1793     "AREA:stack_other#$HalfRed",
1794     "AREA:stack_setattr#$HalfGreen",
1795     "AREA:stack_commit#$HalfYellow",
1796     "AREA:stack_write#$HalfGreen",
1797     "AREA:stack_lookup#$HalfBlue",
1798     "AREA:stack_access#$HalfMagenta",
1799     "AREA:stack_getattr#$HalfCyan",
1800     "AREA:stack_read#$HalfBlue",
1801     "LINE1:stack_other#$FullRed:Other  ",
1802     'GPRINT:other_max:MAX:%5.1lf Max,',
1803     'GPRINT:other_avg:AVERAGE:%5.1lf Avg,',
1804     'GPRINT:other_avg:LAST:%5.1lf Last\l',
1805     "LINE1:stack_setattr#$FullGreen:setattr",
1806     'GPRINT:setattr_max:MAX:%5.1lf Max,',
1807     'GPRINT:setattr_avg:AVERAGE:%5.1lf Avg,',
1808     'GPRINT:setattr_avg:LAST:%5.1lf Last\l',
1809     "LINE1:stack_commit#$FullYellow:commit ",
1810     'GPRINT:commit_max:MAX:%5.1lf Max,',
1811     'GPRINT:commit_avg:AVERAGE:%5.1lf Avg,',
1812     'GPRINT:commit_avg:LAST:%5.1lf Last\l',
1813     "LINE1:stack_write#$FullGreen:write  ",
1814     'GPRINT:write_max:MAX:%5.1lf Max,',
1815     'GPRINT:write_avg:AVERAGE:%5.1lf Avg,',
1816     'GPRINT:write_avg:LAST:%5.1lf Last\l',
1817     "LINE1:stack_lookup#$FullBlue:lookup ",
1818     'GPRINT:lookup_max:MAX:%5.1lf Max,',
1819     'GPRINT:lookup_avg:AVERAGE:%5.1lf Avg,',
1820     'GPRINT:lookup_avg:LAST:%5.1lf Last\l',
1821     "LINE1:stack_access#$FullMagenta:access ",
1822     'GPRINT:access_max:MAX:%5.1lf Max,',
1823     'GPRINT:access_avg:AVERAGE:%5.1lf Avg,',
1824     'GPRINT:access_avg:LAST:%5.1lf Last\l',
1825     "LINE1:stack_getattr#$FullCyan:getattr",
1826     'GPRINT:getattr_max:MAX:%5.1lf Max,',
1827     'GPRINT:getattr_avg:AVERAGE:%5.1lf Avg,',
1828     'GPRINT:getattr_avg:LAST:%5.1lf Last\l',
1829     "LINE1:stack_read#$FullBlue:read   ",
1830     'GPRINT:read_max:MAX:%5.1lf Max,',
1831     'GPRINT:read_avg:AVERAGE:%5.1lf Avg,',
1832     'GPRINT:read_avg:LAST:%5.1lf Last\l'
1833     ],
1834     opcode => [
1835     'DEF:avg={file}:value:AVERAGE',
1836     'DEF:min={file}:value:MIN',
1837     'DEF:max={file}:value:MAX',
1838     "AREA:max#$HalfBlue",
1839     "AREA:min#$Canvas",
1840     "LINE1:avg#$FullBlue:Queries/s",
1841     'GPRINT:min:MIN:%9.3lf Min,',
1842     'GPRINT:avg:AVERAGE:%9.3lf Average,',
1843     'GPRINT:max:MAX:%9.3lf Max,',
1844     'GPRINT:avg:LAST:%9.3lf Last\l'
1845     ],
1846     partition => [
1847     "DEF:rbyte_avg={file}:rbytes:AVERAGE",
1848     "DEF:rbyte_min={file}:rbytes:MIN",
1849     "DEF:rbyte_max={file}:rbytes:MAX",
1850     "DEF:wbyte_avg={file}:wbytes:AVERAGE",
1851     "DEF:wbyte_min={file}:wbytes:MIN",
1852     "DEF:wbyte_max={file}:wbytes:MAX",
1853     'CDEF:overlap=wbyte_avg,rbyte_avg,GT,rbyte_avg,wbyte_avg,IF',
1854     "AREA:wbyte_avg#$HalfGreen",
1855     "AREA:rbyte_avg#$HalfBlue",
1856     "AREA:overlap#$HalfBlueGreen",
1857     "LINE1:wbyte_avg#$FullGreen:Write",
1858     'GPRINT:wbyte_min:MIN:%5.1lf%s Min,',
1859     'GPRINT:wbyte_avg:AVERAGE:%5.1lf%s Avg,',
1860     'GPRINT:wbyte_max:MAX:%5.1lf%s Max,',
1861     'GPRINT:wbyte_avg:LAST:%5.1lf%s Last\l',
1862     "LINE1:rbyte_avg#$FullBlue:Read ",
1863     'GPRINT:rbyte_min:MIN:%5.1lf%s Min,',
1864     'GPRINT:rbyte_avg:AVERAGE:%5.1lf%s Avg,',
1865     'GPRINT:rbyte_max:MAX:%5.1lf%s Max,',
1866     'GPRINT:rbyte_avg:LAST:%5.1lf%s Last\l'
1867     ],
1868     percent => ['-v', 'Percent',
1869     'DEF:avg={file}:percent:AVERAGE',
1870     'DEF:min={file}:percent:MIN',
1871     'DEF:max={file}:percent:MAX',
1872     "AREA:max#$HalfBlue",
1873     "AREA:min#$Canvas",
1874     "LINE1:avg#$FullBlue:Percent",
1875     'GPRINT:min:MIN:%5.1lf%% Min,',
1876     'GPRINT:avg:AVERAGE:%5.1lf%% Avg,',
1877     'GPRINT:max:MAX:%5.1lf%% Max,',
1878     'GPRINT:avg:LAST:%5.1lf%% Last\l'
1879     ],
1880     ping => ['DEF:ping_avg={file}:ping:AVERAGE',
1881     'DEF:ping_min={file}:ping:MIN',
1882     'DEF:ping_max={file}:ping:MAX',
1883     "AREA:ping_max#$HalfBlue",
1884     "AREA:ping_min#$Canvas",
1885     "LINE1:ping_avg#$FullBlue:Ping",
1886     'GPRINT:ping_min:MIN:%4.1lf ms Min,',
1887     'GPRINT:ping_avg:AVERAGE:%4.1lf ms Avg,',
1888     'GPRINT:ping_max:MAX:%4.1lf ms Max,',
1889     'GPRINT:ping_avg:LAST:%4.1lf ms Last'],
1890     processes => [
1891     "DEF:running_avg={file}:running:AVERAGE",
1892     "DEF:running_min={file}:running:MIN",
1893     "DEF:running_max={file}:running:MAX",
1894     "DEF:sleeping_avg={file}:sleeping:AVERAGE",
1895     "DEF:sleeping_min={file}:sleeping:MIN",
1896     "DEF:sleeping_max={file}:sleeping:MAX",
1897     "DEF:zombies_avg={file}:zombies:AVERAGE",
1898     "DEF:zombies_min={file}:zombies:MIN",
1899     "DEF:zombies_max={file}:zombies:MAX",
1900     "DEF:stopped_avg={file}:stopped:AVERAGE",
1901     "DEF:stopped_min={file}:stopped:MIN",
1902     "DEF:stopped_max={file}:stopped:MAX",
1903     "DEF:paging_avg={file}:paging:AVERAGE",
1904     "DEF:paging_min={file}:paging:MIN",
1905     "DEF:paging_max={file}:paging:MAX",
1906     "DEF:blocked_avg={file}:blocked:AVERAGE",
1907     "DEF:blocked_min={file}:blocked:MIN",
1908     "DEF:blocked_max={file}:blocked:MAX",
1909     'CDEF:paging_acc=sleeping_avg,running_avg,stopped_avg,zombies_avg,blocked_avg,paging_avg,+,+,+,+,+',
1910     'CDEF:blocked_acc=sleeping_avg,running_avg,stopped_avg,zombies_avg,blocked_avg,+,+,+,+',
1911     'CDEF:zombies_acc=sleeping_avg,running_avg,stopped_avg,zombies_avg,+,+,+',
1912     'CDEF:stopped_acc=sleeping_avg,running_avg,stopped_avg,+,+',
1913     'CDEF:running_acc=sleeping_avg,running_avg,+',
1914     'CDEF:sleeping_acc=sleeping_avg',
1915     "AREA:paging_acc#$HalfYellow",
1916     "AREA:blocked_acc#$HalfCyan",
1917     "AREA:zombies_acc#$HalfRed",
1918     "AREA:stopped_acc#$HalfMagenta",
1919     "AREA:running_acc#$HalfGreen",
1920     "AREA:sleeping_acc#$HalfBlue",
1921     "LINE1:paging_acc#$FullYellow:Paging  ",
1922     'GPRINT:paging_min:MIN:%5.1lf Min,',
1923     'GPRINT:paging_avg:AVERAGE:%5.1lf Average,',
1924     'GPRINT:paging_max:MAX:%5.1lf Max,',
1925     'GPRINT:paging_avg:LAST:%5.1lf Last\l',
1926     "LINE1:blocked_acc#$FullCyan:Blocked ",
1927     'GPRINT:blocked_min:MIN:%5.1lf Min,',
1928     'GPRINT:blocked_avg:AVERAGE:%5.1lf Average,',
1929     'GPRINT:blocked_max:MAX:%5.1lf Max,',
1930     'GPRINT:blocked_avg:LAST:%5.1lf Last\l',
1931     "LINE1:zombies_acc#$FullRed:Zombies ",
1932     'GPRINT:zombies_min:MIN:%5.1lf Min,',
1933     'GPRINT:zombies_avg:AVERAGE:%5.1lf Average,',
1934     'GPRINT:zombies_max:MAX:%5.1lf Max,',
1935     'GPRINT:zombies_avg:LAST:%5.1lf Last\l',
1936     "LINE1:stopped_acc#$FullMagenta:Stopped ",
1937     'GPRINT:stopped_min:MIN:%5.1lf Min,',
1938     'GPRINT:stopped_avg:AVERAGE:%5.1lf Average,',
1939     'GPRINT:stopped_max:MAX:%5.1lf Max,',
1940     'GPRINT:stopped_avg:LAST:%5.1lf Last\l',
1941     "LINE1:running_acc#$FullGreen:Running ",
1942     'GPRINT:running_min:MIN:%5.1lf Min,',
1943     'GPRINT:running_avg:AVERAGE:%5.1lf Average,',
1944     'GPRINT:running_max:MAX:%5.1lf Max,',
1945     'GPRINT:running_avg:LAST:%5.1lf Last\l',
1946     "LINE1:sleeping_acc#$FullBlue:Sleeping",
1947     'GPRINT:sleeping_min:MIN:%5.1lf Min,',
1948     'GPRINT:sleeping_avg:AVERAGE:%5.1lf Average,',
1949     'GPRINT:sleeping_max:MAX:%5.1lf Max,',
1950     'GPRINT:sleeping_avg:LAST:%5.1lf Last\l'
1951     ],
1952     ps_rss => [
1953     'DEF:avg={file}:byte:AVERAGE',
1954     'DEF:min={file}:byte:MIN',
1955     'DEF:max={file}:byte:MAX',
1956     "AREA:avg#$HalfBlue",
1957     "LINE1:avg#$FullBlue:RSS",
1958     'GPRINT:min:MIN:%5.1lf%s Min,',
1959     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
1960     'GPRINT:max:MAX:%5.1lf%s Max,',
1961     'GPRINT:avg:LAST:%5.1lf%s Last\l'
1962     ],
1963     ps_cputime => [
1964     'DEF:user_avg_raw={file}:user:AVERAGE',
1965     'DEF:user_min_raw={file}:user:MIN',
1966     'DEF:user_max_raw={file}:user:MAX',
1967     'DEF:syst_avg_raw={file}:syst:AVERAGE',
1968     'DEF:syst_min_raw={file}:syst:MIN',
1969     'DEF:syst_max_raw={file}:syst:MAX',
1970     'CDEF:user_avg=user_avg_raw,1000000,/',
1971     'CDEF:user_min=user_min_raw,1000000,/',
1972     'CDEF:user_max=user_max_raw,1000000,/',
1973     'CDEF:syst_avg=syst_avg_raw,1000000,/',
1974     'CDEF:syst_min=syst_min_raw,1000000,/',
1975     'CDEF:syst_max=syst_max_raw,1000000,/',
1976     'CDEF:user_syst=syst_avg,UN,0,syst_avg,IF,user_avg,+',
1977     "AREA:user_syst#$HalfBlue",
1978     "AREA:syst_avg#$HalfRed",
1979     "LINE1:user_syst#$FullBlue:User  ",
1980     'GPRINT:user_min:MIN:%5.1lf%s Min,',
1981     'GPRINT:user_avg:AVERAGE:%5.1lf%s Avg,',
1982     'GPRINT:user_max:MAX:%5.1lf%s Max,',
1983     'GPRINT:user_avg:LAST:%5.1lf%s Last\l',
1984     "LINE1:syst_avg#$FullRed:System",
1985     'GPRINT:syst_min:MIN:%5.1lf%s Min,',
1986     'GPRINT:syst_avg:AVERAGE:%5.1lf%s Avg,',
1987     'GPRINT:syst_max:MAX:%5.1lf%s Max,',
1988     'GPRINT:syst_avg:LAST:%5.1lf%s Last\l'
1989     ],
1990     ps_count => [
1991     'DEF:procs_avg={file}:processes:AVERAGE',
1992     'DEF:procs_min={file}:processes:MIN',
1993     'DEF:procs_max={file}:processes:MAX',
1994     'DEF:thrds_avg={file}:threads:AVERAGE',
1995     'DEF:thrds_min={file}:threads:MIN',
1996     'DEF:thrds_max={file}:threads:MAX',
1997     "AREA:thrds_avg#$HalfBlue",
1998     "AREA:procs_avg#$HalfRed",
1999     "LINE1:thrds_avg#$FullBlue:Threads  ",
2000     'GPRINT:thrds_min:MIN:%5.1lf Min,',
2001     'GPRINT:thrds_avg:AVERAGE:%5.1lf Avg,',
2002     'GPRINT:thrds_max:MAX:%5.1lf Max,',
2003     'GPRINT:thrds_avg:LAST:%5.1lf Last\l',
2004     "LINE1:procs_avg#$FullRed:Processes",
2005     'GPRINT:procs_min:MIN:%5.1lf Min,',
2006     'GPRINT:procs_avg:AVERAGE:%5.1lf Avg,',
2007     'GPRINT:procs_max:MAX:%5.1lf Max,',
2008     'GPRINT:procs_avg:LAST:%5.1lf Last\l'
2009     ],
2010     ps_pagefaults => [
2011     'DEF:minor_avg={file}:minflt:AVERAGE',
2012     'DEF:minor_min={file}:minflt:MIN',
2013     'DEF:minor_max={file}:minflt:MAX',
2014     'DEF:major_avg={file}:majflt:AVERAGE',
2015     'DEF:major_min={file}:majflt:MIN',
2016     'DEF:major_max={file}:majflt:MAX',
2017     'CDEF:minor_major=major_avg,UN,0,major_avg,IF,minor_avg,+',
2018     "AREA:minor_major#$HalfBlue",
2019     "AREA:major_avg#$HalfRed",
2020     "LINE1:minor_major#$FullBlue:Minor",
2021     'GPRINT:minor_min:MIN:%5.1lf%s Min,',
2022     'GPRINT:minor_avg:AVERAGE:%5.1lf%s Avg,',
2023     'GPRINT:minor_max:MAX:%5.1lf%s Max,',
2024     'GPRINT:minor_avg:LAST:%5.1lf%s Last\l',
2025     "LINE1:major_avg#$FullRed:Major",
2026     'GPRINT:major_min:MIN:%5.1lf%s Min,',
2027     'GPRINT:major_avg:AVERAGE:%5.1lf%s Avg,',
2028     'GPRINT:major_max:MAX:%5.1lf%s Max,',
2029     'GPRINT:major_avg:LAST:%5.1lf%s Last\l'
2030     ],
2031     ps_state => ['-v', 'Processes',
2032     'DEF:avg={file}:value:AVERAGE',
2033     'DEF:min={file}:value:MIN',
2034     'DEF:max={file}:value:MAX',
2035     "AREA:max#$HalfBlue",
2036     "AREA:min#$Canvas",
2037     "LINE1:avg#$FullBlue:Processes",
2038     'GPRINT:min:MIN:%6.2lf Min,',
2039     'GPRINT:avg:AVERAGE:%6.2lf Avg,',
2040     'GPRINT:max:MAX:%6.2lf Max,',
2041     'GPRINT:avg:LAST:%6.2lf Last\l'
2042     ],
2043     qtype => [
2044     'DEF:avg={file}:value:AVERAGE',
2045     'DEF:min={file}:value:MIN',
2046     'DEF:max={file}:value:MAX',
2047     "AREA:max#$HalfBlue",
2048     "AREA:min#$Canvas",
2049     "LINE1:avg#$FullBlue:Queries/s",
2050     'GPRINT:min:MIN:%9.3lf Min,',
2051     'GPRINT:avg:AVERAGE:%9.3lf Average,',
2052     'GPRINT:max:MAX:%9.3lf Max,',
2053     'GPRINT:avg:LAST:%9.3lf Last\l'
2054     ],
2055     rcode => [
2056     'DEF:avg={file}:value:AVERAGE',
2057     'DEF:min={file}:value:MIN',
2058     'DEF:max={file}:value:MAX',
2059     "AREA:max#$HalfBlue",
2060     "AREA:min#$Canvas",
2061     "LINE1:avg#$FullBlue:Queries/s",
2062     'GPRINT:min:MIN:%9.3lf Min,',
2063     'GPRINT:avg:AVERAGE:%9.3lf Average,',
2064     'GPRINT:max:MAX:%9.3lf Max,',
2065     'GPRINT:avg:LAST:%9.3lf Last\l'
2066     ],
2067     swap => ['-v', 'Bytes', '-b', '1024',
2068     'DEF:avg={file}:value:AVERAGE',
2069     'DEF:min={file}:value:MIN',
2070     'DEF:max={file}:value:MAX',
2071     "AREA:max#$HalfBlue",
2072     "AREA:min#$Canvas",
2073     "LINE1:avg#$FullBlue:Bytes",
2074     'GPRINT:min:MIN:%6.2lf%sByte Min,',
2075     'GPRINT:avg:AVERAGE:%6.2lf%sByte Avg,',
2076     'GPRINT:max:MAX:%6.2lf%sByte Max,',
2077     'GPRINT:avg:LAST:%6.2lf%sByte Last\l'
2078     ],
2079     ols_swap => [
2080     'DEF:used_avg={file}:used:AVERAGE',
2081     'DEF:used_min={file}:used:MIN',
2082     'DEF:used_max={file}:used:MAX',
2083     'DEF:free_avg={file}:free:AVERAGE',
2084     'DEF:free_min={file}:free:MIN',
2085     'DEF:free_max={file}:free:MAX',
2086     'DEF:cach_avg={file}:cached:AVERAGE',
2087     'DEF:cach_min={file}:cached:MIN',
2088     'DEF:cach_max={file}:cached:MAX',
2089     'DEF:resv_avg={file}:resv:AVERAGE',
2090     'DEF:resv_min={file}:resv:MIN',
2091     'DEF:resv_max={file}:resv:MAX',
2092     'CDEF:cach_avg_notnull=cach_avg,UN,0,cach_avg,IF',
2093     'CDEF:resv_avg_notnull=resv_avg,UN,0,resv_avg,IF',
2094     'CDEF:used_acc=used_avg',
2095     'CDEF:resv_acc=used_acc,resv_avg_notnull,+',
2096     'CDEF:cach_acc=resv_acc,cach_avg_notnull,+',
2097     'CDEF:free_acc=cach_acc,free_avg,+',
2098     "AREA:free_acc#$HalfGreen",
2099     "AREA:cach_acc#$HalfBlue",
2100     "AREA:resv_acc#$HalfYellow",
2101     "AREA:used_acc#$HalfRed",
2102     "LINE1:free_acc#$FullGreen:Free    ",
2103     'GPRINT:free_min:MIN:%5.1lf%s Min,',
2104     'GPRINT:free_avg:AVERAGE:%5.1lf%s Avg,',
2105     'GPRINT:free_max:MAX:%5.1lf%s Max,',
2106     'GPRINT:free_avg:LAST:%5.1lf%s Last\n',
2107     "LINE1:cach_acc#$FullBlue:Cached  ",
2108     'GPRINT:cach_min:MIN:%5.1lf%s Min,',
2109     'GPRINT:cach_avg:AVERAGE:%5.1lf%s Avg,',
2110     'GPRINT:cach_max:MAX:%5.1lf%s Max,',
2111     'GPRINT:cach_avg:LAST:%5.1lf%s Last\l',
2112     "LINE1:resv_acc#$FullYellow:Reserved",
2113     'GPRINT:resv_min:MIN:%5.1lf%s Min,',
2114     'GPRINT:resv_avg:AVERAGE:%5.1lf%s Avg,',
2115     'GPRINT:resv_max:MAX:%5.1lf%s Max,',
2116     'GPRINT:resv_avg:LAST:%5.1lf%s Last\n',
2117     "LINE1:used_acc#$FullRed:Used    ",
2118     'GPRINT:used_min:MIN:%5.1lf%s Min,',
2119     'GPRINT:used_avg:AVERAGE:%5.1lf%s Avg,',
2120     'GPRINT:used_max:MAX:%5.1lf%s Max,',
2121     'GPRINT:used_avg:LAST:%5.1lf%s Last\l'
2122     ],
2123     temperature => ['-v', 'Celsius',
2124     'DEF:temp_avg={file}:value:AVERAGE',
2125     'DEF:temp_min={file}:value:MIN',
2126     'DEF:temp_max={file}:value:MAX',
2127     'CDEF:average=temp_avg,0.2,*,PREV,UN,temp_avg,PREV,IF,0.8,*,+',
2128     'CDEF:derivative=PREV(average),average,-',
2129     'CDEF:rising=derivative,-0.01,LT,INF,UNKN,IF',
2130     'CDEF:falling=derivative,0.01,GT,INF,UNKN,IF',
2131     "AREA:rising#f0fff0",
2132     "AREA:falling#fff0f0",
2133     "AREA:temp_max#$HalfRed",
2134     "AREA:temp_min#$Canvas",
2135     #"LINE1:average#000000",
2136     "LINE1:temp_avg#$FullRed:Temperature",
2137     'GPRINT:temp_min:MIN:%4.1lf Min,',
2138     'GPRINT:temp_avg:AVERAGE:%4.1lf Avg,',
2139     'GPRINT:temp_max:MAX:%4.1lf Max,',
2140     'GPRINT:temp_avg:LAST:%4.1lf Last\l'
2141     ],
2142     timeleft => [
2143     'DEF:avg={file}:timeleft:AVERAGE',
2144     'DEF:min={file}:timeleft:MIN',
2145     'DEF:max={file}:timeleft:MAX',
2146     "AREA:max#$HalfBlue",
2147     "AREA:min#$Canvas",
2148     "LINE1:avg#$FullBlue:Time left [min]",
2149     'GPRINT:min:MIN:%5.1lf%s Min,',
2150     'GPRINT:avg:AVERAGE:%5.1lf%s Avg,',
2151     'GPRINT:max:MAX:%5.1lf%s Max,',
2152     'GPRINT:avg:LAST:%5.1lf%s Last\l'
2153     ],
2154     time_offset => [ # NTPd
2155     'DEF:s_avg={file}:seconds:AVERAGE',
2156     'DEF:s_min={file}:seconds:MIN',
2157     'DEF:s_max={file}:seconds:MAX',
2158     "AREA:s_max#$HalfBlue",
2159     "AREA:s_min#$Canvas",
2160     "LINE1:s_avg#$FullBlue:{inst}",
2161     'GPRINT:s_min:MIN:%7.3lf%s Min,',
2162     'GPRINT:s_avg:AVERAGE:%7.3lf%s Avg,',
2163     'GPRINT:s_max:MAX:%7.3lf%s Max,',
2164     'GPRINT:s_avg:LAST:%7.3lf%s Last'
2165     ],
2166     if_octets => ['-v', 'Bits/s', '-l', '0',
2167     'DEF:out_min_raw={file}:tx:MIN',
2168     'DEF:out_avg_raw={file}:tx:AVERAGE',
2169     'DEF:out_max_raw={file}:tx:MAX',
2170     'DEF:inc_min_raw={file}:rx:MIN',
2171     'DEF:inc_avg_raw={file}:rx:AVERAGE',
2172     'DEF:inc_max_raw={file}:rx:MAX',
2173     'CDEF:out_min=out_min_raw,8,*',
2174     'CDEF:out_avg=out_avg_raw,8,*',
2175     'CDEF:out_max=out_max_raw,8,*',
2176     'CDEF:inc_min=inc_min_raw,8,*',
2177     'CDEF:inc_avg=inc_avg_raw,8,*',
2178     'CDEF:inc_max=inc_max_raw,8,*',
2179     'CDEF:overlap=out_avg,inc_avg,GT,inc_avg,out_avg,IF',
2180     'CDEF:mytime=out_avg_raw,TIME,TIME,IF',
2181     'CDEF:sample_len_raw=mytime,PREV(mytime),-',
2182     'CDEF:sample_len=sample_len_raw,UN,0,sample_len_raw,IF',
2183     'CDEF:out_avg_sample=out_avg_raw,UN,0,out_avg_raw,IF,sample_len,*',
2184     'CDEF:out_avg_sum=PREV,UN,0,PREV,IF,out_avg_sample,+',
2185     'CDEF:inc_avg_sample=inc_avg_raw,UN,0,inc_avg_raw,IF,sample_len,*',
2186     'CDEF:inc_avg_sum=PREV,UN,0,PREV,IF,inc_avg_sample,+',
2187     "AREA:out_avg#$HalfGreen",
2188     "AREA:inc_avg#$HalfBlue",
2189     "AREA:overlap#$HalfBlueGreen",
2190     "LINE1:out_avg#$FullGreen:Outgoing",
2191     'GPRINT:out_avg:AVERAGE:%5.1lf%s Avg,',
2192     'GPRINT:out_max:MAX:%5.1lf%s Max,',
2193     'GPRINT:out_avg:LAST:%5.1lf%s Last',
2194     'GPRINT:out_avg_sum:LAST:(ca. %5.1lf%sB Total)\l',
2195     "LINE1:inc_avg#$FullBlue:Incoming",
2196     #'GPRINT:inc_min:MIN:%5.1lf %s Min,',
2197     'GPRINT:inc_avg:AVERAGE:%5.1lf%s Avg,',
2198     'GPRINT:inc_max:MAX:%5.1lf%s Max,',
2199     'GPRINT:inc_avg:LAST:%5.1lf%s Last',
2200     'GPRINT:inc_avg_sum:LAST:(ca. %5.1lf%sB Total)\l'
2201     ],
2202     cpufreq => [
2203     'DEF:cpufreq_avg={file}:value:AVERAGE',
2204     'DEF:cpufreq_min={file}:value:MIN',
2205     'DEF:cpufreq_max={file}:value:MAX',
2206     "AREA:cpufreq_max#$HalfBlue",
2207     "AREA:cpufreq_min#$Canvas",
2208     "LINE1:cpufreq_avg#$FullBlue:Frequency",
2209     'GPRINT:cpufreq_min:MIN:%5.1lf%s Min,',
2210     'GPRINT:cpufreq_avg:AVERAGE:%5.1lf%s Avg,',
2211     'GPRINT:cpufreq_max:MAX:%5.1lf%s Max,',
2212     'GPRINT:cpufreq_avg:LAST:%5.1lf%s Last\l'
2213     ],
2214     multimeter => [
2215     'DEF:multimeter_avg={file}:value:AVERAGE',
2216     'DEF:multimeter_min={file}:value:MIN',
2217     'DEF:multimeter_max={file}:value:MAX',
2218     "AREA:multimeter_max#$HalfBlue",
2219     "AREA:multimeter_min#$Canvas",
2220     "LINE1:multimeter_avg#$FullBlue:Multimeter",
2221     'GPRINT:multimeter_min:MIN:%4.1lf Min,',
2222     'GPRINT:multimeter_avg:AVERAGE:%4.1lf Average,',
2223     'GPRINT:multimeter_max:MAX:%4.1lf Max,',
2224     'GPRINT:multimeter_avg:LAST:%4.1lf Last\l'
2225     ],
2226     users => [
2227     'DEF:users_avg={file}:users:AVERAGE',
2228     'DEF:users_min={file}:users:MIN',
2229     'DEF:users_max={file}:users:MAX',
2230     "AREA:users_max#$HalfBlue",
2231     "AREA:users_min#$Canvas",
2232     "LINE1:users_avg#$FullBlue:Users",
2233     'GPRINT:users_min:MIN:%4.1lf Min,',
2234     'GPRINT:users_avg:AVERAGE:%4.1lf Average,',
2235     'GPRINT:users_max:MAX:%4.1lf Max,',
2236     'GPRINT:users_avg:LAST:%4.1lf Last\l'
2237     ],
2238     voltage => ['-v', 'Voltage',
2239     'DEF:avg={file}:value:AVERAGE',
2240     'DEF:min={file}:value:MIN',
2241     'DEF:max={file}:value:MAX',
2242     "AREA:max#$HalfBlue",
2243     "AREA:min#$Canvas",
2244     "LINE1:avg#$FullBlue:Voltage",
2245     'GPRINT:min:MIN:%5.1lf%sV Min,',
2246     'GPRINT:avg:AVERAGE:%5.1lf%sV Avg,',
2247     'GPRINT:max:MAX:%5.1lf%sV Max,',
2248     'GPRINT:avg:LAST:%5.1lf%sV Last\l'
2249     ],
2250     vs_threads => [
2251     "DEF:total_avg={file}:total:AVERAGE",
2252     "DEF:total_min={file}:total:MIN",
2253     "DEF:total_max={file}:total:MAX",
2254     "DEF:running_avg={file}:running:AVERAGE",
2255     "DEF:running_min={file}:running:MIN",
2256     "DEF:running_max={file}:running:MAX",
2257     "DEF:uninterruptible_avg={file}:uninterruptible:AVERAGE",
2258     "DEF:uninterruptible_min={file}:uninterruptible:MIN",
2259     "DEF:uninterruptible_max={file}:uninterruptible:MAX",
2260     "DEF:onhold_avg={file}:onhold:AVERAGE",
2261     "DEF:onhold_min={file}:onhold:MIN",
2262     "DEF:onhold_max={file}:onhold:MAX",
2263     "LINE1:total_avg#$FullYellow:Total   ",
2264     'GPRINT:total_min:MIN:%5.1lf Min,',
2265     'GPRINT:total_avg:AVERAGE:%5.1lf Avg.,',
2266     'GPRINT:total_max:MAX:%5.1lf Max,',
2267     'GPRINT:total_avg:LAST:%5.1lf Last\l',
2268     "LINE1:running_avg#$FullRed:Running ",
2269     'GPRINT:running_min:MIN:%5.1lf Min,',
2270     'GPRINT:running_avg:AVERAGE:%5.1lf Avg.,',          
2271     'GPRINT:running_max:MAX:%5.1lf Max,',
2272     'GPRINT:running_avg:LAST:%5.1lf Last\l',
2273     "LINE1:uninterruptible_avg#$FullGreen:Unintr  ",
2274     'GPRINT:uninterruptible_min:MIN:%5.1lf Min,',
2275     'GPRINT:uninterruptible_avg:AVERAGE:%5.1lf Avg.,',
2276     'GPRINT:uninterruptible_max:MAX:%5.1lf Max,',
2277     'GPRINT:uninterruptible_avg:LAST:%5.1lf Last\l',
2278     "LINE1:onhold_avg#$FullBlue:Onhold  ",
2279     'GPRINT:onhold_min:MIN:%5.1lf Min,',
2280     'GPRINT:onhold_avg:AVERAGE:%5.1lf Avg.,',
2281     'GPRINT:onhold_max:MAX:%5.1lf Max,',
2282     'GPRINT:onhold_avg:LAST:%5.1lf Last\l'
2283     ],
2284     vs_memory => [
2285     'DEF:vm_avg={file}:vm:AVERAGE',
2286     'DEF:vm_min={file}:vm:MIN',
2287     'DEF:vm_max={file}:vm:MAX',
2288     'DEF:vml_avg={file}:vml:AVERAGE',
2289     'DEF:vml_min={file}:vml:MIN',
2290     'DEF:vml_max={file}:vml:MAX',
2291     'DEF:rss_avg={file}:rss:AVERAGE',
2292     'DEF:rss_min={file}:rss:MIN',
2293     'DEF:rss_max={file}:rss:MAX',
2294     'DEF:anon_avg={file}:anon:AVERAGE',
2295     'DEF:anon_min={file}:anon:MIN',
2296     'DEF:anon_max={file}:anon:MAX',
2297     "LINE1:vm_avg#$FullYellow:VM     ",
2298     'GPRINT:vm_min:MIN:%5.1lf%s Min,',
2299     'GPRINT:vm_avg:AVERAGE:%5.1lf%s Avg.,',
2300     'GPRINT:vm_max:MAX:%5.1lf%s Avg.,',
2301     'GPRINT:vm_avg:LAST:%5.1lf%s Last\l',
2302     "LINE1:vml_avg#$FullRed:Locked ",
2303     'GPRINT:vml_min:MIN:%5.1lf%s Min,',
2304     'GPRINT:vml_avg:AVERAGE:%5.1lf%s Avg.,',
2305     'GPRINT:vml_max:MAX:%5.1lf%s Avg.,',
2306     'GPRINT:vml_avg:LAST:%5.1lf%s Last\l',
2307     "LINE1:rss_avg#$FullGreen:RSS    ",
2308     'GPRINT:rss_min:MIN:%5.1lf%s Min,',
2309     'GPRINT:rss_avg:AVERAGE:%5.1lf%s Avg.,',
2310     'GPRINT:rss_max:MAX:%5.1lf%s Avg.,',
2311     'GPRINT:rss_avg:LAST:%5.1lf%s Last\l',
2312     "LINE1:anon_avg#$FullBlue:Anon.  ",
2313     'GPRINT:anon_min:MIN:%5.1lf%s Min,',
2314     'GPRINT:anon_avg:AVERAGE:%5.1lf%s Avg.,',
2315     'GPRINT:anon_max:MAX:%5.1lf%s Avg.,',
2316     'GPRINT:anon_avg:LAST:%5.1lf%s Last\l',
2317     ],
2318     vs_processes => [
2319     'DEF:proc_avg={file}:total:AVERAGE',
2320     'DEF:proc_min={file}:total:MIN',
2321     'DEF:proc_max={file}:total:MAX',
2322     "AREA:proc_max#$HalfBlue",
2323     "AREA:proc_min#$Canvas",
2324     "LINE1:proc_avg#$FullBlue:Processes",
2325     'GPRINT:proc_min:MIN:%4.1lf Min,',
2326     'GPRINT:proc_avg:AVERAGE:%4.1lf Avg.,',
2327     'GPRINT:proc_max:MAX:%4.1lf Max,',
2328     'GPRINT:proc_avg:LAST:%4.1lf Last\l'
2329     ],
2330   };
2331   $GraphDefs->{'if_multicast'} = $GraphDefs->{'ipt_packets'};
2332   $GraphDefs->{'if_tx_errors'} = $GraphDefs->{'if_rx_errors'};
2333
2334   $MetaGraphDefs->{'cpu'} = \&meta_graph_cpu;
2335   $MetaGraphDefs->{'memory'} = \&meta_graph_memory;
2336 } # load_graph_definitions
2337
2338 sub meta_graph_generic_stack
2339 {
2340   confess ("Wrong number of arguments") if (@_ != 2);
2341
2342   my $opts = shift;
2343   my $sources = shift;
2344   my $i;
2345
2346   my $timespan_str = _get_param_timespan ();
2347   my $timespan_int = (-1) * $ValidTimespan->{$timespan_str};
2348
2349   $opts->{'title'} ||= 'Unknown title';
2350   $opts->{'rrd_opts'} ||= [];
2351   $opts->{'colors'} ||= {};
2352
2353   my @cmd = ('-', '-a', 'PNG', '-s', $timespan_int,
2354     '-t', $opts->{'title'} || 'Unknown title',
2355     @RRDDefaultArgs, @{$opts->{'rrd_opts'}});
2356
2357   my $max_inst_name = 0;
2358
2359   for ($i = 0; $i < @$sources; $i++)
2360   {
2361     my $inst_data = $sources->[$i];
2362     my $inst_name = $inst_data->{'name'} || confess;
2363     my $file = $inst_data->{'file'} || confess;
2364
2365     if (length ($inst_name) > $max_inst_name)
2366     {
2367       $max_inst_name = length ($inst_name);
2368     }
2369
2370     confess ("No such file: $file") if (!-e $file);
2371
2372     push (@cmd,
2373       qq#DEF:${inst_name}_min=$file:value:MIN#,
2374       qq#DEF:${inst_name}_avg=$file:value:AVERAGE#,
2375       qq#DEF:${inst_name}_max=$file:value:MAX#,
2376       qq#CDEF:${inst_name}_nnl=${inst_name}_avg,UN,0,${inst_name}_avg,IF#);
2377   }
2378
2379   for (my $i = 0; $i < @$sources; $i++)
2380   {
2381     my $inst_data0 = $sources->[@$sources - (1 + $i)];
2382     my $inst_data1 = $sources->[@$sources - (($i == 0) ? 1 : $i)];
2383
2384     my $inst_name0 = $inst_data0->{'name'};
2385     my $inst_name1 = $inst_data1->{'name'};
2386
2387     my $cdef_name = ($i == 0) ? 'nnl' : 'stk';
2388
2389     push (@cmd, qq#CDEF:${inst_name0}_stk=${inst_name0}_nnl,${inst_name1}_${cdef_name},+#);
2390   }
2391
2392   for (my $i = 0; $i < @$sources; $i++)
2393   {
2394     my $inst_data = $sources->[$i];
2395     my $inst_name = $inst_data->{'name'};
2396
2397     my $legend = sprintf ('%-*s', $max_inst_name, $inst_name);
2398
2399     my $line_color;
2400     my $area_color;
2401
2402     my $number_format = $opts->{'number_format'} || '%6.1lf';
2403
2404     if (exists ($opts->{'colors'}{$inst_name}))
2405     {
2406       $line_color = $opts->{'colors'}{$inst_name};
2407       $area_color = _string_to_color ($line_color);
2408     }
2409     else
2410     {
2411       $area_color = _get_random_color ();
2412       $line_color = _color_to_string ($area_color);
2413     }
2414     $area_color = _color_to_string (_get_faded_color ($area_color));
2415
2416     push (@cmd, qq(AREA:${inst_name}_stk#$area_color),
2417       qq(LINE1:${inst_name}_stk#$line_color:$legend),
2418       qq(GPRINT:${inst_name}_min:MIN:$number_format Min,),
2419       qq(GPRINT:${inst_name}_avg:AVERAGE:$number_format Avg,),
2420       qq(GPRINT:${inst_name}_max:MAX:$number_format Max,),
2421       qq(GPRINT:${inst_name}_avg:LAST:$number_format Last\l),
2422     );
2423   }
2424
2425   RRDs::graph (@cmd);
2426   if (my $errmsg = RRDs::error ())
2427   {
2428     confess ("RRDs::graph: $errmsg");
2429   }
2430 } # meta_graph_generic_stack
2431
2432 sub meta_graph_cpu
2433 {
2434   confess ("Wrong number of arguments") if (@_ != 5);
2435
2436   my $host = shift;
2437   my $plugin = shift;
2438   my $plugin_instance = shift;
2439   my $type = shift;
2440   my $type_instances = shift;
2441
2442   my $opts = {};
2443   my $sources = [];
2444
2445   $opts->{'title'} = "$host/$plugin"
2446   . (defined ($plugin_instance) ? "-$plugin_instance" : '') . "/$type";
2447
2448   my @files = ();
2449
2450   $opts->{'colors'} =
2451   {
2452     'idle'      => 'ffffff',
2453     'nice'      => '00e000',
2454     'user'      => '0000ff',
2455     'wait'      => 'ffb000',
2456     'system'    => 'ff0000',
2457     'softirq'   => 'ff00ff',
2458     'interrupt' => 'a000a0',
2459     'steal'     => '000000'
2460   };
2461
2462   _custom_sort_arrayref ($type_instances,
2463     [qw(idle nice user wait system softirq interrupt steal)]);
2464
2465   for (@$type_instances)
2466   {
2467     my $inst = $_;
2468     my $file = '';
2469     my $title = $opts->{'title'};
2470
2471     for (@DataDirs)
2472     {
2473       if (-e "$_/$title-$inst.rrd")
2474       {
2475         $file = "$_/$title-$inst.rrd";
2476         last;
2477       }
2478     }
2479     confess ("No file found for $title") if ($file eq '');
2480
2481     push (@$sources,
2482       {
2483         name => $inst,
2484         file => $file
2485       }
2486     );
2487   } # for (@$type_instances)
2488
2489   return (meta_graph_generic_stack ($opts, $sources));
2490 } # meta_graph_cpu
2491
2492 sub meta_graph_memory
2493 {
2494   confess ("Wrong number of arguments") if (@_ != 5);
2495
2496   my $host = shift;
2497   my $plugin = shift;
2498   my $plugin_instance = shift;
2499   my $type = shift;
2500   my $type_instances = shift;
2501
2502   my $opts = {};
2503   my $sources = [];
2504
2505   $opts->{'title'} = "$host/$plugin"
2506   . (defined ($plugin_instance) ? "-$plugin_instance" : '') . "/$type";
2507   $opts->{'number_format'} = '%5.1lf%s';
2508
2509   $opts->{'rrd_opts'} = ['-b', '1024'];
2510
2511   my @files = ();
2512
2513   $opts->{'colors'} =
2514   {
2515     'free'     => '00e000',
2516     'cached'   => '0000ff',
2517     'buffered' => 'ffb000',
2518     'used'     => 'ff0000'
2519   };
2520
2521   _custom_sort_arrayref ($type_instances,
2522     [qw(free cached buffered used)]);
2523
2524   for (@$type_instances)
2525   {
2526     my $inst = $_;
2527     my $file = '';
2528     my $title = $opts->{'title'};
2529
2530     for (@DataDirs)
2531     {
2532       if (-e "$_/$title-$inst.rrd")
2533       {
2534         $file = "$_/$title-$inst.rrd";
2535         last;
2536       }
2537     }
2538     confess ("No file found for $title") if ($file eq '');
2539
2540     push (@$sources,
2541       {
2542         name => $inst,
2543         file => $file
2544       }
2545     );
2546   } # for (@$type_instances)
2547
2548   return (meta_graph_generic_stack ($opts, $sources));
2549 } # meta_graph_cpu
2550
2551 # vim: shiftwidth=2:softtabstop=2:tabstop=8