1 /* Provides a common approach to implementing Tcl commands
2 * which implement subcommands
14 #define JIM_MODFLAG_HIDDEN 0x0001 /* Don't show the subcommand in usage or commands */
15 #define JIM_MODFLAG_FULLARGV 0x0002 /* Subcmd proc gets called with full argv */
17 /* Custom flags start at 0x0100 */
20 * Returns JIM_OK if OK, JIM_ERR (etc.) on error, break, continue, etc.
21 * Returns -1 if invalid args.
23 typedef int jim_subcmd_function(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *argv
);
26 const char *cmd
; /* Name of the (sub)command */
27 const char *args
; /* Textual description of allowed args */
28 jim_subcmd_function
*function
; /* Function implementing the subcommand */
29 short minargs
; /* Minimum required arguments */
30 short maxargs
; /* Maximum allowed arguments or -1 if no limit */
31 unsigned short flags
; /* JIM_MODFLAG_... plus custom flags */
35 * Looks up the appropriate subcommand in the given command table and return
36 * the command function which implements the subcommand.
37 * NULL will be returned and an appropriate error will be set if the subcommand or
38 * arguments are invalid.
42 * const jim_subcmd_type *ct = Jim_ParseSubCmd(interp, command_table, argc, argv);
44 * return Jim_CallSubCmd(interp, ct, argc, argv);
48 const jim_subcmd_type
*
49 Jim_ParseSubCmd(Jim_Interp
*interp
, const jim_subcmd_type
*command_table
, int argc
, Jim_Obj
*const *argv
);
52 * Parses the args against the given command table and executes the subcommand if found
53 * or sets an appropriate error if the subcommand or arguments is invalid.
55 * Can be used directly with Jim_CreateCommand() where the ClientData is the command table.
57 * e.g. Jim_CreateCommand(interp, "mycmd", Jim_SubCmdProc, command_table, NULL);
59 int Jim_SubCmdProc(Jim_Interp
*interp
, int argc
, Jim_Obj
*const *argv
);
62 * Invokes the given subcmd with the given args as returned
63 * by Jim_ParseSubCmd()
65 * If ct is NULL, returns JIM_ERR, leaving any message.
66 * Otherwise invokes ct->function
68 * If ct->function returns -1, sets an error message and returns JIM_ERR.
69 * Otherwise returns the result of ct->function.
71 int Jim_CallSubCmd(Jim_Interp
*interp
, const jim_subcmd_type
*ct
, int argc
, Jim_Obj
*const *argv
);