atmitest/test021_xafull/atmiclt21-105.c

0001 /**
0002  * @brief XA transaction processing, tests, test case for #105
0003  *
0004  * @file atmiclt21-105.c
0005  */
0006 /* -----------------------------------------------------------------------------
0007  * Enduro/X Middleware Platform for Distributed Transaction Processing
0008  * Copyright (C) 2009-2016, ATR Baltic, Ltd. All Rights Reserved.
0009  * Copyright (C) 2017-2023, Mavimax, Ltd. All Rights Reserved.
0010  * This software is released under one of the following licenses:
0011  * AGPL (with Java and Go exceptions) or Mavimax's license for commercial use.
0012  * See LICENSE file for full text.
0013  * -----------------------------------------------------------------------------
0014  * AGPL license:
0015  *
0016  * This program is free software; you can redistribute it and/or modify it under
0017  * the terms of the GNU Affero General Public License, version 3 as published
0018  * by the Free Software Foundation;
0019  *
0020  * This program is distributed in the hope that it will be useful, but WITHOUT ANY
0021  * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
0022  * PARTICULAR PURPOSE. See the GNU Affero General Public License, version 3
0023  * for more details.
0024  *
0025  * You should have received a copy of the GNU Affero General Public License along
0026  * with this program; if not, write to the Free Software Foundation, Inc.,
0027  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
0028  *
0029  * -----------------------------------------------------------------------------
0030  * A commercial use license is available from Mavimax, Ltd
0031  * contact@mavimax.com
0032  * -----------------------------------------------------------------------------
0033  */
0034 #include <string.h>
0035 #include <stdio.h>
0036 #include <stdlib.h>
0037 #include <memory.h>
0038 #include <math.h>
0039 #include <unistd.h>
0040
0041 #include <atmi.h>
0042 #include <ubf.h>
0043 #include <ndebug.h>
0044 #include <test.fd.h>
0045 #include <ndrstandard.h>
0046 #include <nstopwatch.h>
0047 /*---------------------------Externs------------------------------------*/
0048 /*---------------------------Macros-------------------------------------*/
0049 /*---------------------------Enums--------------------------------------*/
0050 /*---------------------------Typedefs-----------------------------------*/
0051 /*---------------------------Globals------------------------------------*/
0052 /*---------------------------Statics------------------------------------*/
0053 /*---------------------------Prototypes---------------------------------*/
0054
0055 /*
0056  * Do the test call to the server
0057  */
0058 int main(int argc, char** argv) {
0059
0060     UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 9216);
0061     long rsplen;
0062     int i=0;
0063     int ret=EXSUCCEED;
0064
0065     if (EXSUCCEED!=tpopen())
0066     {
0067         NDRX_LOG(log_error, "TESTERROR: tpopen() fail: %d:[%s]",
0068                                             tperrno, tpstrerror(tperrno));
0069         ret=EXFAIL;
0070         goto out;
0071     }
0072
0073     /***************************************************************************/
0074     NDRX_LOG(log_debug, "Testing Bug #105");
0075     /***************************************************************************/
0076
0077     if (EXSUCCEED!=tpbegin(5, 0))
0078     {
0079         NDRX_LOG(log_error, "TESTERROR: tpbegin() fail: %d:[%s]",
0080                                             tperrno, tpstrerror(tperrno));
0081         ret=EXFAIL;
0082         goto out;
0083     }
0084
0085     Bchg(p_ub, T_STRING_FLD, 0, "TEST HELLO WORLD COMMIT", 0L);
0086
0087     /* Call Svc1 */
0088     if (EXFAIL == (ret=tpcall("RUNTX", (char *)p_ub, 0L, (char **)&p_ub, &rsplen,0)))
0089     {
0090         NDRX_LOG(log_error, "TX3SVC failed: %s", tpstrerror(tperrno));
0091         ret=EXFAIL;
0092         goto out;
0093     }
0094
0095     if (EXSUCCEED==tpcommit(0))
0096     {
0097         NDRX_LOG(log_error, "TESTERROR: tpcommit()==%d fail: %d:[%s]",
0098                                             ret, tperrno, tpstrerror(tperrno));
0099         ret=EXFAIL;
0100         goto out;
0101     }
0102
0103     if (TPETIME!=tperrno)
0104     {
0105         NDRX_LOG(log_error, "TESTERROR: Expected TPETIME, Got tpcommit()==%d fail: %d:[%s]",
0106                                             ret, tperrno, tpstrerror(tperrno));
0107
0108         ret=EXFAIL;
0109         goto out;
0110     }
0111
0112     /***************************************************************************/
0113     NDRX_LOG(log_debug, "Done...");
0114     /***************************************************************************/
0115
0116     if (EXSUCCEED!=tpclose())
0117     {
0118         NDRX_LOG(log_error, "TESTERROR: tpclose() fail: %d:[%s]",
0119                                             tperrno, tpstrerror(tperrno));
0120         ret=EXFAIL;
0121         goto out;
0122     }
0123
0124 out:
0125     if (EXSUCCEED!=ret)
0126     {
0127         /* atleast try... */
0128         if (EXSUCCEED!=tpabort(0))
0129         {
0130             NDRX_LOG(log_error, "TESTERROR: tpabort() fail: %d:[%s]",
0131                                                 tperrno, tpstrerror(tperrno));
0132         }
0133         tpclose();
0134     }
0135
0136     tpterm();
0137
0138     NDRX_LOG(log_error, "Exiting with %d", ret);
0139
0140     return ret;
0141 }
0142
0143 /* vim: set ts=4 sw=4 et smartindent: */