embeddedice: fix error handling
[openocd.git] / src / helper / configuration.c
blobeedd8a1ca823841305069bcbc83a92c900d536c2
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
27 #include "configuration.h"
28 #include "log.h"
31 static size_t num_config_files;
32 static char** config_file_names;
34 static size_t num_script_dirs;
35 static char** script_search_dirs;
37 void add_script_search_dir (const char *dir)
39 num_script_dirs++;
40 script_search_dirs = (char **)realloc(script_search_dirs, (num_script_dirs + 1) * sizeof (char *));
42 script_search_dirs[num_script_dirs-1] = strdup(dir);
43 script_search_dirs[num_script_dirs] = NULL;
45 LOG_DEBUG("adding %s", dir);
48 void add_config_command (const char *cfg)
50 num_config_files++;
51 config_file_names = (char **)realloc(config_file_names, (num_config_files + 1) * sizeof (char *));
53 config_file_names[num_config_files-1] = strdup(cfg);
54 config_file_names[num_config_files] = NULL;
57 /* return full path or NULL according to search rules */
58 char *find_file(const char *file)
60 FILE *fp = NULL;
61 char **search_dirs = script_search_dirs;
62 char *dir;
63 char const *mode="r";
64 char *full_path;
66 /* Check absolute and relative to current working dir first.
67 * This keeps full_path reporting belowing working. */
68 full_path = alloc_printf("%s", file);
69 fp = fopen(full_path, mode);
71 while (!fp)
73 free(full_path);
74 full_path = NULL;
75 dir = *search_dirs++;
77 if (!dir)
78 break;
80 full_path = alloc_printf("%s/%s", dir, file);
81 fp = fopen(full_path, mode);
84 if (fp)
86 fclose(fp);
87 LOG_DEBUG("found %s", full_path);
88 return full_path;
91 free(full_path);
93 return NULL;
96 FILE *open_file_from_path(const char *file, const char *mode)
98 if (mode[0]!='r')
100 return fopen(file, mode);
101 } else
103 char *full_path = find_file(file);
104 if (full_path == NULL)
105 return NULL;
106 FILE *fp = NULL;
107 fp = fopen(full_path, mode);
108 free(full_path);
109 return fp;
113 int parse_config_file(struct command_context *cmd_ctx)
115 int retval;
116 char **cfg;
118 if (!config_file_names) {
119 command_run_line(cmd_ctx, "script openocd.cfg");
120 return ERROR_OK;
123 cfg = config_file_names;
125 while (*cfg)
127 retval = command_run_line(cmd_ctx, *cfg);
128 if (retval != ERROR_OK)
129 return retval;
130 cfg++;
133 return ERROR_OK;