mirror of
https://github.com/MariaDB/server.git
synced 2025-01-20 05:52:27 +01:00
19 lines
572 B
Perl
19 lines
572 B
Perl
package My::Suite::InnoDB_plugin;
|
|
|
|
@ISA = qw(My::Suite);
|
|
|
|
############# initialization ######################
|
|
my @combinations;
|
|
|
|
push @combinations, 'innodb_plugin' if $ENV{HA_INNODB_PLUGIN_SO};
|
|
push @combinations, 'xtradb_plugin' if $ENV{HA_XTRADB_SO};
|
|
push @combinations, 'xtradb' if $::mysqld_variables{'innodb'} eq "ON";
|
|
|
|
return "Neither innodb_plugin nor xtradb are available" unless @combinations;
|
|
|
|
$ENV{INNODB_PLUGIN_COMBINATIONS}=join ':', @combinations
|
|
unless $ENV{INNODB_PLUGIN_COMBINATIONS};
|
|
|
|
############# return an object ######################
|
|
bless { };
|
|
|