semi-working nfsroot configuration
authorDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 19 Aug 2009 17:01:57 +0000 (17:01 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 19 Aug 2009 17:01:57 +0000 (17:01 +0000)
lib/PXElator/config.pm
lib/PXElator/t/config.t

index 1183954..0baab18 100644 (file)
@@ -9,7 +9,7 @@ use pxelinux;
 use client;
 use File::Slurp;
 
-sub available { qw/debian_live webconverger debirf tinycore/ };
+sub available { qw/debian_live webconverger debirf tinycore nfsroot/ };
 
 sub debian_live {
        my ($ip) = @_;
@@ -98,6 +98,53 @@ label linux
        });
 }
 
+sub nfsroot {
+       my $ip = shift;
+
+       my $nfsroot = "$server::base_dir/tftp/nfsroot";
+
+       if ( ! -e $nfsroot ) {
+               system "apt-get install nfs-kernel-server debootstrap";
+       
+               if ( ! -e $nfsroot ) {
+                       mkdir $nfsroot;
+                       system "debootstrap --arch i386 lenny $nfsroot http://ftp.hr.debian.org/debian";
+               }
+
+               write_file "$nfsroot/tmp/configure.sh", qq{
+echo "do_initrd = Yes" > /etc/kernel-img.conf
+
+# apt-get install kernel-image-686
+apt-get install atl2-modules-2.6-686
+echo atl2 >> /etc/initramfs-tools/modules
+
+cat /etc/initramfs-tools/initramfs.conf | sed 's/BOOT=local/BOOT=nfs/' > /tmp/initramfs.conf \
+       && mv /tmp/initramfs.conf /etc/initramfs-tools/initramfs.conf
+
+update-initramfs -u -v
+
+};
+
+               system "chroot $nfsroot /tmp/configure.sh";
+
+               open(my $exports, '>>', '/etc/exports');
+               print $exports "$nfsroot\t$server::ip/$server::netmask(rw,async,no_root_squash,no_subtree_check)\n";
+               close($exports);
+
+               system "exportfs -rva";
+
+       }
+
+       pxelinux::config_for_ip( $ip, qq{
+
+default nfsroot
+label nfsroot
+       kernel vmlinuz
+       append initrd=initrd.img root=/dev/nfs nfsroot=$server::ip:$nfsroot ro ip=dhcp
+
+       });
+}
+
 sub for_ip {
        my $ip = shift;
        my $deploy = client::conf( $ip => 'deploy', default => 'webconverger' );
index 111f5e5..e6ca2fb 100755 (executable)
@@ -4,7 +4,7 @@ use warnings;
 use strict;
 use autodie;
 
-use Test::More tests => 3;
+use Test::More tests => 4;
 use Data::Dump qw/dump/;
 
 use_ok 'config';
@@ -18,7 +18,7 @@ sub test {
        return $config;
 }
 
-foreach my $name ( 'webconverger', 'debian_live' ) {
+foreach my $name ( 'webconverger', 'debian_live', 'nfsroot' ) {
        ok( my $config = test($name), $name );
        diag "config", $config;
 }