[Orca-users] Re: $plot_ref->{plot_width} ...., I'm tired.

[Blair Zajac]

You'll want to find the code in ImageFile.pm

  my ($graph_return, $image_width, $image_height) =
    RRDs::graph
      $image_filename,
      @{$self->[I_GRAPH_OPTIONS]},
      '-t', $self->[I_PLOT_LEGEND_BASE+$i],
      '-s', ($plot_end_time-$image_days_back*DAY_SECONDS),
      '-e', $plot_end_time,
      '-w', $plot_ref->{plot_width},
      '-h', $plot_ref->{plot_height},
      'COMMENT:\s',
      'COMMENT:Last data entered at ' . localtime($plot_end_time) . '.';

and probably do something like:

  my $plot_width = ($plot_type =~ /hourly/i) ?
    1000 : $plot_ref->{plot_width};

  my ($graph_return, $image_width, $image_height) =
    RRDs::graph
      $image_filename,
      @{$self->[I_GRAPH_OPTIONS]},
      '-t', $self->[I_PLOT_LEGEND_BASE+$i],
      '-s', ($plot_end_time-$image_days_back*DAY_SECONDS),
      '-e', $plot_end_time,
      '-w', plot_width,
      '-h', $plot_ref->{plot_height},
      'COMMENT:\s',
      'COMMENT:Last data entered at ' . localtime($plot_end_time) . '.';

Regards,
Blair

> Mbh wrote:
> 
> I' m looking for change in your code in order to plot all "Hourly"
> image with $plot_width=1000 and the other ("Daily,Weekly,Monthly,....)
> with the default $plot_width=500
> 
> I suppose that it is on the "ImageFile.pm" near "update_graph_options"
> with $plot_ref->{plot_width} , but when and where exactly........
> 
> Can you help me...., I'm tired.
> 
> Mehdi Ben Hassen
> Network Engineer
> Altran Europe: http://www.altran-group.com
> Tel: +32 (0)3 450 36 13
> Gsm: 0476/ 76.95.82
> Email: mehdi.ben_hassen at alcatel.be
> 
>                    Yahoo! Groups Sponsor
> 
> 
>                www.                  .com
> 
>