int tpbegin(unsigned long timeout, long flags) {
if (flags != 0) {
TPERROR(TPEPROTO, "flags!=0");
return -1;
}
int rc = tx_set_transaction_timeout(timeout);
if (rc == TX_OK) {
rc = tx_begin();
}
if (rc == TX_OK) {
f*x::atmi::reset_tperrno();
return 0;
}
if (rc == TX_ERROR || rc == TX_FAIL) {
TPERROR(TPERMERR, "tx_begin()=%d", rc);
} else if (rc == TX_OUTSIDE) {
TPERROR(TPETRAN, "tx_begin()=%d", rc);
} else if (rc == TX_PROTOCOL_ERROR) {
TPERROR(TPEPROTO, "tx_begin()=%d", rc);
} else {
TPERROR(TPESYSTEM, "Unexpected tx_begin()=%d", rc);
}
return -1;
}
int main(int argc, char *argv[])
{
char *pgm = argv[0];
TXINFO info;
int rc;
long fail_point;
if (argc < 2) {
fprintf(stderr, "%s: at least one option must be specified\n",
argv[0]);
exit(1);
}
fail_point = strtol(argv[1], NULL, 0);
printf("%s| starting...\n", pgm);
printf("%s| tx_open(): %d\n", pgm, rc = tx_open());
assert(TX_OK == rc);
printf("%s| tx_begin(): %d\n", pgm, rc = tx_begin());
if (0 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_set_transaction_control(): %d\n", pgm,
rc = tx_set_transaction_control(TX_UNCHAINED));
if (0 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_set_commit_return(): %d\n", pgm,
rc = tx_set_commit_return(TX_COMMIT_COMPLETED));
if (0 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_set_transaction_timeout(): %d\n", pgm,
rc = tx_set_transaction_timeout(1));
if (0 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_info(): %d\n", pgm, tx_info(&info));
if (0 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
if (0 == fail_point) {
printf("%s| tx_commit(): %d\n", pgm, rc = tx_commit());
assert(TX_FAIL == rc);
printf("%s| tx_rollback(): %d\n", pgm, rc = tx_rollback());
assert(TX_FAIL == rc);
printf("%s| ...finished (TX_FAIL)\n", pgm);
/* memory leak prevention */
lixa_monkeyrm_call_cleanup();
return 0;
}
printf("%s| tx_commit(): %d\n", pgm, rc = tx_commit());
if (1 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_begin(): %d\n", pgm, rc = tx_begin());
if (1 == fail_point) {
assert(TX_FAIL == rc);
printf("%s| ...finished (TX_FAIL)\n", pgm);
/* memory leak prevention */
lixa_monkeyrm_call_cleanup();
return 0;
} else
assert(TX_OK == rc);
printf("%s| tx_rollback(): %d\n", pgm, rc = tx_rollback());
if (2 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_close(): %d\n", pgm, rc = tx_close());
if (2 == fail_point) {
assert(TX_FAIL == rc);
printf("%s| ...finished (TX_FAIL)\n", pgm);
/* memory leak prevention */
lixa_monkeyrm_call_cleanup();
return 0;
} else
assert(TX_OK == rc);
printf("%s| tx_open(): %d\n", pgm, rc = tx_open());
assert(TX_OK == rc);
printf("%s| tx_close(): %d\n", pgm, rc = tx_close());
if (3 == fail_point)
assert(TX_FAIL == rc);
else
assert(TX_OK == rc);
printf("%s| tx_open(): %d\n", pgm, rc = tx_open());
if (3 == fail_point) {
assert(TX_FAIL == rc);
printf("%s| ...finished (TX_FAIL)\n", pgm);
exit(0);
} else
assert(TX_OK == rc);
printf("%s| ...finished\n", pgm);
return 0;
}
