atmitest/test002_basicforward/atmisv2FIRST.c

0001 /**
0002  *
0003  * @file atmisv2FIRST.c
0004  */
0005 /* -----------------------------------------------------------------------------
0006  * Enduro/X Middleware Platform for Distributed Transaction Processing
0007  * Copyright (C) 2009-2016, ATR Baltic, Ltd. All Rights Reserved.
0008  * Copyright (C) 2017-2023, Mavimax, Ltd. All Rights Reserved.
0009  * This software is released under one of the following licenses:
0010  * AGPL (with Java and Go exceptions) or Mavimax's license for commercial use.
0011  * See LICENSE file for full text.
0012  * -----------------------------------------------------------------------------
0013  * AGPL license:
0014  *
0015  * This program is free software; you can redistribute it and/or modify it under
0016  * the terms of the GNU Affero General Public License, version 3 as published
0017  * by the Free Software Foundation;
0018  *
0019  * This program is distributed in the hope that it will be useful, but WITHOUT ANY
0020  * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
0021  * PARTICULAR PURPOSE. See the GNU Affero General Public License, version 3
0022  * for more details.
0023  *
0024  * You should have received a copy of the GNU Affero General Public License along
0025  * with this program; if not, write to the Free Software Foundation, Inc.,
0026  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
0027  *
0028  * -----------------------------------------------------------------------------
0029  * A commercial use license is available from Mavimax, Ltd
0030  * contact@mavimax.com
0031  * -----------------------------------------------------------------------------
0032  */
0033
0034 #include <stdio.h>
0035 #include <stdlib.h>
0036 #include <ndebug.h>
0037 #include <atmi.h>
0038 #include <ndrstandard.h>
0039 #include <ubf.h>
0040 #include <test.fd.h>
0041
0042 void TEST2_1ST (TPSVCINFO *p_svc)
0043 {
0044     int ret=EXSUCCEED;
0045
0046     static double d = 55.66;
0047
0048     UBFH *p_ub = (UBFH *)p_svc->data;
0049
0050     NDRX_LOG(log_debug, "TEST2_1ST got call");
0051
0052     /* Just print the buffer */
0053     Bprint(p_ub);
0054     if (NULL==(p_ub = (UBFH *)tprealloc((char *)p_ub, 8192))) /* allocate some stuff for more data to put in  */
0055     {
0056         ret=EXFAIL;
0057         goto out;
0058     }
0059
0060     d+=1;
0061
0062     if (EXFAIL==Badd(p_ub, T_DOUBLE_FLD, (char *)&d, 0))
0063     {
0064         ret=EXFAIL;
0065         goto out;
0066     }
0067
0068 out:
0069
0070     /* indicator that we shall send to invalid server */
0071     if (Bpres(p_ub, T_STRING_10_FLD, 0))
0072     {
0073         tpforward(  "TEST2_2ND_NON_EXIST",
0074                 (char *)p_ub,
0075                 0L,
0076                 0L);
0077     }
0078     else
0079     {
0080         tpforward(  "TEST2_2ND",
0081                     (char *)p_ub,
0082                     0L,
0083                     0L);
0084     }
0085 }
0086
0087 /*
0088  * Do initialization
0089  */
0090 int NDRX_INTEGRA(tpsvrinit)(int argc, char **argv)
0091 {
0092     NDRX_LOG(log_debug, "tpsvrinit called");
0093
0094     if (EXSUCCEED!=tpadvertise("TEST2_1ST", TEST2_1ST))
0095     {
0096         NDRX_LOG(log_error, "Failed to initialize TEST2_1ST (first)!");
0097     }
0098     else if (EXSUCCEED!=tpadvertise("TEST2_1ST_AL", TEST2_1ST))
0099     {
0100         NDRX_LOG(log_error, "Failed to initialize TEST2_1ST_AL (alias)!");
0101     }
0102
0103     return EXSUCCEED;
0104 }
0105
0106 /**
0107  * Do de-initialization
0108  */
0109 void NDRX_INTEGRA(tpsvrdone)(void)
0110 {
0111     NDRX_LOG(log_debug, "tpsvrdone called");
0112 }
0113
0114 /* vim: set ts=4 sw=4 et smartindent: */