FreeCalypso > hg > freecalypso-tools
view rvinterf/etmsync/dispatch.c @ 286:88a4ebed160d
fc-tmsync converted to link with librftab
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 18 Nov 2017 00:26:24 +0000 |
parents | e7502631a0f9 |
children |
line wrap: on
line source
/* * This module implements the command dispatch for fc-fsio * and possibly other similar utilities in the future. */ #include <ctype.h> #include <stdio.h> #include <string.h> #include <strings.h> #include <stdlib.h> #include "cmdtab.h" #include "exitcodes.h" extern struct cmdtab cmdtab[]; parse_and_dispatch_cmd(cmd, is_script) char *cmd; { char *argv[MAX_CMD_ARGS+2]; char *cp, **ap; struct cmdtab *tp; for (cp = cmd; isspace(*cp); cp++) ; if (!*cp || *cp == '#') return(0); if (is_script) printf("Script command: %s\n", cp); argv[0] = cp; while (*cp && !isspace(*cp)) cp++; if (*cp) *cp++ = '\0'; for (tp = cmdtab; tp->cmd; tp++) if (!strcmp(tp->cmd, argv[0])) break; if (!tp->func) { fprintf(stderr, "error: no such command\n"); return(ERROR_USAGE); } for (ap = argv + 1; ; ) { while (isspace(*cp)) cp++; if (!*cp || *cp == '#') break; if (ap - argv - 1 >= tp->maxargs) { fprintf(stderr, "error: too many arguments\n"); return(ERROR_USAGE); } if (*cp == '"') { *ap++ = ++cp; while (*cp && *cp != '"') cp++; if (*cp != '"') { fprintf(stderr, "error: unterminated quoted string\n"); return(ERROR_USAGE); } *cp++ = '\0'; } else { *ap++ = cp; while (*cp && !isspace(*cp)) cp++; if (*cp) *cp++ = '\0'; } } if (ap - argv - 1 < tp->minargs) { fprintf(stderr, "error: too few arguments\n"); return(ERROR_USAGE); } *ap = 0; return tp->func(ap - argv, argv); } dispatch_ready_argv(argc, argv) char **argv; { struct cmdtab *tp; for (tp = cmdtab; tp->cmd; tp++) if (!strcmp(tp->cmd, argv[0])) break; if (!tp->func) { fprintf(stderr, "error: no such command\n"); return(ERROR_USAGE); } if (argc - 1 > tp->maxargs) { fprintf(stderr, "error: too many arguments\n"); return(ERROR_USAGE); } if (argc - 1 < tp->minargs) { fprintf(stderr, "error: too few arguments\n"); return(ERROR_USAGE); } return tp->func(argc, argv); } cmd_exec(argc, argv) char **argv; { FILE *f; char linebuf[512], *cp; int lineno, retval = 0; f = fopen(argv[1], "r"); if (!f) { perror(argv[1]); return(ERROR_USAGE); } for (lineno = 1; fgets(linebuf, sizeof linebuf, f); lineno++) { cp = index(linebuf, '\n'); if (!cp) { fprintf(stderr, "%s line %d: missing newline\n", argv[1], lineno); fclose(f); return(ERROR_USAGE); } *cp = '\0'; retval = parse_and_dispatch_cmd(linebuf, 1); if (retval) break; } fclose(f); return(retval); } cmd_exit() { exit(0); }