proc EnableGlobalArpForEachIp { {args ""} } { # For Static IP w/Auth # Need to enable this at: # Traffic Options -> Protocol Options -> IP set enable true ;# true|false set arpRate 300 set maxOutstanding 300 set sendOneArpFromEachGateway false ;# true|false set argIndex 0 while {$argIndex < [llength $args]} { set currentArg [lindex $args $argIndex] switch -exact -- $currentArg { -enable { set enable [lindex $args [expr $argIndex + 1]] incr argIndex 2 } -arpRate { set arpRate [lindex $args [expr $argIndex + 1]] incr argIndex 2 } -maxOutstanding { set maxOutstanding [lindex $args [expr $argIndex + 1]] incr argIndex 2 } -sendOneArpFromEachGateway { set sendOneArpFromEachGateway [lindex $args [expr $argIndex + 1]] incr argIndex 2 } default { puts "\nError EnableGlobalArpForEachIp: No such parameter" } } } foreach global [ixNet getList [ixNet getRoot]globals/protocolStack ipGlobals] { puts "\nEnableGlobalArpForEachIp" ixNet setMultiAttribute $global \ -enableGatewayArp $enable \ -gatewayArpRequestRate $arpRate \ -maxOutstandingGatewayArpRequests $maxOutstanding \ -sendOneArpFromEachInterface $sendOneArpFromEachGateway ixNet commit } }