Annotation of embedaddon/quagga/tests/bgpd.tests/aspathtest.exp, revision 1.1.1.1
1.1 misho 1: set timeout 10
2: set testprefix "aspathtest "
3: set aborted 0
4: set color 1
5:
6: spawn "./aspathtest"
7:
8: # proc onetest { test_name note start } {
9: # proc headerline { line } {
10:
11: set parserno 0
12: proc parsertest { test_name } {
13: global parserno
14: headerline "test $parserno"
15: onetest "parse $test_name" " ($parserno)" "$test_name:"
16: onetest "parse $test_name +empty_prepend" " (#$parserno)" "empty prepend $test_name:"
17: incr parserno 1
18: }
19: set attrno 0
20: proc attrtest { test_name } {
21: global attrno
22: headerline "aspath_attr test $attrno"
23: onetest "attr $test_name" " (#$attrno)" "$test_name"
24: incr attrno 1
25: }
26:
27:
28: parsertest "seq1"
29: parsertest "seq2"
30: parsertest "seq3"
31: parsertest "seqset"
32: parsertest "seqset2"
33: parsertest "multi"
34: parsertest "confed"
35: parsertest "confed2"
36: parsertest "confset"
37: parsertest "confmulti"
38: parsertest "seq4"
39: parsertest "tripleseq1"
40: parsertest "someprivate"
41: parsertest "allprivate"
42: parsertest "long"
43: parsertest "seq1extra"
44: parsertest "empty"
45: parsertest "redundantset"
46: parsertest "reconcile_lead_asp"
47: parsertest "reconcile_new_asp"
48: parsertest "reconcile_confed"
49: parsertest "reconcile_start_trans"
50: parsertest "reconcile_start_trans4"
51: parsertest "reconcile_start_trans_error"
52: parsertest "redundantset2"
53: parsertest "zero-size overflow"
54: parsertest "zero-size overflow + valid segment"
55: parsertest "invalid segment type"
56:
57: for {set i 0} {$i < 10} {incr i 1} { onetest "prepend $i" "" "prepend test $i"; }
58: for {set i 0} {$i < 5} {incr i 1} { onetest "aggregate $i" "" "aggregate test $i"; }
59: for {set i 0} {$i < 5} {incr i 1} { onetest "reconcile $i" "" "reconcile test $i"; }
60: for {set i 0} {$i < 22} {incr i 1} { onetest "compare $i" "" "left cmp "; }
61:
62: onetest "empty_get" "" "empty_get_test"
63: attrtest "basic test"
64: attrtest "length too short"
65: attrtest "length too long"
66: attrtest "incorrect flag"
67: attrtest "as4_path, with as2 format data"
68: attrtest "as4, with incorrect attr length"
69: attrtest "basic 4-byte as-path"
70: attrtest "4b AS_PATH: too short"
71: attrtest "4b AS_PATH: too long"
72: attrtest "4b AS_PATH: too long2"
73: attrtest "4b AS_PATH: bad flags"
74: attrtest "4b AS4_PATH w/o AS_PATH"
75: attrtest "4b AS4_PATH: confed"
76:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>