My colleague identified this reason for QFX L3 switches:
if( exists $misc::seedini{$ip} ){
if( exists $misc::seedini{$ip}{dv} ){ # Use DB version & community for this IP
if( $misc::seedini{$ip}{dv} > 0 ){
unless( $main::opt{'C'} or $main::opt{'R'} or $main::opt{'V'} ){ # Retry read access ignores DB values
$defver = $misc::seedini{$ip}{dv};
$trycomms[0] = $misc::seedini{$ip}{dc} if $misc::seedini{$ip}{dc};
}
if( $main::opt{a} or $main::opt{A} ){ # Retain mappings from seedlist, if discovered otherwise
$misc::map{$ip}{na} = $misc::seedini{$ip}{dn} if substr($main::dev{$misc::seedini{$ip}{dn}}{opt},4,1) eq 'm' and !exists $misc::map{$ip}{na};
$misc::map{$ip}{co} = $main::dev{$misc::seedini{$ip}{dn}}{co} if substr($main::dev{$misc::seedini{$ip}{dn}}{opt},5,1) eq 'm' and !exists $misc::map{$ip}{co};
$misc::map{$ip}{lo} = $main::dev{$misc::seedini{$ip}{dn}}{lo} if substr($main::dev{$misc::seedini{$ip}{dn}}{opt},6,1) eq 'm' and !exists $misc::map{$ip}{lo};
}
}elsif( $misc::seedini{$ip}{dm} !~ /^1[78]$/ ){ # Only REST & 'other' devices can be overwritten
mon::Event('d',100,'nedq',$id,'',"IP $ip belongs to nosnmpdev $misc::seedini{$ip}{dn}, not replacing");
misc::Prt('',"IP of ID $id belongs to nosnmpdev $misc::seedini{$ip}{dn}\t");
return '';
}
}elsif( exists $misc::seedini{$ip}{rc} and $misc::seedini{$ip}{rc} ){ # Use seed community for this IP
$trycomms[0] = $misc::seedini{$ip}{rc};
}
}
Do you have any idea how to fix it?