MHA 安装

发布时间 2023-08-11 11:27:19作者: 章怀柔

MySQL 主从搭建

## 复制相关参数
sync_binlog=1
log-bin=mysql-bin
expire_logs_days=7
binlog-format=row
binlog_cache_size = 4M
max_binlog_size = 512M
binlog_rows_query_log_events=1
gtid-mode=on
enforce-gtid-consistency=true
master-info-repository=table
relay-log-info-repository=table
relay-log-recovery=1
log_slave_updates=1
##master
### 创建同步账号
---------version-5.7-------------------------------
grant replication slave,replication client,select,reload,process on *.* to repl@'%' identified by '123';
---------version-8.0-------------------------------
create user repl@'%' identified by '123';
grant replication slave,replication client,select,reload,process on *.* to repl@'%';
## 导出master数据
mysqldump -hmaster_host -urepl -p'456' --single-transaction --master-data=2 --all-databases >/data/master_data.sql
## slave 导入数据
##基于gtid 同步先清理slave 上的gtid
mysql -hslave_host -uroot -p456 -e "reset master"
mysql -hslave_host -uroot -p456 </data/master_data.sql
change master to master_host='master_host',master_user='repl',master_password='123',master_auto_position=1;
start slave;

 

基础包安装

yum install -y perl-devel perl-CPAN
yum install perl-DBD-MySQL perl-Config-Tiny perl-Log-Dispatch perl-Parallel-ForkManager perl-Time-HiRes -y
##安装manage节点
tar xf mha4mysql-node-0.58.tar.gz && cd mha4mysql-node-0.58
##安装node节点
tar xf mha4mysql-node-0.58.tar.gz && cd mha4mysql-node-0.58

perl Makefile.PL
make && make install

配置文件

mha 启动配置文件 app1

#7-8行配置的账号需要具有change master 权限
[server default]
manager_log=/var/log/masterha/app1/manager.log
manager_workdir=/var/log/masterha/app1
master_binlog_dir=/data/mysql
master_ip_failover_script=/usr/local/bin/master_ip_failover
master_ip_online_change_script=/usr/local/bin/master_ip_online_change
password=123
user=yjx
ping_interval=1
remote_workdir=/tmp
repl_password=123987
repl_user=repl
shutdown_script=""
ssh_user=root
[server1]
hostname=192.168.1.99
port=3306
[server2]
hostname=192.168.1.100
port=3306
candidate_master=1

mha-配置文件-master_ip_failover

修改$vip 地址,网卡名改成自己(我的ens192)

#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';

use Getopt::Long;

my (
  $command,         $ssh_user,       $orig_master_host, $orig_master_ip,
  $orig_master_port, $new_master_host, $new_master_ip,   $new_master_port
);

my $vip = '192.168.1.100';
my $key = '1';
my $ssh_start_vip = "ip addr add $vip dev   ens192 && arping -c 3 -A $vip -I ens192";
my $ssh_stop_vip = "ip addr del $vip dev ens192";

GetOptions(
  'command=s'         => \$command,
  'ssh_user=s'         => \$ssh_user,
  'orig_master_host=s' => \$orig_master_host,
  'orig_master_ip=s'   => \$orig_master_ip,
  'orig_master_port=i' => \$orig_master_port,
  'new_master_host=s' => \$new_master_host,
  'new_master_ip=s'   => \$new_master_ip,
  'new_master_port=i' => \$new_master_port,
);

exit &main();

