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

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

revision 500 by dpavlin, Mon May 3 15:15:08 2010 UTC revision 523 by dpavlin, Mon Sep 13 18:23:02 2010 UTC
# Line 11  use once; Line 11  use once;
11    
12  sub mirror_file {  sub mirror_file {
13          my ( $url, $file ) = @_;          my ( $url, $file ) = @_;
14    
15            return unless once::first_time $file;
16    
17          warn "mirror_file $url -> $file\n";          warn "mirror_file $url -> $file\n";
18          mirror( $url, $file )          mirror( $url, $file )
19                  == RC_NOT_MODIFIED                  == RC_NOT_MODIFIED
# Line 35  sub iso { Line 38  sub iso {
38    
39          my $iso = "$dir/$file";          my $iso = "$dir/$file";
40    
41          mirror_file( $url, $iso ) if once::first_time $url;          mirror_file( $url, $iso );
42    
43          $file =~ s{\.iso$}{}i;          $file =~ s{\.iso$}{}i;
44          my $mnt = "$server::base_dir/tftp/$name";          my $mnt = "$server::base_dir/tftp/$name";
# Line 44  sub iso { Line 47  sub iso {
47          mkdir $mnt unless -d $mnt;          mkdir $mnt unless -d $mnt;
48    
49          system("mount -t iso9660 | grep $name/iso || sudo mount $iso $mnt -o loop -t iso9660 -v") == 0;          system("mount -t iso9660 | grep $name/iso || sudo mount $iso $mnt -o loop -t iso9660 -v") == 0;
50            return $iso;
51  }  }
52    
53  sub files {  sub files {
Legend:
Removed from v.500  
changed lines
  Added in v.523
  ViewVC Help
Powered by ViewVC 1.1.26