set ns [new Simulator]
source tb_compat.tcl
 
set nodeGroupFilter [$ns event-group]
 
set node19289 [$ns node]
append lanstr "$node19289 "
set progStartFilter19289 [$node19289 program-agent -command "/proj/CONFINE/runme/virt/runme.vnodeStartFilter"]
 
$nodeGroupFilter add $progStartFilter19289
 
set node16953 [$ns node]
append lanstr "$node16953 "
set progStartFilter16953 [$node16953 program-agent -command "/proj/CONFINE/runme/virt/runme.vnodeStartFilter"]
 
$nodeGroupFilter add $progStartFilter16953
 
set node44779 [$ns node]
append lanstr "$node44779 "
set progStartFilter44779 [$node44779 program-agent -command "/proj/CONFINE/runme/virt/runme.vnodeStartFilter"]
 
$nodeGroupFilter add $progStartFilter44779
 
set node23474 [$ns node]
append lanstr "$node23474 "
set progStartFilter23474 [$node23474 program-agent -command "/proj/CONFINE/runme/virt/runme.vnodeStartFilter"]
 
$nodeGroupFilter add $progStartFilter23474
 
set node37680 [$ns node]
append lanstr "$node37680 "
set progStartFilter37680 [$node37680 program-agent -command "/proj/CONFINE/runme/virt/runme.vnodeStartFilter"]
 
$nodeGroupFilter add $progStartFilter37680
 
tb-set-hardware $node19289 pcvm
tb-set-node-os $node19289 OPENVZ-STD
tb-set-hardware $node16953 pcvm
tb-set-node-os $node16953 OPENVZ-STD
tb-set-hardware $node44779 pcvm
tb-set-node-os $node44779 OPENVZ-STD
tb-set-hardware $node23474 pcvm
tb-set-node-os $node23474 OPENVZ-STD
tb-set-hardware $node37680 pcvm
tb-set-node-os $node37680 OPENVZ-STD
 
set nodeMonitor [$ns node]
append lanstr "$nodeMonitor "
 
set lan0 [$ns make-lan "$lanstr" 1000Mb 0ms]
 
$ns at 20 "$nodeGroupFilter start"
$ns at 60 "$lan0 trace stop"
$ns at 70 "$lan0 trace start"
$ns at 420 "$lan0 trace snapshot"
 
$ns run