#
# WL#1756
#
-- source include/have_innodb.inc

--source include/not_embedded.inc

# Save the initial number of concurrent sessions
--source include/count_sessions.inc

--disable_warnings
drop table if exists t1, t2;
--enable_warnings
create table t1 (a int) engine=innodb;
xa start 'test1';
insert t1 values (10);
xa end 'test1';
xa prepare 'test1';
xa rollback 'test1';
select * from t1;

xa start 'test2';
--error ER_XAER_RMFAIL
xa start 'test-bad';
insert t1 values (20);
--error ER_XAER_RMFAIL
xa prepare 'test2';
xa end 'test2';
xa prepare 'test2';
xa commit 'test2';
select * from t1;

xa start 'testa','testb';
insert t1 values (30);

--error ER_XAER_RMFAIL
commit;

xa end 'testa','testb';

--error ER_XAER_RMFAIL
begin;
--error ER_XAER_RMFAIL
create table t2 (a int);

connect (con1,localhost,root,,);
connection con1;

--error ER_XAER_DUPID
xa start 'testa','testb';
--error ER_XAER_DUPID
xa start 'testa','testb', 123;

#        gtrid [ , bqual [ , formatID ] ]
xa start 0x7465737462, 0x2030405060, 0xb;
insert t1 values (40);
xa end 'testb',' 0@P`',11;
xa prepare 'testb',0x2030405060,11;

--error ER_XAER_RMFAIL
start transaction;

xa recover;

# uncomment the line below when binlog will be able to prepare
#disconnect con1;
connection default;

xa prepare 'testa','testb';

xa recover;

# When this connection has already started an own XA transaction
# it cannot execute XA COMMIT for another XA.
--error ER_XAER_RMFAIL
xa commit 'testb',0x2030405060,11;
# nor XA ROLLBACK on "foreign" XA.
--error ER_XAER_RMFAIL
xa rollback 'testb',0x2030405060,11;
xa rollback 'testa','testb';

# "Foreign" XA is not in an allowed state to be committed
--error ER_XAER_NOTA
xa commit 'testb',0x2030405060,11;
# nor be rolled back
--error ER_XAER_NOTA
xa rollback 'testb',0x2030405060,11;

--error ER_PARSE_ERROR
xa start 'zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz';

select * from t1;

disconnect con1;
connection default;

drop table t1;

#
# Bug#28323: Server crashed in xid cache operations
#

--disable_warnings
drop table if exists t1;
--enable_warnings

create table t1(a int, b int, c varchar(20), primary key(a)) engine = innodb;
insert into t1 values(1, 1, 'a');
insert into t1 values(2, 2, 'b');

connect (con1,localhost,root,,);
connect (con2,localhost,root,,);

--connection con1
xa start 'a','b';
update t1 set c = 'aa' where a = 1;
--connection con2
xa start 'a','c';
update t1 set c = 'bb' where a = 2;
--connection con1
--send update t1 set c = 'bb' where a = 2
--connection con2
--sleep 1
--error ER_LOCK_DEADLOCK
update t1 set c = 'aa' where a = 1;
select count(*) from t1;
--error ER_XA_RBDEADLOCK
xa end 'a','c';
xa rollback 'a','c';
--disconnect con2

connect (con3,localhost,root,,);
--connection con3
xa start 'a','c';
--connection con1
--reap
--disconnect con1
--disconnect con3
--connection default
drop table t1;

--echo #
--echo # BUG#51342 - more xid crashing
--echo #
CREATE TABLE t1(a INT) ENGINE=InnoDB;
XA START 'x';
SET SESSION autocommit=0;
INSERT INTO t1 VALUES(1);
--error ER_XAER_RMFAIL
SET SESSION autocommit=1;
SELECT @@autocommit;
INSERT INTO t1 VALUES(1);
XA END 'x';
XA COMMIT 'x' ONE PHASE;
DROP TABLE t1;
SET SESSION autocommit=1;

--echo End of 5.0 tests

#
# Bug#44672: Assertion failed: thd->transaction.xid_state.xid.is_null()
#

xa start 'a';
xa end 'a';
xa rollback 'a';
xa start 'a';
xa end 'a';
xa rollback 'a';

#
# Bug#45548: XA transaction without access to InnoDB tables crashes the server
#

xa start 'a';
xa end 'a';
xa prepare 'a';
xa commit 'a';

