#	$OpenBSD: proto-mismatch.sh,v 1.4 2015/03/03 22:35:19 markus Exp $
#	Placed in the Public Domain.

setglobal tid = '"protocol version mismatch'"

proc mismatch
{
	setglobal server = $1
	setglobal client = $2
	setglobal banner = $[echo $(client) | $(SSHD) -o "Protocol=$(server)" -i -f $(OBJ)/sshd_proxy]
	setglobal r = $Status
	trace "sshd prints $(banner)"
	if test $r -ne 255 {
		fail "sshd prints $(banner) and accepts connect with version $(client)"
	}
}

mismatch	2	SSH-1.5-HALLO
if ssh_version 1 {
	mismatch	1	SSH-2.0-HALLO
}