[BACK]Return to parse.pl CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / build

Diff for /loncom/build/Attic/parse.pl between versions 1.34 and 1.40

version 1.34, 2001/04/13 17:09:09 version 1.40, 2001/05/21 21:56:35
Line 2 Line 2
   
 # Scott Harrison  # Scott Harrison
 # November 2000  # November 2000
 # ...   # 12/5/2000,12/7,12/8,12/9,12/10,12/11,12/12,12/13,12/14,12/21 Scott Harrison
 # 04/10/2001  # 1/8/2001,1/10/2001,1/13/2001,1/16/2001,1/18/2001,1/23/2001 Scott Harrison
   # 2/26/2001,2/27/2001,3/5/2001,4/10/2001,4/11,2001,4/13,2001 Scott Harrison
   # 4/17/2001 Scott Harrison
   
 # Read in loncapa tags and metagroup tags.  Output various  # Read in loncapa tags and metagroup tags.  Output various
 # useful files for viewing, compiling, monitoring, updating,  # useful files for viewing, compiling, monitoring, updating,
Line 181  www:!!:500:500:www:/home/www:/bin/bash Line 182  www:!!:500:500:www:/home/www:/bin/bash
 END  END
 close OUT;  close OUT;
     open OUT,">>setup_file_list.txt";      open OUT,">>setup_file_list.txt";
       print OUT "BinaryRoot/etc/group\n";
       close OUT;
       open OUT,">BinaryRoot/etc/group";
       print OUT<<END;
   root::0:root
   bin::1:root,bin,daemon
   daemon::2:root,bin,daemon
   sys::3:root,bin,adm
   adm::4:root,adm,daemon
   tty::5:
   disk::6:root
   lp::7:daemon,lp
   mem::8:
   kmem::9:
   wheel::10:root
   mail::12:mail
   news::13:news
   uucp::14:uucp
   man::15:
   games::20:
   gopher::30:
   dip::40:
   ftp::50:
   nobody::99:
   users::100:
   www::500:
   END
   close OUT;
       open OUT,">>setup_file_list.txt";
     print OUT "BinaryRoot/etc/hosts.deny\n";      print OUT "BinaryRoot/etc/hosts.deny\n";
     close OUT;      close OUT;
     open OUT,">BinaryRoot/etc/hosts.deny";      open OUT,">BinaryRoot/etc/hosts.deny";
Line 189  ALL: ALL Line 219  ALL: ALL
 END  END
 close OUT;  close OUT;
           
     `install -o 500 -g 500 -m 0700 -d BinaryRoot/home/www`;      `install -o www -g users -m 0700 -d BinaryRoot/home/www`;
     open OUT,">>setup_file_list.txt";      open OUT,">>setup_file_list.txt";
     print OUT "BinaryRoot/home/www\n";      print OUT "BinaryRoot/home/www\n";
     close OUT;      close OUT;
Line 603  sub make_files_build_segment { Line 633  sub make_files_build_segment {
  if ($build) {   if ($build) {
     my $dependencies=$info{'LOCATION'}{$distribution}{$filesfull[$i]}{'DEPENDENCIES'};      my $dependencies=$info{'LOCATION'}{$distribution}{$filesfull[$i]}{'DEPENDENCIES'};
     my $source2=$source;      my $source2=$source;
     $source2=~s/^[^\/]+\///;  #    $source2=~s/^[^\/]+\///;
      $source2="../" . $source2;       $source2="../../" . $source2;
     $sources.="$source2 ";      $sources.="$source2 ";
     my $directory=$build;      my $directory=$build;
     $directory=~s/^[^\/]+\///;  #    $directory=~s/^[^\/]+\///;
     $directory=~s/([^\/]+)$//;      $directory=~s/([^\/]+)$//;
      $directory="../" . $directory;       $directory="../../" . $directory;
     my $buildfile=$1;      my $buildfile=$1;
     my $sdir=$source;      my $sdir=$source;
     $sdir=~s/^[^\/]+\///;  #    $sdir=~s/^[^\/]+\///;
     $sdir=~s/([^\/]+)$//;      $sdir=~s/([^\/]+)$//;
      $sdir="../" . $sdir;       $sdir="../../" . $sdir;
     $dependencies=~s/\s+$//;      $dependencies=~s/\s+$//;
     my $depstat="";      my $depstat="";
     if ($dependencies=~s/\s+\[ALWAYS_RUN_BUILD_COMMAND\]//) {      if ($dependencies=~s/\s+\[ALWAYS_RUN_BUILD_COMMAND\]//) {
Line 702  END Line 732  END
  my $rot=$filesfull[$i];   my $rot=$filesfull[$i];
  $rot=~s/[^\/]+$/\./ if $rot=~/\*/;   $rot=~s/[^\/]+$/\./ if $rot=~/\*/;
  my ($owner,$group)=split(/\:/,$devchown);   my ($owner,$group)=split(/\:/,$devchown);
  if ($category ne 'conf') {   if ($category ne 'conf' && $category ne 'symbolic link') {
     $description.=<<END if $category ne 'symbolic link';      if ($source!~/\*/) {
 \ttest '-e \$(SOURCE)/$source' \&\& install -o $owner -g $group -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot || echo "**** LON-CAPA WARNING **** CVS source file does not exist: \$(SOURCE)/$source"   $description.=<<END;
   \ttest -e \$(SOURCE)/$source \&\& install -o $owner -g $group -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot || echo "**** LON-CAPA WARNING **** CVS source file does not exist: \$(SOURCE)/$source"
   END
                       }
       else {
    $description.=<<END;
   \tinstall -o $owner -g $group -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot
 END  END
       }
                 }                  }
     }      }
  }   }
Removed from v.1.34  
changed lines
  Added in v.1.40

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>