diff options
author | Kristian Lyngstol <kly@kly.no> | 2016-03-17 01:57:57 +0000 |
---|---|---|
committer | Kristian Lyngstol <kly@kly.no> | 2016-03-17 01:57:57 +0000 |
commit | 20afe93187d1ebec66e181b8426b66de94a52c76 (patch) | |
tree | 104433e3ee9e6afe0954f02e489995f5483c1948 /clients/snmpfetchng.pl | |
parent | 23bec69a289a1dc6761fab27e0a934f97d0fd186 (diff) |
NMS: Moure output hacks
Diffstat (limited to 'clients/snmpfetchng.pl')
-rwxr-xr-x | clients/snmpfetchng.pl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/clients/snmpfetchng.pl b/clients/snmpfetchng.pl index dd9862d..68baddd 100755 --- a/clients/snmpfetchng.pl +++ b/clients/snmpfetchng.pl @@ -20,8 +20,6 @@ our $dbh = nms::db_connect(); $dbh->{AutoCommit} = 0; $dbh->{RaiseError} = 1; -#my $qualification = 'sysname LIKE \'e71%\''; - my $qualification = <<"EOF"; (last_updated IS NULL OR now() - last_updated > poll_frequency) AND (locked='f' OR now() - last_updated > '15 minutes'::interval) @@ -92,7 +90,7 @@ sub inner_loop for my $refswitch (@switches) { $outstanding++; my %switch = %{$refswitch}; - $poll_todo .= "$switch{'sysname'} ($switch{'mgtip'}) "; + $poll_todo .= "$switch{'sysname'} "; $switch{'start'} = time; $qlock->execute($switch{'id'}) @@ -146,11 +144,11 @@ sub callback{ } } $sth->execute($switch{'sysname'}, JSON::XS::encode_json(\%tree2)); - mylog( "Polled $switch{'sysname'} in " . (time - $switch{'start'}) . "s. ($outstanding outstanding polls)"); $qunlock->execute($switch{'id'}) or die "Couldn't unlock switch"; $dbh->commit; $outstanding--; + mylog( "Polled $switch{'sysname'} in " . (time - $switch{'start'}) . "s. ($outstanding outstanding polls)"); } while (1) { inner_loop(); |