]> git.ipfire.org Git - thirdparty/gcc.git/blame - fixincludes/fixopts.c
[Ada] New pragma Aggregate_Individually_Assign
[thirdparty/gcc.git] / fixincludes / fixopts.c
CommitLineData
4f80d25b 1/* Handle options that are passed from environment variables.
2
71e45bc2 3 Copyright (C) 2004, 2009, 2012 Free Software Foundation, Inc.
4f80d25b 4
5This file is part of GCC.
6
7GCC is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
6bc9506f 9the Free Software Foundation; either version 3, or (at your option)
4f80d25b 10any later version.
11
12GCC is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
6bc9506f 18along with GCC; see the file COPYING3. If not see
19<http://www.gnu.org/licenses/>. */
4f80d25b 20
21#include "fixlib.h"
22
32f37500 23te_verbose verbose_level = VERB_PROGRESS;
24
25fixinc_mode_t fixinc_mode = TESTING_OFF;
26
27#define _ENV_(v,m,n,t) char const * v = NULL;
4f80d25b 28ENV_TABLE
29#undef _ENV_
30
32f37500 31static void
32show_not_def (char const * vname)
4f80d25b 33{
34 static const char var_not_found[] =
4f80d25b 35 "fixincl ERROR: %s environment variable not defined\n"
32f37500 36 "each of these must be defined:\n";
37 static char const not_found_var[] = "\t%s\n";
38
39 fprintf (stderr, var_not_found, vname);
40# define _ENV_(vv,mm,nn,tt) \
41 if (mm) fprintf (stderr, not_found_var, nn);
4f80d25b 42 ENV_TABLE
43# undef _ENV_
4f80d25b 44
32f37500 45 exit (EXIT_FAILURE);
46}
4f80d25b 47
32f37500 48void
49initialize_opts (void)
50{
51#define _ENV_(v,m,n,t) { \
52 static char const var[] = n; \
53 v = getenv (var); \
54 if (m && (v == NULL)) show_not_def (var); \
55 }
4f80d25b 56
32f37500 57 ENV_TABLE;
4f80d25b 58#undef _ENV_
32f37500 59
60 if ((pz_test_mode != NULL) && (strcmp (pz_test_mode, "true") == 0))
61 fixinc_mode = TESTING_ON;
4f80d25b 62}