File:  [ELWIX - Embedded LightWeight unIX -] / embedaddon / quagga / tests / bgpd.tests / aspathtest.exp
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs - revision graph
Wed Nov 2 10:09:12 2016 UTC (8 years, 7 months ago) by misho
Branches: quagga, MAIN
CVS tags: v1_0_20160315, HEAD
quagga 1.0.20160315

set timeout 10
set testprefix "aspathtest "
set aborted 0
set color 1

spawn "./aspathtest"

# proc onetest { test_name note start } {
# proc headerline { line } {
 
set parserno 0
proc parsertest { test_name } {
	global parserno
	headerline "test $parserno"
	onetest "parse $test_name" " ($parserno)" "$test_name:"
	onetest "parse $test_name +empty_prepend" " (#$parserno)" "empty prepend $test_name:"
	incr parserno 1
}
set attrno 0
proc attrtest { test_name } {
	global attrno
	headerline "aspath_attr test $attrno"
	onetest "attr $test_name" " (#$attrno)" "$test_name"
	incr attrno 1
}


parsertest "seq1"
parsertest "seq2"
parsertest "seq3"
parsertest "seqset"
parsertest "seqset2"
parsertest "multi"
parsertest "confed"
parsertest "confed2"
parsertest "confset"
parsertest "confmulti"
parsertest "seq4"
parsertest "tripleseq1"
parsertest "someprivate"
parsertest "allprivate"
parsertest "long"
parsertest "seq1extra"
parsertest "empty"
parsertest "redundantset"
parsertest "reconcile_lead_asp"
parsertest "reconcile_new_asp"
parsertest "reconcile_confed"
parsertest "reconcile_start_trans"
parsertest "reconcile_start_trans4"
parsertest "reconcile_start_trans_error"
parsertest "redundantset2"
parsertest "zero-size overflow"
parsertest "zero-size overflow + valid segment"
parsertest "invalid segment type"

for {set i 0} {$i < 10} {incr i 1} { onetest "prepend $i" "" "prepend test $i"; }
for {set i 0} {$i <  5} {incr i 1} { onetest "aggregate $i" "" "aggregate test $i"; }
for {set i 0} {$i <  5} {incr i 1} { onetest "reconcile $i" "" "reconcile test $i"; }
for {set i 0} {$i < 22} {incr i 1} { onetest "compare $i" "" "left cmp "; }

onetest "empty_get" "" "empty_get_test"
attrtest "basic test"
attrtest "length too short"
attrtest "length too long"
attrtest "incorrect flag"
attrtest "as4_path, with as2 format data"
attrtest "as4, with incorrect attr length"
attrtest "basic 4-byte as-path"
attrtest "4b AS_PATH: too short"
attrtest "4b AS_PATH: too long"
attrtest "4b AS_PATH: too long2"
attrtest "4b AS_PATH: bad flags"
attrtest "4b AS4_PATH w/o AS_PATH"
attrtest "4b AS4_PATH: confed"


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>