Onderwerp: MRTG en DNS

Ben dus wat aan het spelen met MRTG om de DNS statistieken mooi weer te geven maar het perl script dat ik hiervoor gevonden heb geeft steeds maar 2 nullen terug.

Code:

#!/usr/bin/perl

$hostname = "nHOST";

$uptime = `uptime`;
$uptime =~ /up (.*?),/;
$uptime = $1;

$start =`/usr/sbin/rndc stats`;
$log   ="/var/named/named.stats";

@stat = `tail -n 15 $log`;

$last_success = $stat[0];
$last_success =~ tr/^[0-9]\ file://cd;
$last_failure = $stat[5];
$last_failure =~ tr/^[0-9]\ file://cd;

$latest_success = $stat[8];
$latest_success =~ tr/^[0-9]\ file://cd;
$latest_failure = $stat[13];
$latest_failure =~ tr/^[0-9]\ file://cd;

$success = $latest_success - $last_success;
unless ($success eq "0"){ $success ++; }

$failure = $latest_failure - $last_failure;
unless ($failure eq "0"){ $failure ++; }

print "$success\n$failure\n$uptime\n$hostname\n";

exit;

Code:

[root@web01 downloads]# tail -n 15 /var/named/named.stats 
success 190
referral 0
nxrrset 45
nxdomain 5
recursion 74
failure 7
--- Statistics Dump --- (1190991901)
+++ Statistics Dump +++ (1190991965)
success 194
referral 0
nxrrset 45
nxdomain 5
recursion 74
failure 7
--- Statistics Dump --- (1190991965)

En toch krijg ik :

Code:

[root@web01 downloads]# /var/www/html/mrtg/core/stats.pl 
0
0
13 days

Iemand met perl ervaring die mij kan vertellen wat ik mis doe ?
Perl is namelijk niet echt mijn ding ;-)
Of als iemand hier gewoon een bash script van heeft liggen mag hij deze ook altijd geven.

http://forums.cacti.net/about3018.html

Kan je dat niet gebruiken ?

Wij hebben dit:

PHP Code:

system("/usr/sbin/rndc stats");
$stats = file("/var/named/data/named_stats.txt");

foreach($stats as $line => $data)
{
    // explode data on spaces
    $exp = explode(" ", $data);
    if($exp[0] != "+++" && $exp[0] != "---")
    {
        $action = $exp[0];
        eval("\$" . $action . "[] = trim($exp[1]);\r\n");
    }
}


// success ratio: latest minus the one before that
echo $success[count($success)-1] - $success[count($success)-2] . "\r\n";

// failure ratio: latest minus the one before that
echo $failure[count($failure)-1] - $failure[count($failure)-2] . "\r\n";

$uptime = exec("uptime | cut -d\",\" -f1,2");

// Show result
echo $uptime . "\r\n";
echo "servername"; 


Ik krijg nu gewoon het aantal DNS queries terug MAAR op deze test server zijn deze heel laag.
Wat ik krijg als resultaat is een grafiek die altijd maar stijgt i.p.v. het aantal queries per 5 minuten terug te geven.

Iemand een idee waarom ?

http://193.34.91.245/mrtg/ns1.html

Dan is MRTG verkeerd ingesteld.

Wat heb je staan bij options? Waarschijnlijk staat 'gauge' ertussen. Deze moet zo uit m'n hoofd weg.

Je zou dan gewoon grafieken moeten krijgen zoals bijgevoegd.

Code:

arget[ns1]: `/var/www/html/mrtg/core/stats.pl`
MaxBytes[ns1]: 32000
AbsMax[ns1]: 64000
Options[ns1]: gauge, nopercent, integer, nobanner

Title[ns1]: Named statistics on ns1.extremeservices.be
PageTop[ns1]: <h3>ns1.extremeservices.be DNS Statistics</h3>

YLegend[ns1]: # Q's/5 min
ShortLegend[ns1]: q/5 min
Colours[ns1]: YELLOW#F9C000,RED#F90000,DARK GREEN#006600,VIOLET#FF00FF
Legend1[ns1]:  Queries Received
Legend2[ns1]:  Failed Queries
LegendI[ns1]:  queries:
LegendO[ns1]:  failures:

Maar heb gauge er al uit gesmeten maar nu afwachten of dat veel zal doen.

http://server1.grafix.nivko.nl/mrtg/dns.html

dns.pl:

Code:

#!/usr/bin/perl

use strict;


# Set files to use, change these to suit your needs
my $oldstatfile = "/var/tmp/dns-old.txt";
my $newstatfile = "/var/named/named.stats";


# Obtain old DNS stats from stored file
open(OLDF, "$oldstatfile");
my @raw_data = <OLDF>;
close(OLDF);

my $oldsuccess = @raw_data[0];
my $oldfailure = @raw_data[1];

chomp($oldsuccess);
chomp($oldfailure);


# Check if there is data, if not, initialize
if (! $oldsuccess) {
    $oldsuccess = 0;
}

if (! $oldfailure) {
    $oldfailure = 0;
}


# Get new data from file, first clean the stats file and dump new
system("cat /dev/null > $newstatfile");
system("/usr/sbin/rndc stats");
open(NEWF, "$newstatfile");
my @dns_data = <NEWF>;
close(NEWF);

my $newsuccess = 0;
my $newfailure = 0;
my $line;
my $foundsuccess = 0;
my $foundfailure = 0;


foreach $line (@dns_data) {
    if (($line =~ /^success ([0-9]*)/) && ($foundsuccess == 0)) {
        $foundsuccess = 1;
        $newsuccess = $1;
    }

    if (($line =~ /^failure ([0-9]*)/) && ($foundfailure == 0)) {
        $foundfailure = 1;
        $newfailure = $1;
    }
}


# Calculate difference between old and new. Divide by 5 to get per minute
my $diffsuccess = ($newsuccess - $oldsuccess) / 5;
my $difffailure = ($newfailure - $oldfailure) / 5;


# Store new data
open(OLDF, ">$oldstatfile");
print(OLDF "$newsuccess\n$newfailure");
close(OLDF);

# Print difference
print("$diffsuccess \n$difffailure \n");

mrtg.cfg:

Code:

#----------------------------
# DNS Stats
#----------------------------
Target[dns]: `/var/www/html/mrtg/core/dns.pl`
Options[dns]: gauge,growright,nopercent,integer,unknaszero
MaxBytes[dns]: 32000
AbsMax[dns]: 64000
WithPeak[dns]: wmy
Colours[dns]: YELLOW #F9C000,RED #F90000,LIGHT YELLOW #FFFFBB,LIGTH RED #FF8080
ShortLegend[dns]:queries/m
YLegend[dns]: Qs per Minute
Legend1[dns]: Queries received over 1 minute
Legend2[dns]: Failed Queries received over 1 minute
Legend3[dns]: Maximal Queries over 5 minutes
Legend4[dns]: Maximal Failed Queries over 5 minutes
LegendI[dns]:  Queries:
LegendO[dns]:  Failures:
Title[dns]: DNS Statistics
PageTop[dns]: <h3>DNS Statistics</h3>

Werkt perfect Nivko, bedankt.

Heb sinds kort ook enkele scripts voor mails en spamassassin en geeft momenteel ook enkel maar een optelling van alle mails maar met uw voorbeeld kan ik ook hier een script voor schrijven.

Geen probleem, heb deze ook maar van Google gehaalt en verandert.

Kan nergens een logfile vinden voor named hier op beide testservers... Zal er straks nog eens mee spelen.

Doe eerst is 'rndc stats' dan

Oorspronkelijk geplaatst door Randy

Kan nergens een logfile vinden voor named hier op beide testservers... Zal er straks nog eens mee spelen.

statistics-file "/var/named/named.stats";

Plaatsen in options {} in named.conf.

Owja, heb momenteel iets gevonden waarmee ik niet de som van alle data maar enkel de laatste minuut kan ophalen.

grep "$(date +'%Y-%m-%d %R')" voor bijvoorbeeld exim/mainlog

Allee moet ik mrtg nog op 1 minuut kunnen zetten en moet ik rrd installeren of zoiets.


BTW : Hoe is het mogelijk dat MRTG de statistieken voor DNS per minuut geeft als hij maar om de 5 minuten de cron uitvoerd ?

De cron veranderen

Oorspronkelijk geplaatst door Nivko

De cron veranderen

Nee hoor. Moet ook het interval van MRTG naar 1 brengen maar dat lukt niet tenzij ik rrd ga gebruiken.

Cron moet je wel veranderen, het programma word maar om de 5 minuten uitgevoerd, dus ookal verander je de settings van MRTG naar 1 minuut doet hij het nog niet, tenzij je hem als daemon draait.