atmitest/test106_periodcb/atmiclt106.c

0001 /**
0002  * @brief Verify time accurrancy of the tpext_addperiodcb() callbacks - client
0003  *
0004  * @file atmiclt106.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 "test106.h"
0050 /*---------------------------Externs------------------------------------*/
0051 /*---------------------------Macros-------------------------------------*/
0052 #define DEVIATION_ALLOW 3 /**< seems on aix some issues, with larger gaps */
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
0065     UBFH *p_ub = (UBFH *)tpalloc("UBF", NULL, 56000);
0066     long rsplen;
0067     int i;
0068     int ret=EXSUCCEED;
0069     ndrx_stopwatch_t w;
0070     long l=0;
0071     int test_case;
0072
0073     /* the accurracy of system-v set by NDRX_SCANUNIT is 10ms
0074      * thus running for 1 minute, we shall get around 60 calls (as 60*10 ms is still less than 1 second)
0075      */
0076     for (test_case=0; test_case<2; test_case++)
0077     {
0078         ndrx_stopwatch_reset(&w);
0079
0080         NDRX_LOG(log_error, "START");
0081         while (ndrx_stopwatch_get_delta(&w) <= 60*1000)
0082         {
0083             if (EXFAIL == tpcall("TESTSV", (char *)p_ub, 0L, (char **)&p_ub, &rsplen,0))
0084             {
0085                 NDRX_LOG(log_error, "TESTSV failed: %s", tpstrerror(tperrno));
0086                 ret=EXFAIL;
0087                 goto out;
0088             }
0089
0090             if (0==test_case)
0091             {
0092                 /* This shall make in non fixed versions to count
0093                  * get callbacks every 1.5 sec, thus totally 40.
0094                  * in fixed verison it must be 60.
0095                  */
0096                 usleep(800*1000);
0097             }
0098             /* for test_case 1, ensure that callbackups work correctly at full load
0099              * of the service
0100              */
0101         }
0102         NDRX_LOG(log_error, "FINISH");
0103
0104         /* read fresh results... */
0105         if (EXFAIL == tpcall("TESTSV", (char *)p_ub, 0L, (char **)&p_ub, &rsplen,0))
0106         {
0107             NDRX_LOG(log_error, "TESTSV failed: %s", tpstrerror(tperrno));
0108             ret=EXFAIL;
0109             goto out;
0110         }
0111
0112         if (EXSUCCEED!=Bget(p_ub, T_LONG_FLD, 0, (char *)&l, 0L))
0113         {
0114             NDRX_LOG(log_error, "Failed to get T_LONG_FLD");
0115             ret=EXFAIL;
0116             goto out;
0117         }
0118
0119         if (0==test_case)
0120         {
0121             /* Ensure that fix is working (+1 as during the run.sh there is sleep) */
0122             if (labs(l-60)> DEVIATION_ALLOW)
0123             {
0124                 NDRX_LOG(log_error, "TESTERROR: Expected 60 +- %d callback calls, got %ld",
0125                     DEVIATION_ALLOW, l);
0126                 ret=EXFAIL;
0127                 goto out;
0128             }
0129         }
0130         else
0131         {
0132             /* Ensure that fix is working (+1 as during the run.sh there is sleep) */
0133             if (labs(l-120)> DEVIATION_ALLOW)
0134             {
0135                 NDRX_LOG(log_error, "TESTERROR: Expected 120 +- %d callback calls, got %ld",
0136                     DEVIATION_ALLOW*2, l);
0137                 ret=EXFAIL;
0138                 goto out;
0139             }
0140         }
0141     }
0142
0143 out:
0144     tpterm();
0145     fprintf(stderr, "Exit with %d\n", ret);
0146
0147     return ret;
0148 }
0149
0150 /* vim: set ts=4 sw=4 et smartindent: */