Back to home page

Enduro/X

 
 

    


0001 /**
0002  * @brief Mixed tpcall with tpacall - client
0003  *
0004  * @file atmiclt78.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 #include <fcntl.h>
0047 #include <unistd.h>
0048 #include <nstdutil.h>
0049 #include <exassert.h>
0050 #include "test78.h"
0051 /*---------------------------Externs------------------------------------*/
0052 /*---------------------------Macros-------------------------------------*/
0053 /*---------------------------Enums--------------------------------------*/
0054 /*---------------------------Typedefs-----------------------------------*/
0055 /*---------------------------Globals------------------------------------*/
0056 /*---------------------------Statics------------------------------------*/
0057 /*---------------------------Prototypes---------------------------------*/
0058 
0059 /**
0060  * Do the test call to the server
0061  */
0062 int main(int argc, char** argv)
0063 {
0064     UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 56000);
0065     UBFH *p_ub2 = (UBFH *)tpalloc("UBF", NULL, 56000);
0066     long rsplen;
0067     int i;
0068     int cd;
0069     long test_num=0;
0070     long test_num_sync, test_num_async, l;
0071     int ret=EXSUCCEED;
0072     
0073     for (i=0; i<100000; i++)
0074     {
0075         /* do the acall */
0076         test_num++;
0077         test_num_async = test_num;
0078         
0079         NDRX_ASSERT_UBF_OUT((EXSUCCEED==Bchg(p_ub, T_LONG_FLD, 0, (char *)&test_num_async, 0L)), 
0080                 "Failed to set T_LONG_FLD to p_ub");
0081         
0082         NDRX_ASSERT_TP_OUT((EXFAIL != tpacall("TESTSV", (char *)p_ub, 0L, 0L)), 
0083                 "Failed to tpacall TESTSV");
0084         
0085         test_num++;
0086         test_num_sync = test_num;
0087         NDRX_ASSERT_UBF_OUT((EXSUCCEED==Bchg(p_ub2, T_LONG_FLD, 0, (char *)&test_num_sync, 0L)), 
0088                 "Failed to set T_LONG_FLD to p_ub2");
0089         
0090         /* now to the sync call */
0091         NDRX_ASSERT_TP_OUT((EXFAIL != tpcall("TESTSV", (char *)p_ub2, 0L, (char **)&p_ub2, &rsplen,0)), 
0092                 "Failed to tpcall TESTSV");
0093         
0094         /* get echo field, */
0095         NDRX_ASSERT_UBF_OUT((EXSUCCEED==Bget(p_ub2, T_LONG_2_FLD, 0, (char *)&l, 0L)), 
0096                 "Failed to set T_LONG_FLD to p_ub2");
0097         
0098         /* shall match the reply */
0099         NDRX_ASSERT_VAL_OUT((l==test_num_sync), "Reply does not match (1): %ld vs %ld", 
0100                 l, test_num_sync);
0101         
0102         /* read the reply... */
0103         NDRX_ASSERT_TP_OUT((EXFAIL != tpgetrply(&cd, (char **)&p_ub, &rsplen, TPGETANY)), 
0104                 "Failed tpgetrply failed");
0105         
0106         /* get reply value */
0107         NDRX_ASSERT_UBF_OUT((EXSUCCEED==Bget(p_ub, T_LONG_2_FLD, 0, (char *)&l, 0L)), 
0108                 "Failed to set T_LONG_FLD to p_ub2");
0109         
0110         /* match the response */
0111         NDRX_ASSERT_VAL_OUT((l==test_num_async), "Reply does not match (2): %ld vs %ld",
0112                 l, test_num_async);
0113     }
0114     
0115 out:
0116     tpterm();
0117     fprintf(stderr, "Exit with %d\n", ret);
0118 
0119     return ret;
0120 }
0121 
0122 /* vim: set ts=4 sw=4 et smartindent: */