#{ /* C declarations */ #include #ifdef _WIN32 # include #endif void tls_test_version(void); #} helpnode "GnuTLS debug client\nUsage: gnutls-cli-debug [options] hostname\n\n" #int pp; option (p, port) INT "integer" { $pp = $1 } "The port to connect to." #int debug; option (d, debug) INT "integer" { $debug = $1 } "Enable debugging" #int more_info; option (V, verbose) { $more_info += 1 } "More verbose output" option (v, version) { tls_test_version(); exit(0); } "prints the program's version number" option (h, help) { gaa_help(); exit(0); } "prints this help" #char *rest_args; rest STR "hostname" { $rest_args = $1; } init { $rest_args=NULL; $pp = 443; $more_info = 0; }