/*
- Mnemonic: tools_testh.c
+ Mnemonic: tools_test.c
Abstract: Unit tests for the RMr tools module.
Author: E. Scott Daniels
Date: 21 January 2019
#include <errno.h>
#include <pthread.h>
#include <ctype.h>
+#include <pthread.h>
+#include <semaphore.h>
-#include "../src/common/include/rmr.h"
-#include "../src/common/include/rmr_agnostic.h"
-#include "test_support.c" // our private library of test tools
-
-// ===== dummy context for tools testing so we don't have to pull in all of the nano/nng specific stuff =====
-struct uta_ctx {
- char* my_name; // dns name of this host to set in sender field of a message
- int shutdown; // thread notification if we need to tell them to stop
- int max_mlen; // max message length payload+header
- int max_plen; // max payload length
- int flags; // CTXFL_ constants
- int nrtele; // number of elements in the routing table
- int send_retries; // number of retries send_msg() should attempt if eagain/timeout indicated by nng
- //nng_socket nn_sock; // our general listen socket
- route_table_t* rtable; // the active route table
- route_table_t* old_rtable; // the previously used rt, sits here to allow for draining
- route_table_t* new_rtable; // route table under construction
- if_addrs_t* ip_list; // list manager of the IP addresses that are on our known interfaces
- void* mring; // ring where msgs are queued while waiting for a call response msg
-
- char* rtg_addr; // addr/port of the route table generation publisher
- int rtg_port; // the port that the rtg listens on
-
- wh_mgt_t* wormholes; // management of user opened wormholes
- //epoll_stuff_t* eps; // epoll information needed for the rcv with timeout call
-
- //pthread_t rtc_th; // thread info for the rtc listener
-};
+#include "rmr.h"
+#include "rmr_logging.h"
+#include "rmr_agnostic.h"
+#define NO_EMULATION
+#include "test_support.c" // our private library of test tools
-#include "../src/common/src/tools_static.c"
+#include "logging.c" // tools references logging, so pull in too
+#include "tools_static.c"
+#include "tools_static_test.c"
+#include "wrapper_static_test.c"
int main( ) {
- int i;
- int j;
int errors = 0;
- char* tokens[127];
- char* buf = "2,Fred,Wilma,Barney,Betty,Dino,Pebbles,Bambam,Mr. Slate,Gazoo";
- char* dbuf; // duplicated buf since C marks a const string is unumtable
- char* hname;
- uta_ctx_t ctx; // context for uta_lookup test
- void* if_list;
-
-
- // ------------------ tokenise tests -----------------------------------------------------------
- dbuf = strdup( buf );
- i = uta_tokenise( dbuf, tokens, 127, ',' );
- errors += fail_not_equal( i, 10, "unexpected number of tokens returned (comma sep)" );
- for( j = 0; j < i; j++ ) {
- //fprintf( stderr, ">>>> [%d] (%s)\n", j, tokens[j] );
- errors += fail_if_nil( tokens[j], "token from buffer" );
- }
- errors += fail_not_equal( strcmp( tokens[4], "Betty" ), 0, "4th token wasn't 'Betty'" );
-
- free( dbuf );
- dbuf = strdup( buf );
- i = uta_tokenise( dbuf, tokens, 127, '|' );
- errors += fail_not_equal( i, 1, "unexpected number of tokens returned (bar sep)" );
- free( dbuf );
-
- // ------------ has str tests -----------------------------------------------------------------
- j = uta_has_str( buf, "Mr. Slate", ',', 1 ); // should fail (-1) because user should use strcmp in this situation
- errors += fail_if_true( j >= 0, "test to ensure has str rejects small max" );
-
- j = uta_has_str( buf, "Mr. Slate", ',', 27 );
- errors += fail_if_true( j < 0, "has string did not find Mr. Slate" );
-
- j = uta_has_str( buf, "Mrs. Slate", ',', 27 );
- errors += fail_if_true( j >= 0, "has string not found Mrs. Slate" );
-
- // ------------ host name 2 ip tests ---------------------------------------------------------
- hname = uta_h2ip( "192.168.1.2" );
- errors += fail_not_equal( strcmp( hname, "192.168.1.2" ), 0, "h2ip did not return IP address when given address" );
- errors += fail_if_nil( hname, "h2ip did not return a pointer" );
-
- hname = uta_h2ip( "yahoo.com" );
- errors += fail_if_nil( hname, "h2ip did not return a pointer" );
-
- hname = uta_h2ip( "yahoo.com:1234" ); // should ignore the port
- errors += fail_if_nil( hname, "h2ip did not return a pointer" );
-
- // ------------ rtg lookup test -------------------------------------------------------------
- ctx.rtg_port = 0;
- ctx.rtg_addr = NULL;
- i = uta_lookup_rtg( NULL ); // ensure it handles a nil context
- errors += fail_if_true( i, "rtg lookup returned that it found something when not expected to (nil context)" );
+ fprintf( stderr, "<INFO> starting tools_test\n" );
+ errors += tools_test() > 0;
- setenv( "RMR_RTG_SVC", "localhost:1234", 1);
- i = uta_lookup_rtg( &ctx );
- errors += fail_if_false( i, "rtg lookup returned that it did not find something when expected to" );
- errors += fail_if_nil( ctx.rtg_addr, "rtg lookup did not return a pointer (with port)" );
- errors += fail_not_equal( ctx.rtg_port, 1234, "rtg lookup did not capture the port" );
+ fprintf( stderr, "<INFO> testing wrapper\n" );
+ errors += wrapper_test();
- setenv( "RMR_RTG_SVC", "localhost", 1); // test ability to generate default port
- uta_lookup_rtg( &ctx );
- errors += fail_if_nil( ctx.rtg_addr, "rtg lookup did not return a pointer (no port)" );
- errors += fail_not_equal( ctx.rtg_port, 5656, "rtg lookup did not return default port" );
-
- unsetenv( "RMR_RTG_SVC" ); // this should fail as the default name (rtg) will be unknown during testing
- i = uta_lookup_rtg( &ctx );
- errors += fail_if_true( i, "rtg lookup returned that it found something when not expected to" );
-
-
- // ------------ my ip stuff -----------------------------------------------------------------
-
- if_list = mk_ip_list( "1235" );
- errors += fail_if_nil( if_list, "mk_ip_list returned nil pointer" );
-
- i = has_myip( NULL, NULL, ',', 128 ); // should be false if pointers are nil
- errors += fail_if_true( i, "has_myip returned true when given nil buffer" );
-
- i = has_myip( "buffer contents not valid", NULL, ',', 128 ); // should be false if pointers are nil
- errors += fail_if_true( i, "has_myip returned true when given nil list" );
-
- i = has_myip( "buffer contents not valid", NULL, ',', 1 ); // should be false if max < 2
- errors += fail_if_true( i, "has_myip returned true when given small max value" );
-
- i = has_myip( "buffer.contents.not.valid", if_list, ',', 128 ); // should be false as there is nothing valid in the list
- errors += fail_if_true( i, "has_myip returned true when given a buffer with no valid info" );
-
-
- 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
- if_list = mk_ip_list( "1235" );
- errors += fail_if_nil( if_list, "mk_ip_list with env set returned nil pointer" );
-
- 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
- errors += fail_if_false( i, "has_myip did not find IP in middle of list" );
-
- 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
- errors += fail_if_false( i, "has_myip did not find IP at head of list" );
-
- 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
- errors += fail_if_false( i, "has_myip did not find IP at tail of list" );
-
- i = has_myip( "192.168.4.30:1235", if_list, ',', 128 ); // should find our ip when only in list
- errors += fail_if_false( i, "has_myip did not find IP when only one in list" );
+ test_summary( errors, "tool tests" );
+ if( errors == 0 ) {
+ fprintf( stderr, "<PASS> all tool tests were OK\n\n" );
+ } else {
+ fprintf( stderr, "<FAIL> %d errors in tool code\n\n", errors );
+ }
- return errors > 0; // overall exit code bad if errors
+ return !!errors;
}
+
Code Review / ric-plt / lib / rmr.git / blobdiff