FreeCalypso > hg > fc-sim-tools
view libcommon/script.c @ 103:3477438b5706 default tip
new fc-simtool command script: oper-sim-test
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 06 Aug 2022 16:34:43 +0000 (2022-08-06) |
parents | b7ee2e85686b |
children |
line wrap: on
line source
/* * This module implements the exec command, which is our scripting facility. */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <strings.h> extern FILE *open_script_input_file(); cmd_exec(argc, argv) char **argv; { FILE *f; char linebuf[512], *cp; int lineno, retval = 0; f = open_script_input_file(argv[1]); if (!f) { perror(argv[1]); 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", argv[1], lineno); fclose(f); return(-1); } *cp = '\0'; retval = simtool_dispatch_cmd(linebuf, 1); if (retval) break; } fclose(f); return(retval); }