(file) Return to jsoc_sync.pl CVS log (file) (dir) Up to [Development] / JSOC / proj / util / scripts

File: [Development] / JSOC / proj / util / scripts / jsoc_sync.pl (download)
Revision: 1.2, Wed Aug 17 20:08:12 2011 UTC (12 years, 1 month ago) by arta
Branch: MAIN
CVS Tags: Ver_LATEST, Ver_9-5, Ver_9-41, Ver_9-4, Ver_9-3, Ver_9-2, Ver_9-1, Ver_9-0, Ver_8-8, Ver_8-7, Ver_8-6, Ver_8-5, Ver_8-4, Ver_8-3, Ver_8-2, Ver_8-12, Ver_8-11, Ver_8-10, Ver_8-1, Ver_8-0, Ver_7-1, Ver_7-0, Ver_6-4, Ver_6-3, Ver_6-2, Ver_6-1, Ver_6-0, HEAD
Changes since 1.1: +6 -3 lines
Fix for cvsupdate.log disappearing; also make these scripts use other update/checkout scripts in the same directory

#!/usr/bin/perl -w 

# script for synchronizing your CVS working directory with the CVS JSOC module (new tree)

# must run from root of JSOC tree (not necessarily from $JSOCROOT)

# run this on each machine to be used.
#    n02 - for linux_X86_64 machines
#    n00 - for linux4 machines such as n00, phil, etc.
#    n12 formerly used for AMD x86-64 can also be used instead of n02
#    lws Itaniam processors no longer supported for JSOC

# This just in:
#   The cvs update "-d" flag will cause files outside of the CVS module
#   originally checked out to be downloaded.  This is bad, because
#   if a user checks out DRMS, then does a 'cvs update -d .', the
#   user then has the JSOC-module files in their working directory.
#   BUT, as long as the "-d" flag is not used, cvs update respects
#   boundaries of the module originally checked out: so 'cvs checkout DRMS'
#   followed by 'cvs update DRMS' will not result in any new files being 
#   downloaded that are outside of the DRMS module.  But new files
#   within the DRMS module WILL be downloaded.
#   So, this script should use 'cvs update' not 'cvs checkout'.  checkout
#   doesn't know how to remove files from the working directory that
#   have been deleted from the repository.  Since this script uses
#   'cvs update', there is no need to look at the 'modulespec.txt' file.
#   This just in.  If a cvs user adds a new directory to the repository, 
#   then the only way to get that new directory is to use the "-d" flag.
#   But we can't use the "-d" flag because this causes files outside of the
#   CVS module to be downloaded.  To work around the preposterous lameness of CVS
#   first call cvs update (no "-d" flag), then call cvs checkout.  The first call
#   will add/remove/update all files that are already in the user's 
#   working directory.  The second call will add files WITHIN THE CORRECT CVS 
#   MODULE that the user doesn't have.

use FindBin qw($Bin);

$CVSLOG = "cvsupdate.log";

my($aidx) = 0;
my($rev) = "";

$err = 0;

while ($arg = shift(@ARGV))
    if ($arg eq "-R")
	$rev = "-r $LATESTREL";
    elsif (($pos = index($arg, "-l", 0)) == 0)
	$CVSLOG = substr($arg, 2);


# remove old log file
if (-e $CVSLOG)
    unlink $CVSLOG;

# call dlsource.pl (which lives in the same directory as this script).
`$Bin/dlsource.pl -o update -l $CVSLOG`;

if ($? >> 8)
   print STDERR "Unable to properly run $Bin/dlsource.pl\n";
   $err = 1;
   print "JSOC synchronization finished.\n";


Karen Tian
Powered by
ViewCVS 0.9.4