From 15742f5186e42f40c0a04402c9f15f880ce79196 Mon Sep 17 00:00:00 2001 From: Andreas Guldstrand Date: Thu, 31 Dec 2015 13:22:30 +0100 Subject: Add testing for download fail. See #23 --- t/fail.t | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 't/fail.t') diff --git a/t/fail.t b/t/fail.t index e741350..c8f4b58 100755 --- a/t/fail.t +++ b/t/fail.t @@ -11,7 +11,7 @@ use lib "$RealBin/../SBO-Lib/lib"; use Test::Execute; if ($ENV{TEST_INSTALL}) { - plan tests => 1; + plan tests => 2; } else { plan skip_all => 'Only run these tests if TEST_INSTALL=1'; } @@ -22,8 +22,14 @@ $path = "$RealBin/../"; sub cleanup { capture_merged { unlink "$RealBin/LO-fail/failingslackbuild/perf.dummy"; + unlink "$RealBin/LO-fail/failingdownload/perf.dummy.fail"; + unlink "$RealBin/LO-fail/failingmd5sum/perf.dummy"; system(qw!rm -rf /tmp/SBo/failingslackbuild-1.0!); + system(qw!rm -rf /tmp/SBo/failingdownload-1.0!); + system(qw!rm -rf /tmp/SBo/failingmd5sum-1.0!); system(qw!rm -rf /tmp/package-failingslackbuild!); + system(qw!rm -rf /tmp/package-failingdownload!); + system(qw!rm -rf /tmp/package-failingmd5sum!); }; } @@ -58,6 +64,9 @@ set_lo(); # 1: Failing slackbuild script script (qw/ sboinstall failingslackbuild /, { input => "y\ny", expected => qr/Failures:\n failingslackbuild: failingslackbuild.SlackBuild return non-zero\n\z/, exit => 3 }); +# 2: Failing download +script (qw/ sboinstall failingdownload /, { input => "y\ny\nn", expected => qr!Failures:\n failingdownload: Unable to wget http://www[.]pastemobile[.]org/perf[.]dummy[.]fail[.]\n\z!, exit => 5 }); + # Cleanup END { set_lo('delete'); -- cgit v1.2.3