Gecko [ v3.cesa.co.za ]

Name	Size	Permission	Date
BuildMM.pm	12.6 KB	-rw-r--r--	2022-10-20 09:29
BuildOptions.pm	8.18 KB	-rw-r--r--	2022-01-30 13:02
CScan.pm	33.72 KB	-rw-r--r--	2022-01-30 13:02
Code.pm	31.74 KB	-rw-r--r--	2022-01-30 13:02
Config.pm	2.62 KB	-rw-r--r--	2022-01-30 13:02
Const.pm	3.15 KB	-rw-r--r--	2022-10-20 09:29
FunctionMap.pm	5.6 KB	-rw-r--r--	2022-01-30 13:02
Global.pm	3.57 KB	-rw-r--r--	2022-10-20 09:29
InterpPool.pm	545 B	-rw-r--r--	2022-10-20 09:29
Interpreter.pm	546 B	-rw-r--r--	2022-10-20 09:29
MM.pm	9.58 KB	-rw-r--r--	2022-10-20 09:29
Manifest.pm	3.32 KB	-rw-r--r--	2022-01-30 13:02
MapUtil.pm	6.98 KB	-rw-r--r--	2022-01-30 13:02
MethodLookup.pm	97.39 KB	-rw-r--r--	2022-10-20 09:29
ParseSource.pm	2.05 KB	-rw-r--r--	2022-01-30 13:02
PerlRun.pm	4.54 KB	-rw-r--r--	2022-10-20 09:29
PerlRunPrefork.pm	1.37 KB	-rw-r--r--	2022-10-20 09:29
Registry.pm	8.78 KB	-rw-r--r--	2022-10-20 09:29
RegistryBB.pm	2.36 KB	-rw-r--r--	2022-10-20 09:29
RegistryCooker.pm	29.7 KB	-rw-r--r--	2022-10-20 09:29
RegistryLoader.pm	10.7 KB	-rw-r--r--	2022-10-20 09:29
RegistryPrefork.pm	1.37 KB	-rw-r--r--	2022-10-20 09:29
StructureMap.pm	4.16 KB	-rw-r--r--	2022-01-30 13:02
TestReport.pm	2.99 KB	-rw-r--r--	2022-10-20 09:29
TestRun.pm	2.34 KB	-rw-r--r--	2022-01-30 13:02
TiPool.pm	541 B	-rw-r--r--	2022-10-20 09:29
TiPoolConfig.pm	547 B	-rw-r--r--	2022-10-20 09:29
TypeMap.pm	12.78 KB	-rw-r--r--	2022-01-30 13:02
Util.pm	6.89 KB	-rw-r--r--	2022-10-20 09:29
WrapXS.pm	36.93 KB	-rw-r--r--	2022-01-30 13:02

Rename

# please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*-
# Licensed to the Apache Software Foundation (ASF) under one or more
# contributor license agreements.  See the NOTICE file distributed with
# this work for additional information regarding copyright ownership.
# The ASF licenses this file to You under the Apache License, Version 2.0
# (the "License"); you may not use this file except in compliance with
# the License.  You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
package ModPerl::TestRun;

use strict;
use warnings FATAL => 'all';

use base qw(Apache::TestRunPerl);

use Apache2::Build;

# some mp2 tests require more than one server instance to be available
# without which the server may hang, waiting for the single server
# become available
use constant MIN_CLIENTS => 2;

sub new_test_config {
    my $self = shift;

# default timeout in secs (threaded mpms are extremely slow to
    # startup, due to a slow perl_clone operation)
    $self->{conf_opts}->{startup_timeout} ||=
        $ENV{APACHE_TEST_STARTUP_TIMEOUT} ||
        Apache2::Build->build_config->mpm_is_threaded() ? 300 : 120;

$self->{conf_opts}->{minclients} ||= MIN_CLIENTS;

ModPerl::TestConfig->new($self->{conf_opts});
}

sub bug_report {
    my $self = shift;

print <<EOI;
+--------------------------------------------------------+
| Please file a bug report: http://perl.apache.org/bugs/ |
+--------------------------------------------------------+
EOI
}

package ModPerl::TestConfig;

use base qw(Apache::TestConfig);

sub new {
    my $class = shift;
    my $self = $class->SUPER::new(@_);
    my $config = Apache2::Build->build_config;
    $self->{conf_opts}->{httpd} ||= $config->{httpd};
    return $self;
}

# - don't inherit LoadModule perl_module from the apache httpd.conf
# - loaded fastcgi crashes some mp2 tests
my @skip = ('mod_perl.c', qr/mod_fastcgi.*?\.c$/);

Apache::TestConfig::autoconfig_skip_module_add(@skip);