sub main {

  print "\n\nIN SCRIPT TEST====$ssh_stop_vip==$ssh_start_vip===\n\n";

  if ( $command eq "stop" || $command eq "stopssh" ) {

      my $exit_code = 1;
      eval {
          print "Disabling the VIP on old master: $orig_master_host \n";
          &stop_vip();
          $exit_code = 0;
      };
      if ($@) {
          warn "Got Error: $@\n";
          exit $exit_code;
      }
      exit $exit_code;
  }
  elsif ( $command eq "start" ) {

      my $exit_code = 10;
      eval {
          print "Enabling the VIP - $vip on the new master - $new_master_host \n";
          &start_vip();
          $exit_code = 0;
      };
      if ($@) {
          warn $@;
          exit $exit_code;
      }
      exit $exit_code;
  }
  elsif ( $command eq "status" ) {
      print "Checking the Status of the script.. OK \n";
      exit 0;
  }
  else {
      &usage();
      exit 1;
  }
}
sub start_vip() {
  `ssh $ssh_user\@$new_master_host \" $ssh_start_vip \"`;
}
# A simple system call that disable the VIP on the old_master
sub stop_vip() {
  `ssh $ssh_user\@$orig_master_host \" $ssh_stop_vip \"`;
}

sub usage {
  print
  "Usage: master_ip_failover --command=start|stop|stopssh|status --orig_master_host=host --orig_master_ip=ip --orig_master_port=port --new_master_host=host --new_master_ip=ip --new_master_port=port\n";
}

mha-配置文件-master_ip_online_change

修改$vip 地址,网卡名改成自己(我的ens192)

#!/usr/bin/env perl

# Copyright (C) 2011 DeNA Co.,Ltd.
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
#   along with this program; if not, write to the Free Software
# Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

## Note: This is a sample script and is not complete. Modify the script based on your environment.

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

use Getopt::Long;
use MHA::DBHelper;
use MHA::NodeUtil;
use Time::HiRes qw( sleep gettimeofday tv_interval );
use Data::Dumper;

my $_tstart;
my $_running_interval = 0.1;
my (
$command,             $orig_master_is_new_slave, $orig_master_host,
$orig_master_ip,       $orig_master_port,         $orig_master_user,
$orig_master_password, $orig_master_ssh_user,     $new_master_host,
$new_master_ip,       $new_master_port,         $new_master_user,
$new_master_password, $new_master_ssh_user
);
my $vip = '192.168.2.88/24';
my $key = '1';
my $ssh_start_vip = "ip addr add $vip dev   ens192 && arping -c 3 -A $vip -I ens192";
my $ssh_stop_vip = "ip addr del $vip dev ens192";
my $orig_master_ssh_port = 22;
my $new_master_ssh_port = 22;
GetOptions(
'command=s'               => \$command,
'orig_master_is_new_slave' => \$orig_master_is_new_slave,
'orig_master_host=s'       => \$orig_master_host,
'orig_master_ip=s'         => \$orig_master_ip,
'orig_master_port=i'       => \$orig_master_port,
'orig_master_user=s'       => \$orig_master_user,
'orig_master_password=s'   => \$orig_master_password,
'orig_master_ssh_user=s'   => \$orig_master_ssh_user,
'new_master_host=s'       => \$new_master_host,
'new_master_ip=s'         => \$new_master_ip,
'new_master_port=i'       => \$new_master_port,
'new_master_user=s'       => \$new_master_user,
'new_master_password=s'   => \$new_master_password,
'new_master_ssh_user=s'   => \$new_master_ssh_user,
'orig_master_ssh_port=i'   => \$orig_master_ssh_port,
'new_master_ssh_port=i'   => \$new_master_ssh_port,
);

exit &main();

sub current_time_us {
my ( $sec, $microsec ) = gettimeofday();
my $curdate = localtime($sec);
return $curdate . " " . sprintf( "%06d", $microsec );
}

sub sleep_until {
my $elapsed = tv_interval($_tstart);
if ( $_running_interval > $elapsed ) {
  sleep( $_running_interval - $elapsed );
}
}

