proc StopAllProtocolsHlt { {platform legacy} } { # platform: legacy or ngpf if {$platform == "legacy"} { set params "::ixia::test_control -action stop_all_protocols" } if {$platform == "ngpf"} { set params "::ixiangpf::test_control -action stop_all_protocols" } puts "\nStopAllProtocolsHlt: $platform" set stopProtocolStatus [eval $params] if {[keylget stopProtocolStatus status] != $::SUCCESS} { puts "\nError StopAllProtocolsHlt failed: $stopProtocolStatus\n" return 1 } wait 5000 return 0 }