problem with discover

Stefan Strobel (strobel@lia.univ-savoie.fr)
Wed, 19 Jan 1994 13:59:51 +0100 (MET)

With tkined 0.7 and scotty 0.8a :
When I try to discover a subnet (here 193.48.60) I always get the followind
error (it seems to work with smaller subnets) :

can't read "name(7)": no such element in array
while executing
"if {$ip != $name($aa)} {
set ok 1
break
}"
("foreach" body line 4)
invoked from within
"foreach ip [lrange $gateways($id) 1 end] {
if {$ip == "0.0.0.0"} continue
set aa $ids($ip)
if {$ip != $name($aa)} {
set ok 1
b ..."
invoked from within
"if {$name($id) == $myip} {
set ok 0
foreach ip [lrange $gateways($id) 1 end] {
if {$ip == "0.0.0.0"} continue
set aa $ids($ip)
i ..."
invoked from within
"if {![info exists done($myip)]} {

if {$name($id) == $myip} {
set ok 0
foreach ip [lrange $gateways($id) 1 end] {
if {$ip == "0.0.0.0"} ..."
("foreach" body line 5)
invoked from within
"foreach id [array names gateways] {
if {[llength $gateways($id)] < 2} continue
set myip [lindex $gateways($id) 0]

if {![info exists done($myip)]} ..."
(procedure "merge_gateways" line 19)
invoked from within
"merge_gateways"
invoked from within
"if {[info exists nodes]} {
discover_traces
discover_masks
discover_fips
discover_networks
discover_gateways
discover_links
merge_gateways
talk ..."
(procedure "Discover IP Network" line 40)
invoked from within
"{Discover IP Network} {}"
("eval" body line 1)
invoked from within
"eval $cmd"

Is this a known bug ? is there a fix or should I try to find it myself ?

Stefan

-- 


   Stefan Strobel                                
   
   strobel@sun1.rz.fh-heilbronn.de                
   strobel@lia.univ-savoie.fr              
   100111.3000@compuserve.com