Return to testcommands.exp CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / quagga / tests / libzebra.tests |
1.1 ! misho 1: set timeout 30 ! 2: set test_name "testcommands" ! 3: ! 4: if {![info exists env(QUAGGA_TEST_COMMANDS)]} { ! 5: # sadly, the test randomly fails when configure parameters differ from ! 6: # what was used to create testcommands.refout. this can be fixed by ! 7: # shipping a matching vtysh_cmd.c, which we'll add after 0.99.23 ! 8: unresolved "$test_name" ! 9: exit 0 ! 10: } ! 11: ! 12: spawn sh -c "./testcommands -e 0 < $env(srcdir)/testcommands.in | diff -au - $env(srcdir)/testcommands.refout" ! 13: ! 14: expect { ! 15: eof { ! 16: } ! 17: timeout { ! 18: exp_close ! 19: fail "$test_name: timeout" ! 20: } ! 21: } ! 22: ! 23: catch wait result ! 24: set os_error [lindex $result 2] ! 25: set exit_status [lindex $result 3] ! 26: ! 27: if { $os_error == 0 && $exit_status == 0 } { ! 28: pass "$test_name" ! 29: } else { ! 30: fail "$test_name" ! 31: }