/[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 501 by dpavlin, Mon May 3 15:38:16 2010 UTC revision 511 by dpavlin, Wed Jul 21 16:50:27 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/ };  sub available { qw/katalog debian_live webconverger debirf tinycore nfsroot openvz printer wrt clonezilla ubuntu freedos/ };
21    
22  sub debian_live {  sub debian_live {
23          my ($ip) = @_;          my ($ip) = @_;
# Line 139  label linux Line 139  label linux
139    
140          });          });
141  }  }
142    
143    sub ubuntu {
144            my $ip = shift;
145            upstream::iso( 'http://mirrors.us.kernel.org/ubuntu-releases/lucid/ubuntu-10.04-desktop-i386.iso' );
146    
147            my $export = "$server::base_dir/tftp/ubuntu/iso";
148            my $exported = `exportfs | grep $export`;
149            if ( $exported ne $export ) {
150                    warn "exportfs $exported\n";
151                    system "sudo exportfs -i -o rw,async,no_root_squash,no_subtree_check,fsid=999 $ip:$export";
152            }
153            pxelinux::config_for_ip( $ip, qq{
154    
155    default linux
156    label linux
157            kernel iso/casper/vmlinuz
158            append initrd=iso/casper/initrd.lz boot=casper netboot=nfs nfsroot=$server_ip:$export --
159    
160            });
161    }
162    
163    sub freedos {
164            my $ip = shift;
165    
166            my $dir = "$server::base_dir/tftp/freedos";
167            mkdir $dir unless -e $dir;
168    
169            symlink '/usr/lib/syslinux/memdisk', "$dir/memdisk" unless -e "$dir/memdisk";
170    
171            my $image = client::conf( $ip => 'memdisk.image' );
172    
173            if ( ! $image ) {
174                    $image = 'freedos.gz';
175                    upstream::mirror_file 'http://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/distributions/unofficial/balder/balder10.imz' => "$dir/$image";
176            } else {
177                    $image =~ s{^.+/tftp/freedos/}{} && warn "using $image\n";
178            }
179    
180            pxelinux::config_for_ip( $ip, qq{
181    
182    default freedos
183    label freedos
184            kernel memdisk
185            append initrd=$image
186    
187            });
188    }
189    
190  sub in_chroot {  sub in_chroot {
191          my ( $dir, $command ) = @_;          my ( $dir, $command ) = @_;
192          write_file "$dir/tmp/inside.sh", $command;          write_file "$dir/tmp/inside.sh", $command;
Legend:
Removed from v.501  
changed lines
  Added in v.511
  ViewVC Help
Powered by ViewVC 1.1.26