diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-10-08 11:54:13 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-10-08 11:54:13 +0000 |
commit | 51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80 (patch) | |
tree | ee74957892063e7ab4c220620224c0e5ad43342a /t/superuser--failing-scriptlets.t | |
parent | c64d0fa1ea26cc983818569f91974ad20b3ff11c (diff) | |
download | urpmi-51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80.tar urpmi-51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80.tar.gz urpmi-51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80.tar.bz2 urpmi-51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80.tar.xz urpmi-51a0bbfe1758bcf1526d41d63cd1c4518fa6ce80.zip |
add tests, esp. for %triggerpostun failing that blocks upgrade of
drakxtools-backend in mdv2009.0
Diffstat (limited to 't/superuser--failing-scriptlets.t')
-rw-r--r-- | t/superuser--failing-scriptlets.t | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/t/superuser--failing-scriptlets.t b/t/superuser--failing-scriptlets.t new file mode 100644 index 00000000..740e4369 --- /dev/null +++ b/t/superuser--failing-scriptlets.t @@ -0,0 +1,42 @@ +#!/usr/bin/perl + +use strict; +use lib '.', 't'; +use helper; +use Test::More 'no_plan'; + +my $medium_name = 'failing-scriptlets'; + +need_root_and_prepare(); + +test_install_rpm_fail('pre'); +test_install_rpm('pretrans'); +test_install_rpm('post'); +test_install_rpm('preun'); +test_install_rpm('postun'); +test_install_rpm('posttrans'); + +test_install_upgrade_rpm('triggerprein'); +test_install_upgrade_rpm('triggerin'); +test_install_upgrade_rpm('triggerun'); +test_install_upgrade_rpm('triggerpostun'); + +sub test_install_rpm { + my ($name) = @_; + system_("rpm --root $::pwd/root -i media/$medium_name/$name-*.rpm"); + check_installed_fullnames_and_remove("$name-1-1"); +} +sub test_install_rpm_fail { + my ($name) = @_; + system_should_fail("rpm --root $::pwd/root -i media/$medium_name/$name-*.rpm"); + check_nothing_installed(); +} + +sub test_install_upgrade_rpm { + my ($name) = @_; + + system_("rpm --root $::pwd/root -i media/$medium_name/$name-1-*.rpm"); + check_installed_fullnames("$name-1-1"); + system_("rpm --root $::pwd/root -U media/$medium_name/$name-2-*.rpm"); + check_installed_fullnames_and_remove("$name-2-1"); +} |