xa start 'a';
xa end 'a';
xa prepare 'a';
xa commit 'a';

#
# BUG#43171 - Assertion failed: thd->transaction.xid_state.xid.is_null()
#
CREATE TABLE t1(a INT, KEY(a)) ENGINE=InnoDB;
INSERT INTO t1 VALUES(1),(2);
connect(con1,localhost,root,,);

# Part 1: Prepare to test XA START after regular transaction deadlock
BEGIN;
UPDATE t1 SET a=3 WHERE a=1;

connection default;
BEGIN;
UPDATE t1 SET a=4 WHERE a=2;

connection con1;
let $conn_id= `SELECT CONNECTION_ID()`;
SEND UPDATE t1 SET a=5 WHERE a=2;

connection default;
let $wait_timeout= 2;
let $wait_condition= SELECT 1 FROM INFORMATION_SCHEMA.PROCESSLIST
WHERE ID=$conn_id AND STATE='Searching rows for update';
--source include/wait_condition.inc

--error ER_LOCK_DEADLOCK
UPDATE t1 SET a=5 WHERE a=1;
ROLLBACK;

# Part 2: Prepare to test XA START after XA transaction deadlock
connection con1;
REAP;
ROLLBACK;
BEGIN;
UPDATE t1 SET a=3 WHERE a=1;

connection default;
XA START 'xid1';
UPDATE t1 SET a=4 WHERE a=2;

connection con1;
SEND UPDATE t1 SET a=5 WHERE a=2;

connection default;
let $wait_timeout= 2;
let $wait_condition= SELECT 1 FROM INFORMATION_SCHEMA.PROCESSLIST
WHERE ID=$conn_id AND STATE='Searching rows for update';
--source include/wait_condition.inc

--error ER_LOCK_DEADLOCK
UPDATE t1 SET a=5 WHERE a=1;
--error ER_XA_RBDEADLOCK
XA END 'xid1';
XA ROLLBACK 'xid1';

XA START 'xid1';
XA END 'xid1';
XA ROLLBACK 'xid1';

connection con1;
REAP;
disconnect con1;

connection default;
DROP TABLE t1;


--echo #
--echo # Bug#56448 Assertion failed: ! is_set() with second xa end
--echo #

XA START 'x';
XA END 'x';
# Second XA END caused an assertion.
--error ER_XAER_RMFAIL
XA END 'x';
XA PREPARE 'x';
# Second XA PREPARE also caused an assertion.
--error ER_XAER_RMFAIL
XA PREPARE 'x';
XA ROLLBACK 'x';


--echo #
--echo # Bug#59986 Assert in Diagnostics_area::set_ok_status() for XA COMMIT
--echo #

--disable_warnings
DROP TABLE IF EXISTS t1;
--enable_warnings

CREATE TABLE t1(a INT, b INT, PRIMARY KEY(a)) engine=InnoDB;
INSERT INTO t1 VALUES (1, 1), (2, 2);

--echo # Connection con1
connect (con1, localhost, root);
XA START 'a';
UPDATE t1 SET b= 3 WHERE a=1;

--echo # Connection default
connection default;
XA START 'b';
UPDATE t1 SET b=4 WHERE a=2;
--echo # Sending:
--send UPDATE t1 SET b=5 WHERE a=1

--echo # Connection con1
connection con1;
--sleep 1
--error ER_LOCK_DEADLOCK
UPDATE t1 SET b=6 WHERE a=2;
# This used to trigger the assert
--error ER_XA_RBDEADLOCK
XA COMMIT 'a';

--echo # Connection default
connection default;
--echo # Reaping: UPDATE t1 SET b=5 WHERE a=1
--reap
XA END 'b';
XA ROLLBACK 'b';
DROP TABLE t1;
disconnect con1;


--echo #
--echo # Bug#11766752 59936: multiple xa assertions - transactional
--echo #              statement fuzzer
--echo #

CREATE TABLE t1 (a INT) engine=InnoDB;
XA START 'a';
INSERT INTO t1 VALUES (1);

SAVEPOINT savep;

XA END 'a';
--error ER_XAER_RMFAIL
SELECT * FROM t1;
--error ER_XAER_RMFAIL
INSERT INTO t1 VALUES (2);
--error ER_XAER_RMFAIL
SAVEPOINT savep;
--error ER_XAER_RMFAIL
SET @a=(SELECT * FROM t1);

