memdisk.image which can be specified as symlink into tftp dir

[pxelator] / lib / PXElator / config.pm

diff --git a/lib/PXElator/config.pm b/lib/PXElator/config.pm
index 21b1b4e..18969a5 100644 (file)
--- a/lib/PXElator/config.pm
+++ b/lib/PXElator/config.pm
@@ -17,7 +17,7 @@ our $mounted;
 our $server;
 our $server_ip;
 
-sub available { qw/katalog debian_live webconverger debirf tinycore nfsroot openvz printer wrt/ };
+sub available { qw/katalog debian_live webconverger debirf tinycore nfsroot openvz printer wrt clonezilla ubuntu freedos/ };
 
 sub debian_live {
        my ($ip) = @_;
@@ -127,6 +127,66 @@ label linux
        });
 }
 
+sub clonezilla {
+       my $ip = shift;
+       upstream::iso( 'http://sourceforge.net/projects/clonezilla/files/clonezilla_live_alternative_testing/clonezilla-live-20100503-lucid.iso/download' );
+       pxelinux::config_for_ip( $ip, qq{
+
+default linux
+label linux
+       kernel iso/live/vmlinuz
+       append initrd=iso/live/initrd.img boot=live union=aufs noswap noprompt vga=788 fetch=http://$server_ip:7777/clonezilla/iso/live/filesystem.squashfs
+
+       });
+}
+
+sub ubuntu {
+       my $ip = shift;
+       upstream::iso( 'http://mirrors.us.kernel.org/ubuntu-releases/lucid/ubuntu-10.04-desktop-i386.iso' );
+
+       my $export = "$server::base_dir/tftp/ubuntu/iso";
+       my $exported = `exportfs | grep $export`;
+       if ( $exported ne $export ) {
+               warn "exportfs $exported\n";
+               system "sudo exportfs -i -o rw,async,no_root_squash,no_subtree_check,fsid=999 $ip:$export";
+       }
+       pxelinux::config_for_ip( $ip, qq{
+
+default linux
+label linux
+       kernel iso/casper/vmlinuz
+       append initrd=iso/casper/initrd.lz boot=casper netboot=nfs nfsroot=$server_ip:$export --
+
+       });
+}
+
+sub freedos {
+       my $ip = shift;
+
+       my $dir = "$server::base_dir/tftp/freedos";
+       mkdir $dir unless -e $dir;
+
+       symlink '/usr/lib/syslinux/memdisk', "$dir/memdisk" unless -e "$dir/memdisk";
+
+       my $image = client::conf( $ip => 'memdisk.image' );
+
+       if ( ! $image ) {
+               $image = 'freedos.gz';
+               upstream::mirror_file 'http://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/distributions/unofficial/balder/balder10.imz' => "$dir/$image";
+       } else {
+               $image =~ s{^.+/tftp/freedos/}{} && warn "using $image\n";
+       }
+
+       pxelinux::config_for_ip( $ip, qq{
+
+default freedos
+label freedos
+       kernel memdisk
+       append initrd=$image
+
+       });
+}
+
 sub in_chroot {
        my ( $dir, $command ) = @_;
        write_file "$dir/tmp/inside.sh", $command;