check.lrzsz

Linux下ztelnet 的rz、sz源码

		rm -f $testdir/manag.rename/lsz.c.1
	fi
	rmdir $testdir/manag.rename 2>&5
	if test $failed = 1 ; then 
		echo "management/rename test failed"
		any_failure="$any_failure manag.rename"
	fi
fi


# resume -r 
if test "$mode" = all -o "$mode" = sz-r ; then
	mkdir $testdir/resume-s
	echo "testing ZMODEM resume (sz -r)"
	dd if=$srcdir/src/Makefile.in of=$testdir/resume-s/lsz.c bs=256 count=5 2>&5
	($SZ -rq $srcdir/src/lsz.c) <$testdir/pipe | \
		(cd $testdir/resume-s ; $RZ $QUIET >>../pipe )
	echo "differences are normal:" >&5
	if cmp $srcdir/src/lsz.c $testdir/resume-s/lsz.c >&5 ; then
		echo "receiver did not resume, but file is ok"
		any_failure="$any_failure ZMODEM-resume/sz"
	else
		dd if=$srcdir/src/lsz.c of=$testdir/resume-s/lsz.c1 bs=256 count=5 2>&5
		dd if=$testdir/resume-s/lsz.c bs=256 skip=5 >>$testdir/resume-s/lsz.c1 2>&5
		if cmp $srcdir/src/lsz.c $testdir/resume-s/lsz.c1 ; then
			:
			rm -f $testdir/resume-s/lsz.c
			rm -f $testdir/resume-s/lsz.c1
			rmdir $testdir/resume-s 2>&5
		else
			echo "sender resumed, but files differ. This is really bad"
			any_failure="$any_failure ZMODEM-resume/sz"
		fi
	fi
fi

if test "$mode" = all -o "$mode" = rz-r ; then
    echo "testing ZMODEM resume (rz -r)"
	mkdir $testdir/resume-r 2>&5
	dd if=$srcdir/src/Makefile.in of=$testdir/resume-r/lsz.c bs=256 count=5 2>&5
	($SZ -q $srcdir/src/lsz.c) <$testdir/pipe | \
		(cd $testdir/resume-r ; $RZ -r $QUIET >>../pipe )
	echo "differences are normal:" >&5
	if cmp $srcdir/src/lsz.c $testdir/resume-r/lsz.c >&5 ; then
		echo "receiver did not resume, but file is ok"
		any_failure="$any_failure ZMODEM-resume/rz"
	else
		dd if=$srcdir/src/lsz.c of=$testdir/resume-r/lsz.c1 bs=256 count=5 2>&5
		dd if=$testdir/resume-r/lsz.c bs=256 skip=5 >>$testdir/resume-r/lsz.c1 2>&5
		if cmp $srcdir/src/lsz.c $testdir/resume-r/lsz.c1 ; then
			:
			rm -f $testdir/resume-r/lsz.c
			rm -f $testdir/resume-r/lsz.c1
			rmdir $testdir/resume-r 2>&5
		else
			echo "sender resumed, but files differ. This is really bad"
			any_failure="$any_failure ZMODEM-resume/rz"
		fi
	fi
fi

