Back to home page

Enduro/X

 
 

    


0001 /**
0002  * @brief XA transaction processing, cli tests (listing & commit & abort)
0003  *
0004  * @file atmiclt21-cli.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 
0040 #include <atmi.h>
0041 #include <ubf.h>
0042 #include <ndebug.h>
0043 #include <test.fd.h>
0044 #include <ndrstandard.h>
0045 #include <nstopwatch.h>
0046 /*---------------------------Externs------------------------------------*/
0047 /*---------------------------Macros-------------------------------------*/
0048 /*---------------------------Enums--------------------------------------*/
0049 /*---------------------------Typedefs-----------------------------------*/
0050 /*---------------------------Globals------------------------------------*/
0051 /*---------------------------Statics------------------------------------*/
0052 /*---------------------------Prototypes---------------------------------*/
0053 
0054 /*
0055  * Just open the transaction, and let do shell testing later
0056  */
0057 int main(int argc, char** argv) {
0058 
0059     UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 9216);
0060     long rsplen;
0061     int i=0;
0062     int ret=EXSUCCEED;
0063     TPTRANID tranid;
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, "Just opening a transactions (later will process cli by shell)");
0075     /***************************************************************************/
0076     for (i=0; i<100; i++)
0077     {
0078 
0079         if (EXSUCCEED!=tpbegin(60, 0))
0080         {
0081             NDRX_LOG(log_error, "TESTERROR: tpbegin() fail: %d:[%s]", 
0082                                                 tperrno, tpstrerror(tperrno));
0083             ret=EXFAIL;
0084             goto out;
0085         }
0086 
0087         Bchg(p_ub, T_STRING_FLD, 0, "TEST HELLO WORLD COMMIT", 0L);
0088 
0089         /* Call Svc1 */
0090         if (EXFAIL == (ret=tpcall("RUNTX", (char *)p_ub, 0L, (char **)&p_ub, &rsplen,0)))
0091         {
0092             NDRX_LOG(log_error, "TX3SVC failed: %s", tpstrerror(tperrno));
0093             ret=EXFAIL;
0094             goto out;
0095         }
0096 
0097         /* Suspend off from tran... */
0098         tpsuspend (&tranid, 0);
0099 
0100     }
0101     
0102 out:
0103     /* So for some reason we do not  */
0104     tpclose();
0105 
0106     tpterm();
0107     
0108     NDRX_LOG(log_error, "Exiting with %d", ret);
0109             
0110     return ret;
0111 }
0112 
0113 /* vim: set ts=4 sw=4 et smartindent: */