-/* Set up combined include path chain for the preprocessor.\r
- Copyright (C) 1986, 1987, 1989, 1992, 1993, 1994, 1995, 1996, 1997, 1998,\r
- 1999, 2000, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.\r
-\r
- Broken out of cppinit.c and cppfiles.c and rewritten Mar 2003.\r
-\r
-This program is free software; you can redistribute it and/or modify it\r
-under the terms of the GNU General Public License as published by the\r
-Free Software Foundation; either version 2, or (at your option) any\r
-later version.\r
-\r
-This program is distributed in the hope that it will be useful,\r
-but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
-GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License\r
-along with this program; if not, write to the Free Software\r
-Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */\r
-\r
-#include "config.h"\r
-#include "system.h"\r
-#include "cpplib.h"\r
-#include "prefix.h"\r
-#include "intl.h"\r
-#include "c-incpath.h"\r
-#include "cppdefault.h"\r
-\r
-/* Windows does not natively support inodes, and neither does MSDOS.\r
- Cygwin's emulation can generate non-unique inodes, so don't use it.\r
- VMS has non-numeric inodes. */\r
-#ifdef VMS\r
-# define INO_T_EQ(A, B) (!memcmp (&(A), &(B), sizeof (A)))\r
-# define INO_T_COPY(DEST, SRC) memcpy(&(DEST), &(SRC), sizeof (SRC))\r
-#else\r
-# if (defined _WIN32 && !defined (_UWIN)) || defined __MSDOS__\r
-# define INO_T_EQ(A, B) 0\r
-# else\r
-# define INO_T_EQ(A, B) ((A) == (B))\r
-# endif\r
-# define INO_T_COPY(DEST, SRC) (DEST) = (SRC)\r
-#endif\r
-\r
-static void add_env_var_paths (const char *, int);\r
-static void add_standard_paths (const char *, const char *, int);\r
-static void free_path (struct cpp_dir *, int);\r
-static void merge_include_chains (cpp_reader *, int);\r
-static struct cpp_dir *remove_duplicates (cpp_reader *, struct cpp_dir *,\r
- struct cpp_dir *,\r
- struct cpp_dir *, int);\r
-\r
-/* Include chains heads and tails. */\r
-static struct cpp_dir *heads[4];\r
-static struct cpp_dir *tails[4];\r
-static bool quote_ignores_source_dir;\r
-enum { REASON_QUIET = 0, REASON_NOENT, REASON_DUP, REASON_DUP_SYS };\r
-\r
-/* Free an element of the include chain, possibly giving a reason. */\r
-static void\r
-free_path (struct cpp_dir *path, int reason)\r
-{\r
- switch (reason)\r
- {\r
- case REASON_DUP:\r
- case REASON_DUP_SYS:\r
- fprintf (stderr, _("ignoring duplicate directory \"%s\"\n"), path->name);\r
- if (reason == REASON_DUP_SYS)\r
- fprintf (stderr,\r
- _(" as it is a non-system directory that duplicates a system directory\n"));\r
- break;\r
-\r
- case REASON_NOENT:\r
- fprintf (stderr, _("ignoring nonexistent directory \"%s\"\n"),\r
- path->name);\r
- break;\r
-\r
- case REASON_QUIET:\r
- default:\r
- break;\r
- }\r
-\r
- free (path->name);\r
- free (path);\r
-}\r
-\r
-/* Read ENV_VAR for a PATH_SEPARATOR-separated list of file names; and\r
- append all the names to the search path CHAIN. */\r
-static void\r
-add_env_var_paths (const char *env_var, int chain)\r
-{\r
- char *p, *q, *path;\r
-\r
- GET_ENVIRONMENT (q, env_var);\r
-\r
- if (!q)\r
- return;\r
-\r
- for (p = q; *q; p = q + 1)\r
- {\r
- q = p;\r
- while (*q != 0 && *q != PATH_SEPARATOR)\r
- q++;\r
-\r
- if (p == q)\r
- path = xstrdup (".");\r
- else\r
- {\r
- path = xmalloc (q - p + 1);\r
- memcpy (path, p, q - p);\r
- path[q - p] = '\0';\r
- }\r
-\r
- add_path (path, chain, chain == SYSTEM, false);\r
- }\r
-}\r
-\r
-/* Append the standard include chain defined in cppdefault.c. */\r
-static void\r
-add_standard_paths (const char *sysroot, const char *iprefix, int cxx_stdinc)\r
-{\r
- const struct default_include *p;\r
- size_t len;\r
-\r
- if (iprefix && (len = cpp_GCC_INCLUDE_DIR_len) != 0)\r
- {\r
- /* Look for directories that start with the standard prefix.\r
- "Translate" them, i.e. replace /usr/local/lib/gcc... with\r
- IPREFIX and search them first. */\r
- for (p = cpp_include_defaults; p->fname; p++)\r
- {\r
- if (!p->cplusplus || cxx_stdinc)\r
- {\r
- /* Should we be translating sysrooted dirs too? Assume\r
- that iprefix and sysroot are mutually exclusive, for\r
- now. */\r
- if (sysroot && p->add_sysroot)\r
- continue;\r
- if (!strncmp (p->fname, cpp_GCC_INCLUDE_DIR, len))\r
- {\r
- char *str = concat (iprefix, p->fname + len, NULL);\r
- add_path (str, SYSTEM, p->cxx_aware, false);\r
- }\r
- }\r
- }\r
- }\r
-\r
- for (p = cpp_include_defaults; p->fname; p++)\r
- {\r
- if (!p->cplusplus || cxx_stdinc)\r
- {\r
- char *str;\r
-\r
- /* Should this directory start with the sysroot? */\r
- if (sysroot && p->add_sysroot)\r
- str = concat (sysroot, p->fname, NULL);\r
- else\r
- str = update_path (p->fname, p->component);\r
-\r
- add_path (str, SYSTEM, p->cxx_aware, false);\r
- }\r
- }\r
-}\r
-\r
-/* For each duplicate path in chain HEAD, keep just the first one.\r
- Remove each path in chain HEAD that also exists in chain SYSTEM.\r
- Set the NEXT pointer of the last path in the resulting chain to\r
- JOIN, unless it duplicates JOIN in which case the last path is\r
- removed. Return the head of the resulting chain. Any of HEAD,\r
- JOIN and SYSTEM can be NULL. */\r
-\r
-static struct cpp_dir *\r
-remove_duplicates (cpp_reader *pfile, struct cpp_dir *head,\r
- struct cpp_dir *system, struct cpp_dir *join,\r
- int verbose)\r
-{\r
- struct cpp_dir **pcur, *tmp, *cur;\r
- struct stat st;\r
-\r
- for (pcur = &head; *pcur; )\r
- {\r
- int reason = REASON_QUIET;\r
-\r
- cur = *pcur;\r
-\r
- if (stat (cur->name, &st))\r
- {\r
- /* Dirs that don't exist are silently ignored, unless verbose. */\r
- if (errno != ENOENT)\r
- cpp_errno (pfile, CPP_DL_ERROR, cur->name);\r
- else\r
- {\r
- /* If -Wmissing-include-dirs is given, warn. */\r
- cpp_options *opts = cpp_get_options (pfile);\r
- if (opts->warn_missing_include_dirs && cur->user_supplied_p)\r
- cpp_errno (pfile, CPP_DL_WARNING, cur->name);\r
- reason = REASON_NOENT;\r
- }\r
- }\r
- else if (!S_ISDIR (st.st_mode))\r
- cpp_error_with_line (pfile, CPP_DL_ERROR, 0, 0,\r
- "%s: not a directory", cur->name);\r
- else\r
- {\r
- INO_T_COPY (cur->ino, st.st_ino);\r
- cur->dev = st.st_dev;\r
-\r
- /* Remove this one if it is in the system chain. */\r
- reason = REASON_DUP_SYS;\r
- for (tmp = system; tmp; tmp = tmp->next)\r
- if (INO_T_EQ (tmp->ino, cur->ino) && tmp->dev == cur->dev\r
- && cur->construct == tmp->construct)\r
- break;\r
-\r
- if (!tmp)\r
- {\r
- /* Duplicate of something earlier in the same chain? */\r
- reason = REASON_DUP;\r
- for (tmp = head; tmp != cur; tmp = tmp->next)\r
- if (INO_T_EQ (cur->ino, tmp->ino) && cur->dev == tmp->dev\r
- && cur->construct == tmp->construct)\r
- break;\r
-\r
- if (tmp == cur\r
- /* Last in the chain and duplicate of JOIN? */\r
- && !(cur->next == NULL && join\r
- && INO_T_EQ (cur->ino, join->ino)\r
- && cur->dev == join->dev\r
- && cur->construct == join->construct))\r
- {\r
- /* Unique, so keep this directory. */\r
- pcur = &cur->next;\r
- continue;\r
- }\r
- }\r
- }\r
-\r
- /* Remove this entry from the chain. */\r
- *pcur = cur->next;\r
- free_path (cur, verbose ? reason: REASON_QUIET);\r
- }\r
-\r
- *pcur = join;\r
- return head;\r
-}\r
-\r
-/* Merge the four include chains together in the order quote, bracket,\r
- system, after. Remove duplicate dirs (as determined by\r
- INO_T_EQ()).\r
-\r
- We can't just merge the lists and then uniquify them because then\r
- we may lose directories from the <> search path that should be\r
- there; consider -iquote foo -iquote bar -Ifoo -Iquux. It is\r
- however safe to treat -iquote bar -iquote foo -Ifoo -Iquux as if\r
- written -iquote bar -Ifoo -Iquux. */\r
-\r
-static void\r
-merge_include_chains (cpp_reader *pfile, int verbose)\r
-{\r
- /* Join the SYSTEM and AFTER chains. Remove duplicates in the\r
- resulting SYSTEM chain. */\r
- if (heads[SYSTEM])\r
- tails[SYSTEM]->next = heads[AFTER];\r
- else\r
- heads[SYSTEM] = heads[AFTER];\r
- heads[SYSTEM] = remove_duplicates (pfile, heads[SYSTEM], 0, 0, verbose);\r
-\r
- /* Remove duplicates from BRACKET that are in itself or SYSTEM, and\r
- join it to SYSTEM. */\r
- heads[BRACKET] = remove_duplicates (pfile, heads[BRACKET], heads[SYSTEM],\r
- heads[SYSTEM], verbose);\r
-\r
- /* Remove duplicates from QUOTE that are in itself or SYSTEM, and\r
- join it to BRACKET. */\r
- heads[QUOTE] = remove_duplicates (pfile, heads[QUOTE], heads[SYSTEM],\r
- heads[BRACKET], verbose);\r
-\r
- /* If verbose, print the list of dirs to search. */\r
- if (verbose)\r
- {\r
- struct cpp_dir *p;\r
-\r
- fprintf (stderr, _("#include \"...\" search starts here:\n"));\r
- for (p = heads[QUOTE];; p = p->next)\r
- {\r
- if (p == heads[BRACKET])\r
- fprintf (stderr, _("#include <...> search starts here:\n"));\r
- if (!p)\r
- break;\r
- fprintf (stderr, " %s\n", p->name);\r
- }\r
- fprintf (stderr, _("End of search list.\n"));\r
- }\r
-}\r
-\r
-/* Use given -I paths for #include "..." but not #include <...>, and\r
- don't search the directory of the present file for #include "...".\r
- (Note that -I. -I- is not the same as the default setup; -I. uses\r
- the compiler's working dir.) */\r
-void\r
-split_quote_chain (void)\r
-{\r
- heads[QUOTE] = heads[BRACKET];\r
- tails[QUOTE] = tails[BRACKET];\r
- heads[BRACKET] = NULL;\r
- tails[BRACKET] = NULL;\r
- /* This is NOT redundant. */\r
- quote_ignores_source_dir = true;\r
-}\r
-\r
-/* Add P to the chain specified by CHAIN. */\r
-\r
-void\r
-add_cpp_dir_path (cpp_dir *p, int chain)\r
-{\r
- if (tails[chain])\r
- tails[chain]->next = p;\r
- else\r
- heads[chain] = p;\r
- tails[chain] = p;\r
-}\r
-\r
-/* Add PATH to the include chain CHAIN. PATH must be malloc-ed and\r
- NUL-terminated. */\r
-void\r
-add_path (char *path, int chain, int cxx_aware, bool user_supplied_p)\r
-{\r
- cpp_dir *p;\r
-\r
-#if defined (HAVE_DOS_BASED_FILE_SYSTEM)\r
- /* Convert all backslashes to slashes. The native CRT stat()\r
- function does not recognize a directory that ends in a backslash\r
- (unless it is a drive root dir, such "c:\"). Forward slashes,\r
- trailing or otherwise, cause no problems for stat(). */\r
- char* c;\r
- for (c = path; *c; c++)\r
- if (*c == '\\') *c = '/';\r
-#endif\r
-\r
- p = xmalloc (sizeof (cpp_dir));\r
- p->next = NULL;\r
- p->name = path;\r
- if (chain == SYSTEM || chain == AFTER)\r
- p->sysp = 1 + !cxx_aware;\r
- else\r
- p->sysp = 0;\r
- p->construct = 0;\r
- p->user_supplied_p = user_supplied_p;\r
-\r
- add_cpp_dir_path (p, chain);\r
-}\r
-\r
-/* Exported function to handle include chain merging, duplicate\r
- removal, and registration with cpplib. */\r
-void\r
-register_include_chains (cpp_reader *pfile, const char *sysroot,\r
- const char *iprefix, int stdinc, int cxx_stdinc,\r
- int verbose)\r
-{\r
- static const char *const lang_env_vars[] =\r
- { "C_INCLUDE_PATH", "CPLUS_INCLUDE_PATH",\r
- "OBJC_INCLUDE_PATH", "OBJCPLUS_INCLUDE_PATH" };\r
- cpp_options *cpp_opts = cpp_get_options (pfile);\r
- size_t idx = (cpp_opts->objc ? 2: 0);\r
-\r
- if (cpp_opts->cplusplus)\r
- idx++;\r
- else\r
- cxx_stdinc = false;\r
-\r
- /* CPATH and language-dependent environment variables may add to the\r
- include chain. */\r
- add_env_var_paths ("CPATH", BRACKET);\r
- add_env_var_paths (lang_env_vars[idx], SYSTEM);\r
-\r
- target_c_incpath.extra_pre_includes (sysroot, iprefix, stdinc);\r
-\r
- /* Finally chain on the standard directories. */\r
- if (stdinc)\r
- add_standard_paths (sysroot, iprefix, cxx_stdinc);\r
-\r
- target_c_incpath.extra_includes (sysroot, iprefix, stdinc);\r
-\r
- merge_include_chains (pfile, verbose);\r
-\r
- cpp_set_include_chains (pfile, heads[QUOTE], heads[BRACKET],\r
- quote_ignores_source_dir);\r
-}\r
-#if !(defined TARGET_EXTRA_INCLUDES) || !(defined TARGET_EXTRA_PRE_INCLUDES)\r
-static void hook_void_charptr_charptr_int (const char *sysroot ATTRIBUTE_UNUSED,\r
- const char *iprefix ATTRIBUTE_UNUSED,\r
- int stdinc ATTRIBUTE_UNUSED)\r
-{\r
-}\r
-#endif\r
-\r
-#ifndef TARGET_EXTRA_INCLUDES\r
-#define TARGET_EXTRA_INCLUDES hook_void_charptr_charptr_int\r
-#endif\r
-#ifndef TARGET_EXTRA_PRE_INCLUDES\r
-#define TARGET_EXTRA_PRE_INCLUDES hook_void_charptr_charptr_int\r
-#endif\r
-\r
-struct target_c_incpath_s target_c_incpath = { TARGET_EXTRA_PRE_INCLUDES, TARGET_EXTRA_INCLUDES };\r
-\r
+/* Set up combined include path chain for the preprocessor.
+ Copyright (C) 1986, 1987, 1989, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
+ 1999, 2000, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
+
+ Broken out of cppinit.c and cppfiles.c and rewritten Mar 2003.
+
+This program 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 2, or (at your option) any
+later version.
+
+This program 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 this program; if not, write to the Free Software
+Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
+
+#include "config.h"
+#include "system.h"
+#include "cpplib.h"
+#include "prefix.h"
+#include "intl.h"
+#include "c-incpath.h"
+#include "cppdefault.h"
+
+/* Windows does not natively support inodes, and neither does MSDOS.
+ Cygwin's emulation can generate non-unique inodes, so don't use it.
+ VMS has non-numeric inodes. */
+#ifdef VMS
+# define INO_T_EQ(A, B) (!memcmp (&(A), &(B), sizeof (A)))
+# define INO_T_COPY(DEST, SRC) memcpy(&(DEST), &(SRC), sizeof (SRC))
+#else
+# if (defined _WIN32 && !defined (_UWIN)) || defined __MSDOS__
+# define INO_T_EQ(A, B) 0
+# else
+# define INO_T_EQ(A, B) ((A) == (B))
+# endif
+# define INO_T_COPY(DEST, SRC) (DEST) = (SRC)
+#endif
+
+static void add_env_var_paths (const char *, int);
+static void add_standard_paths (const char *, const char *, int);
+static void free_path (struct cpp_dir *, int);
+static void merge_include_chains (cpp_reader *, int);
+static struct cpp_dir *remove_duplicates (cpp_reader *, struct cpp_dir *,
+ struct cpp_dir *,
+ struct cpp_dir *, int);
+
+/* Include chains heads and tails. */
+static struct cpp_dir *heads[4];
+static struct cpp_dir *tails[4];
+static bool quote_ignores_source_dir;
+enum { REASON_QUIET = 0, REASON_NOENT, REASON_DUP, REASON_DUP_SYS };
+
+/* Free an element of the include chain, possibly giving a reason. */
+static void
+free_path (struct cpp_dir *path, int reason)
+{
+ switch (reason)
+ {
+ case REASON_DUP:
+ case REASON_DUP_SYS:
+ fprintf (stderr, _("ignoring duplicate directory \"%s\"\n"), path->name);
+ if (reason == REASON_DUP_SYS)
+ fprintf (stderr,
+ _(" as it is a non-system directory that duplicates a system directory\n"));
+ break;
+
+ case REASON_NOENT:
+ fprintf (stderr, _("ignoring nonexistent directory \"%s\"\n"),
+ path->name);
+ break;
+
+ case REASON_QUIET:
+ default:
+ break;
+ }
+
+ free (path->name);
+ free (path);
+}
+
+/* Read ENV_VAR for a PATH_SEPARATOR-separated list of file names; and
+ append all the names to the search path CHAIN. */
+static void
+add_env_var_paths (const char *env_var, int chain)
+{
+ char *p, *q, *path;
+
+ GET_ENVIRONMENT (q, env_var);
+
+ if (!q)
+ return;
+
+ for (p = q; *q; p = q + 1)
+ {
+ q = p;
+ while (*q != 0 && *q != PATH_SEPARATOR)
+ q++;
+
+ if (p == q)
+ path = xstrdup (".");
+ else
+ {
+ path = xmalloc (q - p + 1);
+ memcpy (path, p, q - p);
+ path[q - p] = '\0';
+ }
+
+ add_path (path, chain, chain == SYSTEM, false);
+ }
+}
+
+/* Append the standard include chain defined in cppdefault.c. */
+static void
+add_standard_paths (const char *sysroot, const char *iprefix, int cxx_stdinc)
+{
+ const struct default_include *p;
+ size_t len;
+
+ if (iprefix && (len = cpp_GCC_INCLUDE_DIR_len) != 0)
+ {
+ /* Look for directories that start with the standard prefix.
+ "Translate" them, i.e. replace /usr/local/lib/gcc... with
+ IPREFIX and search them first. */
+ for (p = cpp_include_defaults; p->fname; p++)
+ {
+ if (!p->cplusplus || cxx_stdinc)
+ {
+ /* Should we be translating sysrooted dirs too? Assume
+ that iprefix and sysroot are mutually exclusive, for
+ now. */
+ if (sysroot && p->add_sysroot)
+ continue;
+ if (!strncmp (p->fname, cpp_GCC_INCLUDE_DIR, len))
+ {
+ char *str = concat (iprefix, p->fname + len, NULL);
+ add_path (str, SYSTEM, p->cxx_aware, false);
+ }
+ }
+ }
+ }
+
+ for (p = cpp_include_defaults; p->fname; p++)
+ {
+ if (!p->cplusplus || cxx_stdinc)
+ {
+ char *str;
+
+ /* Should this directory start with the sysroot? */
+ if (sysroot && p->add_sysroot)
+ str = concat (sysroot, p->fname, NULL);
+ else
+ str = update_path (p->fname, p->component);
+
+ add_path (str, SYSTEM, p->cxx_aware, false);
+ }
+ }
+}
+
+/* For each duplicate path in chain HEAD, keep just the first one.
+ Remove each path in chain HEAD that also exists in chain SYSTEM.
+ Set the NEXT pointer of the last path in the resulting chain to
+ JOIN, unless it duplicates JOIN in which case the last path is
+ removed. Return the head of the resulting chain. Any of HEAD,
+ JOIN and SYSTEM can be NULL. */
+
+static struct cpp_dir *
+remove_duplicates (cpp_reader *pfile, struct cpp_dir *head,
+ struct cpp_dir *system, struct cpp_dir *join,
+ int verbose)
+{
+ struct cpp_dir **pcur, *tmp, *cur;
+ struct stat st;
+
+ for (pcur = &head; *pcur; )
+ {
+ int reason = REASON_QUIET;
+
+ cur = *pcur;
+
+ if (stat (cur->name, &st))
+ {
+ /* Dirs that don't exist are silently ignored, unless verbose. */
+ if (errno != ENOENT)
+ cpp_errno (pfile, CPP_DL_ERROR, cur->name);
+ else
+ {
+ /* If -Wmissing-include-dirs is given, warn. */
+ cpp_options *opts = cpp_get_options (pfile);
+ if (opts->warn_missing_include_dirs && cur->user_supplied_p)
+ cpp_errno (pfile, CPP_DL_WARNING, cur->name);
+ reason = REASON_NOENT;
+ }
+ }
+ else if (!S_ISDIR (st.st_mode))
+ cpp_error_with_line (pfile, CPP_DL_ERROR, 0, 0,
+ "%s: not a directory", cur->name);
+ else
+ {
+ INO_T_COPY (cur->ino, st.st_ino);
+ cur->dev = st.st_dev;
+
+ /* Remove this one if it is in the system chain. */
+ reason = REASON_DUP_SYS;
+ for (tmp = system; tmp; tmp = tmp->next)
+ if (INO_T_EQ (tmp->ino, cur->ino) && tmp->dev == cur->dev
+ && cur->construct == tmp->construct)
+ break;
+
+ if (!tmp)
+ {
+ /* Duplicate of something earlier in the same chain? */
+ reason = REASON_DUP;
+ for (tmp = head; tmp != cur; tmp = tmp->next)
+ if (INO_T_EQ (cur->ino, tmp->ino) && cur->dev == tmp->dev
+ && cur->construct == tmp->construct)
+ break;
+
+ if (tmp == cur
+ /* Last in the chain and duplicate of JOIN? */
+ && !(cur->next == NULL && join
+ && INO_T_EQ (cur->ino, join->ino)
+ && cur->dev == join->dev
+ && cur->construct == join->construct))
+ {
+ /* Unique, so keep this directory. */
+ pcur = &cur->next;
+ continue;
+ }
+ }
+ }
+
+ /* Remove this entry from the chain. */
+ *pcur = cur->next;
+ free_path (cur, verbose ? reason: REASON_QUIET);
+ }
+
+ *pcur = join;
+ return head;
+}
+
+/* Merge the four include chains together in the order quote, bracket,
+ system, after. Remove duplicate dirs (as determined by
+ INO_T_EQ()).
+
+ We can't just merge the lists and then uniquify them because then
+ we may lose directories from the <> search path that should be
+ there; consider -iquote foo -iquote bar -Ifoo -Iquux. It is
+ however safe to treat -iquote bar -iquote foo -Ifoo -Iquux as if
+ written -iquote bar -Ifoo -Iquux. */
+
+static void
+merge_include_chains (cpp_reader *pfile, int verbose)
+{
+ /* Join the SYSTEM and AFTER chains. Remove duplicates in the
+ resulting SYSTEM chain. */
+ if (heads[SYSTEM])
+ tails[SYSTEM]->next = heads[AFTER];
+ else
+ heads[SYSTEM] = heads[AFTER];
+ heads[SYSTEM] = remove_duplicates (pfile, heads[SYSTEM], 0, 0, verbose);
+
+ /* Remove duplicates from BRACKET that are in itself or SYSTEM, and
+ join it to SYSTEM. */
+ heads[BRACKET] = remove_duplicates (pfile, heads[BRACKET], heads[SYSTEM],
+ heads[SYSTEM], verbose);
+
+ /* Remove duplicates from QUOTE that are in itself or SYSTEM, and
+ join it to BRACKET. */
+ heads[QUOTE] = remove_duplicates (pfile, heads[QUOTE], heads[SYSTEM],
+ heads[BRACKET], verbose);
+
+ /* If verbose, print the list of dirs to search. */
+ if (verbose)
+ {
+ struct cpp_dir *p;
+
+ fprintf (stderr, _("#include \"...\" search starts here:\n"));
+ for (p = heads[QUOTE];; p = p->next)
+ {
+ if (p == heads[BRACKET])
+ fprintf (stderr, _("#include <...> search starts here:\n"));
+ if (!p)
+ break;
+ fprintf (stderr, " %s\n", p->name);
+ }
+ fprintf (stderr, _("End of search list.\n"));
+ }
+}
+
+/* Use given -I paths for #include "..." but not #include <...>, and
+ don't search the directory of the present file for #include "...".
+ (Note that -I. -I- is not the same as the default setup; -I. uses
+ the compiler's working dir.) */
+void
+split_quote_chain (void)
+{
+ heads[QUOTE] = heads[BRACKET];
+ tails[QUOTE] = tails[BRACKET];
+ heads[BRACKET] = NULL;
+ tails[BRACKET] = NULL;
+ /* This is NOT redundant. */
+ quote_ignores_source_dir = true;
+}
+
+/* Add P to the chain specified by CHAIN. */
+
+void
+add_cpp_dir_path (cpp_dir *p, int chain)
+{
+ if (tails[chain])
+ tails[chain]->next = p;
+ else
+ heads[chain] = p;
+ tails[chain] = p;
+}
+
+/* Add PATH to the include chain CHAIN. PATH must be malloc-ed and
+ NUL-terminated. */
+void
+add_path (char *path, int chain, int cxx_aware, bool user_supplied_p)
+{
+ cpp_dir *p;
+
+#if defined (HAVE_DOS_BASED_FILE_SYSTEM)
+ /* Convert all backslashes to slashes. The native CRT stat()
+ function does not recognize a directory that ends in a backslash
+ (unless it is a drive root dir, such "c:\"). Forward slashes,
+ trailing or otherwise, cause no problems for stat(). */
+ char* c;
+ for (c = path; *c; c++)
+ if (*c == '\\') *c = '/';
+#endif
+
+ p = xmalloc (sizeof (cpp_dir));
+ p->next = NULL;
+ p->name = path;
+ if (chain == SYSTEM || chain == AFTER)
+ p->sysp = 1 + !cxx_aware;
+ else
+ p->sysp = 0;
+ p->construct = 0;
+ p->user_supplied_p = user_supplied_p;
+
+ add_cpp_dir_path (p, chain);
+}
+
+/* Exported function to handle include chain merging, duplicate
+ removal, and registration with cpplib. */
+void
+register_include_chains (cpp_reader *pfile, const char *sysroot,
+ const char *iprefix, int stdinc, int cxx_stdinc,
+ int verbose)
+{
+ static const char *const lang_env_vars[] =
+ { "C_INCLUDE_PATH", "CPLUS_INCLUDE_PATH",
+ "OBJC_INCLUDE_PATH", "OBJCPLUS_INCLUDE_PATH" };
+ cpp_options *cpp_opts = cpp_get_options (pfile);
+ size_t idx = (cpp_opts->objc ? 2: 0);
+
+ if (cpp_opts->cplusplus)
+ idx++;
+ else
+ cxx_stdinc = false;
+
+ /* CPATH and language-dependent environment variables may add to the
+ include chain. */
+ add_env_var_paths ("CPATH", BRACKET);
+ add_env_var_paths (lang_env_vars[idx], SYSTEM);
+
+ target_c_incpath.extra_pre_includes (sysroot, iprefix, stdinc);
+
+ /* Finally chain on the standard directories. */
+ if (stdinc)
+ add_standard_paths (sysroot, iprefix, cxx_stdinc);
+
+ target_c_incpath.extra_includes (sysroot, iprefix, stdinc);
+
+ merge_include_chains (pfile, verbose);
+
+ cpp_set_include_chains (pfile, heads[QUOTE], heads[BRACKET],
+ quote_ignores_source_dir);
+}
+#if !(defined TARGET_EXTRA_INCLUDES) || !(defined TARGET_EXTRA_PRE_INCLUDES)
+static void hook_void_charptr_charptr_int (const char *sysroot ATTRIBUTE_UNUSED,
+ const char *iprefix ATTRIBUTE_UNUSED,
+ int stdinc ATTRIBUTE_UNUSED)
+{
+}
+#endif
+
+#ifndef TARGET_EXTRA_INCLUDES
+#define TARGET_EXTRA_INCLUDES hook_void_charptr_charptr_int
+#endif
+#ifndef TARGET_EXTRA_PRE_INCLUDES
+#define TARGET_EXTRA_PRE_INCLUDES hook_void_charptr_charptr_int
+#endif
+
+struct target_c_incpath_s target_c_incpath = { TARGET_EXTRA_PRE_INCLUDES, TARGET_EXTRA_INCLUDES };
+
projects / fw / sdcc / commitdiff