# Bug report by Joey Hess.
#
# The command:
#   find -neweraa
# is not valid because there is a missing argument.
# The result should be a clean exit with nonzero status.
# However, it segfaults in 4.4.0.
#

global FTSFIND
if {[which $FTSFIND] == 0} then {
    error "$FTSFIND, program does not exist"
    exit 1
}

set scriptname [info script]
set testbase [file rootname $scriptname]
set test [file tail $testbase]
set testname "$test.generic"

set cmd "$FTSFIND -neweraa"
set expected 1

send_log "$cmd\n"
eval spawn -noecho $cmd
expect {
    eof { set result [wait] }
}
send_log "result is '$result'\n"
if { [ lindex $result 2 ] == 0  } then {
    set status [ lindex $result 3]
    if { [llength $result] > 4 } then {
	if { [lindex $result 4] == "CHILDKILLED" } then {
	    fail "$testname, $cmd was killed: [lrange $result 5 end]"
	} else {
	    unresolved "$testname, $cmd had unexpected extended status $result"
	}
    } else {
	if { $status != 1 } then {
	    unresolved "$testname, $cmd had unexpected status $status"
	} else {
	    pass "$testname"
	}
    }
} else {
    unresolved "$testname, failed to run $cmd"
}