sub get_threads_util {
my $dbh                   = shift;
my $my_connection_id       = shift;
my $running_time_threshold = shift;
my $type                   = shift;
$running_time_threshold = 0 unless ($running_time_threshold);
$type                   = 0 unless ($type);
my @threads;

my $sth = $dbh->prepare("SHOW PROCESSLIST");
$sth->execute();

while ( my $ref = $sth->fetchrow_hashref() ) {
  my $id         = $ref->{Id};
  my $user       = $ref->{User};
  my $host       = $ref->{Host};
  my $command   = $ref->{Command};
  my $state     = $ref->{State};
  my $query_time = $ref->{Time};
  my $info       = $ref->{Info};
  $info =~ s/^\s*(.*?)\s*$/$1/ if defined($info);
  next if ( $my_connection_id == $id );
  next if ( defined($query_time) && $query_time < $running_time_threshold );
  next if ( defined($command)   && $command eq "Binlog Dump" );
  next if ( defined($user)       && $user eq "system user" );
  next
    if ( defined($command)
    && $command eq "Sleep"
    && defined($query_time)
    && $query_time >= 1 );

  if ( $type >= 1 ) {
    next if ( defined($command) && $command eq "Sleep" );
    next if ( defined($command) && $command eq "Connect" );
  }

  if ( $type >= 2 ) {
    next if ( defined($info) && $info =~ m/^select/i );
    next if ( defined($info) && $info =~ m/^show/i );
  }

  push @threads, $ref;
}
return @threads;
}

