#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <sys/types.h>
#include <sys/ioctl.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>

#ifdef __osf__
#include <time.h>
#include <sys/time.h>
#endif

#ifdef __vxworks__
#include <time.h>
#include <sys/times.h>
#endif

#include <errno.h>

#include "sys_types.h"
#include "ipncl_priv.h"

main (
  int argc,
  int **argv
) {

int i, stat, result, len;
IPRPC_PORT port;
char msg[100+1];
SYS_TIME_TYPE timeout;

  stat = sys_cvt_seconds_to_timeout( 10.0, &timeout );
  if ( !( stat & 1 ) ) {
    printf( "error from sys_cvt_seconds_to_timeout\n" );
    exit(-1);
  }

  stat = ipncl_create_port( 1, 4096, "test", &port );
  if ( !( stat & 1 ) ) {
    printf( "error from ipncl_create_port\n" );
    msg_show_error_message( stat );
    exit(-1);
  }

  stat = ipncl_connect( "134.167.21.95", "15123", "", port );
  if ( !( stat & 1 ) ) {
    printf( "error from ipncl_connect\n" );
    msg_show_error_message( stat );
    exit(-1);
  }

  for ( i=0; i<100; i++ ) {

    sprintf( msg, "this is msg %-d\n", i );
    len = strlen(msg);

    stat = ipncl_send_msg( port, len+1, msg );
    if ( !( stat & 1 ) ) {
      printf( "error from ipncl_send_msg\n" );
      exit(stat);
    }

/*
    stat = ipncl_wait_on_port( port, &timeout, &result );
    if ( !( stat & 1 ) ) {
      printf( "error from ipncl_wait_on_port\n" );
      exit(stat);
    }
*/

    stat = ipncl_wait_on_event( port, &timeout, &result );
    if ( !( stat & 1 ) ) {
      printf( "error from ipncl_wait_on_port\n" );
      exit(stat);
    }

    if ( !result ) {

      printf( "Timeout\n" );

    }
    else {

      strcpy( msg, "              " );

/*
      stat = ipncl_receive_msg( port, 20, &len, msg );
      if ( !( stat & 1 ) ) {
        printf( "error from ipncl_receive_msg\n" );
        exit(stat);
      }
*/

      stat = ipncl_receive_event_msg( port, 20, &len, msg );
      if ( !( stat & 1 ) ) {
        printf( "error from ipncl_receive_msg\n" );
        exit(stat);
      }

    }

  }

  strcpy( msg, "EXIT" );
  len = strlen(msg);

  stat = ipncl_send_msg( port, len+1, msg );
  if ( !( stat & 1 ) ) {
    printf( "error from ipncl_send_msg\n" );
    exit(stat);
  }

  stat = ipncl_disconnect( port );
  if ( !( stat & 1 ) ) {
    printf( "error from ipncl_disconnect\n" );
    exit(-1);
  }

  stat = ipncl_delete_port( &port );
  if ( !( stat & 1 ) ) {
    printf( "error from ipncl_delete_port\n" );
    exit(-1);
  }

}