XA PREPARE 'a';
--error ER_XAER_RMFAIL
SELECT * FROM t1;          # used to cause InnoDB assert
--error ER_XAER_RMFAIL
INSERT INTO t1 VALUES (2); # used to cause InnoDB assert
--error ER_XAER_RMFAIL
SAVEPOINT savep;
--error ER_XAER_RMFAIL
SET @a=(SELECT * FROM t1); # used to cause InnoDB assert
--error ER_XAER_RMFAIL
UPDATE t1 SET a=1 WHERE a=2;

XA COMMIT 'a';
SELECT * FROM t1;
DROP TABLE t1;


--echo #
--echo # Bug#12352846 - TRANS_XA_START(THD*):
--echo #                ASSERTION THD->TRANSACTION.XID_STATE.XID.IS_NULL()
--echo #                FAILED 
--echo #

--disable_warnings
DROP TABLE IF EXISTS t1, t2;
--enable_warnings

CREATE TABLE t1 (a INT) ENGINE=InnoDB;
CREATE TABLE t2 (a INT) ENGINE=InnoDB;

START TRANSACTION;
INSERT INTO t1 VALUES (1);

--echo # Connection con2
--connect (con2,localhost,root)
XA START 'xid1';
--echo # Sending:
--send INSERT INTO t2 SELECT a FROM t1

--echo # Connection default
--connection default
--echo # Waiting for until a transaction with 'INSERT SELECT'
--echo # will be locked inside innodb subsystem.

let $wait_condition=
  SELECT COUNT(*) = 1 FROM information_schema.innodb_trx
  WHERE trx_query = 'INSERT INTO t2 SELECT a FROM t1' AND
  trx_operation_state = 'starting index read' AND
  trx_state = 'LOCK WAIT';
--source include/wait_condition.inc

DELETE FROM t1;

--echo # Connection con2
--connection con2
--echo # Reaping: INSERT INTO t2 SELECT a FROM t1
--error ER_LOCK_DEADLOCK
--reap
--error ER_XA_RBDEADLOCK
XA COMMIT 'xid1';

--echo # Connection default
connection default;

COMMIT;

--echo # Connection con2
connection con2;
# This caused the assert to be triggered
XA START 'xid1';

XA END 'xid1';
XA PREPARE 'xid1';
XA ROLLBACK 'xid1';

--echo # Connection default
connection default;
DROP TABLE t1, t2;
disconnect con2;


# Wait till all disconnects are completed
--source include/wait_until_count_sessions.inc

--echo #
--echo # Bug#14670465 PLEASE PRINT HUMAN READABLE, ESCAPED 
--echo #              XID DATA IN XA RECOVER OUTPUT
--echo #
--echo #
--echo # xa Recover command was not diplaying non printable ASCII
--echo # characters in the XID previosuly. Now there is another column
--echo # in the result set which is a Hex Encoded String of the XID.
--echo #

--echo # Check that XIDs which are not normally printable are displayed
--echo # in readable format when CONVERT XID clause is used.
xa start 0xABCDEF1234567890, 0x01, 0x02 ;
xa end 0xABCDEF1234567890, 0x01, 0x02 ;
xa prepare 0xABCDEF1234567890, 0x01, 0x02 ;
xa recover convert xid;
xa rollback 0xABCDEF1234567890, 0x01, 0x02 ;

--echo # Check that XID which has only printable characters are displayed
--echo # correctly without using of CONVERT XID clause
xa start 0x4142434445, 0x46, 0x02 ;
xa end 0x4142434445, 0x46, 0x02 ;
xa prepare 0x4142434445, 0x46, 0x02 ;
xa recover;
xa rollback 0x4142434445, 0x46, 0x02 ;

--disable_query_log
call mtr.add_suppression("Found 1 prepared XA transactions");
--enable_query_log

--echo #
--echo # WL#7155: Test 1: check that if a thread of control terminates then 
--echo # the Resource Manager dissociate and rollback any associated 
--echo # transaction branch (see ref. 3.6 on page 18 of XA spec)
--echo #

connect (con1,localhost,root,,);

CREATE TABLE t1 (a INT) ENGINE=INNODB;
XA START 'xid1';
INSERT INTO t1 VALUES (1);
XA END 'xid1';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

SELECT * FROM t1;
DROP TABLE t1;

--echo #
--echo # WL#7155: Test 2: Check that if the Resource Manager is doing work outside
--echo # any global transaction on behalf of the application,
--echo # xa_start() returns XAER_OUTSIDE (see xa_start description on page 52 of XA spec)  
--echo #

