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