--- lib/PXElator/config.pm 2009/08/04 15:25:09 138 +++ lib/PXElator/config.pm 2009/08/05 23:53:24 154 @@ -8,6 +8,8 @@ use pxelinux; use File::Slurp; +sub available { qw/debian_live webconverger debirf tinycore/ }; + sub debian_live { $dhcpd::file = "pxelinux.0"; $pxelinux::path_prefix = 'live-helper/tftpboot/'; @@ -16,26 +18,73 @@ use upstream; +=head1 webconverger + +Webconverger - the opensource Web Kiosk + +L + +=cut + sub webconverger { - my $ip = shift; + my ($ip) = @_; upstream::iso( 'http://download.webconverger.com/webc-5.2.iso' ); + my $homepage = server::shared( "$ip/homepage" ) || "http://${server::ip}:7777/client"; + my $hostname = server::shared( "$ip/hostname" ) || 'webconverger'; + pxelinux::config_for_ip( $ip, qq{ default webconverger label webconverger kernel iso/live/vmlinuz-2.6.30-backports.1-486 - append initrd=iso/live/initrd.img-2.6.30-backports.1-486 fetch=http://172.16.10.1/pxelator/webconverger/iso/live/filesystem.squashfs boot=live quiet homepage=http://172.16.10.1:7777/ nonetworking nosudo splash video=vesa:ywrap,mtrr vga=788 nopersistent username=webc hostname=webconverger union=aufs + 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 }); } +=head1 debirf + +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. + +L + +=cut + +sub debirf { + my $ip = shift; + + upstream::iso( 'http://cmrg.mayfirst.org/debirf/debirf-rescue_lenny_2.6.26-1-686.iso' ); + + pxelinux::config_for_ip( $ip, qq{ + +default linux +label linux + kernel iso/vmlinuz-2.6.26-1-686 + append initrd=iso//debirf-rescue_lenny_2.6.26-1-686.cgz + + }); +} + +sub tinycore { + my $ip = shift; + upstream::iso( 'http://distro.ibiblio.org/pub/linux/distributions/tinycorelinux/2.x/release/tinycore_2.2.iso' ); + pxelinux::config_for_ip( $ip, qq{ + +default linux +label linux + kernel iso/boot/bzImage + append initrd=iso/boot/tinycore.gz + + }); +} + sub for_ip { my $ip = shift; -# debian_live(); - webconverger($ip); + my $deploy = server::shared( "deploy/$ip" ) || 'webconverger'; + eval $deploy . '($ip)'; # $tftp::dir = "$server::base_dir/tftp/$pxelinux::path_prefix"; }