Add summary data to unit test output
[ric-plt/lib/rmr.git] / test / si95_test.c
index 26b1b21..dfa44c3 100644 (file)
@@ -21,7 +21,7 @@
 /*
        Mmemonic:       si95_test.c
        Abstract:       This is the main driver to test the si95 core functions
-                               (within rmr/src/si/src/si95). 
+                               (within rmr/src/si/src/si95).
 
        Author:         E. Scott Daniels
        Date:           6 March 2018
 #define DEBUG 1
 
                                                                                        // specific test tools in this directory
-#undef NNG_UNDER_TEST                                          // NNG is NOT under test so undefine if set
+#undef NNG_UNDER_TEST                                          // NNG is NOT under test so undefine if set
 #define NO_EMULATION 1                                         // no emulation of transport functions
 #define NO_PRIVATE_HEADERS 1                           // no rmr_si or rmr_nng headers
 #define NO_DUMMY_RMR 1                                         // no msg things
-#include "test_support.c"                                      // things like fail_if()
 
+#include "test_support.c"                                      // things like fail_if()
+#include "test_transport_em.c"                         // system/transport emulation (open, close, connect, etc)
 
 /*
 #include "rmr.h"                                       // things the users see
 
 #include <si95/siaddress.c>
 //#include <si95/sialloc.c>
-//#include <si95/sibldpoll.c>
-//#include <si95/sicbreg.c>
-//#include <si95/sicbstat.c>
-//#include <si95/siclose.c>
+#include <si95/sibldpoll.c>
+#include <si95/sicbreg.c>
+#include <si95/sicbstat.c>
+#include <si95/siclose.c>
 #include <si95/siconnect.c>
 #include <si95/siestablish.c>
-//#include <si95/sigetadd.c>
-//#include <si95/sigetname.c>
+#include <si95/sigetadd.c>
+#include <si95/sigetname.c>
 #include <si95/siinit.c>
-//#include <si95/silisten.c>
+#include <si95/silisten.c>
 #include <si95/sinew.c>
-//#include <si95/sinewses.c>
+#include <si95/sinewses.c>
 //#include <si95/sipoll.c>
 //#include <si95/sircv.c>
 //#include <si95/sisend.c>
-//#include <si95/sisendt.c>
+#include <si95/sisendt.c>
 #include <si95/sishutdown.c>
 #include <si95/siterm.c>
 #include <si95/sitrash.c>
@@ -102,6 +103,20 @@ void*      si_ctx = NULL;                  // a global context might be useful
 
 // ---------------------------------------------------------------------
 
+/*
+       Fake callback to register.
+*/
+static int test_cb( void* data ) {
+       return 0;
+}
+
+/*
+       Returns error for coverage testing of CB calls
+*/
+static int test_cb_err( void* data ) {
+       return -1;
+}
+
 /*
        Memory allocation/free related tests
 */
@@ -126,16 +141,15 @@ static int memory( ) {
                ((struct tp_blk *)ptr)->squeue = iptr;
                SItrash(  TP_BLK, ptr );
        }
-       
+
        ptr = SInew( GI_BLK );
        errors += fail_if_nil( ptr, "memory: sinew returned nil when given giblk request" );
        SItrash(  GI_BLK, ptr );                // GI block cannot be trashed, ensure this (valgind will complain about a leak)
 
-
+       fprintf( stderr, "<INFO> memory module finished with %d errors\n", errors );
        return errors;
 }
 
-
 /*
        Test initialisation related things
 */
@@ -148,19 +162,31 @@ static int init() {
        SIclr_tflags( si_ctx, 0x00 );           // drive for coverage; no return value from these
        SIset_tflags( si_ctx, 0x03 );
 
+       fprintf( stderr, "<INFO> init  module finished with %d errors\n", errors );
        return errors;
 }
 
 static int cleanup() {
        int errors = 0;
-       
+
        if( ! si_ctx ) {
+               fprintf( stderr, "<INFO> cleanup has no context to use\n" );
                return 0;
        }
 
-       SIconnect( si_ctx, "localhost:43086" );         // ensure context has a tp block to free on shutdown
-       SIshutdown( si_ctx );
+       fprintf( stderr, "<INFO> cleanup running\n" );
+       SIcbstat( si_ctx, SI_RET_UNREG, SI_CB_SECURITY );
+       SIcbstat( si_ctx, SI_RET_QUIT, SI_CB_SECURITY );
+
+       SItp_stats( si_ctx );           // drive for coverage only
+       SItp_stats( NULL );
 
+       SIconnect( si_ctx, "localhost:43086" ); // ensure context has a tp block to free on shutdown
+       SIshutdown( NULL );
+       SIabort( si_ctx );
+
+
+       fprintf( stderr, "<INFO> cleanup  module finished with %d errors\n", errors );
        return errors;
 }
 
