Number of altered files:" >> ../../doc/build/cvsreport.html - cd ../..; cvs log -d ">`date --date='8 days ago' +\"%Y-%m-%d\"`" \ - loncom CAPA doc packaging 2>/dev/null | perl \ + cd ../..; cvs log \ + -d ">`date --date='$(TIMEAGO) days ago' +\"%Y-%m-%d\"`" \ + loncom CAPA doc 2>/dev/null | perl \ loncom/build/cvsfilter.pl | grep '^Working file:' | cut -b15- | \ wc -l >> doc/build/cvsreport.html # Listing of Altered Files echo "
Altered files:
" >> \ ../../doc/build/cvsreport.html - cd ../..; cvs log -d ">`date --date='8 days ago' +\"%Y-%m-%d\"`" \ - loncom CAPA doc packaging 2>/dev/null | \ + cd ../..; cvs log \ + -d ">`date --date='$(TIMEAGO) days ago' +\"%Y-%m-%d\"`" \ + loncom CAPA doc 2>/dev/null | \ perl loncom/build/cvsfilter.pl | grep '^Working file:' | cut -b15- \ >> doc/build/cvsreport.html - # Log entries for loncom - echo "
Log entries for loncom:
" >> \ - ../../doc/build/cvsreport.html - cd ../../loncom; cvs log -d ">`date --date='8 days ago' \ - +\"%Y-%m-%d\"`" . 2>/dev/null | perl ../loncom/build/cvsfilter.pl >> \ - ../doc/build/cvsreport.html - # Log entries for CAPA - echo "
Log entries for CAPA:
" >> \ - ../../doc/build/cvsreport.html - cd ../../CAPA; cvs log -d ">`date --date='8 days ago' \ - +\"%Y-%m-%d\"`" . 2>/dev/null | perl ../loncom/build/cvsfilter.pl >> \ - ../doc/build/cvsreport.html - # Log entries for doc - echo "
Log entries for doc:
" >> \ - ../../doc/build/cvsreport.html - cd ../../doc; cvs log -d ">`date --date='8 days ago' \ - +\"%Y-%m-%d\"`" . 2>/dev/null | perl ../loncom/build/cvsfilter.pl >> \ - ../doc/build/cvsreport.html - # Log entries for packaging - echo "
Log entries for packaging:
" >> \ - ../../doc/build/cvsreport.html - cd ../../packaging; cvs log -d ">`date --date='8 days ago' \ - +\"%Y-%m-%d\"`" . 2>/dev/null | perl ../loncom/build/cvsfilter.pl >> \ - ../doc/build/cvsreport.html - echo "" >> ../../doc/build/cvsreport.html + echo "" >> ../constructdoc/devhistory/cvsreport.html + make -f Makefile.cvs COMPONENT=loncom logentries + make -f Makefile.cvs COMPONENT=CAPA logentries + make -f Makefile.cvs COMPONENT=doc logentries + +logentries: + # Log entries for $(COMPONENT) + echo "
Log entries for $(COMPONENT):
" >>\ + ../constructdoc/devhistory/cvsreport.html + cd ../$(COMPONENT); cvs log -d ">`date --date='$(TIMEAGO) days ago' \ + +\"%Y-%m-%d\"`" . 2>/dev/null | perl ../build/cvsfilter.pl >> \ + ../constructdoc/devhistory/cvsreport.html + echo "" >> ../constructdoc/devhistory/cvsreport.html statpage: - install -d cvsstats + install -d $(STATSUBDIR) echo '
' - echo '
The general algorithm for counting lines of code (this excludes blank lines) is
cvs -q diff -D'start-date' -D'end-date' -b -B -N | egrep '^> .*[^ \t]' | sed 's/^> //g' | sort | uniq | wc -l" >> $(STATSUBDIR)/index.html + echo "
The general algorithm for counting the number of CVS repository commits (includes additions, deletions, and modifications) is:
cvs history -D'start-date' -a -xMAR | wc -l" >> $(STATSUBDIR)/index.html + echo "
Each listing contains two graphs. One graph relates to the entire LON-CAPA repository. The other graph relates solely to the *.pm files (perl modules including Apache handlers).
" >> $(STATSUBDIR)/index.html + echo '
' >> $(STATSUBDIR)/index.html
echo '
' >> $(STATSUBDIR)/index.html
+ echo '
' >> $(STATSUBDIR)/index.html
echo '
' >> $(STATSUBDIR)/index.html
+ echo '
' >> $(STATSUBDIR)/index.html
echo '
' >> $(STATSUBDIR)/index.html
+ echo '
' >> $(STATSUBDIR)/index.html
echo '
' >> $(STATSUBDIR)/index.html
echo '' >> $(STATSUBDIR)/index.html
@@ -107,7 +105,7 @@ for ($$y=$$by; $$y<=$$ey; $$y++) {\
}' 20000101 `date +"%Y%m%d"` |\
perl -nle '($$d1,$$d2)=split(/\t/);$$loc=`cvs -q diff -D$$d1 -D$$d2 -b -B -N | egrep \"^> .*[^ \t]\" | sed \"s/^> //g\" | sort | uniq | wc -l`;chomp $$loc;$$locsum+=$$loc;print "$$d2\t$$loc\t$$locsum";' > $(STATDIR)/table.txt
echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code\\nUnique changes per month"\nset output "cvsstats/loc.png"\nset term png color\nplot "cvsstats/table.txt" using 1:2 with lines' | gnuplot
- echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code\\nUnique changes per month"\nset output "cvsstats/locsum.png"\nset term png color\nplot "cvsstats/table.txt" using 1:3 with lines' | gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code\\nAggregate count; Unique changes per month"\nset output "cvsstats/locsum.png"\nset term png color\nplot "cvsstats/table.txt" using 1:3 with lines' | gnuplot
cd ../..; perl -e ' \
($$begindate,$$enddate)=@ARGV;\
($$by,$$bm,$$bd)=($$begindate=~/(\d{4,4})(\d{2,2})(\d{2,2})/);\
@@ -125,14 +123,45 @@ perl -e "\@flag=(1);while(<>){if (/RCS f
egrep \"^> .*[^ \t]\" | sed \"s/^> //g\" | sort | uniq | wc -l`;chomp $$loc;$$locsum+=$$loc;print "$$d2\t$$loc\t$$locsum";' > $(STATDIR)/tablepm.txt
# process counts, generate table
# pass table to gnuplot
- echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code\\nUnique changes per month"\nset output "cvsstats/locpm.png"\nset term png color\nplot "cvsstats/tablepm.txt" using 1:2 with lines' | gnuplot
- echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code\\nUnique changes per month"\nset output "cvsstats/locpmsum.png"\nset term png color\nplot "cvsstats/tablepm.txt" using 1:3 with lines' | gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code, perl modules\\nUnique changes per month"\nset output "cvsstats/locpm.png"\nset term png color\nplot "cvsstats/tablepm.txt" using 1:2 with lines' | gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "lines of code"\nset nokey\nset title "Lines of Code, perl modules\\nAggregate count; Unique changes per month"\nset output "cvsstats/locpmsum.png"\nset term png color\nplot "cvsstats/tablepm.txt" using 1:3 with lines' | gnuplot
cvscommit:
+ install -d cvsstats
# for all, and for .pm
# get date array
- # process counts, generate table
+ cd ../..; perl -e ' \
+($$begindate,$$enddate)=@ARGV;\
+($$by,$$bm,$$bd)=($$begindate=~/(\d{4,4})(\d{2,2})(\d{2,2})/);\
+($$ey,$$em,$$ed)=($$enddate=~/(\d{4,4})(\d{2,2})(\d{2,2})/);\
+for ($$y=$$by; $$y<=$$ey; $$y++) {\
+ if ($$y==$$by) {$$m=$$bm;} else {$$m=1;}\
+ if ($$y==$$ey) {$$m2=$$em;} else {$$m2=12;}\
+ for ($$m; $$m<=$$m2; $$m++) {\
+ printf("$$odate\t%4.4d%2.2d%2.2d\n",$$y,$$m,$$bd) if $$odate; \
+ $$odate=sprintf("%4.4d%2.2d%2.2d",$$y,$$m,$$bd);\
+ }\
+}' 20000101 `date +"%Y%m%d"` |\
+perl -nle '($$d1,$$d2)=split(/\t/);$$cmt1=`cvs history -D$$d1 -a -xMAR | wc -l`;chomp $$cmt1;$$cmt2=`cvs history -D$$d2 -a -xMAR | wc -l`;chomp $$cmt2;$$cmt=$$cmt1-$$cmt2;$$cmtsum+=$$cmt;print "$$d2\t$$cmt\t$$cmtsum";' > $(STATDIR)/ctable.txt
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "commits"\nset nokey\nset title "Commits\\n(Additions, Deletions, and Modifications)"\nset output "cvsstats/commit.png"\nset term png color\nplot "cvsstats/ctable.txt" using 1:2 with lines' | gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "commits"\nset nokey\nset title "Commits\\nAggregate count (Additions, Deletions, and Modifications"\nset output "cvsstats/commitsum.png"\nset term png color\nplot "cvsstats/ctable.txt" using 1:3 with lines' | gnuplot
+ cd ../..; perl -e ' \
+($$begindate,$$enddate)=@ARGV;\
+($$by,$$bm,$$bd)=($$begindate=~/(\d{4,4})(\d{2,2})(\d{2,2})/);\
+($$ey,$$em,$$ed)=($$enddate=~/(\d{4,4})(\d{2,2})(\d{2,2})/);\
+for ($$y=$$by; $$y<=$$ey; $$y++) {\
+ if ($$y==$$by) {$$m=$$bm;} else {$$m=1;}\
+ if ($$y==$$ey) {$$m2=$$em;} else {$$m2=12;}\
+ for ($$m; $$m<=$$m2; $$m++) {\
+ printf("$$odate\t%4.4d%2.2d%2.2d\n",$$y,$$m,$$bd) if $$odate; \
+ $$odate=sprintf("%4.4d%2.2d%2.2d",$$y,$$m,$$bd);\
+ }\
+}' 20000101 `date +"%Y%m%d"` |\
+perl -nle '($$d1,$$d2)=split(/\t/);$$cmt1=`cvs history -D$$d1 -a -xMAR | grep "\.pm[[:space:]]" | wc -l`;chomp $$cmt1;$$cmt2=`cvs history -D$$d2 -a -xMAR | grep "\.pm[[:space:]]" | wc -l`;chomp $$cmt2;$$cmt=$$cmt1-$$cmt2;$$cmtsum+=$$cmt;print "$$d2\t$$cmt\t$$cmtsum";' > $(STATDIR)/ctablepm.txt
+# process counts, generate table
# pass table to gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "commits"\nset nokey\nset title "Commits, perl modules\\n(Additions, Deletions, and Modifications)"\nset output "cvsstats/commitpm.png"\nset term png color\nplot "cvsstats/ctablepm.txt" using 1:2 with lines' | gnuplot
+ echo -e 'set xdata time\nset timefmt "%Y%m%d"\nset format x "%b %y"\nset xlabel "time"\nset ylabel "commits"\nset nokey\nset title "Commits, perl modules\\nAggregate count (Additions, Deletions, and Modifications)"\nset output "cvsstats/commitpmsum.png"\nset term png color\nplot "cvsstats/ctablepm.txt" using 1:3 with lines' | gnuplot
clean:
rm -Rf cvsstats