File:  [ELWIX - Embedded LightWeight unIX -] / embedaddon / quagga / tests / libzebra.tests / testcommands.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 (7 years, 11 months ago) by misho
Branches: quagga, MAIN
CVS tags: v1_0_20160315, HEAD
quagga 1.0.20160315

    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: }

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