summaryrefslogtreecommitdiff
path: root/data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl
diff options
context:
space:
mode:
authorMCApollo <34170230+MCApollo@users.noreply.github.com>2019-04-29 17:53:00 +0000
committerMCApollo <34170230+MCApollo@users.noreply.github.com>2019-04-29 17:53:00 +0000
commit59f5fd20e2f59ae186d5a461aef7782dd55e4e7b (patch)
tree10475faf0b6dcb812b64da679f4ae8ff01c45874 /data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl
parentf06e297cd175cca39745f6d1970225ae88aa68f1 (diff)
Updated lighttpd.
Diffstat (limited to 'data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl')
-rwxr-xr-xdata/lighttpd/lighttpd-1.4.53/tests/run-tests.pl20
1 files changed, 20 insertions, 0 deletions
diff --git a/data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl b/data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl
new file mode 100755
index 000000000..6136eac5b
--- /dev/null
+++ b/data/lighttpd/lighttpd-1.4.53/tests/run-tests.pl
@@ -0,0 +1,20 @@
+#! /usr/bin/env perl
+
+use strict;
+
+use Test::Harness qw(&runtests $verbose);
+$verbose = (defined $ENV{'VERBOSE'} ? $ENV{'VERBOSE'} : 0);
+my $tests = (defined $ENV{'RUNTESTS'} ? $ENV{'RUNTESTS'} : '');
+
+my $srcdir = (defined $ENV{'srcdir'} ? $ENV{'srcdir'} : '.');
+
+opendir DIR, $srcdir;
+my (@fs, $f);
+while ($f = readdir(DIR)) {
+ if ($f =~ /^(.*)\.t$/) {
+ next if ($tests ne '' and $tests !~ /(^|\s+)$1(\s+|$)/);
+ push @fs, $srcdir.'/'.$f;
+ }
+}
+closedir DIR;
+runtests (sort @fs);