githubmirror/procps

testsuite/lib.test/fileutils.exp

20 строк567 B

Craig Small

misc: testsuite to source aux scripts correctly

10 июл 2016, 02:04

10 июл 2016, 02:046118be8

#
# Testsuite for lib/fileutils program
#

set testprog "${topdir}lib/test_fileutils"
set scriptdir [file dirname [ info script ]]

set test "without argument"
spawn $testprog
expect_pass "$test" "Hello, World!"

set badfd "${scriptdir}/fileutils_badfd.sh"
set test "test bad file descriptor"
spawn $badfd $testprog
expect_pass "$test" "test_fileutils: write error: Bad file descriptor"

set full "${scriptdir}/fileutils_full.sh"
set test "test no space left on device"
spawn $full $testprog
expect_pass "$test" "test_fileutils: write error: No space left on device"