--source include/paxos.inc

let $learner_base_port = query_get_value("select $MYPORT_1+50 as c1", c1, 1);
--source include/start_new_learner.inc
--connect (leader,127.0.0.1,root,,test,$MYPORT_1)
--connection leader
#add consensus_learner $learner_cluster_info;
--replace_result $learner_cluster_info learner_cluster_info
eval call dbms_consensus.add_learner($learner_cluster_info);
#change consensus_node 100 consensus_learner_source 1;
--replace_result $learner_cluster_info learner_cluster_info $PAXOS_PORT_1 PAXOS_PORT_1
eval call dbms_consensus.configure_learner($learner_cluster_info, "127.0.0.1:$PAXOS_PORT_1");
select server_id, role, learner_source from information_schema.alisql_cluster_global;
create table t1(id int);
insert into t1 values (1);
insert into t1 values (2);
flush logs;

insert into t1 values(3);
insert into t1 values(4);
insert into t1 values(5);
flush logs;

--connect (learner,127.0.0.1,root,,mysql,$learner_port)
--connection learner
--echo # kill learner
--shutdown_server 0
--disconnect learner

--connection leader
--replace_column 2 # 3 #
show consensus logs;
insert into t1 values(6);
insert into t1 values(7);
flush logs;
--replace_column 2 # 3 #
show consensus logs;
#purge local consensus_log before 100;
call dbms_consensus.local_purge_log(100);
--replace_column 2 # 3 #
show consensus logs;
#drop consensus_learner '$learner_cluster_info';
--replace_result $learner_cluster_info learner_cluster_info
eval call dbms_consensus.drop_learner($learner_cluster_info);
#purge consensus_log before 100;
call dbms_consensus.purge_log(100);
--replace_column 2 # 3 #
show consensus logs;
insert into t1 values(8);
insert into t1 values(9);
flush logs;
#purge force consensus_log before 100;
call dbms_consensus.force_purge_log(100);
--replace_column 2 # 3 #
show consensus logs;
drop table t1;

# cleanup
--source include/stop_new_learner.inc