proc DisableAllTrafficItems {} { foreach trafficItem [ixNet getList [ixNet getRoot]traffic trafficItem] { puts "\nDisableAllTrafficItems: $trafficItem" ixNet setAttribute $trafficItem -enabled false } ixNet commit } return 1 } puts "\nConnectToIxChassis: $ixChassisIp" if {[catch {set status [ixNet setAttribute $chassisObj -hostname $ixChassisIp]} errMsg]} { puts "\nError: ConnectToIxChassis: $errMsg" return 1 } ixNet commit set chassisObj [ixNet remapIds $chassisObj] #set status [ixNet getList [ixNet getRoot]/availableHardware chassis] #puts "ConnectToIxChassis: Connected: $status" for {set counter 1} {$counter <= 60} {incr counter} { set currentState [ixNet getAttribute $chassisObj -state] if {$counter < 60 && $currentState != "ready"} { puts "Chassis $ixChassisIp is not ready yet. Wait $counter/60 seconds" after 1000 } if {$counter == 60 && $currentState != "ready"} { puts "\nError: Chassis $ixChassisIp failed to connect" } if {$counter < 60 && $currentState == "ready"} { puts "Chassis $ixChassisIp is up" break } } } }