summaryrefslogtreecommitdiff
path: root/isohybrid-acritox
diff options
context:
space:
mode:
Diffstat (limited to 'isohybrid-acritox')
-rwxr-xr-xisohybrid-acritox9
1 files changed, 7 insertions, 2 deletions
diff --git a/isohybrid-acritox b/isohybrid-acritox
index 42abe6c..23f53ee 100755
--- a/isohybrid-acritox
+++ b/isohybrid-acritox
@@ -465,8 +465,13 @@ do
$bytes = unpack("C", $bytes) - 1;
printf("SUSP Entry - %u bytes (0x%X)\n", $bytes+1, $bytes+1) if($debug);
} while $bytes > 0;
- $sector_blk++;
- seek(FIMG, $iso_pos+$first_sector_blk*$bs+$sector_blk*$bs, SEEK_SET) or die "$0: $file: $!\n";
+ do {
+ $sector_blk++;
+ seek(FIMG, $iso_pos+$first_sector_blk*$bs+$sector_blk*$bs, SEEK_SET) or die "$0: $file: $!\n";
+ read(FIMG, $sua_head, 4) > 0 or break;
+ seek(FIMG, tell(FIMG)-4, SEEK_SET) or die "$0: $file: $!\n";
+ ($sig, $len, $version) = unpack("a[2]CC", $sua_head);
+ } while($sig eq "ER"); # skip ER(Extensions Reference)-SUA, xorriso intersperses this somehow
printf("\ndirectory entry at 0x%X:\n", tell(FIMG)) if($debug);
read(FIMG, $bytes, 1) > 0 or break;
$bytes = unpack("C", $bytes) - 1;