ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/i-scream/misc/scripts/shell/cvslog.sh
Revision: 1.10
Committed: Sat Sep 27 17:21:31 2003 UTC (20 years, 8 months ago) by tdb
Content type: application/x-sh
Branch: MAIN
Changes since 1.9: +1 -1 lines
Log Message:
Update scripts that use cvs2cl. Now using cvs2cl 2.49, still with some
custom patches (but less than before). Diff included here.

--- cvs2cl.bak	Sat Sep 27 16:57:59 2003
+++ cvs2cl	Sat Sep 27 17:10:55 2003
@@ -1036,7 +1036,8 @@
           elsif ($No_Wrap && !$Summary)
           {
             $msg = &preprocess_msg_text ($msg);
-            $files = wrap ("\t", "\t", "* $files");
+# tdb: no-wrap shouldn't wrap ANYTHING!
+            #$files = wrap ("\t", "\t", "* $files");
             $msg =~ s/\n(.+)/\n\t$1/g;
             unless ($After_Header eq " ") {
               $msg =~ s/^(.+)/\t$1/g;
@@ -1328,7 +1329,8 @@
   # there are multiple qunks in the first place!
   if ((scalar (@qunkrefs)) > 1) {
     foreach my $tag (keys (%non_unanimous_tags)) {
-      my $everyone_has_this_tag = 1;
+# tdb: we don't want to have unanimous tags
+      my $everyone_has_this_tag = 0;
       foreach my $qunkref (@qunkrefs) {
         if ((! (defined ($$qunkref{'tags'})))
             or (! (grep ($_ eq $tag, @{$$qunkref{'tags'}})))) {
@@ -1521,7 +1523,8 @@

     unless ( exists $fileinfo_printed{$b} ) {
       if ($fbegun) {
-        $beauty .= ", ";
+# tdb: hacked to put a newline after each one
+        $beauty .= ",\n";
       } else {
         $fbegun = 1;
       }

File Contents

# Content
1 #!/bin/sh
2
3 #---------------------------------------------------------
4 # cvslog.sh
5 #
6 # Script to send daily cvslog e-mails.
7 # Written by Tim Bishop [tdb1@ukc.ac.uk] 26/01/2001
8 #
9 # Copyright i-Scream, 2000
10 # http://www.i-scream.org.uk
11 #---------------------------------------------------------
12
13 ## settings
14
15 # e-mail addresses
16 TOADDR="commits@i-scream.org.uk"
17 FROMADDR="commits@i-scream.org.uk"
18
19 # cvs path
20 CVS="/usr/bin/cvs"
21
22 # cvs repository
23 CVSROOT="/cvs/i-scream"
24
25 # temporary checkout directory (checked out modules already)
26 CHECKOUTDIR="/home/sites/www.i-scream.org.uk/cvsscripttemp"
27
28 # path to cvs2cl
29 CVS2CLPATH="/home/sites/www.i-scream.org.uk/bin/cvs2cl2.pl"
30
31 # command line args for cvs2cl
32 #CVS2CLARGS="-w -r -b -t -U ${CVSROOT}/CVSROOT/users -l \"-dyesterday<today\" -g \"-d${CVSROOT}\" -g \"-Q\""
33 CVS2CLARGS="--no-wrap --no-common-dir -w -r -t -S -U ${CVSROOT}/CVSROOT/users -l \"-dyesterday<today\" -g \"-d${CVSROOT}\" -g \"-Q\""
34
35 # cvs2cl command
36 CVS2CL="${CVS2CLPATH} ${CVS2CLARGS}"
37
38 # subject line
39 SUBJECT="i-scream daily commit logs - "
40
41 # full cvs update script
42 FULLCVSUPDATE="/home/sites/www.i-scream.org.uk/bin/fullcvsupdate.sh"
43
44 # path to sendmail
45 SENDMAIL="/usr/sbin/sendmail"
46
47 # cvslog webpage for this day :)
48 DATE=`/bin/date --date="1 day ago" "+%Y/%m/%d"`
49 CVSLOGURL="http://www.i-scream.org.uk/cgi-bin/cvslog.cgi?period=date&date=${DATE}&module="
50 CVSLOGLINE="This log is viewable online at ${CVSLOGURL}"
51
52 ## code
53
54 ${FULLCVSUPDATE} >/dev/null 2>&1
55
56 MODULES=`ls ${CVSROOT}`
57
58 cd ${CHECKOUTDIR}
59
60 for MODULE in ${MODULES}; do
61
62 ${CVS2CL} ${MODULE}
63 if test -r "ChangeLog"; then \
64 ( echo "To: ${TOADDR}"; echo "From: ${FROMADDR}"; \
65 echo "Subject: ${SUBJECT}${MODULE}"; echo ${CVSLOGLINE}${MODULE}; \
66 echo; echo; cat ChangeLog; \
67 echo "." ) | ${SENDMAIL} ${TOADDR}; \
68 rm -f ChangeLog
69 fi;
70
71 done