FreeCalypso > hg > fc-tourmaline
view helpers/str2ind-ver.c @ 9:1fb47f5b597a
helpers: import from Magnetite
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Fri, 16 Oct 2020 07:01:13 +0000 |
parents | |
children |
line wrap: on
line source
/* * This utility extracts the timestamp from a str2ind.tab file * and emits the corresponding char *str2ind_version C line. */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <strings.h> main(argc, argv) char **argv; { FILE *inf; char buf[32], *cp; if (argc != 2) { fprintf(stderr, "usage: %s str2ind.tab\n", argv[0]); exit(1); } inf = fopen(argv[1], "r"); if (!inf) { perror(argv[1]); exit(1); } if (!fgets(buf, sizeof buf, inf)) { inv: fprintf(stderr, "Error: %s does not have the expected first line\n", argv[1]); exit(1); } cp = index(buf, '\n'); if (!cp || cp == buf) goto inv; *cp = '\0'; if (cp[-1] == '\r') *--cp = '\0'; if (cp != buf + 10) goto inv; printf("char *str2ind_version = \"&%s\";\n", buf); exit(0); }