X-Git-Url: http://cloudbase.mooo.com/gitweb/z180-stamp.git/blobdiff_plain/deb08cb66fa85fd0dc011d642e1a707da0477d9b..ef5a70386d26bf3c4a9212077fa6338b07a6a570:/avr/command.c diff --git a/avr/command.c b/avr/command.c index f1e184a..c8a73f0 100644 --- a/avr/command.c +++ b/avr/command.c @@ -1,28 +1,32 @@ +/* + * (C) Copyright 2014, 2016 Leo C. + * + * (C) Copyright 2000-2009 + * Wolfgang Denk, DENX Software Engineering, wd@denx.de. + * + * SPDX-License-Identifier: GPL-2.0 + */ /* * Command Processor Table */ +#include "command.h" #include "common.h" - +#include #include #include -#include -#include +#include #include "config.h" -#include "debug.h" +#include "print-utils.h" #include "con-utils.h" #include "env.h" -#include "timer.h" -#include "command.h" +#include "debug.h" -static void print_blanks(int_fast8_t count) -{ - while(count--) - my_puts_P(PSTR(" ")); -} +jmp_buf cmd_jbuf; + static void print_usage_line(const FLASH char *name, int width, const FLASH char *usage) @@ -41,7 +45,7 @@ int strcmp_PP(const FLASH char *s1, const FLASH char *s2) { unsigned char c1, c2; - while ((c1 = *(const FLASH unsigned char *)s1++) + while ((c1 = *(const FLASH unsigned char *)s1++) == (c2 = *(const FLASH unsigned char *)s2++)) if (c1 == 0) return 0; @@ -49,15 +53,16 @@ int strcmp_PP(const FLASH char *s1, const FLASH char *s2) return c1 - c2; } -int cmpstringp(const void *p1, const void *p2) +int cmpstring_PP(const void *p1, const void *p2) { - return strcmp_PP((*(const FLASH cmd_tbl_t **) p1)->name, + return strcmp_PP((*(const FLASH cmd_tbl_t **) p1)->name, (*(const FLASH cmd_tbl_t **) p2)->name); } -int cmd_tbl_item_count(void) +/****************************************************************************/ + +int cmd_tbl_item_count(cmd_tbl_t *p) { - cmd_tbl_t * p = cmd_tbl; int count = 0; while (p->name != NULL) { @@ -66,106 +71,155 @@ int cmd_tbl_item_count(void) return count; } + +cmd_tbl_t *get_cmd_tbl_base(cmd_tbl_t *cmdtp) +{ + cmd_tbl_t *p = cmdtp; + + while (p->name != NULL) + ++p; + + return p->subcmd; +} + +/* + * find command table entry for a command + */ +typedef struct { + size_t len; + uint_fast8_t level; + bool opt_debug; + } find_cmd_para_t; + +cmd_tbl_t *_find_cmd (const char *cmd, cmd_tbl_t *table, find_cmd_para_t *para) +{ + cmd_tbl_t *cmdtp_ret = NULL; + uint_fast8_t n_found = 0, sub_found = 0; + + for (cmd_tbl_t *cmdtp = table; cmdtp->name != NULL; cmdtp++) { + if (strncmp_P(cmd, cmdtp->name, para->len) == 0 && + (para->opt_debug || !(cmdtp->flags & CTBL_DBG))) { + if (para->len == strlen_P(cmdtp->name)) + return cmdtp; /* full match */ + + cmdtp_ret = cmdtp; /* abbreviated command ? */ + n_found++; + } else if (cmdtp->subcmd && cmdtp->flags & CTBL_SUBCMDAUTO) { + cmd_tbl_t *sub = _find_cmd(cmd, cmdtp->subcmd, para); + if (sub) { + cmdtp_ret = sub; + ++n_found; + } + } + } + if (n_found == 1) { /* exactly one match */ + if (sub_found) + para->level++; + return cmdtp_ret; + } + + return NULL; /* not found or ambiguous command */ +} + + +cmd_tbl_t *find_cmd (const char *cmd, cmd_tbl_t *table, uint_fast8_t *cmdlevel) +{ + find_cmd_para_t para; + + if (!cmd) + return NULL; + + char *optenv = getenv_str(PSTR("cmd")); + para.level = 0; + para.opt_debug = optenv && strstr_P(optenv, PSTR("debug")) != NULL; + para.len = strlen(cmd); + + cmd_tbl_t *cmdtp = _find_cmd(cmd, table, ¶); + + if (cmdlevel) + *cmdlevel = para.level; + return cmdtp; +} + +cmd_tbl_t *find_cmd_sub(const char *cmd, cmd_tbl_t *table) +{ + cmd_tbl_t *entry = NULL; + + for (cmd_tbl_t *tp = get_cmd_tbl_base(table); tp->name && entry == NULL; tp++) + if (tp->subcmd && tp->flags & CTBL_SUBCMDAUTO) + entry = find_cmd(cmd, tp->subcmd, NULL); + + return entry; +} + /* * Use puts() instead of printf() to avoid printf buffer overflow * for long help messages */ -command_ret_t _do_help(cmd_tbl_t *cmd_start, int cmd_items, cmd_tbl_t * cmdtp, - int flag, int argc, char * const argv[]) +command_ret_t do_help(cmd_tbl_t *cmdtp, uint_fast8_t flag UNUSED, int argc, char * const argv[]) { - uint_fast8_t i, max_len = 0; - command_ret_t rcode = CMD_RET_SUCCESS; + cmd_tbl_t *tbl_start = get_cmd_tbl_base(cmdtp); - (void) flag; + char *optenv = getenv_str(PSTR("cmd")); + bool opt_debug = optenv && strstr_P(optenv, PSTR("debug")) != NULL; if (argc == 1) { /*show list of commands */ - cmd_tbl_t *cmd_array[cmd_items]; - int i; - - /* Make array of commands from .uboot_cmd section */ - cmdtp = cmd_start; - for (i = 0; i < cmd_items; i++) { - cmd_array[i] = cmdtp++; - uint_fast8_t l = strlen_P(cmd_array[i]->name); - if (l > max_len) - max_len = l; + int cmd_items = cmd_tbl_item_count(tbl_start); + cmd_tbl_t **cmd_list = (cmd_tbl_t **) malloc(cmd_items * sizeof(cmd_tbl_t *)); + uint_fast8_t maxlen_cmd = 0; + + /* Make array of commands */ + cmd_tbl_t *tp = tbl_start; + for (int i = 0; i < cmd_items; i++) { + uint_fast8_t l = strlen_P(tp->name); + if (l > maxlen_cmd) + maxlen_cmd = l; + cmd_list[i] = tp++; } - /* Sort command list */ - qsort(cmd_array, cmd_items, sizeof (cmd_tbl_t *), cmpstringp); + qsort(cmd_list, cmd_items, sizeof (cmd_tbl_t *), cmpstring_PP); /* print short help (usage) */ - for (i = 0; i < cmd_items; i++) { - const FLASH char *usage = cmd_array[i]->usage; - - /* allow user abort */ - if (ctrlc ()) - return CMD_RET_FAILURE; - if (usage == NULL) - continue; -#ifdef GCC_BUG_61443 - print_usage_line(cmd_array[i]->name, max_len, usage); + for (int i = 0; i < cmd_items; i++) { + if (opt_debug || !(cmd_list[i]->flags & CTBL_DBG)) { + const FLASH char *usage = cmd_list[i]->usage; + + /* allow user abort */ + if (ctrlc ()) { + free(cmd_list); + return CMD_RET_FAILURE; + } + if (usage == NULL) + continue; +#if defined(GCC_BUG_61443) || 1 + print_usage_line(cmd_list[i]->name, maxlen_cmd, usage); #else - printf_P(PSTR("%-" stringify(8) /*FIXME*/ "S - %S\n"), - cmd_array[i]->name, usage); + printf_P(PSTR("%-" stringify(8) /*FIXME*/ "S - %S\n"), + cmd_list[i]->name, usage); #endif + } } + free(cmd_list); return CMD_RET_SUCCESS; } + /* * command help (long version) */ - for (i = 1; i < argc; ++i) { - if ((cmdtp = find_cmd_tbl (argv[i], cmd_start, cmd_items )) != NULL) { - rcode = cmd_usage(cmdtp); + for (uint8_t i = 1; i < argc; ++i) { + if ((cmdtp = find_cmd(argv[i], tbl_start, NULL)) != NULL && + (opt_debug || cmdtp->name[0] != '!')) { + cmd_usage(cmdtp); } else { printf_P(PSTR("Unknown command '%s' - try 'help'" " without arguments.\n\n"), argv[i] ); - rcode = CMD_RET_FAILURE; - } - } - return rcode; -} - -/*************************************************************************** - * find command table entry for a command - */ -cmd_tbl_t *find_cmd_tbl (const char *cmd, cmd_tbl_t *table, int table_len) -{ - cmd_tbl_t *cmdtp; - cmd_tbl_t *cmdtp_temp = table; /*Init value */ - size_t len; - uint_fast8_t n_found = 0; - - if (!cmd) - return NULL; - - len = strlen(cmd); - - for (cmdtp = table; - cmdtp != table + table_len; - cmdtp++) { - if (strncmp_P (cmd, cmdtp->name, len) == 0) { - if (len == strlen (cmdtp->name)) - return cmdtp; /* full match */ - - cmdtp_temp = cmdtp; /* abbreviated command ? */ - n_found++; + return CMD_RET_FAILURE; } } - if (n_found == 1) { /* exactly one match */ - return cmdtp_temp; - } - return NULL; /* not found or ambiguous command */ -} - - -cmd_tbl_t *find_cmd (const char *cmd) -{ - return find_cmd_tbl(cmd, cmd_tbl, cmd_tbl_item_count()); + return CMD_RET_SUCCESS; } @@ -250,7 +304,7 @@ static int complete_cmdv(int argc, char * const argv[], char last_char, int maxv /* more than one arg or one but the start of the next */ if (argc > 1 || (last_char == '\0' || isblank(last_char))) { - cmdtp = find_cmd(argv[0]); + cmdtp = find_cmd(argv[0], cmd_tbl); if (cmdtp == NULL || cmdtp->complete == NULL) { cmdv[0] = NULL; return 0; @@ -469,32 +523,53 @@ int cmd_auto_complete(const FLASH char *const prompt, char *buf, int *np, int *c * @param argv Arguments * @return 0 if command succeeded, else non-zero (CMD_RET_...) */ -command_ret_t cmd_call(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) +command_ret_t cmd_call(cmd_tbl_t *cmdtp, uint_fast8_t flag, int argc, char * const argv[]) { command_ret_t result; result = (cmdtp->cmd)(cmdtp, flag, argc, argv); - if (result != CMD_RET_SUCCESS) - debug("Command failed, result=%d\n", result); +// if (result != CMD_RET_SUCCESS) +// debug("Command failed, result=%d\n", result); return result; } -command_ret_t cmd_process(int flag, int argc, char * const argv[], +#pragma GCC diagnostic ignored "-Wclobbered" + +command_ret_t cmd_process(uint_fast8_t flag, int argc, char * const argv[], uint_fast8_t *repeatable) { command_ret_t rc = CMD_RET_SUCCESS; cmd_tbl_t *cmdtp; + uint_fast8_t cmdlevel; /* Look up command in command table */ - cmdtp = find_cmd(argv[0]); + cmdtp = find_cmd(argv[0], cmd_tbl, &cmdlevel); + if (cmdtp != NULL) { + /* Check if this command has subcommands */ + if (cmdtp->subcmd && argc > 1) { + + /* Look up subcommand in subcommand table */ + cmd_tbl_t *cmdtpsub = find_cmd(argv[1], cmdtp->subcmd, &cmdlevel); + if (cmdtpsub == NULL) { + printf_P(PSTR("Unknown '%s' subcommand '%s' - try '%s help'\n"), argv[0], argv[1], argv[0]); + return CMD_RET_FAILURE; + } + cmdtp = cmdtpsub; + --argc; + ++argv; + } + } +#if 0 + else { + /* Search subcommands */ + cmdtp = find_cmd_sub(argv[0], cmd_tbl, &cmdlevel); + } +#endif + if (cmdtp == NULL) { printf_P(PSTR("Unknown command '%s' - try 'help'\n"), argv[0]); return CMD_RET_FAILURE; } - if (!cmdtp->cmd) { - debug("### Command '%s' found, but ->cmd == NULL \n", argv[0]); - return CMD_RET_FAILURE; - } /* found - check max args */ if (argc > cmdtp->maxargs) @@ -512,10 +587,13 @@ command_ret_t cmd_process(int flag, int argc, char * const argv[], } #endif + if (setjmp(cmd_jbuf) != 0) + return CMD_RET_FAILURE; + /* If OK so far, then do the command */ if (!rc) { rc = cmd_call(cmdtp, flag, argc, argv); - *repeatable &= cmdtp->repeatable; + *repeatable &= (cmdtp->flags & CTBL_RPT) != 0; } if (rc == CMD_RET_USAGE) rc = cmd_usage(cmdtp);