Filter out switches with the snmpit_disable node_attribute.

167aa3f4 · Jonathon Duerig · 26ca466b · 167aa3f4
Commit 167aa3f4 authored Jul 31, 2012 by Jonathon Duerig
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

tbsetup/snmpit_test/snmpit_lib.pm tbsetup/snmpit_test/snmpit_lib.pm +6 -1

No files found.
--- a/tbsetup/snmpit_test/snmpit_lib.pm
+++ b/tbsetup/snmpit_test/snmpit_lib.pm
@@ -806,7 +806,12 @@ sub getTestSwitches () {
 	DBQueryFatal("SELECT node_id FROM nodes WHERE role='testswitch'");
    my @switches = (); 
    while (my @row = $result->fetchrow()) {
-	push @switches, $row[0];
+	my $node = Node->Lookup($row[0]);
+	my $disabled;
+	$node->NodeAttribute("snmpit_disable", \$disabled);
+	if (! defined($disabled) || !$disabled) {
+	    push @switches, $row[0];
+	}
    }

    return @switches;