/[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

Annotation of /lib/PXElator/config.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 129 - (hide annotations)
Mon Aug 3 20:53:46 2009 UTC (14 years, 7 months ago) by dpavlin
File size: 1040 byte(s)
split out pxelinux config in own package and implement webconverger

1 dpavlin 74 package config;
2    
3     use warnings;
4     use strict;
5    
6     use server;
7 dpavlin 129 use pxelinux;
8 dpavlin 74 use File::Slurp;
9    
10     sub shared {
11     my ($name, $value) = @_;
12    
13     my $path ="$server::base_dir/conf/$server::ip/$name";
14     if ( defined $value ) {
15     write_file $path, $value;
16     } else {
17     $value = read_file $path if -e $path;
18     }
19     return $value;
20     }
21    
22 dpavlin 129 sub debian_live {
23     $dhcpd::file = "pxelinux.0";
24     $pxelinux::path_prefix = 'live-helper/tftpboot/';
25     $pxelinux::config_file = 'pxelinux.cfg/default';
26     }
27    
28     sub webconverger {
29     $dhcpd::file = "pxelinux.0";
30     $pxelinux::path_prefix = 'webconverger/';
31     # $pxelinux::config_file = 'default';
32    
33     return; # FIXME
34    
35     my $cfg = "$tftp::dir/pxelinux.cfg";
36     return if -e $cfg;
37    
38     warn "using iso";
39     # system "mount -t 9660 | grep webc-5.2 || sudo mount /srv/pxelator/iso/webc-5.2.iso /srv/pxelator/tftp/webconverger/iso/ -o loop -t iso9660 -v";
40    
41     symlink "/usr/lib/syslinux/pxelinux.0", "$tftp::dir/$dhcpd::file";
42    
43     }
44    
45 dpavlin 110 sub for_ip {
46     my $ip = shift;
47 dpavlin 129 # debian_live();
48     webconverger();
49     # $tftp::dir = "$server::base_dir/tftp/$pxelinux::path_prefix";
50 dpavlin 110 }
51    
52 dpavlin 74 1;

  ViewVC Help
Powered by ViewVC 1.1.26