test/wormhole_static_test.c

   1 // : vi ts=4 sw=4 noet :
   2 /*
   3 ==================================================================================
   4             Copyright (c) 2019 Nokia
   5             Copyright (c) 2018-2019 AT&T Intellectual Property.
   6
   7    Licensed under the Apache License, Version 2.0 (the "License");
   8    you may not use this file except in compliance with the License.
   9    You may obtain a copy of the License at
  10
  11            http://www.apache.org/licenses/LICENSE-2.0
  12
  13    Unless required by applicable law or agreed to in writing, software
  14    distributed under the License is distributed on an "AS IS" BASIS,
  15    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  16    See the License for the specific language governing permissions and
  17    limitations under the License.
  18 ==================================================================================
  19 */
  20
  21 /*
  22         Mmemonic:       wormhole_static.c
  23         Abstract:       Specific tests for wormhole. This module is included directly by
  24                                 the test driver at compile time.
  25
  26         Author:         E. Scott Daniels
  27         Date:           3 April 2019
  28 */
  29
  30 #include <unistd.h>
  31 #include <stdio.h>
  32 #include <stdlib.h>
  33 #include <strings.h>
  34 #include <errno.h>
  35 #include <string.h>
  36 #include <stdint.h>
  37
  38 #include "../src/common/include/rmr.h"
  39 #include "../src/common/include/rmr_agnostic.h"
  40
  41
  42 /*
  43         Note that the last tests in this function destroy the context and message so
  44         any tests added MUST be ahead of those tests.
  45 */
  46 static int worm_test( ) {
  47         uta_ctx_t* ctx;                 // context needed to test load static rt
  48         char    wbuf[1024];
  49         int errors = 0;                 // number errors found
  50         int     i;
  51         void* p;
  52
  53         rmr_mbuf_t*     mbuf;           // mbuf to send to peer
  54         int             whid = -1;
  55         int             last_whid;
  56
  57         ctx = (uta_ctx_t *) malloc( sizeof( uta_ctx_t ) );
  58         if( ctx == NULL ) {
  59                 fail_if_nil( ctx, "could not allocate dummy context" );
  60                 return 1;
  61         }
  62         memset( ctx, 0, sizeof( *ctx ) );
  63         ctx->my_name = strdup( "tester" );
  64
  65         gen_rt( ctx );
  66
  67         whid = rmr_wh_open( NULL, NULL );
  68         errors += fail_not_equal( whid, -1, "call to wh_open with invalid values did not return bad whid" );
  69
  70
  71         whid = rmr_wh_open( ctx, NULL );
  72         errors += fail_not_equal( whid, -1, "call to wh_open with invalid target did not return bad whid" );
  73
  74         whid = rmr_wh_open( ctx, "" );
  75         errors += fail_not_equal( whid, -1, "call to wh_open with empty target did not return bad whid" );
  76
  77         whid = rmr_wh_open( ctx, "localhost:89219" );
  78         errors += fail_if_equal( whid, -1, "call to wh_open with valid target failed" );
  79
  80         rmr_wh_close( ctx, 4 );                                 // test for coverage only; [5] should have nil pointer
  81         rmr_wh_close( ctx, 50 );                                        // test for coverage only; more than allocated reference
  82
  83         last_whid = whid;
  84         whid = rmr_wh_open( ctx, "localhost:89219" );
  85         errors += fail_not_equal( whid, last_whid, "call to wh_open with duplicate target did not return the same whid" );
  86
  87         for( i = 0; i < 20; i++ ) {                                                                                             // test ability to extend the table
  88                 snprintf( wbuf, sizeof( wbuf ), "localhost:864%02d", i );                       // new address for each so whid is different
  89                 whid = rmr_wh_open( ctx, wbuf );
  90                 snprintf( wbuf, sizeof( wbuf ), "call to wh_open failed for iteration = %d", i );
  91                 errors += fail_if_equal( whid, -1, wbuf );
  92                 if( i ) {
  93                         snprintf( wbuf, sizeof( wbuf ), "call to wh_open for iteration = %d returned same whid: %d", i, whid );
  94                         errors += fail_if_equal( whid, last_whid, wbuf );
  95                 }
  96
  97                 last_whid = whid;
  98         }
  99
 100         rmr_wh_close( ctx, 3 );         // close one, then open a new one to verify that hole is found
 101         whid = rmr_wh_open( ctx, "localhost:21961" );
 102         errors += fail_not_equal( whid, 3, "attempt to fill in a hole didn't return expected" );
 103
 104         p = rmr_wh_send_msg( NULL, 0, NULL );                   // tests for coverage
 105         fail_not_nil( p, "wh_send_msg returned a pointer when given nil context and message" );
 106
 107         p = rmr_wh_send_msg( ctx, 0, NULL );
 108         fail_not_nil( p, "wh_send_msg returned a pointer when given nil message with valid context" );
 109
 110         mbuf = rmr_alloc_msg( ctx, 2048 );                      // get an muf to pass round
 111         errors += fail_if_nil( mbuf, "unable to allocate mbuf for send tests (giving up on send tests)" );
 112
 113         mbuf->state = 0;
 114         mbuf = rmr_wh_send_msg( NULL, 0, mbuf );
 115         if( mbuf ) {
 116                 fail_if_equal( mbuf->state, 0, "wh_send_msg returned a zero state when given a nil context" );
 117         }
 118         fail_if_nil( mbuf, "wh_send_msg returned a nil message buffer when given a nil context"  );
 119
 120         while( mbuf ) {
 121                 if( !(mbuf = rmr_wh_send_msg( ctx, 50, mbuf )) ) {              // test for coverage
 122                         errors += fail_if_nil( mbuf, "send didn't return an mbuf (skip rest of send tests)" );
 123                         break;
 124                 }
 125
 126                 mbuf = rmr_wh_send_msg( ctx, 4, mbuf );
 127                 errors += fail_not_equal( mbuf->state, RMR_OK, "valid wormhole send failed" );
 128                 errors += fail_not_equal( errno, 0, "errno after valid wormhole send was not 0" );
 129
 130                 rmr_wh_close( ctx, 4 );
 131                 mbuf = rmr_wh_send_msg( ctx, 4, mbuf );
 132                 rmr_wh_send_msg( ctx, 4, mbuf );
 133                 errors += fail_not_equal( mbuf->state, RMR_ERR_WHID, "send on closed wormhole didn't set correct state in msg" );
 134
 135                 break;
 136         }
 137
 138
 139         // WARNING:  these tests destroy the context, so they MUST be last
 140         if( mbuf ) {                    // only if we got an mbuf
 141                 errno = 0;
 142                 mbuf->header = NULL;
 143                 mbuf = rmr_wh_send_msg( ctx, 5, mbuf );         // coverage test on mbuf header check
 144                 errors += fail_not_equal( errno, EBADMSG, "wh_send didn't set errno after bad mbuf send" );
 145                 errors += fail_not_equal( mbuf->state, RMR_ERR_NOHDR, "send with bad header did now set msg state correctly" );
 146
 147                 errno = 0;
 148                 wh_nuke( ctx );
 149                 ctx->wormholes = NULL;
 150                 mbuf = rmr_wh_send_msg( ctx, 4, mbuf );         // coverage test on mbuf header check
 151                 errors += fail_not_equal( errno, EINVAL, "wh_send didn't set errno after send without wormole reference" );
 152                 errors += fail_not_equal( mbuf->state, RMR_ERR_NOWHOPEN, "wh_send didn't set msg state after send without wormole reference" );
 153
 154                 rmr_free_msg( mbuf );
 155         }
 156
 157         if( ctx ) {
 158                 free( ctx->my_name );
 159                 free( ctx );
 160         }
 161
 162         return !!errors;                        // 1 or 0 regardless of count
 163 }