messages
@$out ${cwd}/tmp/log1.out
label storage=DiskChanger volume=ChangerVolume001 slot=1 Pool=Full drive=0
-label storage=DiskChanger volume=ChangerVolume002 slot=2 Pool=Full drive=0
label storage=File volume=TestVolume001 pool=Default
-label storage=File volume=TestVolume002 pool=Default
-label storage=File volume=TestVolume003 pool=Default
-update Volume=TestVolume001 maxvolbytes=120000
-update Volume=TestVolume002 maxvolbytes=120000
run job=$JobName yes
wait
messages
run job=$JobName level=Full yes
wait
messages
+run job=$JobName level=Full yes
+wait
+messages
@#
@# now do a restore
@#
@# print the JobMedia records
select * from JobMedia;
+@#
+@# now do a restore
+@#
restore
3
-1
+2
mark *
done
yes
wait
messages
@#
-@# now do a restore of the second job (to compare offset)
+@# now do a restore
@#
@$out ${cwd}/tmp/log3.out
restore
3
-2
+1
mark *
done
yes
wait
messages
-@$out
-update volume=TestVolume003 volstatus=Used
+restore all
+3
+3
+done
+yes
+wait
+messages
+update volume=TestVolume001 volstatus=Used
run job=migrate-job jobid=1 yes
run job=migrate-job jobid=2 yes
+run job=migrate-job jobid=3 yes
wait
messages
quit
dstat=0
perl -ne '
-sub check_bloc {
- $nb = $last_bloc - $last_bsr_bloc;
+sub check_block {
+ return unless ($last_block || $last_bsr_block);
+ $nb = $last_block - $last_bsr_block;
if ($nb > 65000) {
- print "ERROR: read too much bytes $nb\n";
+ print "ERROR: read too many bytes $nb\n";
}
}
sub print_stat {
- print "$last_job\nlast_bsr_bloc=$last_bsr_bloc last_bloc_read=$last_bloc\n";
- check_bloc();
- $last_bsr_bloc = $last_bloc=0;
+ if ($last_bsr_addr) {
+ $last_bsr_block = $last_bsr_addr & 0xFFFFFFFF;
+ }
+ print "$last_job\nlast_bsr_block=$last_bsr_block last_block_read=$last_block\n";
+ check_block();
+ $last_bsr_block = $last_block=0;
}
if (/dircmd.c.+(JobId=\d+ job=\S+) .+client_name=.+-fd/) {
}
$last_job=$1 if /dircmd.c.+(JobId=\d+ job=\S+)/;
-$last_bsr_bloc=$1 if /fd_cmds.c:.+VolBlock=\d+-(\d+)/;
-$last_bloc=$1 if /read_record.c.+file:block=\d+:(\d+)/;
+$last_bsr_addr=$1 if /fd_cmds.c:.+VolAddr=\d+-(\d+)/;
+$last_bsr_block=$1 if /fd_cmds.c:.+VolBlock=\d+-(\d+)/;
+$last_block=$1 if /read_record.c.+file:block=\d+:(\d+)/;
END {
print_stat();
}' working/*-sd.trace > tmp/result