Moved the PXC-dealing parts of Cxn.pm into Percona::XtraDB::Cluster

This commit is contained in:
Brian Fraser
2012-11-07 04:06:50 -03:00
parent e8cfb37341
commit aa79c9df57
7 changed files with 111 additions and 373 deletions

View File

@@ -1568,19 +1568,6 @@ sub name {
return $self->{hostname} || $self->{dsn_name} || 'unknown host';
}
sub is_cluster_node {
my ($self) = @_;
return $self->{is_cluster_node} if defined $self->{is_cluster_node};
my $sql = "SHOW VARIABLES LIKE 'wsrep_on'";
PTDEBUG && _d($sql);
my $row = $self->{dbh}->selectrow_arrayref($sql);
PTDEBUG && _d(defined $row ? @$row : 'undef');
$self->{is_cluster_node} = $row && $row->[0] ? 1 : 0;
return $self->{is_cluster_node};
}
sub DESTROY {
my ($self) = @_;
if ( $self->{dbh}