mirror of
https://github.com/MariaDB/server.git
synced 2025-08-23 03:54:27 +03:00
30 lines
888 B
Perl
30 lines
888 B
Perl
package My::Suite::WSREP;
|
|
use File::Basename;
|
|
use My::Find;
|
|
|
|
@ISA = qw(My::Suite);
|
|
|
|
return "Not run for embedded server" if $::opt_embedded_server;
|
|
|
|
return "WSREP is not compiled in" unless defined $::mysqld_variables{'wsrep-on'};
|
|
|
|
my ($provider) = grep { -f $_ } $ENV{WSREP_PROVIDER},
|
|
"/usr/lib/galera/libgalera_smm.so",
|
|
"/usr/lib64/galera/libgalera_smm.so";
|
|
|
|
return "No wsrep provider library" unless -f $provider;
|
|
|
|
$ENV{WSREP_PROVIDER} = $provider;
|
|
|
|
my ($spath) = grep { -f "$_/wsrep_sst_rsync"; } "$::bindir/scripts", $::path_client_bindir;
|
|
return "No SST scripts" unless $spath;
|
|
|
|
my ($epath) = grep { -f "$_/my_print_defaults"; } "$::bindir/extra", $::path_client_bindir;
|
|
return "No my_print_defaults" unless $epath;
|
|
|
|
$ENV{PATH}="$epath:$ENV{PATH}";
|
|
$ENV{PATH}="$spath:$ENV{PATH}" unless $epath eq $spath;
|
|
|
|
bless { };
|
|
|