/[pxelator]/lib/PXElator/config.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/config.pm

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

revision 513 by dpavlin, Wed Jul 21 17:56:42 2010 UTC revision 524 by dpavlin, Mon Sep 13 18:23:13 2010 UTC
# Line 17  our $mounted; Line 17  our $mounted;
17  our $server;  our $server;
18  our $server_ip;  our $server_ip;
19    
20  sub available { qw/katalog debian_live webconverger debirf tinycore nfsroot openvz printer wrt clonezilla ubuntu memdisk/ };  sub available { qw/katalog debian_live webconverger debirf tinycore nfsroot openvz printer wrt clonezilla ubuntu memdisk vyatta android/ };
21    
22  sub debian_live {  sub debian_live {
23          my ($ip) = @_;          my ($ip) = @_;
# Line 174  sub memdisk { Line 174  sub memdisk {
174                  $image = 'freedos.gz';                  $image = 'freedos.gz';
175                  upstream::mirror_file 'http://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/distributions/unofficial/balder/balder10.imz' => "$dir/$image";                  upstream::mirror_file 'http://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/distributions/unofficial/balder/balder10.imz' => "$dir/$image";
176                  warn "using $image [default FreeDOS]\n";                  warn "using $image [default FreeDOS]\n";
177                    symlink "$dir/$image", client::ip_path $ip . '/memdisk.image';
178          } else {          } else {
179                  $image =~ s{^.+/tftp/memdisk/}{} && warn "using $image\n";                  $image =~ s{^.+/tftp/memdisk/}{} && warn "using $image\n";
180          }          }
181    
182            if ( my $kvm = client::conf $ip => 'kvm' ) {
183                    client::conf $ip => 'kvm.bin', 'qemu-system-i386'; # FIXME kvm doesn't seem to work
184            }
185    
186          pxelinux::config_for_ip( $ip, qq{          pxelinux::config_for_ip( $ip, qq{
187    
188  default $image  default $image
# Line 187  label $image Line 192  label $image
192    
193          });          });
194  }  }
195    
196    sub vyatta {
197            my $ip = shift;
198            upstream::iso( 'http://www.vyatta.com/downloads/vc6.1/vyatta-livecd_VC6.1-2010.08.20_i386.iso' );
199    
200            my $dir = "$server::base_dir/tftp/vyatta";
201            symlink '/usr/lib/syslinux/memdisk', "$dir/memdisk" unless -e "$dir/memdisk";
202    
203            pxelinux::config_for_ip( $ip, qq{
204    
205    default vyatta
206    label vyatta
207    
208            kernel iso/live/vmlinuz1
209            append initrd=iso/live/initrd1.img boot=live nopersistent noautologin nonetworking nouser hostname=vyatta fetch=http://$server_ip:7777/vyatta/iso/live/filesystem.squashfs
210    
211            });
212    }
213    
214    sub android {
215            my $ip = shift;
216            my $path = upstream::iso( 'http://android-x86.googlecode.com/files/android-x86-1.6-r2.iso' );
217    
218            my $dir = "$server::base_dir/tftp/android";
219            symlink '/usr/lib/syslinux/memdisk', "$dir/memdisk" unless -e "$dir/memdisk";
220    
221            client::conf $ip => 'kvm.boot' => "n -cdrom $path";
222    
223            pxelinux::config_for_ip( $ip, qq{
224    
225    default android-1.6-donut
226    label android-1.6-donut
227    
228            kernel iso/kernel
229            append initrd=iso/initrd.img root=/dev/ram0 androidboot_hardware=eeepc acpi_sleep=s3_bios,s3_mode quiet SRC= DATA= SDCARD= vga=788 DEBUG=1
230    
231            });
232    }
233    
234  sub in_chroot {  sub in_chroot {
235          my ( $dir, $command ) = @_;          my ( $dir, $command ) = @_;
Legend:
Removed from v.513  
changed lines
  Added in v.524
  ViewVC Help
Powered by ViewVC 1.1.26