source: branches/0.4/web/addons/job_monarch/graph.php @ 799

Last change on this file since 799 was 799, checked in by ramonb, 9 years ago
  • rewrote mem_report to include now/min/avg/max values
  • Property svn:keywords set to Id
File size: 23.8 KB
Line 
1<?php
2/*
3 *
4 * This file is part of Jobmonarch
5 *
6 * Copyright (C) 2006  Ramon Bastiaans
7 *
8 * Jobmonarch is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * Jobmonarch is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21 *
22 * SVN $Id: graph.php 799 2013-04-06 19:05:10Z ramonb $
23 */
24
25global $rrds, $start, $r, $conf, $m;
26
27include "./libtoga.php";
28
29# Graph specific variables
30$size = escapeshellcmd( rawurldecode( $_GET["z"] ));
31$graph = escapeshellcmd( rawurldecode( $_GET["g"] ));
32$grid = escapeshellcmd( rawurldecode( $_GET["G"] ));
33$self = escapeshellcmd( rawurldecode( $_GET["me"] ));
34$max = escapeshellcmd( rawurldecode( $_GET["x"] ));
35$min = escapeshellcmd( rawurldecode( $_GET["n"] ));
36$value = escapeshellcmd( rawurldecode( $_GET["v"] ));
37$load_color = escapeshellcmd( rawurldecode( $_GET["l"] ));
38$vlabel = escapeshellcmd( rawurldecode( $_GET["vl"] ));
39$j_title = escapeshellcmd( rawurldecode( $_GET["t"] ));
40$hostname = escapeshellcmd( rawurldecode( $_GET["h"] ));
41$range = escapeshellcmd( rawurldecode( $_GET["r"] ));
42
43if( strpos( $size, 'overview' ) )
44{
45    $my_dir = getcwd();
46
47    global $context;
48
49    $context = 'host';
50
51    chdir( $GANGLIA_PATH );
52
53    include "./ganglia.php";
54    include "./get_ganglia.php";
55
56    chdir( $my_dir );
57}
58
59if ( !empty( $_GET ) ) 
60{
61        extract( $_GET );
62}
63
64$sourcetime = $st;
65
66
67$cluster = $c;
68$metricname = ($g) ? $g : $m;
69
70# Assumes we have a $start variable (set in get_context.php).
71if ($size == "small") 
72{
73    $height = 40;
74    $width = 130;
75} 
76else if ($size == "medium") 
77{
78    $height = 75;
79    $width = 300;
80} 
81else if ($size == "overview-medium") 
82{
83    $height = 75;
84    $width = 300;
85} 
86else 
87{
88    $height = 100;
89    $width = 400;
90}
91
92// RB: Perform some formatting/spacing magic.. tinkered to fit
93//
94if ($size == 'small') {
95   $eol1 = '\\l';
96   $space1 = ' ';
97   $space2 = '         ';
98} else if ($size == 'medium') {
99   $eol1 = '';
100   $space1 = ' ';
101   $space2 = '';
102   $extras = ' --font LEGEND:7 ';
103} else if ($size == 'overview-medium') {
104   $eol1   = '';
105   $space1 = '';
106   $space2 = '';
107   $extras = ' --font LEGEND:7 ';
108} else if ($size == 'large') {
109   $eol1 = '';
110   $space1 = '       ';
111   $space2 = '       ';
112} else if ($size == 'xlarge') {
113   $eol1 = '';
114   $space1 = '             ';
115   $space2 = '             ';
116} else if ($size == 'mobile') {
117   $eol1 = '';
118   $space1 = ' ';
119   $space2 = '';
120}
121
122$jobstart_color = "3AE302";
123$jobstop_color = "F5164A";
124
125if($command) 
126{
127      $command = '';
128}
129
130$graph = $metricname;
131
132$rrd_dirs = Array();
133
134if (isset($graph)) 
135{
136    $series = '';
137    if( $size == 'overview-medium' )
138    {
139        $rrd_dirs[] = $conf['rrds'] . '/' . $cluster .'/'. $hostname;
140    }
141    else
142    {
143        $trd = new TarchRrdGraph( $cluster, $hostname );
144        $rrd_dirs = $trd->getRrdDirs( $period_start, $period_stop );
145
146    }
147
148    if($graph == "cpu_report") 
149    {
150
151        $style = "CPU";
152
153        $upper_limit = "--upper-limit 100 --rigid";
154        $lower_limit = "--lower-limit 0";
155
156        $vertical_label = "--vertical-label Percent ";
157
158        $def_nr = 0;
159
160        foreach( $rrd_dirs as $rrd_dir ) 
161        {
162
163            $series .= "DEF:'cpu_user${def_nr}'='${rrd_dir}/cpu_user.rrd':'sum':AVERAGE "
164                ."DEF:'cpu_nice${def_nr}'='${rrd_dir}/cpu_nice.rrd':'sum':AVERAGE "
165                ."DEF:'cpu_system${def_nr}'='${rrd_dir}/cpu_system.rrd':'sum':AVERAGE "
166                ."DEF:'cpu_idle${def_nr}'='${rrd_dir}/cpu_idle.rrd':'sum':AVERAGE "
167                ."DEF:'cpu_wio${def_nr}'='${rrd_dir}/cpu_wio.rrd':'sum':AVERAGE ";
168
169            if( $conf['graphreport_stats'] )
170            {
171                $series .= "CDEF:cpu_user${def_nr}_nonans=cpu_user${def_nr},UN,0,cpu_user${def_nr},IF ";
172                $series .= "CDEF:cpu_nice${def_nr}_nonans=cpu_nice${def_nr},UN,0,cpu_nice${def_nr},IF ";
173                $series .= "CDEF:cpu_system${def_nr}_nonans=cpu_system${def_nr},UN,0,cpu_system${def_nr},IF ";
174                $series .= "CDEF:cpu_wio${def_nr}_nonans=cpu_wio${def_nr},UN,0,cpu_wio${def_nr},IF ";
175                $series .= "CDEF:cpu_idle${def_nr}_nonans=cpu_idle${def_nr},UN,0,cpu_idle${def_nr},IF ";
176            }
177
178            $def_nr++;
179        }
180
181
182        if( $conf['graphreport_stats'] )
183        {
184            $s_last     = $def_nr - 1;
185            $user_sum   = "CDEF:cpu_user=cpu_user0_nonans";
186            $nice_sum   = "CDEF:cpu_nice=cpu_nice0_nonans";
187            $system_sum = "CDEF:cpu_system=cpu_system0_nonans";
188            $wio_sum    = "CDEF:cpu_wio=cpu_wio0_nonans";
189            $idle_sum   = "CDEF:cpu_idle=cpu_idle0_nonans";
190
191            if( $s_last > 1 )
192            {
193                foreach (range(1, ($s_last)) as $print_nr ) 
194                {
195                    $user_sum   .= ",cpu_user{$print_nr}_nonans,+";
196                    $nice_sum   .= ",cpu_nice{$print_nr}_nonans,+";
197                    $system_sum .= ",cpu_system{$print_nr}_nonans,+";
198                    $wio_sum    .= ",cpu_wio{$print_nr}_nonans,+";
199                    $idle_sum   .= ",cpu_idle{$print_nr}_nonans,+";
200                }
201            }
202
203            $user_sum .= " ";
204            $nice_sum .= " ";
205            $system_sum .= " ";
206            $wio_sum .= " ";
207            $idle_sum .= " ";
208
209            $series .= $user_sum . $nice_sum . $system_sum . $wio_sum . $idle_sum;
210
211            $report_names = array( "user", "nice", "system", "wio", "idle" );
212
213            $r_count = 0;
214
215            foreach( $report_names as $r )
216            {
217                if( $r_count == 0 )
218                {
219                    $graph_str = "AREA";
220                    $legend_str = ucfirst( $r );
221                }
222                else
223                {
224                    $graph_str = "STACK";
225                }
226                foreach (range(0, ($s_last)) as $print_nr ) 
227                {
228                    $series .= "${graph_str}:'cpu_${r}${print_nr}'#".$conf['cpu_'.${r}.'_color'].":'${legend_str}\g' ";
229                }
230
231                $series .= "VDEF:'${r}_last'=cpu_${r},LAST ";
232                $series .= "VDEF:'${r}_min'=cpu_${r},MINIMUM ";
233                $series .= "VDEF:'${r}_avg'=cpu_${r},AVERAGE ";
234                $series .= "VDEF:'${r}_max'=cpu_${r},MAXIMUM ";
235
236                $spacefill = '';
237
238                $spacesize = 6-strlen($r);
239                foreach ( range( 0, $spacesize ) as $whatever )
240                {
241                    $spacefill .= ' ';
242                }
243
244                $series .= "GPRINT:'${r}_last':'${spacefill}Now\:%6.1lf%s' "
245                        . "GPRINT:'${r}_min':'${space1}Min\:%6.1lf%s${eol1}' "
246                        . "GPRINT:'${r}_avg':'${space2}Avg\:%6.1lf%s' "
247                        . "GPRINT:'${r}_max':'${space1}Max\:%6.1lf%s\\l' ";
248            }
249        }
250        else
251        {
252            $series .= "AREA:'cpu_user${def_nr}'#".$conf['cpu_user_color']."${user_str} "
253                    ."STACK:'cpu_nice${def_nr}'#".$conf['cpu_nice_color']."${nice_str} "
254                    ."STACK:'cpu_system${def_nr}'#".$conf['cpu_system_color']."${system_str} "
255                    ."STACK:'cpu_wio${def_nr}'#".$conf['cpu_wio_color']."${wio_str} "
256                    ."STACK:'cpu_idle${def_nr}'#".$conf['cpu_idle_color']."${idle_str} ";
257        }
258
259    } 
260    else if ($graph == "job_report") 
261    {
262        $style = "Jobs";
263
264        $lower_limit = "--lower-limit 0 --rigid";
265        $vertical_label = "--vertical-label Jobs";
266
267        $def_nr = 0;
268
269        $rrd_dir = $conf['rrds'] . "/$clustername/$hostname/";
270
271        $rj_rrd    = $rrd_dir . "zplugin_monarch_rj.rrd";
272        $qj_rrd    = $rrd_dir . "zplugin_monarch_qj.rrd";
273
274        $sorted_hosts    = array();
275        $sorted_hosts[]  = $rjqj_host;
276
277        $rj_str = ":'Running Jobs'";
278        $qj_str = ":'Queued Jobs'";
279
280        $series .= "DEF:'running_jobs'='${rj_rrd}':'sum':AVERAGE "
281            ."DEF:'queued_jobs'='${qj_rrd}':'sum':AVERAGE ";
282
283       
284        $series .= "LINE3:'running_jobs'#ff0000${rj_str} ";
285
286        if ( $conf['graphreport_stats'] ) 
287        {
288            $series .= "CDEF:running_pos=running_jobs,0,INF,LIMIT "
289                    . "VDEF:running_last=running_pos,LAST "
290                    . "VDEF:running_min=running_pos,MINIMUM "
291                    . "VDEF:running_avg=running_pos,AVERAGE "
292                    . "VDEF:running_max=running_pos,MAXIMUM "
293                    . "GPRINT:'running_last':' ${space1}Now\:%5.0lf' "
294                    . "GPRINT:'running_min':'${space1}Min\:%5.0lf${eol1}' "
295                    . "GPRINT:'running_avg':'${space2}Avg\:%5.0lf' "
296                    . "GPRINT:'running_max':'${space1}Max\:%5.0lf\\l' ";
297        }
298
299        $series .= "LINE3:'queued_jobs'#999999${qj_str} ";
300
301        if ( $conf['graphreport_stats'] ) 
302        {
303            $series .= "CDEF:queued_pos=queued_jobs,0,INF,LIMIT "
304                    . "VDEF:queued_last=queued_pos,LAST "
305                    . "VDEF:queued_min=queued_pos,MINIMUM "
306                    . "VDEF:queued_avg=queued_pos,AVERAGE "
307                    . "VDEF:queued_max=queued_pos,MAXIMUM "
308                    . "GPRINT:'queued_last':'  ${space1}Now\:%5.0lf' "
309                    . "GPRINT:'queued_min':'${space1}Min\:%5.0lf${eol1}' "
310                    . "GPRINT:'queued_avg':'${space2}Avg\:%5.0lf' "
311                    . "GPRINT:'queued_max':'${space1}Max\:%5.0lf\\l' ";
312        }
313    } 
314    else if ($graph == "mem_report") 
315    {
316        $style = "Memory";
317
318        $lower_limit = "--lower-limit 0 --rigid";
319        $extras .= "--base 1024";
320        $vertical_label = "--vertical-label Bytes";
321
322        $def_nr = 0;
323
324        foreach( $rrd_dirs as $rrd_dir ) 
325        {
326            if( $def_nr == 0 ) 
327            {
328
329                $memuse_str = ":'Memory Used'";
330                $memshared_str = ":'Memory Shared'";
331                $memcached_str = ":'Memory Cached'";
332                $membuff_str = ":'Memory Buffered'";
333                $memswap_str = ":'Memory Swapped'";
334                $total_str = ":'Total In-Core Memory'";
335            } 
336            else 
337            {
338
339                $memuse_str = "";
340                $memshared_str = "";
341                $memcached_str = "";
342                $membuff_str = "";
343                $memswap_str = "";
344                $total_str = "";
345            }
346
347            $series .= "DEF:'mem_total${def_nr}'='${rrd_dir}/mem_total.rrd':'sum':AVERAGE "
348                ."CDEF:'bmem_total${def_nr}'=mem_total${def_nr},1024,* "
349                ."DEF:'mem_shared${def_nr}'='${rrd_dir}/mem_shared.rrd':'sum':AVERAGE "
350                ."CDEF:'bmem_shared${def_nr}'=mem_shared${def_nr},1024,* "
351                ."DEF:'mem_free${def_nr}'='${rrd_dir}/mem_free.rrd':'sum':AVERAGE "
352                ."CDEF:'bmem_free${def_nr}'=mem_free${def_nr},1024,* "
353                ."DEF:'mem_cached${def_nr}'='${rrd_dir}/mem_cached.rrd':'sum':AVERAGE "
354                ."CDEF:'bmem_cached${def_nr}'=mem_cached${def_nr},1024,* "
355                ."DEF:'mem_buffer${def_nr}'='${rrd_dir}/mem_buffers.rrd':'sum':AVERAGE "
356                ."CDEF:'bmem_buffer${def_nr}'=mem_buffer${def_nr},1024,* "
357                ."CDEF:'bmem_used${def_nr}'='bmem_total${def_nr}','bmem_shared${def_nr}',-,'bmem_free${def_nr}',-,'bmem_cached${def_nr}',-,'bmem_buffer${def_nr}',- "
358                ."DEF:'swap_total${def_nr}'='${rrd_dir}/swap_total.rrd':'sum':AVERAGE "
359                ."DEF:'swap_free${def_nr}'='${rrd_dir}/swap_free.rrd':'sum':AVERAGE "
360                ."CDEF:'bmem_swap${def_nr}'='swap_total${def_nr}','swap_free${def_nr}',-,1024,* ";
361
362            $report_names = array( "used", "shared", "cached", "buffer", "swap", "total" );
363
364            if( $conf['graphreport_stats'] )
365            {
366                foreach( $report_names as $r )
367                {
368                    $series .= "CDEF:bmem_${r}${def_nr}_nonans=bmem_${r}${def_nr},UN,0,bmem_${r}${def_nr},IF ";
369                }
370            }
371
372            $def_nr++;
373        }
374
375        if( $conf['graphreport_stats'] )
376        {
377            $s_last     = $def_nr - 1;
378
379            foreach( $report_names as $r )
380            {
381                $cdef_sum   = "CDEF:bmem_${r}=bmem_${r}0_nonans";
382
383                if( $s_last > 1 )
384                {
385                    foreach (range(1, ($s_last)) as $print_nr ) 
386                    {
387                        $user_sum   .= ",bmem_${r}{$print_nr}_nonans,+";
388                    }
389                }
390                $cdef_sum .= " ";
391
392                $series   .= $cdef_sum;
393            }
394
395            $r_count = 0;
396
397            $conf['mem_buffer_color'] = $conf['mem_buffered_color'];
398            $conf['mem_swap_color'] = $conf['mem_swapped_color'];
399            $conf['mem_total_color']   = $conf['cpu_num_color'];
400
401            foreach( $report_names as $r )
402            {
403                $legend_str = '';
404
405                if( $r == "total" )
406                {
407                    $graph_str  = "LINE2";
408                }
409                else if( $r_count == 0 )
410                {
411                    $graph_str  = "AREA";
412                }
413                else
414                {
415                    $graph_str  = "STACK";
416                }
417                foreach (range(0, ($s_last)) as $print_nr ) 
418                {
419                    if( $print_nr == 0 )
420                    {
421                        $legend_str = ucfirst( $r );
422                    }
423                    $series .= "${graph_str}:'bmem_${r}${print_nr}'#".$conf['mem_'.${r}.'_color'].":'${legend_str}\g' ";
424                }
425
426                $series .= "VDEF:'${r}_last'=bmem_${r},LAST ";
427                $series .= "VDEF:'${r}_min'=bmem_${r},MINIMUM ";
428                $series .= "VDEF:'${r}_avg'=bmem_${r},AVERAGE ";
429                $series .= "VDEF:'${r}_max'=bmem_${r},MAXIMUM ";
430
431                $spacefill = '';
432
433                $spacesize = 6-strlen($r); // max length 'swapped' = 7
434                foreach ( range( 0, $spacesize ) as $whatever )
435                {
436                    $spacefill .= ' ';
437                }
438                $series .= "GPRINT:'${r}_last':'${spacefill}Now\:%6.1lf%s' "
439                        . "GPRINT:'${r}_min':'${space1}Min\:%6.1lf%s${eol1}' "
440                        . "GPRINT:'${r}_avg':'${space2}Avg\:%6.1lf%s' "
441                        . "GPRINT:'${r}_max':'${space1}Max\:%6.1lf%s\\l' ";
442
443            }
444        }
445        $r_count = $r_count + 1;
446
447    } 
448    else if ($graph == "load_report") 
449    {
450        $style = "Load";
451
452        $lower_limit = "--lower-limit 0 --rigid";
453        $vertical_label = "--vertical-label 'Load/Procs'";
454
455        $def_nr = 0;
456
457        foreach( $rrd_dirs as $rrd_dir ) 
458        {
459
460            if( $def_nr == 0 ) 
461            {
462
463                $load_str = ":'1-min Load'";
464                $cpu_str = ":'CPUs'";
465                $run_str = ":'Running Processes'";
466            } 
467            else 
468            {
469                $load_str = "";
470                $cpu_str = "";
471                $run_str = "";
472            }
473
474            $series .= "DEF:'load_one${def_nr}'='${rrd_dir}/load_one.rrd':'sum':AVERAGE "
475                ."DEF:'proc_run${def_nr}'='${rrd_dir}/proc_run.rrd':'sum':AVERAGE "
476                ."DEF:'cpu_num${def_nr}'='${rrd_dir}/cpu_num.rrd':'sum':AVERAGE ";
477            $series .="AREA:'load_one${def_nr}'#".$conf['load_one_color']."${load_str} ";
478            $series .="LINE2:'cpu_num${def_nr}'#".$conf['cpu_num_color']."${cpu_str} ";
479            $series .="LINE2:'proc_run${def_nr}'#".$conf['proc_run_color']."${run_str} ";
480
481            $def_nr++;
482        }
483
484    } 
485    else if ($graph == "network_report") 
486    {
487        $style = "Network";
488
489        $lower_limit = "--lower-limit 0 --rigid";
490        $extras .= "--base 1024";
491        $vertical_label = "--vertical-label 'Bytes/sec'";
492
493        $def_nr = 0;
494
495        foreach( $rrd_dirs as $rrd_dir ) 
496        {
497
498            if( $def_nr == 0 ) 
499            {
500
501                $in_str = ":'In'";
502                $out_str = ":'Out'";
503            } 
504            else 
505            {
506
507                $in_str = "";
508                $out_str = "";
509            }
510
511            $series .= "DEF:'bytes_in${def_nr}'='${rrd_dir}/bytes_in.rrd':'sum':AVERAGE "
512                ."DEF:'bytes_out${def_nr}'='${rrd_dir}/bytes_out.rrd':'sum':AVERAGE "
513                ."LINE2:'bytes_in${def_nr}'#".$conf['mem_cached_color']."${in_str} "
514                ."LINE2:'bytes_out${def_nr}'#".$conf['mem_used_color']."${out_str} ";
515
516            $def_nr++;
517        }
518
519    } 
520    else if ($graph == "packet_report") 
521    {
522        $style = "Packets";
523
524        $lower_limit = "--lower-limit 0 --rigid";
525        $extras .= "--base 1024";
526        $vertical_label = "--vertical-label 'Packets/sec'";
527
528        $def_nr = 0;
529
530        foreach( $rrd_dirs as $rrd_dir ) 
531        {
532
533            if( $def_nr == 0 ) 
534            {
535
536                $in_str = ":'In'";
537                $out_str = ":'Out'";
538            } 
539            else 
540            {
541
542                $in_str = "";
543                $out_str = "";
544            }
545
546            $series .= "DEF:'bytes_in${def_nr}'='${rrd_dir}/pkts_in.rrd':'sum':AVERAGE "
547                ."DEF:'bytes_out${def_nr}'='${rrd_dir}/pkts_out.rrd':'sum':AVERAGE "
548                ."LINE2:'bytes_in${def_nr}'#".$conf['mem_cached_color']."${in_str} "
549                ."LINE2:'bytes_out${def_nr}'#".$conf['mem_used_color']."${out_str} ";
550
551            $def_nr++;
552        }
553
554    } 
555    else 
556    {
557        /* Custom graph */
558        $style = "";
559
560        $subtitle = $metricname;
561        if($context == "host")
562        {
563            if ($size == "small")
564                $prefix = $metricname;
565            else
566                $prefix = $hostname;
567
568            $value = $value>1000 ? number_format($value) : number_format($value, 2);
569        }
570
571        if (is_numeric($max))
572            $upper_limit = "--upper-limit '$max' ";
573        if (is_numeric($min))
574            $lower_limit ="--lower-limit '$min' ";
575
576        if ($vlabel)
577        {
578            $vertical_label = "--vertical-label '$vlabel'";
579        }
580        else 
581        {
582            if ($upper_limit or $lower_limit) 
583            {
584                $max = $max>1000 ? number_format($max) : number_format($max, 2);
585                $min = $min>0 ? number_format($min,2) : $min;
586
587                $vertical_label ="--vertical-label '$min - $max' ";
588            }
589        }
590
591        $def_nr = 0;
592
593
594        foreach( $rrd_dirs as $rrd_dir ) 
595        {
596
597            if( $def_nr == 0 ) 
598            {
599                $title_str = ":'${subtitle}'";
600            } 
601            else 
602            {
603                $title_str = "";
604            }
605
606            $rrd_file = "$rrd_dir/$metricname.rrd";
607            $series .= "DEF:'sum${def_nr}'='$rrd_file':'sum':AVERAGE "
608                ."AREA:'sum${def_nr}'#".$conf['default_metric_color']."${title_str} ";
609
610            if( $conf['graphreport_stats'] )
611            {
612                $series .= "CDEF:sum${def_nr}_nonans=sum${def_nr},UN,0,sum${def_nr},IF ";
613            }
614
615            $def_nr++;
616        }
617
618        if( $conf['graphreport_stats'] )
619        {
620            $s_last         = $def_nr - 1;
621            $series_sum     = "CDEF:sum=sum0_nonans";
622
623            if( $def_nr > 1 )
624            {
625                foreach (range(1, ($s_last)) as $print_nr ) 
626                {
627                    $series_sum     .= ",sum{$print_nr}_nonans,+";
628                }
629            }
630
631            $series_sum .= " ";
632
633            $series_last    = "VDEF:'sum_last'=sum,LAST ";
634            $series_minimum = "VDEF:'sum_min'=sum,MINIMUM ";
635            $series_average = "VDEF:'sum_avg'=sum,AVERAGE ";
636            $series_maximum = "VDEF:'sum_max'=sum,MAXIMUM ";
637
638            $series .= $series_sum . $series_last . $series_minimum . $series_average . $series_maximum;
639
640            $series .= "COMMENT:\"\\n\" ";
641            $series .= "GPRINT:'sum_last':'${space1}Now\:%6.1lf%s' "
642                    . "GPRINT:'sum_min':'${space1}Min\:%6.1lf%s${eol1}' "
643                    . "GPRINT:'sum_avg':'${space2}Avg\:%6.1lf%s' "
644                    . "GPRINT:'sum_max':'${space1}Max\:%6.1lf%s\\l' ";
645        }
646    }
647}
648if( $series != '' ) 
649{
650    if ($job_start)
651    {
652        $series .= "VRULE:${job_start}#${jobstart_color}:'job start':dashes=4,2 ";
653    }
654    if ($job_stop)
655    {
656        $series .= "VRULE:${job_stop}#${jobstop_color}:'job stop':dashes=4,2 ";
657    }
658}
659
660if($graph == "job_report")
661{
662    if($range == 'job' )
663    {
664        $title = "Last: $j_title";
665    }
666    else
667    {
668        $title = "Last: $range";
669    }
670}
671else
672{
673    $title = "$hostname";
674}
675
676function determineXGrid( $p_start, $p_stop ) 
677{
678
679    $period = intval( $p_stop - $p_start );
680
681    // Syntax: <minor_grid_lines_time_declr>:<major_grid_lines_time_declr>:<labels_time_declr>:<offset>:<format>
682    //
683    // Where each <*time_declr*> = <time_type>:<time_interval>
684
685    //$my_lines1 = intval( $period / 3.0 );
686    //$my_lines2 = intval( $period / 6.0 );
687
688    //$my_grid = "SECOND:$my_lines2:SECOND:$my_lines1:SECOND:$my_lines1:0:%R";
689
690    //return "--x-grid $my_grid";
691
692    // Less than 1 minute
693    if( $period < 60 ) 
694    {
695
696        $tm_formt = "%X";
697        $my_grid = "SECOND:15:SECOND:30:SECOND:30:0:$tm_formt";
698
699    // Less than 10 minutes
700    } 
701    else if( $period < 600 ) 
702    {
703
704        $tm_formt = "%R";
705        $my_grid = "MINUTE:1:MINUTE:3:MINUTE:3:0:$tm_formt";
706
707    // Less than 1 hour
708    } 
709    else if( $period < 3600 ) 
710    {
711
712        $tm_formt = "%R";
713        $my_grid = "MINUTE:5:MINUTE:15:MINUTE:15:0:$tm_formt";
714
715    // Less than 15 hour
716    } 
717    else if( $period < 3600 ) 
718    {
719
720        $tm_formt = "%R";
721        $my_grid = "HOUR:1:HOUR:2:HOUR:2:0:$tm_formt";
722
723    // Less than 1 day
724    //
725    } 
726    else if( $period < 86400 ) 
727    {
728
729        $tm_formt = "%R";
730        $my_grid = "HOUR:2:HOUR:5:HOUR:5:0:$tm_formt";
731
732    // Less than 15 days
733    //
734    } 
735    else if( $period < 1296000 ) 
736    {
737
738        $tm_formt = "%e-%m";
739        $my_grid = "HOUR:1:DAY:3:DAY:3:0:'$tm_formt'";
740       
741    // Less than 30 days (a month)
742    //
743    } 
744    else if( $period < 2592000 ) 
745    {
746
747        $tm_formt = "%e-%m";
748        $my_grid = "DAY:5:DAY:10:DAY:10:0:'$tm_formt'";
749    }
750
751    if( isset( $my_grid ) ) 
752    {
753
754        $ret_str = "--x-grid $my_grid";
755        return array($ret_str,$tm_formt);
756
757    } 
758    else 
759    {
760        return array( "", "" );
761    }
762}
763
764$lower_limit = "--lower-limit 0";
765
766if( !isset( $load_color ) or ( $load_color == '') )
767{
768    $load_color = 'FFFFFF';
769}
770
771# Calculate time range.
772if ( isset($sourcetime) )
773{
774    $end = $sourcetime;
775    # Get_context makes start negative.
776    $start = $sourcetime + $start;
777
778    # Fix from Phil Radden, but step is not always 15 anymore.
779    if ($range=="month")
780    {
781        $end = floor($end / 672) * 672;
782    }
783        $command = $conf['rrdtool']. " graph - --start $start --end $end ".
784                "--width $width --height $height $lower_limit ".
785                "--title '$title' $extras $background ".
786                $series;
787}
788else
789{
790    $command = $conf['rrdtool'] . " graph - --start $period_start --end $period_stop ".
791               "--width $width --height $height $lower_limit --color BACK#$load_color ".
792               "--title '$title' $extras $background ".
793               $series;
794}
795
796$debug=0;
797
798
799# Did we generate a command?   Run it.
800if($command) 
801{
802    /*Make sure the image is not cached*/
803    header ("Expires: Mon, 26 Jul 1997 05:00:00 GMT");   // Date in the past
804    header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT"); // always modified
805    header ("Cache-Control: no-cache, must-revalidate");   // HTTP/1.1
806    header ("Pragma: no-cache");                     // HTTP/1.0
807    if ($debug) 
808    {
809        header ("Content-type: text/html");
810        print "$command\n\n\n\n\n";
811    } 
812    else 
813    {
814        header ("Content-type: image/gif");
815        passthru($command);
816    }
817}
818?>
Note: See TracBrowser for help on using the repository browser.