sub main {
if ( $command eq "stop" ) {
  ## Gracefully killing connections on the current master
  # 1. Set read_only= 1 on the new master
  # 2. DROP USER so that no app user can establish new connections
  # 3. Set read_only= 1 on the current master
  # 4. Kill current queries
  # * Any database access failure will result in script die.
  my $exit_code = 1;
  eval {
    ## Setting read_only=1 on the new master (to avoid accident)
    my $new_master_handler = new MHA::DBHelper();

    # args: hostname, port, user, password, raise_error(die_on_error)_or_not
    $new_master_handler->connect( $new_master_ip, $new_master_port,
      $new_master_user, $new_master_password, 1 );
    print current_time_us() . " Set read_only on the new master.. ";
    $new_master_handler->enable_read_only();
    if ( $new_master_handler->is_read_only() ) {
      print "ok.\n";
    }
    else {
      die "Failed!\n";
    }
    $new_master_handler->disconnect();

    # Connecting to the orig master, die if any database error happens
    my $orig_master_handler = new MHA::DBHelper();
    $orig_master_handler->connect( $orig_master_ip, $orig_master_port,
      $orig_master_user, $orig_master_password, 1 );

    ## Drop application user so that nobody can connect. Disabling per-session binlog beforehand
    $orig_master_handler->disable_log_bin_local();
    print current_time_us() . " Drpping app user on the orig master..\n";
    #FIXME_xxx_drop_app_user($orig_master_handler);

    ## Waiting for N * 100 milliseconds so that current connections can exit
    my $time_until_read_only = 15;
    $_tstart = [gettimeofday];
    my @threads = get_threads_util( $orig_master_handler->{dbh},
      $orig_master_handler->{connection_id} );
    while ( $time_until_read_only > 0 && $#threads >= 0 ) {
      if ( $time_until_read_only % 5 == 0 ) {
        printf
"%s Waiting all running %d threads are disconnected.. (max %d milliseconds)\n",
          current_time_us(), $#threads + 1, $time_until_read_only * 100;
        if ( $#threads < 5 ) {
          print Data::Dumper->new( [$_] )->Indent(0)->Terse(1)->Dump . "\n"
            foreach (@threads);
        }
      }
      sleep_until();
      $_tstart = [gettimeofday];
      $time_until_read_only--;
      @threads = get_threads_util( $orig_master_handler->{dbh},
        $orig_master_handler->{connection_id} );
    }

    ## Setting read_only=1 on the current master so that nobody(except SUPER) can write
    print current_time_us() . " Set read_only=1 on the orig master.. ";
    $orig_master_handler->enable_read_only();
    if ( $orig_master_handler->is_read_only() ) {
      print "ok.\n";
    }
    else {
      die "Failed!\n";
    }

    ## Waiting for M * 100 milliseconds so that current update queries can complete
    my $time_until_kill_threads = 5;
    @threads = get_threads_util( $orig_master_handler->{dbh},
      $orig_master_handler->{connection_id} );
    while ( $time_until_kill_threads > 0 && $#threads >= 0 ) {
      if ( $time_until_kill_threads % 5 == 0 ) {
        printf
"%s Waiting all running %d queries are disconnected.. (max %d milliseconds)\n",
          current_time_us(), $#threads + 1, $time_until_kill_threads * 100;
        if ( $#threads < 5 ) {
          print Data::Dumper->new( [$_] )->Indent(0)->Terse(1)->Dump . "\n"
            foreach (@threads);
        }
      }
      sleep_until();
      $_tstart = [gettimeofday];
      $time_until_kill_threads--;
      @threads = get_threads_util( $orig_master_handler->{dbh},
        $orig_master_handler->{connection_id} );
    }

    ## Terminating all threads
    print current_time_us() . " Killing all application threads..\n";
    $orig_master_handler->kill_threads(@threads) if ( $#threads >= 0 );
    print current_time_us() . " done.\n";
    $orig_master_handler->enable_log_bin_local();
    $orig_master_handler->disconnect();

    ## After finishing the script, MHA executes FLUSH TABLES WITH READ LOCK
    eval {
    `ssh -p$orig_master_ssh_port $orig_master_ssh_user\@$orig_master_host \" $ssh_stop_vip \"`;
      };
      if ($@) {
          warn $@;
      }
    $exit_code = 0;
  };
  if ($@) {
    warn "Got Error: $@\n";
    exit $exit_code;
  }
  exit $exit_code;
}
elsif ( $command eq "start" ) {
  ## Activating master ip on the new master
  # 1. Create app user with write privileges
  # 2. Moving backup script if needed
  # 3. Register new master's ip to the catalog database

# We don't return error even though activating updatable accounts/ip failed so that we don't interrupt slaves' recovery.
# If exit code is 0 or 10, MHA does not abort
  my $exit_code = 10;
  eval {
    my $new_master_handler = new MHA::DBHelper();

    # args: hostname, port, user, password, raise_error_or_not
    $new_master_handler->connect( $new_master_ip, $new_master_port,
      $new_master_user, $new_master_password, 1 );

    ## Set read_only=0 on the new master
    $new_master_handler->disable_log_bin_local();
    print current_time_us() . " Set read_only=0 on the new master.\n";
    $new_master_handler->disable_read_only();

    ## Creating an app user on the new master
    print current_time_us() . " Creating app user on the new master..\n";
    #FIXME_xxx_create_app_user($new_master_handler);
    $new_master_handler->enable_log_bin_local();
    $new_master_handler->disconnect();

    ## Update master ip on the catalog database, etc
    `ssh -p$new_master_ssh_port $new_master_ssh_user\@$new_master_host \" $ssh_start_vip \"`;
    $exit_code = 0;
  };
  if ($@) {
    warn "Got Error: $@\n";
    exit $exit_code;
  }
  exit $exit_code;
}
elsif ( $command eq "status" ) {

  # do nothing
  exit 0;
}
else {
  &usage();
  exit 1;
}
}

sub usage {
print
"Usage: master_ip_online_change --command=start|stop|status --orig_master_host=host --orig_master_ip=ip --orig_master_port=port --new_master_host=host --new_master_ip=ip --new_master_port=port\n";
die;
}

常用命令


##在线切换
1.先停mha服务
masterha_stop --conf=/etc/masterha/app.cnf
2.在线切换
masterha_master_switch --conf=/etc/masterha/app.cnf --master_state=alive --new_master_host=192.168.1.100 --new_master_port=3306 --orig_master_is_new_slave --running_updates_limit=10000