static unsigned short tcl_port = 6666;
-/* commands */
-static int handle_tcl_port_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
-
/* handlers */
static int tcl_new_connection(connection_t *connection);
static int tcl_input(connection_t *connection);
return retval;
}
-int tcl_register_commands(command_context_t *cmd_ctx)
+COMMAND_HANDLER(handle_tcl_port_command)
{
- register_command(cmd_ctx, NULL, "tcl_port", handle_tcl_port_command, COMMAND_CONFIG, "port on which to listen for incoming TCL syntax");
- return ERROR_OK;
+ return CALL_COMMAND_HANDLER(server_port_command, &tcl_port);
}
-static int handle_tcl_port_command(struct command_context_s *cmd_ctx,
- char *cmd, char **args, int argc)
+int tcl_register_commands(command_context_t *cmd_ctx)
{
- return server_port_command(cmd_ctx, cmd, args, argc, &tcl_port);
+ register_command(cmd_ctx, NULL, "tcl_port",
+ handle_tcl_port_command, COMMAND_CONFIG,
+ "port on which to listen for incoming TCL syntax");
+ return ERROR_OK;
}