--- loncom/build/Attic/parse.pl 2001/02/26 21:21:47 1.28 +++ loncom/build/Attic/parse.pl 2001/04/17 14:09:51 1.36 @@ -2,8 +2,19 @@ # Scott Harrison # November 2000 - -# Read in loncapa tags and metagroup tags +# 12/5/2000,12/7,12/8,12/9,12/10,12/11,12/12,12/13,12/14,12/21 Scott Harrison +# 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 +# useful files for viewing, compiling, monitoring, updating, +# and installing. + +# This code works well. HOWEVER, I was in a rush when I +# wrote it. Future plans are that the parsing should be +# much more event-state based and the input should be +# more XML-ish. -Scott # ---------------------------------------------- Read in command line arguments my ($file,$mode)=@ARGV; @@ -568,7 +579,9 @@ sub make_files_build_segment { my $description; my @allfiles=keys %{$info{'LOCATION'}{$distribution}}; my $tab="\t"; - my $sources="all: "; + my $sources="# Dynamic Makefile generated by LON-CAPA build process\n\n"; + $sources.="SHELL=\"/bin/sh\"\n\n"; + $sources.="\nall: "; foreach my $d (@$dirs) { # set other values my $dirdescription=$info{'DIRECTORY'}{$distribution}{$d}{'DESCRIPTION'}; @@ -609,9 +622,25 @@ sub make_files_build_segment { $depstat=" alwaysrun"; } $dependencies=~s/\s+/ $sdir/gs; + my @deps=split(/\s+/,$dependencies); + shift @deps; + my $testing=</dev/null; install -o $owner -g $group -m $devchmod \$(SOURCE)/$source \$(TARGET)/$rot END } } @@ -1392,7 +1428,7 @@ END chop $checksum_source; $checksum_target=`md5sum /$filesfull[$i] | cut -d ' ' -f1`; chop $checksum_target; - warn ("CS: $checksum_source, CT: $checksum_target\n"); +# warn ("CS: $checksum_source, CT: $checksum_target\n"); unless ($checksum_source eq $checksum_target) { $checksum="
CHECKSUM DIFFERENCE"; }