Diff for /loncom/build/install_web_site_cronjob between versions 1.5 and 1.10

version 1.5, 2003/02/01 18:22:34 version 1.10, 2012/01/28 22:46:26
Line 41  with perl. Line 41  with perl.
   
 =head1 AUTHOR  =head1 AUTHOR
   
 Scott Harrison 2002-07-19  
   
 =cut  =cut
   
Line 51  Scott Harrison 2002-07-19 Line 50  Scott Harrison 2002-07-19
 # the "make tardist" command.  But instead, unstable is now defined as  # the "make tardist" command.  But instead, unstable is now defined as
 # "all the gunk we have been working on", whereas the   # "all the gunk we have been working on", whereas the 
 # "make tardist" command means a "carefully inventoried selection of gunk".  # "make tardist" command means a "carefully inventoried selection of gunk".
 #`cd /home/loninst/auto; export CVS_PASSFILE=/home/loninst/.cvspass; export CVSROOT=:pserver:scott\@localhost:/home/cvs; rm -Rf loncapa/[C][^V]*; rm -Rf loncapa/[^C]*; cvs -Q co loncapa; cd loncapa/loncom/build; make build 2>/dev/null; make tardist;`;  #`cd /home/loninst/auto; export CVS_RSH=ssh; export CVSROOT=:ext:loninst\@source.lon-capa.org:/home/cvs; rm -Rf loncapa/[C][^V]*; rm -Rf loncapa/[^C]*; cvs -Q co loncapa; cd loncapa/loncom/build; make build 2>/dev/null; make tardist;`;
   
 # The real world.  Just give them all the gunk for the unstable distribution.  # The real world.  Just give them all the gunk for the unstable distribution.
 `cd /home/loninst/auto; export CVS_PASSFILE=/home/loninst/.cvspass; export CVSROOT=:pserver:scott\@localhost:/home/cvs; rm -Rf loncapa-unstable; rm -Rf loncapa; cvs -Q export -r HEAD loncapa;`;  `cd /home/loninst/auto; export CVS_RSH=ssh; export CVSROOT=:ext:loninst\@source.lon-capa.org:/home/cvs; rm -Rf loncapa-unstable; rm -Rf loncapa; cvs -Q export -r HEAD loncapa;`;
   
 # Generate a README file that advises them about dealing with the gunk.  # Generate a README file that advises them about dealing with the gunk.
 open(OUT,'>/home/loninst/auto/loncapa/README');  open(OUT,'>/home/loninst/auto/loncapa/README');
Line 93  http://mail.lon-capa.org/. Line 92  http://mail.lon-capa.org/.
 END  END
 close(OUT);  close(OUT);
   
   #'
 # Roll the directory together into the unstable tarball.  # Roll the directory together into the unstable tarball.
 `cd /home/loninst/auto; ln -s loncapa loncapa-unstable; tar cvvf loncapa-unstable.tar loncapa-unstable/* ;gzip -9 -f loncapa-unstable.tar`;  `cd /home/loninst/auto; ln -s loncapa loncapa-unstable; tar cvvf loncapa-unstable.tar loncapa-unstable/* ;gzip -9 -f loncapa-unstable.tar`;
   
 # ---------------------------------------- Dynamically generating documentation  # ---------------------------------------- Dynamically generating documentation
 `cd /home/loninst/auto/loncapa/loncom/build; make pdfdoc`;  
 `cd /home/loninst/auto/loncapa/loncom/build; make doc`;  system("rm /home/loninst/public_html/*html");
 `cd /home/loninst/auto/loncapa/loncom/build; cp docs.tar.gz /home/loninst/public_html/docs/.`;  
 `cd /home/loninst/public_html/docs; tar xzf docs.tar.gz`;  # pdf and doc targets are borken right now
   #`cd /home/loninst/auto/loncapa/loncom/build; make pdfdoc`;
   #`cd /home/loninst/auto/loncapa/loncom/build; make doc`;
   #`cd /home/loninst/auto/loncapa/loncom/build; cp docs.tar.gz /home/loninst/public_html/docs/.`;
   #`cd /home/loninst/public_html/docs; tar xzf docs.tar.gz`;
   
   `cd /home/loninst/auto/loncapa/loncom/build; make buildwebsite`;
   system("cp /home/loninst/auto/loncapa/doc/build/*.html /home/loninst/public_html/");
   
 # ------------------------------------ Copying over the latest unstable tarball  # ------------------------------------ Copying over the latest unstable tarball
 #my $filename=`cd /home/loninst/auto; find loncapa -type f -name *.tar.gz -maxdepth 1`;  #my $filename=`cd /home/loninst/auto; find loncapa -type f -name *.tar.gz -maxdepth 1`;
Line 120  my $releasedate = <IN>; Line 127  my $releasedate = <IN>;
 close(IN);  close(IN);
   
 # ------------------ Updating the download page with the date of the last build  # ------------------ Updating the download page with the date of the last build
 open(IN,"</home/loninst/public_html/docs/downloads/index.html");  open(IN,"</home/loninst/public_html/index.html");
 my @lines = <IN>;  my @lines = <IN>;
 close(IN);  close(IN);
 my $date = `date -I`; chomp($date);  my $date = `date -I`; chomp($date);
Line 128  my $text = join('',@lines); Line 135  my $text = join('',@lines);
 $text =~ s/loncapa-unstable\.tar\.gz\<\/a\>.*?\./loncapa-unstable\.tar\.gz\<\/a\> (generated $date)\./;  $text =~ s/loncapa-unstable\.tar\.gz\<\/a\>.*?\./loncapa-unstable\.tar\.gz\<\/a\> (generated $date)\./;
 $text =~ s/LATESTVERSION/$version/g;  $text =~ s/LATESTVERSION/$version/g;
 $text =~ s/LATESTDATE/$releasedate/g;  $text =~ s/LATESTDATE/$releasedate/g;
 open(OUT,">/home/loninst/public_html/docs/downloads/index.html");  open(OUT,">/home/loninst/public_html/index.html");
 print(OUT $text);  print(OUT $text);
 close(OUT);  close(OUT);
   
   #'
   # ---------------------------------------- Determine the latest testing version
   my $filename=`cd /home/loninst/public_html/versions; find . -type f -name LATEST-TESTING-IS-* -maxdepth 1`;
   chomp($filename);
   $filename =~ /LATEST-TESTING-IS-(.*)/;
   my $version = $1;
   open(IN,"</home/loninst/public_html/versions/$filename");
   my $releasedate = <IN>;
   close(IN);
   # -------------- Updating the download page with the date of the last build
   open(IN,"</home/loninst/public_html/index.html");
   my @lines = <IN>;
   close(IN);
   my $text = join('',@lines);
   if ($version) {
       $text =~ s/LATESTTESTINGVERSION/$version/g;
       $text =~ s/LATESTTESTINGDATE/$releasedate/g;
       $text =~ s/TESTINGRELEASE_START//g;
       $text =~ s/TESTINGRELEASE_END//g;
   } else {
       $text =~ s/TESTINGRELEASE_START.*TESTINGRELEASE_END//gs;
   }
   open(OUT,">/home/loninst/public_html/index.html");
   print(OUT $text);
   close(OUT);
   

Removed from v.1.5  
changed lines
  Added in v.1.10


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