atmitest/test009_srvdie/atmiclt.c

0001 /**
0002  * @brief Basic test client
0003  *
0004  * @file atmiclt.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
0039 #include <atmi.h>
0040 #include <ubf.h>
0041 #include <ndebug.h>
0042 #include <test.fd.h>
0043 #include <ndrstandard.h>
0044 /*---------------------------Externs------------------------------------*/
0045 /*---------------------------Macros-------------------------------------*/
0046 /*---------------------------Enums--------------------------------------*/
0047 /*---------------------------Typedefs-----------------------------------*/
0048 /*---------------------------Globals------------------------------------*/
0049 /*---------------------------Statics------------------------------------*/
0050 /*---------------------------Prototypes---------------------------------*/
0051
0052 /*
0053  * Do the test call to the server
0054  */
0055 int main(int argc, char** argv) {
0056
0057     UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 1024);
0058     long rsplen;
0059     int ret=EXSUCCEED;
0060     int tpcall_err;
0061     int cd;
0062     if (argc > 1 && 0==strcmp(argv[1], "tpacall_norply"))
0063     {
0064         /* this one is called and server processes it for 4 sec and then die */
0065         ret = tpacall("EXITSVC", (char *)p_ub, 0L, TPNOREPLY);
0066         if (EXSUCCEED!=ret)
0067         {
0068             NDRX_LOG(log_error, "TESTERROR first tpacall got %d: %s",
0069                 ret, tpstrerror(tperrno));
0070             EXFAIL_OUT(ret);
0071         }
0072
0073         /* we make next calls */
0074         ret = tpacall("EXITSVC", (char *)p_ub, 0L, TPNOREPLY);
0075         if (EXSUCCEED!=ret)
0076         {
0077             NDRX_LOG(log_error, "TESTERROR second tpacall got %d: %s",
0078                 ret, tpstrerror(tperrno));
0079             EXFAIL_OUT(ret);
0080         }
0081
0082         NDRX_LOG(log_error, "Wait 10 for dead + sanity check...");
0083         sleep(20);
0084
0085         if (EXSUCCEED==(ret = tpgetrply(&cd, (char **)&p_ub, &rsplen,
0086                 TPNOBLOCK | TPGETANY)))
0087         {
0088             NDRX_LOG(log_error, "TESTERROR There must be TPEBLOCK error set!");
0089             EXFAIL_OUT(ret);
0090         }
0091
0092         if (TPEBLOCK!=tperrno)
0093         {
0094             NDRX_LOG(log_error, "TESTERROR: tperrno must be TPEBLOCK but is: %d: %s",
0095                     tperrno, tpstrerror(tperrno));
0096             EXFAIL_OUT(ret);
0097         }
0098
0099         return 0;
0100     }
0101
0102     if (EXFAIL == tpcall("TESTSVFN", (char *)p_ub, 0L, (char **)&p_ub, &rsplen,0))
0103     {
0104         NDRX_LOG(log_error, "TESTSVFN failed: %s", tpstrerror(tperrno));
0105
0106         /* Check the code TOUT & SVCERR is OK*/
0107         tpcall_err = tperrno;
0108         if (tpcall_err==TPENOENT)
0109         {
0110             /* service error is reply from ndrxd on behalf of the server */
0111             NDRX_LOG(log_error, "OK-TPESVCERR");
0112         }
0113         else if (tpcall_err==TPETIME)
0114         {
0115             /* tout because first is dead */
0116             NDRX_LOG(log_error, "OK-TPETIME");
0117         }
0118         else
0119         {
0120             NDRX_LOG(log_error, "TESTERROR: UNEXPECTED ERROR");
0121         }
0122
0123         goto out;
0124     }
0125
0126 out:
0127     /* Terminate the session */
0128     tpterm();
0129
0130     return ret;
0131 }
0132
0133 /* vim: set ts=4 sw=4 et smartindent: */