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

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

revision 510 by dpavlin, Wed Jul 21 16:49:29 2010 UTC revision 563 by dpavlin, Tue Sep 6 18:31:44 2011 UTC
# Line 50  sub conf { Line 50  sub conf {
50          }          }
51    
52          my $path = ip_path $ip;          my $path = ip_path $ip;
53          mkdir $path unless -d $path;          mkdir $path unless -e $path;
54            warn "WARNING: $path not directory" unless -d $path;
55          $path .= '/' . $name;          $path .= '/' . $name;
56    
57          if ( defined $value ) {          if ( defined $value ) {
# Line 80  sub all_conf { Line 81  sub all_conf {
81          foreach my $file ( glob("$path/*"), glob("$path/*/*") ) {          foreach my $file ( glob("$path/*"), glob("$path/*/*") ) {
82                  my $name = $file;                  my $name = $file;
83                  $name =~ s{^$path/+}{} || die "can't remove $path from $name";                  $name =~ s{^$path/+}{} || die "can't remove $path from $name";
84                    next if -d $file;
85                  $conf->{ $name } =                  $conf->{ $name } =
86                          -l $file ? readlink  $file :                          -l $file ? readlink  $file :
87                          -f $file ? read_file $file :                          -f $file ? read_file $file :
# Line 180  sub all_ips { Line 182  sub all_ips {
182  sub remove {  sub remove {
183          my $ip = shift;          my $ip = shift;
184          if ( my $mac = mac_from_ip $ip ) {          if ( my $mac = mac_from_ip $ip ) {
185                  unlink "$server::conf/mac/$mac";                  unlink mac_path($mac);
186          }          }
187          rmtree "$server::conf/ip/$ip";          rmtree "$server::conf/ip/$ip";
188  }  }
Legend:
Removed from v.510  
changed lines
  Added in v.563
  ViewVC Help
Powered by ViewVC 1.1.26