proc ConfigVxlanEmulationNgpfHlt { port portConfigParams} { upvar $portConfigParams params puts "\nPortVxlanEmulation: $port" foreach {properties values} [array get params $port,*] { set property [lindex [split $properties ,] end] append paramList "$property $values " } set status [eval ::ixiangpf::emulation_vxlan_config $paramList] if {[keylget status status] != $::SUCCESS} { puts "\nError ConfigVxlanEmulation:\n$status\n" return 1 } # /topology:1/deviceGroup:1/ethernet:1/ipv4:1/vxlan:1 set vxlanHandle [keylget status vxlan_handle] return $vxlanHandle }