Crear CD bootable .dmg

Imagen de brama
0 puntos

Buenas a todos.

 

Estoy buscando un programa que me permita grabar desde kubuntu una imagen dmg.

He probado instalando AcetoneISO2 para pasala a ISO, pero luego el K3b no me lo reconoce. ¿Alguna sugerencia?

 

Graciassss.

Imagen de Gabriel_M
+1
0
-1

Hola bra....:

Copia el siguiente script, que no me pertenece, en un archivo de texto con el editor que uses, guardalo con el nombre dmg2iso.pl

dale permisos con la orden:

sudo chmod 755 dmg2iso.pl

ejecutalo con la orden

./dmg2iso.pl filename.dmg filename.iso

para convertir el .dmg a .iso

---------------------comienzo-----------------------------------------------------
#!/usr/local/bin/perl
#
# dmg2iso - dmg to iso convert tool
# Copyright (C) 2004 vu1tur
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
#
# Changes:
#
# Tue Apr 26 15:49:53 EDT 2005 Jeff Mahoney
# * read/writes now do so in 4k blocks rather than allocate
# huge chunks of memory
use MIME::Base64;
use strict ;
local ($^W) = 1; #use warnings ;
use Compress::Zlib ;
my $x = inflateInit()
or die "ERROR: Cannot create inflation stream. Is Compress::zlib installed?\n" ;
my $zfblock="\x00"; for (0..8) { $zfblock.=$zfblock; }
my $indxbeg=0;
my $indxend=0;
my $blocksz = 4096;
my @plist;
print "dmg2iso v0.2a by vu1tur (vu1tur.eu.org)\n\n";
if (@ARGV."" != 2) { die "Syntax: dmg2iso.pl filename.dmg filename.iso\n"; }
my $zeroblock = "\x00";
for (0..8) { $zeroblock.=$zeroblock; }
my $tmp;
my ($output,$status);
my $buffer;
open(FINPUT,$ARGV[0]) or die "ERROR: Can't open input file\n";
binmode FINPUT;
sysseek(FINPUT,-0x200000,2);
print "reading property list...";
my $fpos = sysseek(FINPUT,0,1);
while(my $ar = sysread(FINPUT,$buffer,0x10000))
{
my $fpos = sysseek(FINPUT,0,1)-$ar;
if ($buffer =~ /(.*)/s)
{
$indxbeg = $fpos+length($1);
}
if ($buffer =~ /(.*)<\/plist>/s)
{
$indxend = $fpos+length($1)+8;
}
}
open(FOUTPUT,">".$ARGV[1]) or die "ERROR: Can't open output file\n";
binmode FOUTPUT;
my $indxcur = $indxbeg + 0x28;
sysseek(FINPUT,$indxbeg,0);
sysread(FINPUT,$tmp,$indxend-$indxbeg);
if ($tmp =~ s/.*blkx<\/key>.*?\s*(.*?)<\/array>.*/$1/s)
{
while ($tmp =~ s/.*?(.*?)<\/data>//s)
{
my $t = $1;
$t =~ s/\t//g;
$t =~ s/^\n//g;
push @plist,decode_base64($t);
}
} else {
die "PropertyList is corrupted\n";
}
print "found ".@plist." partitions\n";
print "decompressing:\n";
my $t=0;
my $zoffs = 0;
my $tempzoffs = 0;
foreach (@plist)
{
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);
if ($block_type =~ /^80000005/ or $block_type =~ /^00000001/)
{
do {
my ($toread, $res);
$toread = $blocksz;
$toread = $in_size if ($in_size < $blocksz);
$res = sysread (FINPUT, $tmp, $toread);
die "read failure" if ($res != $toread);
$output = $tmp;
# If compressed, inflate it
if ($block_type =~ /^80000005/) {
($output,$status) = $x->inflate($tmp);
die "\nConversion failed.File may be corrupted.\n"
if (!($status == Z_OK or $status == Z_STREAM_END));
}
print FOUTPUT $output;
$in_size -= $toread;
} while ($in_size > 0);
}
if ($block_type =~ /^00000002/)
{
for(1..$out_size/0x200)
{
syswrite(FOUTPUT,$zeroblock,0x200);
}
}
if ($block_type =~ /^FFFFFFFF/i)
{
$zoffs += $tempzoffs;
}
$tempzoffs = $in_offs+$in_size;
}
}
print "\nconversion successful\n";
---------------------fin----------------------------------------------------------

Los iconos de caritas azules son ochos,

Saludos.

+1
0
-1
Imagen de mrss
+1
-1
-1

Dios por que razon sera que ubuntu para poner un programa tiene uno q usar comandos mediante terminal ,,,,:/
pana gabriel !!!1

+1
-1
-1

MRSS

Imagen de olimiesma
+1
0
-1

Con Linux al final quieras o no vas a morir a Consola y Editor de textos.

Prueba en Windows a abrir un .exe o un archivo .dll con el editor de textos; esa es la ventaja que tenemos con Linux, no tenemos la necesidad de tener que mandar el equipo completo al taller por que una aplicación no funcione correctamente, al final siempre hay una solución para todo, para eso existen las comunidades ;-D

Recibe un cordial saludo y feliz año nuevo

+1
0
-1

Si lo que vas a decir no es más hermoso que el silencio, mejor permanece callado.

Imagen de Jose Luis 1320
+1
0
-1

Estas usando un sistema operativo de verdad.

hay veces que es mucho más rápido teclear las órdenes directas en la consola y tienes un mayor control de lo que haces que haciendo todo con botones y arcoiris.

+1
0
-1

"Yo sólo se que no se nada"
-Sócrates, filósofo griego.
-Normas del foro