mirror of
https://github.com/MariaDB/server.git
synced 2025-01-29 18:20:07 +01:00
33 lines
924 B
Perl
33 lines
924 B
Perl
package My::Suite::Plugins;
|
|
|
|
use My::Platform;
|
|
|
|
@ISA = qw(My::Suite);
|
|
|
|
if (-d '../sql' && !&::using_extern()) {
|
|
my $src = "$::bindir/plugin/auth_pam/auth_pam_tool";
|
|
my $dst = "$::plugindir/auth_pam_tool_dir/auth_pam_tool";
|
|
::mkpath( "$::plugindir/auth_pam_tool_dir");
|
|
eval { symlink $src, $dst } or ::copy $src, $dst;
|
|
}
|
|
|
|
sub cassandra_running() {
|
|
return 0 if IS_WINDOWS;
|
|
system 'echo show version | cqlsh -3 2>/dev/null >/dev/null';
|
|
return $? == 0;
|
|
}
|
|
|
|
sub skip_combinations {
|
|
my %skip;
|
|
$skip{'t/pam_init.inc'} = 'No pam setup for mtr'
|
|
unless -e '/etc/pam.d/mariadb_mtr';
|
|
$skip{'t/pam_init.inc'} = 'Not run as user owning auth_pam_tool_dir'
|
|
unless -o $::plugindir . '/auth_pam_tool_dir';
|
|
$skip{'t/cassandra.test'} = 'Cassandra is not running'
|
|
unless cassandra_running();
|
|
$skip{'t/cassandra_qcache.test'} = $skip{'t/cassandra.test'};
|
|
%skip;
|
|
}
|
|
|
|
bless { };
|
|
|