Lines 1-4
Link Here
|
1 |
--- etc/rtgtargmkr.pl.in.orig 2016-10-25 16:28:59 UTC |
1 |
--- etc/rtgtargmkr.pl.in.orig 2016-11-04 16:36:53 UTC |
2 |
+++ etc/rtgtargmkr.pl.in |
2 |
+++ etc/rtgtargmkr.pl.in |
3 |
@@ -126,7 +126,7 @@ sub find_router_id { |
3 |
@@ -126,7 +126,7 @@ sub find_router_id { |
4 |
&sql_insert($sql); |
4 |
&sql_insert($sql); |
Lines 9-11
Link Here
|
9 |
&sql_insert($sql); |
9 |
&sql_insert($sql); |
10 |
} |
10 |
} |
11 |
} |
11 |
} |
|
|
12 |
@@ -289,7 +289,7 @@ sub main { |
13 |
$year + 1900, $hour, $min; |
14 |
print CFG "# Host\tOID\tBits\tCommunity\tTable\tID\tDescription\n"; |
15 |
|
16 |
- foreach $router (@routers) { |
17 |
+ POKE: foreach $router (@routers) { |
18 |
$bits = $counterBits{$router}; |
19 |
# Sanity check bits |
20 |
$bits = $defbits if ( ( $bits != 32 ) && ( $bits != 64 ) ); |
21 |
@@ -304,7 +304,7 @@ sub main { |
22 |
$system = join ( ' ', @result ); |
23 |
print "System: $system\n" if $DEBUG; |
24 |
$session = SNMP_Session->open( $router, $communities{$router}, 161 ) |
25 |
- || die "Error opening SNMP session to $router"; |
26 |
+ || ( print "Error opening SNMP session to $router" and next POKE ); |
27 |
if ( $system =~ /.*Cisco.*WS-.*/ ) { |
28 |
$system = "Catalyst"; |
29 |
$session->map_table( $catalyst, \&process ); |
30 |
@@ -289,7 +289,7 @@ sub main { |
31 |
$year + 1900, $hour, $min; |
32 |
print CFG "# Host\tOID\tBits\tCommunity\tTable\tID\tDescription\n"; |
33 |
|
34 |
- foreach $router (@routers) { |
35 |
+ POKE: foreach $router (@routers) { |
36 |
$bits = $counterBits{$router}; |
37 |
# Sanity check bits |
38 |
$bits = $defbits if ( ( $bits != 32 ) && ( $bits != 64 ) ); |
39 |
@@ -304,7 +304,7 @@ sub main { |
40 |
$system = join ( ' ', @result ); |
41 |
print "System: $system\n" if $DEBUG; |
42 |
$session = SNMP_Session->open( $router, $communities{$router}, 161 ) |
43 |
- || die "Error opening SNMP session to $router"; |
44 |
+ || ( print "Error opening SNMP session to $router" and next POKE ); |
45 |
if ( $system =~ /.*Cisco.*WS-.*/ ) { |
46 |
$system = "Catalyst"; |
47 |
$session->map_table( $catalyst, \&process ); |