Back to home page

Enduro/X

 
 

    


0001 /**
0002  * @brief Test Environment in ndrxconfig.xml - server
0003  *
0004  * @file atmisv55.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 
0035 #include <stdio.h>
0036 #include <stdlib.h>
0037 #include <ndebug.h>
0038 #include <atmi.h>
0039 #include <ndrstandard.h>
0040 #include <ubf.h>
0041 #include <test.fd.h>
0042 #include <string.h>
0043 #include <unistd.h>
0044 #include "test55.h"
0045 
0046 /*---------------------------Externs------------------------------------*/
0047 /*---------------------------Macros-------------------------------------*/
0048 /*---------------------------Enums--------------------------------------*/
0049 /*---------------------------Typedefs-----------------------------------*/
0050 /*---------------------------Globals------------------------------------*/
0051 /*---------------------------Statics------------------------------------*/
0052 /*---------------------------Prototypes---------------------------------*/
0053 
0054 /**
0055  * Standard service entry
0056  */
0057 void TESTSV (TPSVCINFO *p_svc)
0058 {
0059     int ret=EXSUCCEED;
0060     char testbuf[1024];
0061     UBFH *p_ub = (UBFH *)p_svc->data;
0062 
0063     NDRX_LOG(log_debug, "%s got call", __func__);
0064 
0065     /* Just print the buffer */
0066     Bprint(p_ub);
0067     
0068     if (EXFAIL==Bget(p_ub, T_STRING_FLD, 0, testbuf, 0))
0069     {
0070         NDRX_LOG(log_error, "TESTERROR: Failed to get T_STRING_FLD: %s", 
0071                  Bstrerror(Berror));
0072         ret=EXFAIL;
0073         goto out;
0074     }
0075     
0076     if (0!=strcmp(testbuf, VALUE_EXPECTED))
0077     {
0078         NDRX_LOG(log_error, "TESTERROR: Expected: [%s] got [%s]",
0079             VALUE_EXPECTED, testbuf);
0080         ret=EXFAIL;
0081         goto out;
0082     }
0083         
0084     
0085 out:
0086     tpreturn(  ret==EXSUCCEED?TPSUCCESS:TPFAIL,
0087                 0L,
0088                 (char *)p_ub,
0089                 0L,
0090                 0L);
0091 }
0092 
0093 /**
0094  * Do initialisation
0095  */
0096 int NDRX_INTEGRA(tpsvrinit)(int argc, char **argv)
0097 {
0098     int ret = EXSUCCEED;
0099     char *p;
0100     NDRX_LOG(log_debug, "tpsvrinit called");
0101       
0102     /* test environment variables... */
0103     
0104     /* solaris does not print NULLs... */
0105     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO1", getenv("HELLO1")?getenv("HELLO1"):"(null)");
0106     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO2", getenv("HELLO2")?getenv("HELLO2"):"(null)");
0107     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO3", getenv("HELLO3")?getenv("HELLO3"):"(null)");
0108     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO4", getenv("HELLO4")?getenv("HELLO4"):"(null)");
0109     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO5", getenv("HELLO5")?getenv("HELLO5"):"(null)");
0110     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO6", getenv("HELLO6")?getenv("HELLO6"):"(null)");
0111     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO7", getenv("HELLO7")?getenv("HELLO7"):"(null)");
0112     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO10", getenv("HELLO10")?getenv("HELLO10"):"(null)");
0113     NDRX_LOG(log_debug, "[%s] = [%s]", "HELLO11", getenv("HELLO11")?getenv("HELLO11"):"(null)");
0114     
0115     if (10==tpgetsrvid())
0116     {
0117         if (0!=strcmp((p=getenv("HELLO1")), "THIS IS 1"))
0118         {
0119             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 1] got [%s]", p);
0120             EXFAIL_OUT(ret);
0121         }
0122         
0123         if (0!=strcmp((p=getenv("HELLO2")), "THIS IS 2"))
0124         {
0125             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 2] got [%s]", p);
0126             EXFAIL_OUT(ret);
0127         }
0128         
0129         if (0!=strcmp((p=getenv("HELLO3")), "THIS IS 3"))
0130         {
0131             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 3] got [%s]", p);
0132             EXFAIL_OUT(ret);
0133         }
0134         
0135         if (NULL!=(p=getenv("HELLO4")))
0136         {
0137             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO4 but got [%s]", p);
0138             EXFAIL_OUT(ret);
0139         }
0140         
0141         /* test the tuxgetenv() */
0142         
0143         if (tuxgetenv("HELLO4") != getenv("HELLO4"))
0144         {
0145             NDRX_LOG(log_error, "TESTERROR ! Invalid tuxenv vs getenv: [%s] vs [%s]", 
0146                     tuxgetenv("HELLO4"), getenv("HELLO4"));
0147             EXFAIL_OUT(ret);
0148         }
0149         
0150         /* Feature #393 */
0151         if (NULL!=tuxgetenv("NON_EXISTING_HELL99999"))
0152         {
0153             NDRX_LOG(log_error, "TESTERROR ! NON_EXISTING_HELL99999 shall be "
0154                     "missing but got [%s]", tuxgetenv("NON_EXISTING_HELL99999"));
0155             EXFAIL_OUT(ret);
0156         }
0157             
0158         if (0!=strcmp((p=getenv("HELLO5")), "THIS IS 5"))
0159         {
0160             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 5] got [%s]", p);
0161             EXFAIL_OUT(ret);
0162         }
0163 
0164         if (NULL!=(p=getenv("HELLO6")))
0165         {
0166             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO6 but got [%s]", p);
0167             EXFAIL_OUT(ret);
0168         }
0169         
0170         if (NULL!=(p=getenv("HELLO7")))
0171         {
0172             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO7 but got [%s]", p);
0173             EXFAIL_OUT(ret);
0174         }        
0175     }
0176     else if (11==tpgetsrvid())
0177     {
0178         if (0!=strcmp((p=getenv("HELLO6")), "THIS IS 6"))
0179         {
0180             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 6] got [%s]", p);
0181             EXFAIL_OUT(ret);
0182         }
0183         
0184         if (0!=strcmp((p=getenv("HELLO7")), "THIS IS 7"))
0185         {
0186             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 7] got [%s]", p);
0187             EXFAIL_OUT(ret);
0188         }
0189         
0190         if (0!=strcmp((p=getenv("HELLO5")), "THIS IS 5"))
0191         {
0192             NDRX_LOG(log_error, "TESTERROR ! Expected [THIS IS 5] got [%s]", p);
0193             EXFAIL_OUT(ret);
0194         }
0195         
0196         if (NULL!=(p=getenv("HELLO1")))
0197         {
0198             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO1 but got [%s]", p);
0199             EXFAIL_OUT(ret);
0200         }
0201         
0202         if (NULL!=(p=getenv("HELLO2")))
0203         {
0204             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO2 but got [%s]", p);
0205             EXFAIL_OUT(ret);
0206         }
0207         
0208         if (NULL!=(p=getenv("HELLO3")))
0209         {
0210             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO3 but got [%s]", p);
0211             EXFAIL_OUT(ret);
0212         }
0213         
0214         if (NULL!=(p=getenv("HELLO4")))
0215         {
0216             NDRX_LOG(log_error, "TESTERROR ! Expected NULL for HELLO4 but got [%s]", p);
0217             EXFAIL_OUT(ret);
0218         }
0219     }
0220     
0221     if (EXSUCCEED!=tpadvertise("TESTSV", TESTSV))
0222     {
0223         NDRX_LOG(log_error, "Failed to initialise TESTSV!");
0224     }
0225 out:
0226     return ret;
0227 }
0228 
0229 /**
0230  * Do de-initialisation
0231  */
0232 void NDRX_INTEGRA(tpsvrdone)(void)
0233 {
0234     NDRX_LOG(log_debug, "tpsvrdone called");
0235 }
0236 
0237 /* vim: set ts=4 sw=4 et smartindent: */