git.rot13.org Git - pxelator/blob - lib/PXElator/config.pm

   1 package config;
   2
   3 use warnings;
   4 use strict;
   5 use autodie;
   6
   7 use server;
   8 use pxelinux;
   9 use File::Slurp;
  10
  11 sub available { qw/debian_live webconverger debirf tinycore/ };
  12
  13 sub debian_live {
  14         $dhcpd::file = "pxelinux.0";
  15         $pxelinux::path_prefix = 'live-helper/tftpboot/';
  16         $pxelinux::config_file = 'pxelinux.cfg/default';
  17 }
  18
  19 use upstream;
  20
  21 =head1 webconverger
  22
  23 Webconverger - the opensource Web Kiosk
  24
  25 L<http://webconverger.org/>
  26
  27 =cut
  28
  29 sub webconverger {
  30         my ($ip) = @_;
  31
  32         upstream::iso( 'http://download.webconverger.com/webc-5.2.iso' );
  33
  34         my $homepage = server::shared( "$ip/homepage" ) || "http://${server::ip}:7777/client";
  35         my $hostname = server::shared( "$ip/hostname" ) || 'webconverger';
  36
  37         pxelinux::config_for_ip( $ip, qq{
  38
  39 default webconverger
  40 label webconverger
  41         kernel iso/live/vmlinuz-2.6.30-backports.1-486
  42         append initrd=iso/live/initrd.img-2.6.30-backports.1-486 fetch=http://172.16.10.1:7777/webconverger/iso/live/filesystem.squashfs boot=live quiet nosudo splash video=vesa:ywrap,mtrr vga=788 nopersistent username=webc hostname=$hostname union=aufs homepage=$homepage
  43
  44         });
  45
  46 }
  47
  48 =head1 debirf
  49
  50 debirf is a system that will create diskless, all-in-ram images (kernel and initramfs) that boot entirely into ram and leave the user in a fully functional Debian system.
  51
  52 L<http://cmrg.fifthhorseman.net/wiki/debirf>
  53
  54 =cut
  55
  56 sub debirf {
  57         my $ip = shift;
  58
  59         upstream::iso( 'http://cmrg.mayfirst.org/debirf/debirf-rescue_lenny_2.6.26-1-686.iso' );
  60
  61         pxelinux::config_for_ip( $ip, qq{
  62
  63 default linux
  64 label linux
  65         kernel iso/vmlinuz-2.6.26-1-686
  66         append initrd=iso//debirf-rescue_lenny_2.6.26-1-686.cgz
  67
  68         });
  69 }
  70
  71 sub tinycore {
  72         my $ip = shift;
  73         upstream::iso( 'http://distro.ibiblio.org/pub/linux/distributions/tinycorelinux/2.x/release/tinycore_2.2.iso' );
  74         pxelinux::config_for_ip( $ip, qq{
  75
  76 default linux
  77 label linux
  78         kernel iso/boot/bzImage
  79         append initrd=iso/boot/tinycore.gz
  80
  81         });
  82 }
  83
  84 sub for_ip {
  85         my $ip = shift;
  86         my $deploy = server::shared( "deploy/$ip" ) || 'webconverger';
  87         eval $deploy . '($ip)';
  88 #       $tftp::dir = "$server::base_dir/tftp/$pxelinux::path_prefix";
  89 }
  90
  91 warn 'loaded';
  92
  93 1;