src/helper/configuration.c

   1 /***************************************************************************
   2  *   Copyright (C) 2004, 2005 by Dominic Rath                              *
   3  *   Dominic.Rath@gmx.de                                                   *
   4  *                                                                         *
   5  *   Copyright (C) 2007,2008 Øyvind Harboe                                 *
   6  *   oyvind.harboe@zylin.com                                               *
   7  *                                                                         *
   8  *   This program is free software; you can redistribute it and/or modify  *
   9  *   it under the terms of the GNU General Public License as published by  *
  10  *   the Free Software Foundation; either version 2 of the License, or     *
  11  *   (at your option) any later version.                                   *
  12  *                                                                         *
  13  *   This program is distributed in the hope that it will be useful,       *
  14  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  15  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  16  *   GNU General Public License for more details.                          *
  17  *                                                                         *
  18  *   You should have received a copy of the GNU General Public License     *
  19  *   along with this program; if not, write to the                         *
  20  *   Free Software Foundation, Inc.,                                       *
  21  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
  22  ***************************************************************************/
  23 #ifdef HAVE_CONFIG_H
  24 #include "config.h"
  25 #endif
  26
  27 #include "configuration.h"
  28 #include "log.h"
  29
  30
  31 static size_t num_config_files;
  32 static char** config_file_names;
  33
  34 static size_t num_script_dirs;
  35 static char** script_search_dirs;
  36
  37 void add_script_search_dir (const char *dir)
  38 {
  39         num_script_dirs++;
  40         script_search_dirs = (char **)realloc(script_search_dirs, (num_script_dirs+1) * sizeof (char *));
  41
  42         script_search_dirs[num_script_dirs-1] = strdup(dir);
  43         script_search_dirs[num_script_dirs] = NULL;
  44 }
  45
  46 void add_config_command (const char *cfg)
  47 {
  48         num_config_files++;
  49         config_file_names = (char **)realloc(config_file_names, (num_config_files+1) * sizeof (char *));
  50
  51         config_file_names[num_config_files-1] = strdup(cfg);
  52         config_file_names[num_config_files] = NULL;
  53 }
  54
  55 /* return full path or NULL according to search rules */
  56 char *find_file(const char *file)
  57 {
  58         FILE *fp = NULL;
  59         char **search_dirs = script_search_dirs;
  60         char *dir;
  61         char const *mode="r";
  62         char full_path[1024];
  63
  64         /* Check absolute and relative to current working dir first.
  65          * This keeps full_path reporting belowing working. */
  66         snprintf(full_path, 1024, "%s", file);
  67         fp = fopen(full_path, mode);
  68
  69         while (!fp)
  70         {
  71                 dir = *search_dirs++;
  72
  73                 if (!dir)
  74                         break;
  75
  76                 snprintf(full_path, 1024, "%s/%s", dir, file);
  77                 fp = fopen(full_path, mode);
  78         }
  79
  80         if (fp)
  81         {
  82                 fclose(fp);
  83                 LOG_DEBUG("found %s", full_path);
  84                 return strdup(full_path);
  85         }
  86         return NULL;
  87 }
  88
  89 FILE *open_file_from_path (char *file, char *mode)
  90 {
  91         if (mode[0]!='r')
  92         {
  93                 return fopen(file, mode);
  94         } else
  95         {
  96                 char *full_path=find_file(file);
  97                 if (full_path==NULL)
  98                         return NULL;
  99                 FILE *fp = NULL;
 100                 fp = fopen(full_path, mode);
 101                 free(full_path);
 102                 return fp;
 103         }
 104 }
 105
 106 int parse_config_file(struct command_context_s *cmd_ctx)
 107 {
 108         int retval;
 109         char **cfg;
 110
 111         if (!config_file_names)
 112                 add_config_command ("script openocd.cfg");
 113
 114         cfg = config_file_names;
 115
 116         while (*cfg)
 117         {
 118                 retval=command_run_line(cmd_ctx, *cfg);
 119                 if (retval != ERROR_OK)
 120                         return retval;
 121                 cfg++;
 122         }
 123
 124         return ERROR_OK;
 125 }