/[pxelator]/lib/PXElator/pxe.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/pxe.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 52 by dpavlin, Thu Jul 30 11:47:16 2009 UTC revision 60 by dpavlin, Thu Jul 30 15:23:29 2009 UTC
# Line 6  use autodie; Line 6  use autodie;
6    
7  use File::Slurp;  use File::Slurp;
8    
9  use server;  use httpd;
10  use tftpd;  use tftpd;
11    
12  our $file = 'gpxelinux.0';  our $file = 'gpxelinux.0';
# Line 14  my $path = "$tftpd::dir/$file"; Line 14  my $path = "$tftpd::dir/$file";
14  symlink '/usr/lib/syslinux/gpxelinux.0', $path unless -l $path;  symlink '/usr/lib/syslinux/gpxelinux.0', $path unless -l $path;
15  warn "file $path ", -s $path;  warn "file $path ", -s $path;
16    
17  my $url = "http://$server::ip/pxelator/";  my $url = $httpd::url;
18  $url = "tftp://$server::ip/"; # fallback to tftp  $url = "tftp://$server::ip/"; # fallback to tftp
19    $url = "http://$server::ip/pxelator/";
20    
21  my $squash = tftpd::path('debian-live/*squashfs');  my $squash = tftpd::path('debian-live/*squashfs');
22    
# Line 28  write_file $config, qq{ Line 29  write_file $config, qq{
29  default linux  default linux
30  label linux  label linux
31          kernel $url/debian-live/vmlinuz1          kernel $url/debian-live/vmlinuz1
32          append initrd=$url/debian-live/initrd1.img boot=live union=aufs noswap noprompt vga=normal fetch=http://$server::ip/pxelator/$squash          append initrd=$url/debian-live/initrd1.img boot=live union=aufs noswap noprompt vga=normal fetch=$url/$squash
33    
34  };  };
35    
Legend:
Removed from v.52  
changed lines
  Added in v.60
  ViewVC Help
Powered by ViewVC 1.1.26