dmg2iso > script perl foireux : besoin d'aide - Linux et OS Alternatifs
Marsh Posté le 30-04-2005 à 21:16:27
J'essaye de convertir une image cd au format mac (:fou en iso. Il y'a un script perl cité un peu partout sur le net mais chez moi il plante :
gandalf@Hellscream:/mp3$ dmg2iso.pl tiger-xiso.dmg tiger-xiso.iso dmg2iso v0.2a by vu1tur (vu1tur@gmx.de) reading property list...found 1 partitions decompressing: partition 0 Negative length at /usr/local/bin/dmg2iso.pl line 76.
La partie du script incriminée :
print "partition ".$t++."\n"; s/^.{204}//s; while (s/^(.{8})(.{8})(.{8})(.{8})(.{8})//s) { $x = inflateInit(); my $block_type = unpack("H*",$1); my $out_offs = 0x200*hex(unpack("H*",$2)); my $out_size = 0x200*hex(unpack("H*",$3)); my $in_offs = hex(unpack("H*",$4)); my $in_size = hex(unpack("H*",$5)); # $1 - block type, $2 - output offs $3 - output size $4 input offset $5 - input size sysseek(FINPUT,$in_offs+$zoffs,0); sysread(FINPUT,$tmp,$in_size);
La ligne 76 c'est la "sysread(FINPUT,$tmp,$in_size);". Merci d'avance
Make sure you enter the(*)required information where indicate.HTML code is not allowed
Marsh Posté le 30-04-2005 à 21:16:27
J'essaye de convertir une image cd au format mac (:fou en iso.
Il y'a un script perl cité un peu partout sur le net mais chez moi il plante :
gandalf@Hellscream:/mp3$ dmg2iso.pl tiger-xiso.dmg tiger-xiso.iso
dmg2iso v0.2a by vu1tur (vu1tur@gmx.de)
reading property list...found 1 partitions
decompressing:
partition 0
Negative length at /usr/local/bin/dmg2iso.pl line 76.
La partie du script incriminée :
print "partition ".$t++."\n";
s/^.{204}//s;
while (s/^(.{8})(.{8})(.{8})(.{8})(.{8})//s)
{
$x = inflateInit();
my $block_type = unpack("H*",$1);
my $out_offs = 0x200*hex(unpack("H*",$2));
my $out_size = 0x200*hex(unpack("H*",$3));
my $in_offs = hex(unpack("H*",$4));
my $in_size = hex(unpack("H*",$5));
# $1 - block type, $2 - output offs $3 - output size $4 input offset $5 - input size
sysseek(FINPUT,$in_offs+$zoffs,0);
sysread(FINPUT,$tmp,$in_size);
La ligne 76 c'est la "sysread(FINPUT,$tmp,$in_size);".
Merci d'avance
Message édité par M300A le 30-04-2005 à 21:26:24
---------------
:wq