atmitest/test075_dispthread/atmiclt75.c

0001 /**
0002  * @brief Test Enduro/X server dispatch threading - client
0003  *
0004  * @file atmiclt75.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 "test75.h"
0050 /*---------------------------Externs------------------------------------*/
0051 /*---------------------------Macros-------------------------------------*/
0052 #define TEST_THREADS            6   /**< number of threads used         */
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     long rsplen;
0065     int i, j;
0066     int ret=EXSUCCEED;
0067     int cd[TEST_THREADS];
0068     short cd_rsp[TEST_THREADS];
0069
0070     for (i=0; i<10; i++)
0071     {
0072         UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 56000);
0073
0074         for (j=0; j<TEST_THREADS; j++)
0075         {
0076             if (EXFAIL==CBchg(p_ub, T_STRING_FLD, 0, VALUE_EXPECTED, 0, BFLD_STRING))
0077             {
0078                 NDRX_LOG(log_debug, "Failed to set T_STRING_FLD[0]: %s", Bstrerror(Berror));
0079                 EXFAIL_OUT(ret);
0080             }
0081
0082             if (EXFAIL == (cd[j]=tpacall("TESTSV", (char *)p_ub, 0L, 0)))
0083             {
0084                 NDRX_LOG(log_error, "TESTSV %d %d failed: %s", i, j, tpstrerror(tperrno));
0085                 EXFAIL_OUT(ret);
0086             }
0087         }
0088
0089         memset(cd_rsp, 0, sizeof(cd_rsp));
0090         for (j=0; j<TEST_THREADS; j++)
0091         {
0092             short tmp;
0093             if (EXFAIL==tpgetrply(&cd[j], (char **)&p_ub, &rsplen, 0))
0094             {
0095                 NDRX_LOG(log_error, "tpgetrply %d %d failed: %s", i, j,
0096                         tpstrerror(tperrno));
0097                 EXFAIL_OUT(ret);
0098             }
0099
0100             /* get the reply thread id... */
0101             if (EXSUCCEED!=Bget(p_ub, T_SHORT_FLD, 0, (char *)&tmp, 0))
0102             {
0103                 NDRX_LOG(log_error, "failed to get T_SHORT_FLD %d %d: %s", i, j,
0104                         Bstrerror(Berror));
0105                 EXFAIL_OUT(ret);
0106             }
0107
0108             cd_rsp[tmp]++;
0109         }
0110
0111         /* check that very response is unique */
0112         for (j=0; j<TEST_THREADS; j++)
0113         {
0114             if (1!=cd_rsp[j])
0115             {
0116                 NDRX_LOG(log_error, "Slot %d invalid rsp %hd", j, cd_rsp[j]);
0117                 EXFAIL_OUT(ret);
0118             }
0119         }
0120
0121
0122         tpfree((char *)p_ub);
0123     }
0124
0125 out:
0126     tpterm();
0127     fprintf(stderr, "Exit with %d\n", ret);
0128
0129     return ret;
0130 }
0131
0132 /* vim: set ts=4 sw=4 et smartindent: */