Blame tests/testsuite.at

Packit Service 360c39
# Regenerate the sparse file used for testing and skip the test if it fails
Packit Service 360c39
# Usage: GFS_TGT_REGEN
Packit Service 360c39
m4_define([GFS_TGT_REGEN],
Packit Service 360c39
[AT_CHECK([rm -f $GFS_TGT && truncate -s ${GFS_TGT_SZ}G ${GFS_TGT}], [ignore], [ignore], [ignore])
Packit Service 360c39
AT_SKIP_IF([test ! -f ${GFS_TGT}])])
Packit Service 360c39
Packit Service 360c39
# Regenerate the sparse file used for testing, with a given size, and skip the test if it fails
Packit Service 360c39
# Usage: GFS_TGT_REGEN(<size>)
Packit Service 360c39
m4_define([GFS_TGT_SIZE],
Packit Service 360c39
[AT_CHECK([rm -f $GFS_TGT && truncate -s $1 ${GFS_TGT}], [ignore], [ignore], [ignore])
Packit Service 360c39
AT_SKIP_IF([test ! -f ${GFS_TGT}])])
Packit Service 360c39
Packit Service 360c39
# Regenerate, check, fsck is used a lot so combine it into one macro
Packit Service 360c39
# Usage: GFS_FSCK_CHECK ([mkfs.gfs2 ... $GFS_TGT])
Packit Service 360c39
m4_define([GFS_FSCK_CHECK],
Packit Service 360c39
[GFS_TGT_REGEN
Packit Service 360c39
AT_CHECK($1, 0, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([fsck.gfs2 -n $GFS_TGT], 0, [ignore], [ignore])])
Packit Service 360c39
Packit Service 360c39
# Regenerate, mkfs, modify fs with gfs2l, fsck
Packit Service 360c39
# Usage: GFS_LANG_CHECK ([<mkfs.gfs2 command>], [<gfs2l script>])
Packit Service 360c39
m4_define([GFS_LANG_CHECK],
Packit Service 360c39
[GFS_TGT_REGEN
Packit Service 360c39
AT_CHECK($1, 0, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([echo "$2" | gfs2l ${GFS_TGT}], 0, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([fsck.gfs2 -y $GFS_TGT], 1, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([fsck.gfs2 -n $GFS_TGT], 0, [ignore], [ignore])])
Packit Service 360c39
Packit Service 360c39
# Regenerate, mkfs, modify fs with nukerg, fsck
Packit Service 360c39
# Usage: GFS_NUKERG_CHECK ([<mkfs.gfs2 command>], [<gfs2l script>])
Packit Service 360c39
m4_define([GFS_NUKERG_CHECK],
Packit Service 360c39
[GFS_TGT_REGEN
Packit Service 360c39
AT_CHECK($1, 0, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([nukerg $2 $GFS_TGT], 0, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([fsck.gfs2 -y $GFS_TGT], 1, [ignore], [ignore])
Packit Service 360c39
AT_CHECK([fsck.gfs2 -n $GFS_TGT], 0, [ignore], [ignore])])
Packit Service 360c39
Packit Service 360c39
# Set up a unit test, skipping if unit tests are disabled
Packit Service 360c39
# Usage: GFS_UNIT_TEST ([name], [keywords])
Packit Service 360c39
m4_define([GFS_UNIT_TEST],
Packit Service 360c39
[AT_SETUP($1)
Packit Service 360c39
AT_KEYWORDS($2)
Packit Service 360c39
AT_CHECK([test x"$ENABLE_UNIT_TESTS" = "xyes" || exit 77])])
Packit Service 360c39
Packit Service 360c39
# Test suite begins here
Packit Service 360c39
AT_INIT([])
Packit Service 360c39
AT_COLOR_TESTS
Packit Service 360c39
Packit Service 360c39
m4_include([mkfs.at])
Packit Service 360c39
m4_include([fsck.at])
Packit Service 360c39
m4_include([edit.at])
Packit Service 360c39
m4_include([libgfs2.at])