Mailing List Archive

svn commit: r326316 - /spamassassin/trunk/build/automc/run_preflight
Author: jm
Date: Tue Oct 18 18:31:46 2005
New Revision: 326316

URL: http://svn.apache.org/viewcvs?rev=326316&view=rev
Log:
preflight mass-checks; implement runner script

Modified:
spamassassin/trunk/build/automc/run_preflight

Modified: spamassassin/trunk/build/automc/run_preflight
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/build/automc/run_preflight?rev=326316&r1=326315&r2=326316&view=diff
==============================================================================
--- spamassassin/trunk/build/automc/run_preflight (original)
+++ spamassassin/trunk/build/automc/run_preflight Tue Oct 18 18:31:46 2005
@@ -1,4 +1,39 @@
#!/usr/bin/perl -w

use strict;
+sub run;
+
+# build, as necessary
+
+run "make";
+
+chdir "masses" or die;
+
+my $slavename = "generic";
+
+my $pwd = `pwd`;
+$pwd =~ /slaves\/([-_A-Za-z0-9]+)\//; if ($1) { $slavename = $1; }
+
+my $targets = "/cor/$1/targets";
+warn "using corpus targets file: $targets\n";
+
+# this is run in a chroot jail, just in case there's hostile
+# rule code in there...
+
+run "/local/bbmasstools/masschroot ./mass-check ".
+ "--cache --progress -j=1 -f $targets";
+
+exit;
+
+
+sub run {
+ my ($cmd, $ignoreexit) = @_;
+
+ print "[$cmd]\n";
+ system ($cmd);
+
+ if (!$ignoreexit) {
+ die "command '$cmd' failed with status $?" if (($? >> 8) != 0);
+ }
+}