diff options
Diffstat (limited to 'src/kDepPre/kDepPre.c')
| -rw-r--r-- | src/kDepPre/kDepPre.c | 495 |
1 files changed, 495 insertions, 0 deletions
diff --git a/src/kDepPre/kDepPre.c b/src/kDepPre/kDepPre.c new file mode 100644 index 0000000..4167e2c --- /dev/null +++ b/src/kDepPre/kDepPre.c @@ -0,0 +1,495 @@ +/* $Id: kDepPre.c 3315 2020-03-31 01:12:19Z bird $ */ +/** @file + * kDepPre - Dependency Generator using Precompiler output. + */ + +/* + * Copyright (c) 2005-2010 knut st. osmundsen <bird-kBuild-spamx@anduin.net> + * + * This file is part of kBuild. + * + * kBuild is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 3 of the License, or + * (at your option) any later version. + * + * kBuild is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with kBuild. If not, see <http://www.gnu.org/licenses/> + * + */ + +/******************************************************************************* +* Header Files * +*******************************************************************************/ +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <ctype.h> +#ifdef _MSC_VER +# include <io.h> +#else +# include <unistd.h> +#endif +#include "kDep.h" + +#ifdef HAVE_FGETC_UNLOCKED +# define FGETC(s) getc_unlocked(s) +#else +# define FGETC(s) fgetc(s) +#endif + +#ifdef NEED_ISBLANK +# define isblank(ch) ( (unsigned char)(ch) == ' ' || (unsigned char)(ch) == '\t' ) +#endif + + + + +/** + * Parses the output from a preprocessor of a C-style language. + * + * @returns 0 on success. + * @returns 1 or other approriate exit code on failure. + * @param pThis Pointer to the 'dep' instance. + * @param pInput Input stream. (probably not seekable) + */ +static int ParseCPrecompiler(PDEPGLOBALS pThis, FILE *pInput) +{ + enum + { + C_DISCOVER = 0, + C_SKIP_LINE, + C_PARSE_FILENAME, + C_EOF + } enmMode = C_DISCOVER; + PDEP pDep = NULL; + int ch = 0; + char szBuf[8192]; + + for (;;) + { + switch (enmMode) + { + /* + * Start of line, need to look for '#[[:space]]*line <num> "file"' and '# <num> "file"'. + */ + case C_DISCOVER: + /* first find '#' */ + while ((ch = FGETC(pInput)) != EOF) + if (!isblank(ch)) + break; + if (ch == '#') + { + /* skip spaces */ + while ((ch = FGETC(pInput)) != EOF) + if (!isblank(ch)) + break; + + /* check for "line" */ + if (ch == 'l') + { + if ( (ch = FGETC(pInput)) == 'i' + && (ch = FGETC(pInput)) == 'n' + && (ch = FGETC(pInput)) == 'e') + { + ch = FGETC(pInput); + if (isblank(ch)) + { + /* skip spaces */ + while ((ch = FGETC(pInput)) != EOF) + if (!isblank(ch)) + break; + } + else + ch = 'x'; + } + else + ch = 'x'; + } + + /* line number */ + if (ch >= '0' && ch <= '9') + { + /* skip the number following spaces */ + while ((ch = FGETC(pInput)) != EOF) + if (!isxdigit(ch)) + break; + if (isblank(ch)) + { + while ((ch = FGETC(pInput)) != EOF) + if (!isblank(ch)) + break; + /* quoted filename */ + if (ch == '"') + { + enmMode = C_PARSE_FILENAME; + break; + } + } + } + } + enmMode = C_SKIP_LINE; + break; + + /* + * Skip past the end of the current line. + */ + case C_SKIP_LINE: + do + { + if ( ch == '\r' + || ch == '\n') + break; + } while ((ch = FGETC(pInput)) != EOF); + enmMode = C_DISCOVER; + break; + + /* + * Parse the filename. + */ + case C_PARSE_FILENAME: + { + /* retreive and unescape the filename. */ + char *psz = &szBuf[0]; + while ( (ch = FGETC(pInput)) != EOF + && psz < &szBuf[sizeof(szBuf) - 1]) + { + if (ch == '\\') + { + ch = FGETC(pInput); + switch (ch) + { + case '\\': ch = '/'; break; + case 't': ch = '\t'; break; + case 'r': ch = '\r'; break; + case 'n': ch = '\n'; break; + case 'b': ch = '\b'; break; + default: + fprintf(stderr, "warning: unknown escape char '%c'\n", ch); + continue; + + } + *psz++ = ch == '\\' ? '/' : ch; + } + else if (ch != '"') + *psz++ = ch; + else + { + size_t cchFilename = psz - &szBuf[0]; + *psz = '\0'; + /* compare with current dep, add & switch on mismatch. */ + if ( !pDep + || pDep->cchFilename != cchFilename + || memcmp(pDep->szFilename, szBuf, cchFilename)) + pDep = depAdd(pThis, szBuf, cchFilename); + break; + } + } + enmMode = C_SKIP_LINE; + break; + } + + /* + * Handle EOF. + */ + case C_EOF: + if (feof(pInput)) + return 0; + enmMode = C_DISCOVER; + break; + } + if (ch == EOF) + enmMode = C_EOF; + } + + return 0; +} + + +static int usage(FILE *pOut, const char *argv0) +{ + fprintf(pOut, + "usage: %s [-l=c] -o <output> -t <target> [-f] [-s] < - | <filename> | -e <cmdline> >\n" + " or: %s --help\n" + " or: %s --version\n", + argv0, argv0, argv0); + return 1; +} + + +int main(int argc, char *argv[]) +{ + int i; + DEPGLOBALS This; + + /* Arguments. */ + int iExec = 0; + FILE *pOutput = NULL; + const char *pszOutput = NULL; + FILE *pInput = NULL; + const char *pszTarget = NULL; + int fStubs = 0; + int fFixCase = 0; + /* Argument parsing. */ + int fInput = 0; /* set when we've found input argument. */ + + /* + * Parse arguments. + */ + if (argc <= 1) + return usage(stderr, argv[0]); + for (i = 1; i < argc; i++) + { + if (argv[i][0] == '-') + { + const char *psz = &argv[i][1]; + if (*psz == '-') + { + if (!strcmp(psz, "-help")) + psz = "h"; + else if (!strcmp(psz, "-version")) + psz = "V"; + } + + switch (*psz) + { + /* + * Output file. + */ + case 'o': + { + pszOutput = &argv[i][2]; + if (pOutput) + { + fprintf(stderr, "%s: syntax error: only one output file!\n", argv[0]); + return 1; + } + if (!*pszOutput) + { + if (++i >= argc) + { + fprintf(stderr, "%s: syntax error: The '-o' argument is missing the filename.\n", argv[0]); + return 1; + } + pszOutput = argv[i]; + } + if (pszOutput[0] == '-' && !pszOutput[1]) + pOutput = stdout; + else + pOutput = fopen(pszOutput, "w"); + if (!pOutput) + { + fprintf(stderr, "%s: error: Failed to create output file '%s'.\n", argv[0], pszOutput); + return 1; + } + break; + } + + /* + * Language spec. + */ + case 'l': + { + const char *pszValue = &argv[i][2]; + if (*pszValue == '=') + pszValue++; + if (!strcmp(pszValue, "c")) + ; + else + { + fprintf(stderr, "%s: error: The '%s' language is not supported.\n", argv[0], pszValue); + return 1; + } + break; + } + + /* + * Target name. + */ + case 't': + { + if (pszTarget) + { + fprintf(stderr, "%s: syntax error: only one target!\n", argv[0]); + return 1; + } + pszTarget = &argv[i][2]; + if (!*pszTarget) + { + if (++i >= argc) + { + fprintf(stderr, "%s: syntax error: The '-t' argument is missing the target name.\n", argv[0]); + return 1; + } + pszTarget = argv[i]; + } + break; + } + + /* + * Exec. + */ + case 'e': + { + if (++i >= argc) + { + fprintf(stderr, "%s: syntax error: The '-e' argument is missing the command.\n", argv[0]); + return 1; + } + iExec = i; + i = argc - 1; + break; + } + + /* + * Pipe input. + */ + case '\0': + { + pInput = stdin; + fInput = 1; + break; + } + + /* + * Fix case. + */ + case 'f': + { + fFixCase = 1; + break; + } + + /* + * Generate stubs. + */ + case 's': + { + fStubs = 1; + break; + } + + /* + * The obligatory help and version. + */ + case 'h': + usage(stdout, argv[0]); + return 0; + + case 'V': + printf("kDepPre - kBuild version %d.%d.%d\n" + "Copyright (C) 2005-2008 knut st. osmundsen\n", + KBUILD_VERSION_MAJOR, KBUILD_VERSION_MINOR, KBUILD_VERSION_PATCH); + return 0; + + /* + * Invalid argument. + */ + default: + fprintf(stderr, "%s: syntax error: Invalid argument '%s'.\n", argv[0], argv[i]); + return usage(stderr, argv[0]); + } + } + else + { + pInput = fopen(argv[i], "r"); + if (!pInput) + { + fprintf(stderr, "%s: error: Failed to open input file '%s'.\n", argv[0], argv[i]); + return 1; + } + fInput = 1; + } + + /* + * End of the line? + */ + if (fInput) + { + if (++i < argc) + { + fprintf(stderr, "%s: syntax error: No arguments shall follow the input spec.\n", argv[0]); + return 1; + } + break; + } + } + + /* + * Got all we require? + */ + if (!pInput && iExec <= 0) + { + fprintf(stderr, "%s: syntax error: No input!\n", argv[0]); + return 1; + } + if (!pOutput) + { + fprintf(stderr, "%s: syntax error: No output!\n", argv[0]); + return 1; + } + if (!pszTarget) + { + fprintf(stderr, "%s: syntax error: No target!\n", argv[0]); + return 1; + } + + /* + * Spawn process? + */ + if (iExec > 0) + { + fprintf(stderr, "%s: -e is not yet implemented!\n", argv[0]); + return 1; + } + + /* + * Do the parsing. + */ + depInit(&This); + i = ParseCPrecompiler(&This, pInput); + + /* + * Reap child. + */ + if (iExec > 0) + { + /* later */ + } + + /* + * Write the dependecy file. + */ + if (!i) + { + depOptimize(&This, fFixCase, 0 /* fQuiet */, NULL /*pszIgnoredExt*/); + depPrintTargetWithDeps(&This, pOutput, pszTarget, 1 /*fEscapeTarget*/); + if (fStubs) + depPrintStubs(&This, pOutput); + } + + /* + * Close the output, delete output on failure. + */ + if (!i && ferror(pOutput)) + { + i = 1; + fprintf(stderr, "%s: error: Error writing to '%s'.\n", argv[0], pszOutput); + } + fclose(pOutput); + if (i) + { + if (unlink(pszOutput)) + fprintf(stderr, "%s: warning: failed to remove output file '%s' on failure.\n", argv[0], pszOutput); + } + + depCleanup(&This); + + return i; +} + |