58 lines
1.3 KiB
Perl
58 lines
1.3 KiB
Perl
use ExtUtils::MakeMaker;
|
|
|
|
use 5.005;
|
|
|
|
use lib qw(Apache-Test/lib);
|
|
|
|
use Apache::Test5005compat;
|
|
|
|
use Apache::TestMM qw(test clean);
|
|
use Apache::TestReport ();
|
|
use Apache::TestSmoke ();
|
|
use Apache::TestRun ();
|
|
|
|
use File::Find qw(finddepth);
|
|
|
|
my @scripts = ();
|
|
|
|
finddepth(sub {
|
|
return unless /^(?!.#)(.*?\.pl)\.PL$/;
|
|
push @scripts, "$File::Find::dir/$1";
|
|
}, '.');
|
|
|
|
Apache::TestMM::filter_args();
|
|
|
|
# Temporary workaround to allow passing
|
|
# arguments to "perl Makefile.PL"
|
|
# that should go to t/TEST but are not yet
|
|
# supported in an Apache::Test release.
|
|
# Code borrowed from Apache::TestMM::filter_args().
|
|
my %local_args = (
|
|
limitrequestline => 'Value for LimitRequestLine',
|
|
limitrequestlinex2 => 'Twice the value for LimitRequestLine',
|
|
);
|
|
my($argv, $args_vars) = Apache::TestConfig::filter_args(\@ARGV, \%local_args);
|
|
@ARGV = @$argv;
|
|
# Merge given vars with default values
|
|
my %local_vars = (
|
|
limitrequestline => '128',
|
|
limitrequestlinex2 => '256',
|
|
);
|
|
map {$local_vars{$_} = $args_vars->{$_}} keys %$args_vars;
|
|
|
|
push(@Apache::TestMM::Argv, %local_vars);
|
|
|
|
for my $script (@scripts) {
|
|
Apache::TestMM::generate_script($script);
|
|
}
|
|
|
|
for my $util (qw(Report Smoke Run)) {
|
|
my $class = "Apache::Test${util}";
|
|
$class->generate_script;
|
|
}
|
|
|
|
WriteMakefile(
|
|
NAME => 'httpd-test',
|
|
VERSION => '0.01',
|
|
clean => { FILES => "@scripts" },
|
|
);
|