connect (con1,localhost,root,,);

SET SESSION autocommit=0;
START TRANSACTION;
--error ER_XAER_OUTSIDE
XA START 'xid1';
COMMIT;

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 3: Check that the Resource Manager returns error
--echo # if the Transaction Manager tries to resume non-existent transaction. 
--echo #

--error ER_XAER_INVAL
XA START 'xid1' RESUME;

--echo #
--echo # WL#7155: Test 4: Check that the Resource Manager returns ok
--echo # if the Transaction Manager tries to resume transaction
--echo # that has been ended before. 
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
XA END 'xid1';
XA START 'xid1' RESUME;
XA END 'xid1';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 5: Check that the Resource Manager returns error
--echo # if the Transaction Manager ends some XA transaction and
--echo # starts another one with RESUME clause right after that.
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
XA END 'xid1';
--error ER_XAER_NOTA
XA START 'xid2' RESUME;
disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 6: Check that the SUSPEND clause isn't supported for XA END. 
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
--error ER_XAER_INVAL
XA END 'xid1' SUSPEND;
XA END 'xid1';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 7: Check that attempt to end non-existent XA transaction 
--echo # while another XA transaction is active leads to an error 
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
--error ER_XAER_NOTA
XA END 'xid2';
XA END 'xid1';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 8: Check that XA ROLLBACK can't be called for active XA transaction
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
--error ER_XAER_RMFAIL
XA ROLLBACK 'xid1';
XA END 'xid1';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 9: Check that XA PREPARE returns error for unknown xid
--echo #

connect (con1,localhost,root,,);

XA START 'xid1';
XA END 'xid1';
--error ER_XAER_NOTA
XA PREPARE 'xid2';

disconnect con1;
--source include/wait_until_disconnected.inc
connection default;

--echo #
--echo # WL#7155: Test 10: Check that rollback of XA transaction with unknown xid 
--echo # leads to an error when there is other prepared XA transaction. 
--echo #

XA START 'xid1';
XA END 'xid1';
XA PREPARE 'xid1';
--error ER_XAER_RMFAIL
XA ROLLBACK 'xid2';
XA ROLLBACK 'xid1';

--echo #
--echo # Bug#18107853 - XA LIST GETS CORRUPT, CRASH AND/OR HANG AND/OR ASSERTION
--echo #

--echo # Check that the server reports an error in case of too long input value of
--echo # format ID overflows the type of unsigned long

--error ER_PARSE_ERROR
XA START '1', 0x01, 18446744073709551615;

--echo #
--echo # Bug#25364178 - XA PREPARE INCONSISTENT WITH XTRABACKUP
--echo #

--echo # Check XA state when lock_wait_timeout happens
--echo # More tests added to flush_read_lock.test
connect (con_tmp,localhost,root,,);
set session lock_wait_timeout=1;
create table asd (a int);
xa start 'test1';
insert into asd values(1);
xa end 'test1';
connection default;
flush table with read lock;
connection con_tmp;
--echo # PREPARE error will do auto rollback.
--ERROR ER_LOCK_WAIT_TIMEOUT
xa prepare 'test1';
show errors;
connection default;
unlock tables;

connection con_tmp;
xa start 'test1';
insert into asd values(1);
xa end 'test1';
xa prepare 'test1';
connection default;
flush tables with read lock;
connection con_tmp;
--echo # LOCK error during ROLLBACK will not alter transaction state.
--ERROR ER_LOCK_WAIT_TIMEOUT
xa rollback 'test1';
show errors;
xa recover;
--echo # LOCK error during COMMIT will not alter transaction state.
--ERROR ER_LOCK_WAIT_TIMEOUT
xa commit 'test1';
show errors;
xa recover;
connection default;
unlock tables;
connection con_tmp;
xa rollback 'test1';
xa recover;
drop table asd;
disconnect con_tmp;
--source include/wait_until_disconnected.inc
connection default;

# Finish off  disconnected survived transaction
--echo There should be practically no error, but in theory
--echo XAER_NOTA: Unknown XID can be returned if con1 disconnection
--echo took for too long.
--echo todo: consider to make this test dependent on P_S if
--echo todo: such case will be ever registered.
xa rollback 'testb',0x2030405060,11;

# There should be no prepared transactions left.
XA RECOVER;