-/***************************************************************************\r
- * Copyright (C) 2004, 2005 by Dominic Rath *\r
- * Dominic.Rath@gmx.de *\r
- * *\r
- * This program is free software; you can redistribute it and/or modify *\r
- * it under the terms of the GNU General Public License as published by *\r
- * the Free Software Foundation; either version 2 of the License, or *\r
- * (at your option) any 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 *\r
- * Free Software Foundation, Inc., *\r
- * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *\r
- ***************************************************************************/\r
-#ifdef HAVE_CONFIG_H\r
-#include "config.h"\r
-#endif\r
-\r
-#include "types.h"\r
-#include "command.h"\r
-#include "configuration.h"\r
-#include "log.h"\r
-\r
-#include <stdio.h>\r
-#include <stdlib.h>\r
-#include <getopt.h>\r
-#include <string.h>\r
-\r
-static size_t num_config_files;\r
-static char** config_file_names;\r
-\r
-static size_t num_script_dirs;\r
-static char** script_search_dirs;\r
-\r
-static int help_flag;\r
-\r
-static struct option long_options[] =\r
-{\r
- {"help", no_argument, &help_flag, 1},\r
-\r
- {"debug", optional_argument, 0, 'd'},\r
- {"file", required_argument, 0, 'f'},\r
- {"search", required_argument, 0, 's'},\r
- {"log_output", required_argument, 0, 'l'},\r
- {"command", required_argument, 0, 'c'},\r
- \r
- {0, 0, 0, 0}\r
-};\r
-\r
-int configuration_output_handler(struct command_context_s *context, char* line)\r
-{\r
- INFO(line);\r
- \r
- return ERROR_OK;\r
-}\r
-\r
-void add_script_search_dir (const char *dir)\r
-{\r
- num_script_dirs++;\r
- script_search_dirs = (char **)realloc(script_search_dirs, (num_script_dirs+1) * sizeof (char *));\r
-\r
- script_search_dirs[num_script_dirs-1] = strdup(dir);\r
- script_search_dirs[num_script_dirs] = NULL;\r
-}\r
-\r
-void add_config_file_name (const char *cfg)\r
-{\r
- num_config_files++;\r
- config_file_names = (char **)realloc(config_file_names, (num_config_files+1) * sizeof (char *));\r
-\r
- config_file_names[num_config_files-1] = strdup(cfg);\r
- config_file_names[num_config_files] = NULL;\r
-}\r
-\r
-int parse_cmdline_args(struct command_context_s *cmd_ctx, int argc, char *argv[])\r
-{\r
- int c;\r
- char command_buffer[128];\r
-\r
- while (1)\r
- { \r
- /* getopt_long stores the option index here. */\r
- int option_index = 0;\r
- \r
- c = getopt_long(argc, argv, "hd::l:f:s:c:", long_options, &option_index);\r
- \r
- /* Detect the end of the options. */\r
- if (c == -1)\r
- break;\r
- \r
- switch (c)\r
- {\r
- case 0:\r
- break;\r
- case 'h': /* --help | -h */\r
- help_flag = 1;\r
- break;\r
- case 'f': /* --file | -f */\r
- snprintf(command_buffer, 128, "script %s", optarg);\r
- add_config_file_name(command_buffer);\r
- break;\r
- case 's': /* --search | -s */\r
- add_script_search_dir(optarg);\r
- break;\r
- case 'd': /* --debug | -d */\r
- if (optarg)\r
- snprintf(command_buffer, 128, "debug_level %s", optarg);\r
- else\r
- snprintf(command_buffer, 128, "debug_level 3");\r
- command_run_line(cmd_ctx, command_buffer);\r
- break;\r
- case 'l': /* --log_output | -l */\r
- if (optarg)\r
- {\r
- snprintf(command_buffer, 128, "log_output %s", optarg);\r
- command_run_line(cmd_ctx, command_buffer);\r
- } \r
- break;\r
- case 'c': /* --command | -c */\r
- if (optarg)\r
- {\r
- add_config_file_name(optarg);\r
- } \r
- break;\r
- \r
- }\r
- }\r
-\r
- if (help_flag)\r
- {\r
- printf("Open On-Chip Debugger\n(c) 2005 by Dominic Rath\n\n");\r
- printf("--help | -h\tdisplay this help\n");\r
- printf("--file | -f\tuse configuration file <name>\n");\r
- printf("--search | -s\tdir to search for config files and scripts.\n");\r
- printf("--debug | -d\tset debug level <0-3>\n");\r
- printf("--log_output | -l\tredirect log output to file <name>\n");\r
- printf("--command | -c\trun <command>\n");\r
- exit(-1);\r
- } \r
-\r
- /* Add dir for openocd supplied scripts last so that user can over\r
- ride those scripts if desired. */\r
- add_script_search_dir(PKGDATADIR);\r
- add_script_search_dir(PKGLIBDIR);\r
-\r
- return ERROR_OK;\r
-}\r
-\r
-FILE *open_file_from_path (command_context_t *cmd_ctx, char *file, char *mode)\r
-{\r
- FILE *fp = NULL;\r
- char **search_dirs = script_search_dirs;\r
- char *dir;\r
- char full_path[1024];\r
-\r
- /* Check absolute and relative to current working dir first.\r
- * This keeps full_path reporting belowing working. */\r
- snprintf(full_path, 1024, "%s", file);\r
- fp = fopen(full_path, mode);\r
-\r
- while (!fp)\r
- {\r
- dir = *search_dirs++;\r
-\r
- if (!dir)\r
- break;\r
-\r
- snprintf(full_path, 1024, "%s/%s", dir, file);\r
- fp = fopen(full_path, mode);\r
- }\r
-\r
- if (fp)\r
- command_print(cmd_ctx, "opened %s", full_path);\r
-\r
- return fp;\r
-}\r
-\r
-int parse_config_file(struct command_context_s *cmd_ctx)\r
-{\r
- char **cfg;\r
- FILE *config_file;\r
-\r
- if (!config_file_names)\r
- add_config_file_name ("script openocd.cfg");\r
-\r
- cfg = config_file_names;\r
-\r
- while (*cfg)\r
- {\r
- command_run_line(cmd_ctx, *cfg);\r
- cfg++;\r
- }\r
-\r
- return ERROR_OK;\r
-}\r
+/***************************************************************************
+ * Copyright (C) 2004, 2005 by Dominic Rath *
+ * Dominic.Rath@gmx.de *
+ * *
+ * Copyright (C) 2007,2008 Øyvind Harboe *
+ * oyvind.harboe@zylin.com *
+ * *
+ * 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 of the License, 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, Inc., *
+ * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
+ ***************************************************************************/
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "configuration.h"
+#include "log.h"
+
+static size_t num_config_files;
+static char **config_file_names;
+
+static size_t num_script_dirs;
+static char **script_search_dirs;
+
+void add_script_search_dir(const char *dir)
+{
+ num_script_dirs++;
+ script_search_dirs =
+ (char **)realloc(script_search_dirs, (num_script_dirs + 1) * sizeof(char *));
+
+ script_search_dirs[num_script_dirs-1] = strdup(dir);
+ script_search_dirs[num_script_dirs] = NULL;
+
+ LOG_DEBUG("adding %s", dir);
+}
+
+void add_config_command(const char *cfg)
+{
+ num_config_files++;
+ config_file_names =
+ (char **)realloc(config_file_names, (num_config_files + 1) * sizeof(char *));
+
+ config_file_names[num_config_files-1] = strdup(cfg);
+ config_file_names[num_config_files] = NULL;
+}
+
+/* return full path or NULL according to search rules */
+char *find_file(const char *file)
+{
+ FILE *fp = NULL;
+ char **search_dirs = script_search_dirs;
+ char *dir;
+ char const *mode = "r";
+ char *full_path;
+
+ /* Check absolute and relative to current working dir first.
+ * This keeps full_path reporting belowing working. */
+ full_path = alloc_printf("%s", file);
+ fp = fopen(full_path, mode);
+
+ while (!fp) {
+ free(full_path);
+ full_path = NULL;
+ dir = *search_dirs++;
+
+ if (!dir)
+ break;
+
+ full_path = alloc_printf("%s/%s", dir, file);
+ fp = fopen(full_path, mode);
+ }
+
+ if (fp) {
+ fclose(fp);
+ LOG_DEBUG("found %s", full_path);
+ return full_path;
+ }
+
+ free(full_path);
+
+ return NULL;
+}
+
+FILE *open_file_from_path(const char *file, const char *mode)
+{
+ if (mode[0] != 'r')
+ return fopen(file, mode);
+ else {
+ char *full_path = find_file(file);
+ if (full_path == NULL)
+ return NULL;
+ FILE *fp = NULL;
+ fp = fopen(full_path, mode);
+ free(full_path);
+ return fp;
+ }
+}
+
+int parse_config_file(struct command_context *cmd_ctx)
+{
+ int retval;
+ char **cfg;
+
+ if (!config_file_names) {
+ command_run_line(cmd_ctx, "script openocd.cfg");
+ return ERROR_OK;
+ }
+
+ cfg = config_file_names;
+
+ while (*cfg) {
+ retval = command_run_line(cmd_ctx, *cfg);
+ if (retval != ERROR_OK)
+ return retval;
+ cfg++;
+ }
+
+ return ERROR_OK;
+}