| 46 |  | # define variables that will be read from the config | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 47 |  | # nb. keep this insync with the config file! | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 48 |  | use vars qw{ | 
 
 
 
 
 
 
 
 
 
 
 | 49 | < | $imgdir $rrddir | 
 
 
 
 
 
 
 
 
 | 49 | > | $imgdir $imgwidth $imgheight $rrddir | 
 
 
 
 
 
 
 
 
 
 
 | 50 |  | $maxrrdage $maximgage $deleterrds $deleteimgs | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 51 |  | $hex_slash $hex_underscore $hex_space $hex_colon $hex_bslash $hex_rbracket | 
 
 
 
 
 
 
 
 
 
 
 | 52 | < | $hex_lbracket $hex_plus | 
 
 
 
 
 
 
 
 
 | 52 | > | $hex_lbracket $hex_plus $hex_hash | 
 
 
 
 
 
 
 
 
 
 
 | 53 |  | $rrdstep $retry_wait | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 54 |  | $verbose $quiet | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 55 |  | }; | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 287 |  | $nicename =~ s/$hex_lbracket/(/g; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 288 |  | $nicename =~ s/$hex_rbracket/)/g; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 289 |  | $nicename =~ s/$hex_plus/+/g; | 
 
 
 
 
 
 
 
 | 290 | + | $nicename =~ s/$hex_hash/#/g; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 291 |  | &makegraph($machine, "$type-$name", "Network IO for $machine on $nicename", "bytes per second", \@data, \@rawdata); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 292 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 293 |  | if($rrd =~ /^(mailq)-(\S+)\.rrd$/) { | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 424 |  | push @rrdcmd, "--imgformat=PNG"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 425 |  | push @rrdcmd, "--lower-limit=0"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 426 |  | push @rrdcmd, "--vertical-label=$vlabel"; | 
 
 
 
 
 
 
 
 | 427 | + | push @rrdcmd, "--width=$imgwidth"; | 
 
 
 
 
 
 
 
 | 428 | + | push @rrdcmd, "--height=$imgheight"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 429 |  | # not entirely convinced this is good... | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 430 |  | push @rrdcmd, "--alt-autoscale-max"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 431 |  | # add any further raw commands |