svn commit: r345169 - in /spamassassin/trunk/build/automc: automc-by-mail buildbot_ready

[jm...@apache.org]

Author: jm
Date: Wed Nov 16 18:29:40 2005
New Revision: 345169

URL: http://svn.apache.org/viewcvs?rev=345169&view=rev
Log:
hook up more bits of mass-check-by-mail

Modified:
    spamassassin/trunk/build/automc/automc-by-mail
    spamassassin/trunk/build/automc/buildbot_ready

Modified: spamassassin/trunk/build/automc/automc-by-mail
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/build/automc/automc-by-mail?rev=345169&r1=345168&r2=345169&view=diff
==============================================================================
--- spamassassin/trunk/build/automc/automc-by-mail (original)
+++ spamassassin/trunk/build/automc/automc-by-mail Wed Nov 16 18:29:40 2005
@@ -59,6 +59,10 @@
   $from =~ s/\s*\(.*?\)\s*//;
 }
 
+# TODO: less stupid auth using SPF.  this doesn't really matter all that much,
+# however, since we lint any submitted rules before using them, which should
+# catch dangerous stuff, and that lint takes place in an unpriv chroot.
+#
 if ($from !~ $ALLOWED_MAIL_PEOPLE) {
   print "$from is not on the 'allowed' list, ignoring";
   goto done;
@@ -88,7 +92,7 @@
   }
 
   if (!$fname || $fname !~ /\.cf$/) {
-    warn "skipping part: filename isn't 'something.cf'";
+    warn "skipping part: filename doesn't end in '.cf'";
     next;
   }
 
@@ -104,9 +108,8 @@
     $url =~ s/__SLAVE__/$slave/gs;
     $url =~ s/__WHY__/mail/gs;
 
-    print "TODO: get $url\n";
-    # my $text = get($url);
-    # print $text;
+    print "invoking force-build: $url\n";
+    get($url);
   }
 }
 

Modified: spamassassin/trunk/build/automc/buildbot_ready
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/build/automc/buildbot_ready?rev=345169&r1=345168&r2=345169&view=diff
==============================================================================
--- spamassassin/trunk/build/automc/buildbot_ready (original)
+++ spamassassin/trunk/build/automc/buildbot_ready Wed Nov 16 18:29:40 2005
@@ -39,12 +39,14 @@
   # system ("svn info --non-interactive > masses/svninfo.tmp");
   system ("svn info > masses/svninfo.tmp < /dev/null");
 
+  # mass-check-by-mail support
+  #
   if (-f $BYMAILCF) {
-    print "\nFound recent rules-by-mail rules file:\n\n";
+    print "\nFound recent rules-by-mail rules file, will mass-check:\n\n";
     system ("cp $BYMAILCF masses/mailed.cf");
-    print ("-" x 75)."\n";
+    print "".("-" x 75)."\n";
     system ("cat masses/mailed.cf");
-    print ("-" x 75)."\n";
+    print "".("-" x 75)."\n";
   } else {
     unlink "masses/mailed.cf";
   }