test/tools_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 /*
  23         Mnemonic:       tools_testh.c
  24         Abstract:       Unit tests for the RMr tools module.
  25         Author:         E. Scott Daniels
  26         Date:           21 January 2019
  27 */
  28
  29
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <netdb.h>
  33 #include <errno.h>
  34 #include <string.h>
  35 #include <errno.h>
  36 #include <pthread.h>
  37 #include <ctype.h>
  38
  39 #include "../src/common/include/rmr.h"
  40 #include "../src/common/include/rmr_agnostic.h"
  41 #include "test_support.c"               // our private library of test tools
  42
  43 // ===== dummy context for tools testing so we don't have to pull in all of the nano/nng specific stuff =====
  44 struct uta_ctx {
  45         char*   my_name;                        // dns name of this host to set in sender field of a message
  46         int     shutdown;                               // thread notification if we need to tell them to stop
  47         int max_mlen;                           // max message length payload+header
  48         int     max_plen;                               // max payload length
  49         int     flags;                                  // CTXFL_ constants
  50         int nrtele;                                     // number of elements in the routing table
  51         int send_retries;                       // number of retries send_msg() should attempt if eagain/timeout indicated by nng
  52         //nng_socket    nn_sock;                // our general listen socket
  53         route_table_t* rtable;          // the active route table
  54         route_table_t* old_rtable;      // the previously used rt, sits here to allow for draining
  55         route_table_t* new_rtable;      // route table under construction
  56         if_addrs_t*     ip_list;                // list manager of the IP addresses that are on our known interfaces
  57         void*   mring;                          // ring where msgs are queued while waiting for a call response msg
  58
  59         char*   rtg_addr;                       // addr/port of the route table generation publisher
  60         int             rtg_port;                       // the port that the rtg listens on
  61
  62         wh_mgt_t*       wormholes;              // management of user opened wormholes
  63         //epoll_stuff_t*        eps;            // epoll information needed for the rcv with timeout call
  64
  65         //pthread_t     rtc_th;                 // thread info for the rtc listener
  66 };
  67
  68
  69 #include "../src/common/src/tools_static.c"
  70
  71
  72 int main( ) {
  73         int i;
  74         int j;
  75         int errors = 0;
  76         char* tokens[127];
  77         char* buf = "2,Fred,Wilma,Barney,Betty,Dino,Pebbles,Bambam,Mr. Slate,Gazoo";
  78         char*   dbuf;                           // duplicated buf since C marks a const string is unumtable
  79         char*   hname;
  80         uta_ctx_t ctx;                          // context for uta_lookup test
  81         void*   if_list;
  82
  83
  84         // ------------------ tokenise tests -----------------------------------------------------------
  85         dbuf = strdup( buf );
  86         i = uta_tokenise( dbuf, tokens, 127, ',' );
  87         errors += fail_not_equal( i, 10, "unexpected number of tokens returned (comma sep)" );
  88         for( j = 0; j < i; j++ ) {
  89                 //fprintf( stderr, ">>>> [%d] (%s)\n", j, tokens[j] );
  90                 errors += fail_if_nil( tokens[j], "token from buffer" );
  91         }
  92         errors += fail_not_equal( strcmp( tokens[4], "Betty" ), 0, "4th token wasn't 'Betty'" );
  93
  94         free( dbuf );
  95         dbuf = strdup( buf );
  96         i = uta_tokenise( dbuf, tokens, 127, '|' );
  97         errors += fail_not_equal( i, 1, "unexpected number of tokens returned (bar sep)" );
  98         free( dbuf );
  99
 100         // ------------ has str tests -----------------------------------------------------------------
 101         j = uta_has_str( buf, "Mr. Slate", ',', 1 );                    // should fail (-1) because user should use strcmp in this situation
 102         errors += fail_if_true( j >= 0, "test to ensure has str rejects small max" );
 103
 104         j = uta_has_str( buf, "Mr. Slate", ',', 27 );
 105         errors += fail_if_true( j < 0, "has string did not find Mr. Slate" );
 106
 107         j = uta_has_str( buf, "Mrs. Slate", ',', 27 );
 108         errors += fail_if_true( j >= 0, "has string not found Mrs. Slate" );
 109
 110         // ------------ host name 2 ip tests ---------------------------------------------------------
 111         hname = uta_h2ip( "192.168.1.2" );
 112         errors += fail_not_equal( strcmp( hname, "192.168.1.2" ), 0, "h2ip did not return IP address when given address" );
 113         errors += fail_if_nil( hname, "h2ip did not return a pointer" );
 114
 115         hname = uta_h2ip( "yahoo.com" );
 116         errors += fail_if_nil( hname, "h2ip did not return a pointer" );
 117
 118         hname = uta_h2ip( "yahoo.com:1234" );                                                   // should ignore the port
 119         errors += fail_if_nil( hname, "h2ip did not return a pointer" );
 120
 121         // ------------ rtg lookup test -------------------------------------------------------------
 122         ctx.rtg_port = 0;
 123         ctx.rtg_addr = NULL;
 124
 125         i = uta_lookup_rtg( NULL );                                             // ensure it handles a nil context
 126         errors += fail_if_true( i, "rtg lookup returned that it found something when not expected to (nil context)" );
 127
 128         setenv( "RMR_RTG_SVC", "localhost:1234", 1);
 129         i = uta_lookup_rtg( &ctx );
 130         errors += fail_if_false( i, "rtg lookup returned that it did not find something when expected to" );
 131         errors += fail_if_nil( ctx.rtg_addr, "rtg lookup did not return a pointer (with port)" );
 132         errors += fail_not_equal( ctx.rtg_port, 1234, "rtg lookup did not capture the port" );
 133
 134         setenv( "RMR_RTG_SVC", "localhost", 1);                 // test ability to generate default port
 135         uta_lookup_rtg( &ctx );
 136         errors += fail_if_nil( ctx.rtg_addr, "rtg lookup did not return a pointer (no port)" );
 137         errors += fail_not_equal( ctx.rtg_port, 5656, "rtg lookup did not return default port" );
 138
 139         unsetenv( "RMR_RTG_SVC" );                                              // this should fail as the default name (rtg) will be unknown during testing
 140         i = uta_lookup_rtg( &ctx );
 141         errors += fail_if_true( i, "rtg lookup returned that it found something when not expected to" );
 142
 143
 144         // ------------ my ip stuff -----------------------------------------------------------------
 145
 146         if_list = mk_ip_list( "1235" );
 147         errors += fail_if_nil( if_list, "mk_ip_list returned nil pointer" );
 148
 149         i = has_myip( NULL, NULL, ',', 128 );           // should be false if pointers are nil
 150         errors += fail_if_true( i, "has_myip returned true when given nil buffer" );
 151
 152         i = has_myip( "buffer contents not valid", NULL, ',', 128 );            // should be false if pointers are nil
 153         errors += fail_if_true( i, "has_myip returned true when given nil list" );
 154
 155         i = has_myip( "buffer contents not valid", NULL, ',', 1 );                      // should be false if max < 2
 156         errors += fail_if_true( i, "has_myip returned true when given small max value" );
 157
 158         i = has_myip( "buffer.contents.not.valid", if_list, ',', 128 );         // should be false as there is nothing valid in the list
 159         errors += fail_if_true( i, "has_myip returned true when given a buffer with no valid info" );
 160
 161
 162         setenv( "RMR_BIND_IF", "192.168.4.30", 1 );                     // drive the case where we have a hard set interface; and set known interface in list
 163         if_list = mk_ip_list( "1235" );
 164         errors += fail_if_nil( if_list, "mk_ip_list with env set returned nil pointer" );
 165
 166         i = has_myip( "192.168.1.2:1235,192.168.4.30:1235,192.168.2.19:4567", if_list, ',', 128 );              // should find our ip in middle
 167         errors += fail_if_false( i, "has_myip did not find IP in middle of list" );
 168
 169         i = has_myip( "192.168.4.30:1235,192.168.2.19:4567,192.168.2.19:2222", if_list, ',', 128 );             // should find our ip at head
 170         errors += fail_if_false( i, "has_myip did not find IP at head of list" );
 171
 172         i = has_myip( "192.168.23.45:4444,192.168.1.2:1235,192.168.4.30:1235", if_list, ',', 128 );             // should find our ip at end
 173         errors += fail_if_false( i, "has_myip did not find IP at tail of list" );
 174
 175         i = has_myip( "192.168.4.30:1235", if_list, ',', 128 );                                                                                 // should find our ip when only in list
 176         errors += fail_if_false( i, "has_myip did not find IP when only one in list" );
 177
 178         return errors > 0;                      // overall exit code bad if errors
 179 }