@@ -184,25 +210,181 @@ static int addr() {
 
        dest = NULL;
        snprintf( buf1, sizeof( buf1 ), "   [ff02::5:4001" );           // invalid address, drive leading space eater too
-       l = SIaddress( buf1, &dest, AC_TOADDR6 );
+       l = SIaddress( buf1, (void **)  &dest, AC_TOADDR6 );
        errors += fail_if_true( l > 0, "to addr6 with bad addr convdersion returned valid len" );
 
-       snprintf( buf1, sizeof( buf1 ), "[ff02::5]:4002" );             // v6 might not be supported so failure is OK here
-       l=SIaddress( buf1, &dest, AC_TOADDR6 );
-       errors += fail_if_true( l < 1, "to addr convdersion failed" );
+       snprintf( buf1, sizeof( buf1 ), "[ff02::5]:4002" );             // v6 might not be supported so failure is OK here; driving for coverage
+       l=SIaddress( buf1, (void **) &dest, AC_TOADDR6 );
 
        snprintf( buf1, sizeof( buf1 ), "localhost:43086" );
        l = SIaddress( buf1, (void **) &dest, AC_TOADDR );
        errors += fail_if_true( l < 1, "to addr convdersion failed" );
 
        snprintf( buf1, sizeof( buf1 ), "localhost:4004" );
-       l = SIaddress( buf1, &dest, AC_TODOT );
+       l = SIaddress( buf1, (void **) &dest, AC_TODOT );
        errors += fail_if_true( l < 1, "to dot convdersion failed" );
 
+       fprintf( stderr, "<INFO> addr module finished with %d errors\n", errors );
+       return errors;
+}
+
+
+/*
+       Connection oriented tests.
+*/
+static int conn( ) {
+       int errors = 0;
+       int state;
+       int cfd = 3;                                    // fd for close
+       char*   buf;
+
+       state = SIconnect( si_ctx, "localhost:4567" );          // driver regular connect
+       errors += fail_if_true( state < 0, "connect to low port failed" );
+
+       state = SIconnect( si_ctx, "localhost:43086" );         // drive save connect with good return code
+       errors += fail_if_true( state < 0, "connect to high port failed" );
+
+       tpem_set_addr_dup_state( 1 );                                           // force get sockket name emulation to return a duplicate address
+       state = SIconnect( si_ctx, "localhost:43086" );         // drive save connect with good return code
+       errors += fail_if_true( state >= 0, "forced dup connect did not return error" );
+
+       tpem_set_addr_dup_state( 0 );                                           // back to normal
+       tpem_set_conn_state( -1 );
+       state = SIconnect( si_ctx, "localhost:4567" );          // driver regular connect
+       errors += fail_if_true( state >= 0, "connect to low port successful when failure expected" );
+       tpem_set_conn_state( 3 );
+
+       tpem_set_sock_state( 1 );                                                       // make scoket calls fail
+       state = SIconnect( si_ctx, "localhost:4567" );          // driver regular connect
+       errors += fail_if_true( state >= 0, "connect to low port successful when socket based failure expected" );
+
+       tpem_set_sock_state( 0 );
+
+       state = SIlistener( si_ctx, TCP_DEVICE, "0.0.0.0:4567" );
+       errors += fail_if_true( state < 0, "listen failed" );
+
+       tpem_set_bind_state( 1 );
+       state = SIlistener( si_ctx, TCP_DEVICE, "0.0.0.0:4567" );
+       errors += fail_if_true( state >= 0, "listen successful when bind error set" );
+       tpem_set_bind_state( 0 );
+
+       SIbldpoll( si_ctx );            // for coverage. no return value and nothing we can check
+
+       state = SIclose( NULL, 0 );                     //coverage
+       errors += fail_if_true( state != SI_ERROR, "close given nil context returned success" );
+
+       state = SIclose( si_ctx, cfd );
+       errors += fail_if_true( state == SI_ERROR, "close given good context and good fd returned error" );
+
+       state = SIclose( si_ctx, 5000 );                                                // out of range fd
+       errors += fail_if_true( state != SI_ERROR, "close given good context and bad fd returned success" );
+
+       state = SIclose( si_ctx, TCP_LISTEN_PORT );                             // close listener
+       errors += fail_if_true( state == SI_ERROR, "close given good context and listener fd returned error" );
+
+       state = SIclose( si_ctx, UDP_PORT );                                    // close first open udp port (should not be there)
+       errors += fail_if_true( state != SI_ERROR, "close given good context and udp generic fd returned error" );
+
+       buf = SIgetname( 3 );
+       if( fail_if_true( buf == NULL, "get name failed to return a buffer" ) ) {
+               errors++;
+       } else {
+               errors += fail_if_true( buf[0] == 0, "get name returned buf with emtpy string" );
+       }
+
+       fprintf( stderr, "<INFO> conn module finished with %d errors\n", errors );
+       return errors;
+}
+
+/*
+       Misc tests that just don't fit in another bucket.
+*/
+static int misc( ) {
+       int errors = 0;
+       char    buf[1024];
+
+       SIcbreg( NULL, SI_CB_SECURITY, test_cb, NULL );         // coverage only, no return value no verification
+       SIcbreg( si_ctx, SI_CB_SECURITY, test_cb, NULL );
+
+       buf[0] = 0;
+       SIgetaddr( si_ctx, buf );
+       errors += fail_if_true( buf[0] == 0, "get address failed" );
+       fprintf( stderr, "<INFO> get address returns (%s)\n", buf );
+
+       fprintf( stderr, "<INFO> misc module finished with %d errors\n", errors );
+       return errors;
+}
+
+
+/*
+       New session (accept) testing.
+*/
+static int new_sess( ) {
+       int errors = 0;
+       char    buf[1024];
+       struct tp_blk *tpptr;
+       int             status;
+
+       tpptr = SInew( TP_BLK );
+       tpptr->fd = 3;
+       tpptr->flags |= TPF_LISTENFD;
+
+       tpem_set_accept_fd( -1 );                                                                       // accept will "fail" for coverage
+       status = SInewsession( si_ctx, tpptr );
+       errors += fail_if_true( status != SI_ERROR, "newsession did not fail when accept fails" );
+
+       tpem_set_accept_fd( 5 );                                                                        // accept will return a good fd
+       SIcbreg( si_ctx, SI_CB_SECURITY, test_cb_err, NULL );           // register error and drive new session for error coverage
+       status = SInewsession( si_ctx, tpptr );
+       errors += fail_if_true( status >= 0, "newsession did failed when accept was good" );
+
+       tpem_set_accept_fd( 6 );                                                                        // accept will return a good fd
+       SIset_tflags( si_ctx, SI_TF_NODELAY | SI_TF_FASTACK );          // flip options for coverage in new sess
+       SIcbreg( si_ctx, SI_CB_CONN, test_cb, NULL );                           // drive connection for coverage
+       SIcbreg( si_ctx, SI_CB_SECURITY, test_cb, NULL );
+       status = SInewsession( si_ctx, tpptr );
+       errors += fail_if_true( status < 0, "newsession did failed when accept was good" );
+
+       fprintf( stderr, "<INFO> new_sess module finished with %d errors\n", errors );
        return errors;
+}
+
+/*
+       Send tests
+*/
+static int send_tests( ) {
+       int             errors = 0;
+       char    buf[1024];
+       int             len;
+       int             state;
+
+       len = snprintf( buf, 100, "Heaven knows I'm miserable now!" );
+
+       state = SIsendt( si_ctx, 9999, buf, len );
+       errors += fail_if_true( state >= 0, "send given fd out of range did not fail" );
+
+       state = SIsendt( si_ctx, -1, buf, len );
+       errors += fail_if_true( state >= 0, "send given neg fd did not fail" );
 
+       SIsendt( si_ctx, 6, buf, len );
+
+       tpem_set_send_err( 99 );
+       SIsendt( si_ctx, 6, buf, len );
+
+       tpem_set_send_err( 0 );
+       tpem_set_sel_blk( 1 );
+       SIsendt( si_ctx, 6, buf, len );
+
+       tpem_set_sel_blk( 0 );
+       tpem_set_selef_fd( 6 );                                         // will cause send to fail and fd6 to close
+       SIsendt( si_ctx, 6, buf, len );
+
+       return errors;
 }
 
+
+// ----------------------------------------------------------------------------------------
+
 /*
        Drive tests...
 */
@@ -216,10 +398,15 @@ int main() {
        errors += init();
        errors += memory();
        errors += addr();
-fprintf( stderr, ">>> cleaning\n" );
+       errors += conn();
+       errors += misc();
+
+       errors += new_sess();           // should leave a "connected" session at fd == 6
+       errors += send_tests();
+
        errors += cleanup();
 
-       fprintf( stderr, "<INFO> testing finished\n" );
+       test_summary( errors, "SI95 tests" );
        if( errors == 0 ) {
                fprintf( stderr, "<PASS> all tests were OK\n\n" );
        } else {