static void debug_print_global(int number) { if (number == 0xff) { dump_globals(); } else { if (number > 255) { glk_put_string("ERROR: global out of range\n"); return; } if (number == 0) { glk_printf("G%02x : %04x\n", number, *zSP); return; } glk_printf("G%02x : %04x\n", number, variable_get(number)); } }
int _cdecl main(int argc, char *argv[]) { #ifdef WIN32 WSADATA wsa_data ; /* Initialize the winsock lib ( version 2.2 ) */ if ( WSAStartup(MAKEWORD(2,2), &wsa_data) == SOCKET_ERROR ){ printf("WSAStartup() failed : %d\n", GetLastError()) ; return 1 ; } #endif /* WIN32 */ netlib_init(); set_defaults(); scan_cmd_line(argc,argv); if (debug) { dump_globals(); install_signal_catchers(); } if (debug) { printf("remotehost is %s and port %s\n",host_name,test_port); fflush(stdout); } establish_control(host_name,test_port,address_family, local_host_name,local_test_port,local_address_family); if (strcasecmp(test_name,"TCP_STREAM") == 0) { send_tcp_stream(host_name); } else if (strcasecmp(test_name,"TCP_MAERTS") == 0) { send_tcp_maerts(host_name); } #ifdef HAVE_ICSC_EXS else if (strcasecmp(test_name,"EXS_TCP_STREAM") == 0) { send_exs_tcp_stream(host_name); } #endif /* HAVE_ICSC_EXS */ #ifdef HAVE_SENDFILE else if (strcasecmp(test_name,"TCP_SENDFILE") == 0) { sendfile_tcp_stream(host_name); } #endif /* HAVE_SENDFILE */ else if (strcasecmp(test_name,"TCP_RR") == 0) { send_tcp_rr(host_name); } else if (strcasecmp(test_name,"TCP_CRR") == 0) { send_tcp_conn_rr(host_name); } else if (strcasecmp(test_name,"TCP_CC") == 0) { send_tcp_cc(host_name); } #ifdef DO_1644 else if (strcasecmp(test_name,"TCP_TRR") == 0) { send_tcp_tran_rr(host_name); } #endif /* DO_1644 */ #ifdef DO_NBRR else if (strcasecmp(test_name,"TCP_NBRR") == 0) { send_tcp_nbrr(host_name); } #endif /* DO_NBRR */ else if (strcasecmp(test_name,"UDP_STREAM") == 0) { send_udp_stream(host_name); } else if (strcasecmp(test_name,"UDP_RR") == 0) { send_udp_rr(host_name); } else if (strcasecmp(test_name,"LOC_CPU") == 0) { loc_cpu_rate(); } else if (strcasecmp(test_name,"REM_CPU") == 0) { rem_cpu_rate(); } #ifdef WANT_DLPI else if (strcasecmp(test_name,"DLCO_RR") == 0) { send_dlpi_co_rr(host_name); } else if (strcasecmp(test_name,"DLCL_RR") == 0) { send_dlpi_cl_rr(host_name); } else if (strcasecmp(test_name,"DLCO_STREAM") == 0) { send_dlpi_co_stream(host_name); } else if (strcasecmp(test_name,"DLCL_STREAM") == 0) { send_dlpi_cl_stream(host_name); } #endif /* WANT_DLPI */ #ifdef WANT_UNIX else if (strcasecmp(test_name,"STREAM_RR") == 0) { send_stream_rr(host_name); } else if (strcasecmp(test_name,"DG_RR") == 0) { send_dg_rr(host_name); } else if (strcasecmp(test_name,"STREAM_STREAM") == 0) { send_stream_stream(host_name); } else if (strcasecmp(test_name,"DG_STREAM") == 0) { send_dg_stream(host_name); } #endif /* WANT_UNIX */ #ifdef WANT_XTI else if (strcasecmp(test_name,"XTI_TCP_STREAM") == 0) { send_xti_tcp_stream(host_name); } else if (strcasecmp(test_name,"XTI_TCP_RR") == 0) { send_xti_tcp_rr(host_name); } else if (strcasecmp(test_name,"XTI_UDP_STREAM") == 0) { send_xti_udp_stream(host_name); } else if (strcasecmp(test_name,"XTI_UDP_RR") == 0) { send_xti_udp_rr(host_name); } #endif /* WANT_XTI */ #ifdef WANT_SCTP else if (strcasecmp(test_name, "SCTP_STREAM") == 0) { send_sctp_stream(host_name); } else if (strcasecmp(test_name, "SCTP_RR") == 0) { send_sctp_rr(host_name); } else if (strcasecmp(test_name, "SCTP_STREAM_MANY") == 0) { send_sctp_stream_1toMany(host_name); } else if (strcasecmp(test_name, "SCTP_RR_MANY") == 0) { send_sctp_stream_1toMany(host_name); } #endif #ifdef DO_DNS else if (strcasecmp(test_name,"DNS_RR") == 0) { send_dns_rr(host_name); } #endif /* DO_DNS */ else { printf("The test you requested is unknown to this netperf.\n"); printf("Please verify that you have the correct test name, \n"); printf("and that test family has been compiled into this netperf.\n"); exit(1); } shutdown_control(); #ifdef WIN32 /* Cleanup the winsock lib */ WSACleanup(); #endif return(0); }