fix booting, added tftp transport for kernel and initrd
authorDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 29 Jul 2009 22:25:42 +0000 (22:25 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Wed, 29 Jul 2009 22:25:42 +0000 (22:25 +0000)
lib/PXElator/pxe.pm

index 4a7be53..b582c51 100644 (file)
@@ -2,6 +2,7 @@ package pxe;
 
 use warnings;
 use strict;
+use autodie;
 
 use File::Slurp;
 
@@ -13,18 +14,19 @@ my $path = "$tftpd::dir/$file";
 symlink '/usr/lib/syslinux/gpxelinux.0', $path unless -l $path;
 warn "file $path ", -s $path;
 
-my $url = "http://$server::ip/pxelator/debian-live/";
-my $squash = tftpd::path('debian-live/*squashfs');
+my $url = "http://$server::ip/pxelator/";
+$url = "tftp://$server::ip/"; # fallback to tftp
 
+my $squash = tftpd::path('debian-live/*squashfs');
 
-my $config = "$ftpd::dir/pxelinux.cfg/default";
+my $config = "$tftpd::dir/pxelinux.cfg/default";
 
 write_file $config, qq{
 
 default linux
 label linux
-       kernel $url/vmlinuz1
-       append initrd=$url/initrd1.img boot=live union=aufs noswap noprompt vga=normal fetch=$url/$squash
+       kernel $url/debian-live/vmlinuz1
+       append initrd=$url/debian-live/initrd1.img boot=live union=aufs noswap noprompt vga=normal fetch=http://$server::ip/pxelator/$squash
 
 };