FreeCalypso > hg > freecalypso-sw
view loadtools/initscript.c @ 992:a7b0b426f9ca
target-utils: boot ROM UART autodetection revamped
The new implementation should work with both the familiar Calypso C035
boot ROM version found in our regular targets as well as the older
Calypso F741979B version found on the vintage D-Sample board.
author | Mychaela Falconia <falcon@ivan.Harhan.ORG> |
---|---|
date | Wed, 30 Dec 2015 21:28:41 +0000 |
parents | 10996c267de4 |
children |
line wrap: on
line source
/* * This module has been copied from ltscript.c, ltdispatch.c and ltpassthru.c: * here we implement the init-script functionality for fc-xram. */ #include <sys/param.h> #include <stdio.h> #include <string.h> #include <strings.h> #include <stdlib.h> extern char default_helpers_dir[]; extern int cmd_baud(); static loadagent_cmd(argc, argv) char **argv; { if (tpinterf_make_cmd(argv) < 0) { fprintf(stderr, "error: unable to form target command\n"); return(-1); } if (tpinterf_send_cmd() < 0) return(-1); return tpinterf_pass_output(1); } static struct cmdtab { char *cmd; int minargs; int maxargs; int (*func)(); } cmdtab[] = { {"baud", 1, 1, cmd_baud}, {"w8", 2, 2, loadagent_cmd}, {"w16", 2, 2, loadagent_cmd}, {"w32", 2, 2, loadagent_cmd}, {0, 0, 0, 0} }; static dispatch_cmd(cmd) char *cmd; { char *argv[10]; char *cp, **ap; struct cmdtab *tp; for (cp = cmd; isspace(*cp); cp++) ; if (!*cp || *cp == '#') return(0); printf("init-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(-1); } 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(-1); } *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(-1); } *ap = 0; return tp->func(ap - argv, argv); } exec_init_script(script_name) char *script_name; { char pathbuf[MAXPATHLEN], *openfname; FILE *f; char linebuf[512], *cp; int lineno, retval = 0; if (index(script_name, '/')) openfname = script_name; else { sprintf(pathbuf, "%s/%s", default_helpers_dir, script_name); openfname = pathbuf; } f = fopen(openfname, "r"); if (!f) { perror(openfname); return(-1); } for (lineno = 1; fgets(linebuf, sizeof linebuf, f); lineno++) { cp = index(linebuf, '\n'); if (!cp) { fprintf(stderr, "%s line %d: missing newline\n", openfname, lineno); fclose(f); return(-1); } *cp = '\0'; retval = dispatch_cmd(linebuf); if (retval) break; } fclose(f); return(retval); }