Categoría: Uncategorized

mkdir /tmp/ad0s1
mount_ext2fs /dev/ad0s1 /tmp/ad0s1
mkdir /tmp/ad0s1/boot/dragonfly
cp /boot/kernel /tmp/ad0s1/boot/dragonfly/
umount /tmp/ad0s1

# apt-get install grub2 grub-common grub-pc grub-splashimages
ii  grub-common                               1.96+20090603-1
GRand Unified Bootloader, version 2 (common files)
ii  grub-pc                                   1.96+20090603-1
GRand Unified Bootloader, version 2 (PC/BIOS version)
ii  grub-splashimages                         1.2.3
a collection of great GRUB splashimages
ii  grub2                                     1.96+20090603-1
GRand Unified Bootloader, version 2 (dummy package)
 Los scripts de actualización han detectado en /boot/grub una configuración
heredada de  una versión anterior de GRUB. 

 Para reemplazar la versión anterior de GRUB en su sistema, se recomienda
que se ajuste  /boot/grub/menu.lst para que cargue en cadena a partir de su
configuración  preexistente de GRUB. Este paso debería hacerse ahora de forma
automática.   

 Antes de instalar GRUB 2 directamente en el MBR («Master Boot Record») se
recomienda  que acepte cargarlo en cadena desde el menu.lst y que verifique que 
puede utilizar la  nueva configuración de GRUB 2. 

 En cualquier caso, cuando quiera que GRUB 2 se inicie directamente desde
el MBR, puede hacerlo usando (como root) la siguiente orden:
upgrade-from-grub-legacy

 ¿Desea realizar la carga en cadena desde menu.lst? 

cp /usr/lib/grub/i386-pc/*.mod /boot/grub

--- grub-install.old	2009-06-04 09:02:32.000000000 +0200
+++ grub-install	2009-06-11 15:51:43.000000000 +0200
@@ -254,7 +254,7 @@
 
 # The order in this list is critical.  Be careful when modifying it.
 if [ "${target_cpu}-${platform}" = "i386-pc" ] ; then
-    modules="$modules biosdisk"
+     modules="$modules ata"
 else
     modules="$modules ata"
 fi
@@ -267,7 +267,7 @@
     else
       install_drive="`$grub_probe --target=drive --device ${install_device}`"
     fi
-    grub_drive="`$grub_probe --target=drive --device ${grub_device}`"
+    grub_drive="`$grub_probe --target=drive --device ${grub_device}|sed -e 's/h
d/ata/'`"
 
     # Strip partition number
     install_drive="`echo ${install_drive} | sed -e s/,[0-9]*[a-z]*//g`"
@@ -291,7 +291,9 @@
         modules="$modules fs_uuid"
     fi
 else
-    prefix_drive=`$grub_probe --target=drive --device ${grub_device}`
+     uuid="`$grub_probe --target=fs_uuid --device ${grub_device}`"
+     prefix_drive="(UUID=${uuid})"
+     modules="$modules fs_uuid"
 fi
 
 relative_grubdir=`make_system_path_relative_to_its_root ${grubdir}` || exit 1


menuentry "DragonFlyBSD" {
    set root=(ata3)
    # chainloader +1 #No se usa. No hacemos chainload porque la BIOS no reconoce ese disco
    freebsd (ata0,1)/boot/dragonfly/kernel
    set FreeBSD.vfs.root.mountfrom=hammer:ad6s1a
}

grub-install --modules="date pc ata boot ls gpt raid ext2 ufs fat echo cpio gzio 
gfxterm video aout pcpart extcmd help reboot blocklist fs_uuid sh parttool linux 
fshelp dm_nv datehook jpeg test bsd cmp memdisk acpi elf affs xfs cpuid crc play 
mdraid sleep search chain lua memrw ata_pthru configfile linux16 raid5rec hello 
vga_text vbeinfo gptsync bufio hdparm bitmap terminfo hfs lsmmap png tar lspci 
tga scsi lvm raid iso9660 raid6rec udf vbe handler raid6rec halt read multiboot 
xnu normal loopback sfs jfs vbetest cat afs hexdump loadenv minicmd drivemap 
font vga" /dev/hda1
# echo Instalamos las librerias necesarias en Debian
# apt-get install mercurial libxt-dev libx11-dev x11proto-xext-dev libxext-dev
# cd /usr/local
# hg clone http://code.swtch.com/plan9port plan9 
# cd plan9
# ./INSTALL

    PLAN9=/usr/local/plan9 
    export PLAN9
    PATH=$PATH:$PLAN9/bin 
    export PATH
apt-get install perl-doc

cd /tmp
svn co https://svn.parrot.org/parrot/trunk parrot

cd parrot
perl Configure.pl && make

make html

./parrot examples/io/httpd.pir &

mozilla 127.0.0.1:1234

cd /tmp
git clone git://github.com/rakudo/rakudo.git
cd rakudo
perl Configure.pl --gen-parrot &&make

my %op_dispatch_table = {
        '+'    => { .push(.pop + .pop)  },
        '-'    => { .push(.pop R- .pop) },
        '*'    => { .push(.pop * .pop)  },
        '/'    => { .push(.pop R/ .pop) },
        'sqrt' => { .push(.pop.sqrt)    },
    };
sub evaluate (%odt, $expr) {
        my @stack;
        my @tokens = $expr.split(/\s+/);
        for @tokens {
                when /\d+/     { @stack.push($_); }
                when ?%odt{$_} { %odt{$_}(@stack); }
            default        { die "Unrecognized token '$_'; aborting"; }
        }
        @stack.pop;
    }

    say "Result: { evaluate(%op_dispatch_table, @*ARGS[0]) }";


./perl6 calc.p6 '5 6 +'

./perl6 --target=pir calc.p6 > calc.pir
./parrot/parrot -o  calc.pbc calc.pir
./parrot/pbc_to_exe calc.pbc

file calc
./calc '5 6 +'


Categoría: Uncategorized

MadHack2009

GNU emacs

Llamada a la participación en el hackmeeting 2009

Temas

Inciando…

HumanWare

Comunicación

NerdCore

Hardware y robótica

Cómo proponer un nodo

Otras formas de participación

Más información

Hackmeeting 2009

Temas

Inciando…

HumanWare

Comunicación

NerdCore

Hardware y robótica

Cómo proponer un nodo

Otras formas de participación

Más información

Aventuras con DragonFlyBSD y GRUB2

INTRODUCCIÓN

CONSIDERACIONES INICIALES

INSTALACIÓN DE DragonFlyBSD

INSTALACIÓN DE GRUB

INSTALANDO GRUB2 CON EL MÓDULO ATA

Instalar programas de plan9 en linux

Victoria parcial en el parlamente europeo: la lucha sigue

¿Que significa esto?

¿Que haremos ahora?

INTERNET NO SE TOCA, LOS CIUDADANOS EN PIE DE GUERRA A LO LARGO Y ANCHO DE LA COMUNIDAD EUROPEA

Creación de un servidor HTTP «personal» en Parrot

Creación de un ejecutable Perl6 con Rakudo (perl6 en Parrot)

Rakudo – Perl6 en Parrot

Creación de un ejecutable Perl6 con Rakudo (perl6 en Parrot)