Datum istället för veckodag i Grafen

[bertilson]

Hur gör man för att få inte datum istället för veckodagen i en graf??


Jag kör scriptet

Kod: Markera allt

#!/usr/bin/perl

    use RRDs;

    my $cur_time = time();
    my $start_time = $cur_time - 15120000;     # set end time to 1 week
    my $tid = localtime(time);


    RRDs::graph "/var/www/temp/pann_temp_6.png",
             "--upper-limit= 110",
             "--lower-limit= 10",
             "--rigid",
             "--start= $start_time",
             "--end= $cur_time",
             "--title= Temperaturer i ackumulatortankar - Veckoöversikt $tid ",
             "--height= 400",
             "--width= 22000",
             "--vertical-label= °C",
             "DEF:ToppTemp=/home/rrddata/rrddata/tank_topp.rrd:tank_topp:AVERAGE",
             "DEF:MittTemp=/home/rrddata/rrddata/tank_mitt.rrd:tank_mitt:AVERAGE",
             "DEF:BottTemp=/home/rrddata/rrddata/tank_bott.rrd:tank_bott:AVERAGE",
             "COMMENT:\t      Nu     Medel    Max     Min\\n",
             "HRULE:100#FF00FF",
             "LINE1:ToppTemp#FF0000:Topp",
             "GPRINT:ToppTemp:LAST:%6.1lf",
             "GPRINT:ToppTemp:AVERAGE:%6.1lf",
             "GPRINT:ToppTemp:MAX:%6.1lf",
             "GPRINT:ToppTemp:MIN:%6.1lf\\n",

             "LINE1:MittTemp#00FF00:Mitt",
             "GPRINT:MittTemp:LAST:%6.1lf",
             "GPRINT:MittTemp:AVERAGE:%6.1lf",
             "GPRINT:MittTemp:MAX:%6.1lf",
             "GPRINT:MittTemp:MIN:%6.1lf\\n",


             "LINE1:BottTemp#0000FF:Bott",
             "GPRINT:BottTemp:LAST:%6.1lf",
             "GPRINT:BottTemp:AVERAGE:%6.1lf",
             "GPRINT:BottTemp:MAX:%6.1lf",
             "GPRINT:BottTemp:MIN:%6.1lf\\n";


    my $err=RRDs::error;
    if ($err) {print "problem generating the graph: $err\n";}

    print "Done!\n"

som genererar denna graf; http://adgj.se/temp/pann_temp_6.png



Men det blir ganska värdelös när man inte kan se vilket datum olika saker inträffat. Finns det något enkelt sätt att lösa detta??


Tack

/Per

[elf98]

Kod: Markera allt

--x-grid 'HOUR:6:DAY:1:DAY:1:86400:%d/%m'

Bör göra susen. Ev skall förskjutningen justeras, kommer inte ihåg just nu.

Observera att den automatiska skalan sätts helt ur spel, om du med samma script skulle köra en 2-h graf kommer x-skalan ändå att visa datum.

[bertilson]

problem generating the graph: unknown option '--x-grid 'HOUR:6:DAY:1:DAY:1:86400:%d/%m''


vart i scriptet skall jag stoppa in den?? och hur?

[elf98]

Lägg det på en egen rad, inte sist, sätt " runt och ett komma efter så skall det fungera

[bertilson]

Har gjort så, funkar inte ändå

Kod: Markera allt

#!/usr/bin/perl

    use RRDs;

    my $cur_time = time();
    my $start_time = $cur_time - 15120000;     # set end time to 1 week
    my $tid = localtime(time);


    RRDs::graph "/var/www/temp/pann_temp_6.png",
             "--upper-limit= 110",
             "--lower-limit= 10",
             "--rigid",
             "--start= $start_time",
             "--end= $cur_time",
             "--title= Temperaturer i ackumulatortankar - Veckoöversikt $tid ",
             "--height= 400",
             "--width= 22000",
             "--vertical-label= °C",
             "--x-grid 'HOUR:6:DAY:1:DAY:1:86400:%d/%m'",
             "DEF:ToppTemp=/home/rrddata/rrddata/tank_topp.rrd:tank_topp:AVERAGE",
             "DEF:MittTemp=/home/rrddata/rrddata/tank_mitt.rrd:tank_mitt:AVERAGE",
             "DEF:BottTemp=/home/rrddata/rrddata/tank_bott.rrd:tank_bott:AVERAGE",
             "COMMENT:\t      Nu     Medel    Max     Min\\n",
             "HRULE:100#FF00FF",
             "LINE1:ToppTemp#FF0000:Topp",
             "GPRINT:ToppTemp:LAST:%6.1lf",
             "GPRINT:ToppTemp:AVERAGE:%6.1lf",
             "GPRINT:ToppTemp:MAX:%6.1lf",
             "GPRINT:ToppTemp:MIN:%6.1lf\\n",

             "LINE1:MittTemp#00FF00:Mitt",
             "GPRINT:MittTemp:LAST:%6.1lf",
             "GPRINT:MittTemp:AVERAGE:%6.1lf",
             "GPRINT:MittTemp:MAX:%6.1lf",
             "GPRINT:MittTemp:MIN:%6.1lf\\n",


             "LINE1:BottTemp#0000FF:Bott",
             "GPRINT:BottTemp:LAST:%6.1lf",
             "GPRINT:BottTemp:AVERAGE:%6.1lf",
             "GPRINT:BottTemp:MAX:%6.1lf",
             "GPRINT:BottTemp:MIN:%6.1lf\\n";


    my $err=RRDs::error;
    if ($err) {print "problem generating the graph: $err\n";}

    print "Done!\n"

Måste man ha någon speciell version av RRDtool? Hur ser man vilken version som är installerad?

[elf98]

Vet inte i vilken version det infördes

Kod: Markera allt

rrdtool -v

borde visa versionen

[bertilson]

kör 1.3.1

får försöka att upgradera till 1.4 då och se om det hjälper

Frustrerande när man inte får saker att fungera

[bertilson]

jag hade senaste RRDtool som fanns med i Debians packetakriv

Det funkar med det tilläget om jag kör det i bash istället för Perl, skumt...


Tack för hjäpen