# test lsz -> original rz
if test "$mode" = orig-rz ; then
	echo "testing ZMODEM"
	mkdir $testdir/zmodem
	failed=0
	($SZ -q  $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/zmodem ; exec omen.rz $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/zmodem/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/zmodem/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/zmodem 2>&5
	if test $failed = 1 ; then 
		echo "orig-rz test failed"
		any_failure="$any_failure orig-rz"
	fi
fi


# test original sz -> lrz
if test "$mode" = orig-sz ; then
	echo "testing ZMODEM"
	mkdir $testdir/zmodem
	failed=0
	(omen.sz $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/zmodem ; exec $RZ >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/zmodem/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/zmodem/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/zmodem 2>&5
	if test $failed = 1 ; then 
		echo "orig-sz test failed"
		any_failure="$any_failure orig-sz"
	fi
fi

# test original sz -> lrz
if test "$mode" = orig-kombi ; then
	echo "testing ZMODEM"
	mkdir $testdir/zmodem
	failed=0
	(omen.sz $y_test_files ; 
			sleep 1; 
			cd $testdir/zmodem; 
			echo 
			exec omen.rz ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/zmodem ; 
			$RZ ; 
			rm -f * ; 
			sleep 3 ;
			$SZ $y_test_files ) >>$testdir/pipe
	for i in $y_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/zmodem/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/zmodem/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/zmodem 2>&5
	if test $failed = 1 ; then 
		echo "orig-kombi test failed"
		any_failure="$any_failure orig-kombi"
	fi
fi

# test lsz -> zm rz (zxrx)
if test "$mode" = zm-rz ; then
	echo "testing ZMODEM"
	mkdir $testdir/zmodem
	failed=0
	($SZ -q  $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/zmodem ; exec zmrx $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/zmodem/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/zmodem/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/zmodem 2>&5
	if test $failed = 1 ; then 
		echo "orig-rz test failed"
		any_failure="$any_failure zm-rz"
	fi
fi

# test zm sz (zmtx) -> lrz
if test "$mode" = zm-sz ; then
	echo "testing ZMODEM"
	mkdir $testdir/zmodem
	failed=0
	(zmtx $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/zmodem ; exec $RZ >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/zmodem/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/zmodem/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/zmodem 2>&5
	if test $failed = 1 ; then 
		echo "orig-sz test failed"
		any_failure="$any_failure zm-sz"
	fi
fi

# test turbo mode lsz -> zmrx, omen.rz, lrz
if test "$mode" = turbo ; then
	echo "testing turbo -> zmrx"
	mkdir $testdir/turbo.zmrx
	failed=0
	($SZ -qT $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/turbo.zmrx ; exec zmrx >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/turbo.zmrx/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/turbo.zmrx/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/turbo.zmrx 2>&5
	if test $failed = 1 ; then 
		echo "turbo-zmrx test failed"
		any_failure="$any_failure turbo-zmrx"
	fi

	echo "testing turbo -> omen.rz"
	mkdir $testdir/turbo.omen.rz
	failed=0
	($SZ -qT $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/turbo.omen.rz ; exec omen.rz >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/turbo.omen.rz/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/turbo.omen.rz/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/turbo.omen.rz 2>&5
	if test $failed = 1 ; then 
		echo "turbo-omen.rz test failed"
		any_failure="$any_failure turbo-omen.rz"
	fi

	echo "testing turbo -> lrz"
	mkdir $testdir/turbo.lrz
	failed=0
	($SZ -qT $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/turbo.lrz ; exec lrz >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/turbo.lrz/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/turbo.lrz/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/turbo.omen.rz 2>&5
	if test $failed = 1 ; then 
		echo "turbo-lrz test failed"
		any_failure="$any_failure turbo-lrz"
	fi
fi

#
# startup timing checks
#
# test lsz -> zm rz (zxrx)
if test "$mode" = startup ; then

	echo "testing lsz -> zm rz. lsz sleeps 10 seconds"
	mkdir $testdir/startup.1
	failed=0
	($SZ --delay-startup 10 -q  $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.1 ; exec zmrx $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.1/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.1/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.1 2>&5
	if test $failed = 1 ; then 
		echo "zm-rz startup-timing test failed"
		any_failure="$any_failure zm-rz-startup-timing"
	fi

	echo "testing lsz -> omen.rz. lsz sleeps 10 seconds"
	mkdir $testdir/startup.2
	failed=0
	($SZ --delay-startup 10 -q  $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.2 ; exec omen.rz $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.2/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.2/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.2 2>&5
	if test $failed = 1 ; then 
		echo "omen.rz startup-timing test failed"
		any_failure="$any_failure omen-rz-startup-timing"
	fi

	echo "testing lsz -> lrz. lsz sleeps 10 seconds"
	mkdir $testdir/startup.3
	failed=0
	($SZ --delay-startup 10 -q  $SZBUFSIZE $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.3 ; exec $RZ $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.3/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.3/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.3 2>&5
	if test $failed = 1 ; then 
		echo "lrz startup-timing test failed"
		any_failure="$any_failure lrz-startup-timing"
	fi

	echo "testing zmtx -> lrz. lrz sleeps 10 seconds"
	mkdir $testdir/startup.4
	failed=0
	(zmtx $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.4 ; exec $RZ --delay-startup 10 $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.4/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.4/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.4 2>&5
	if test $failed = 1 ; then 
		echo "zmtx startup-timing test failed"
		any_failure="$any_failure zmtx-startup-timing"
	fi

	echo "testing omen.sz -> lrz. lrz sleeps 10 seconds"
	mkdir $testdir/startup.5
	failed=0
	(omen.sz $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.5 ; exec $RZ --delay-startup 10 $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.5/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.5/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.5 2>&5
	if test $failed = 1 ; then 
		echo "omen.sz startup-timing test failed"
		any_failure="$any_failure omen.sz-startup-timing"
	fi

	echo "testing lsz -> lrz. lrz sleeps 10 seconds"
	mkdir $testdir/startup.6
	failed=0
	($SZ -q $z_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/startup.6 ; exec $RZ --delay-startup 10 $QUIET >>../pipe)
	for i in $z_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/startup.6/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/startup.6/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/startup.6 2>&5
	if test $failed = 1 ; then 
		echo "lsz startup-timing test failed"
		any_failure="$any_failure lsz-startup-timing"
	fi
fi

if test "$mode" = stop-at ; then
	echo "testing lsz -> lrz. lsz stops after 10 seconds"
	mkdir $testdir/stop-at
	failed=0
	($SZ --stop-at +10 $z8_test_files ) 2>/dev/null <$testdir/pipe | \
		(cd $testdir/stop-at ; exec $RZ $QUIET >>../pipe)
	for i in $z8_test_files ; do 
		bn=`basename $i`
		cmp $i $testdir/stop-at/$bn
		if test $? -eq 0 ; then
			rm -f $testdir/stop-at/$bn
		else
			failed=1
		fi
	done
	rmdir $testdir/stop-at 2>&5
	if test $failed = 1 ; then 
		echo "stop-at test failed"
		any_failure="$any_failure stop-at"
	fi
fi

if test "x$any_failure" = x  ; then
	:
else
	echo "the following tests failed:"
	echo $any_failure
	echo "have a look into `pwd`/$testdir"
	exit 1
fi

echo "All tests OK."
if test "$mode" = all -o "$mode" = abuse ; then
	echo
	echo "going to tests misuse. Errors are ok, hangs are not!"

	echo
	echo "both sides sending:"
	$SZ -q $z_test_files <$testdir/pipe | \
		($SZ $z_test_files >>$testdir/pipe )

	echo
	echo "both sides receiving:"
	$RZ -q <$testdir/pipe | \
		( $RZ >>$testdir/pipe )
fi

#rm -rf $testdir
exit 0