From: Eric Bollengier <eric@baculasystems.com>
Date: Thu, 6 Apr 2023 15:54:49 +0000 (+0200)
Subject: regress: Fix volume-read-only-test
X-Git-Tag: Beta-15.0.0~192
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a0a5c64aaaaa9ab7eb2cd047ae519fca30202740;p=thirdparty%2Fbacula.git

regress: Fix volume-read-only-test
---

diff --git a/regress/tests/read-only-volume-test b/regress/tests/read-only-volume-test
index 851fef00a..c47a6388f 100755
--- a/regress/tests/read-only-volume-test
+++ b/regress/tests/read-only-volume-test
@@ -28,14 +28,17 @@ echo "s%  Schedule =%# Schedule =%g" >${outf}
 cp $scripts/bacula-dir.conf $tmp/1
 sed -f ${outf} $tmp/1 >$scripts/bacula-dir.conf
 
+mkdir -p $tmp/add
+
 $bperl -e "add_attribute('$conf/bacula-sd.conf', 'SetVolumeReadOnly', 'yes', 'Device')"
 $bperl -e "add_attribute('$conf/bacula-sd.conf', 'MinimumVolumeProtectionTime', '10s', 'Device', 'FileChgr2-Dev1')"
 $bperl -e "add_attribute('$conf/bacula-sd.conf', 'MinimumVolumeProtectionTime', '10s', 'Device', 'FileChgr2-Dev2')"
-$bperl -e "add_attribute('$conf/bacula-dir.conf', 'MaximumVolumeBytes', '50MB', 'Pool')"
+$bperl -e "add_attribute('$conf/bacula-dir.conf', 'MaximumVolumeBytes', '70MB', 'Pool')"
 $bperl -e "add_attribute('$conf/bacula-dir.conf', 'MaximumVolumeJobs', '1', 'Pool')"
 $bperl -e "add_attribute('$conf/bacula-dir.conf', 'VolumeRetention', '20s', 'Pool', 'Default')"
 $bperl -e "add_attribute('$conf/bacula-dir.conf', 'LabelFormat', 'Default', 'Pool', 'Default')"
 $bperl -e "add_attribute('$conf/bacula-dir.conf', 'ActionOnPurge', 'Truncate', 'Pool')"
+$bperl -e "add_attribute('$conf/bacula-sd.conf', 'AlignedDevice', '$tmp/add', 'Device')"
 
 cat <<EOF >> $conf/bacula-dir.conf
 Pool {
@@ -188,6 +191,9 @@ llist volume=Default0017
 @exec "stat $tmp/Default0017"
 @$out $tmp/vol9.out
 run job=$JobName level=Full storage=File2 pool=Test1 yes
+wait
+messages
+llist volume=Test10018
 quit
 END_OF_DATA
 
@@ -252,22 +258,21 @@ $bperl -e 'check_protect("$tmp/vol8.out", "Default0016", "Used", 1, 1, 20)'
 if [ $? != 0 ]; then
     estat=1
 fi
+
 # Here, the pool has 5s and the  device 10s, it should be 10s
-$bperl -e 'check_protect("$tmp/vol8.out", "Test10018", "Used", 1, 1, 10)'
+$bperl -e 'check_protect("$tmp/vol9.out", "Test10018", "Used", 1, 1, 10)'
 if [ $? != 0 ]; then
     estat=1
 fi
 
-
 cat <<END_OF_DATA >$tmp/bconcmds
 @$out $tmp/vol9.out
-wait
-messages
 time
 @exec "stat $tmp/Test10018"
 purge volume=Test10018 yes
 truncate volume=Test10018 storage=File2 yes
 @sleep 11
+time
 truncate volume=Test10018 storage=File2 yes
 messages
 quit