Commit 7be2f454 authored by Robert Ricci's avatar Robert Ricci
Browse files

Add a new test, 'ixp', which is intended to test subnodes. NS file

stolen from Leigh's 'ixptest' experiment.
parent 459d20f9
......@@ -25,3 +25,4 @@ widearea_types
A simple test using an IXP, to exercise the subnode capabilities.
source tb_compat.tcl
set ns [new Simulator]
set myixp [$ns node]
set ixphost [$ns node]
tb-set-hardware $myixp ixp-bveil
tb-fix-node $myixp $ixphost
tb-set-node-os $ixphost RHL73-IXPHOST
set n0 [$ns node]
set n1 [$ns node]
set n2 [$ns node]
set n3 [$ns node]
set link1 [$ns duplex-link $n0 $myixp 100Mb 0ms DropTail]
set link2 [$ns duplex-link $n1 $myixp 100Mb 0ms DropTail]
set link3 [$ns duplex-link $n2 $myixp 100Mb 0ms DropTail]
set link4 [$ns duplex-link $n3 $myixp 100Mb 0ms DropTail]
$ns rtproto Static
$ns run
tb_run("tbswap in",0);
tb_run("tbswap out",0);
tb_run("tbswap in",0);
tb_run("tbswap out",0);
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment