1 /***************************************************************************
2 * Copyright (C) 2004, 2005 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
5 * Copyright (C) 2007-2010 Øyvind Harboe *
6 * oyvind.harboe@zylin.com *
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. *
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. *
18 * You should have received a copy of the GNU General Public License *
19 * along with this program. If not, see <http://www.gnu.org/licenses/>. *
20 ***************************************************************************/
26 #include "configuration.h"
38 /* sys/sysctl.h is deprecated on Linux from glibc 2.30 */
40 #ifdef HAVE_SYS_SYSCTL_H
41 #include <sys/sysctl.h>
44 #if IS_WIN32 && !IS_CYGWIN
48 static int help_flag
, version_flag
;
50 static const struct option long_options
[] = {
51 {"help", no_argument
, &help_flag
, 1},
52 {"version", no_argument
, &version_flag
, 1},
53 {"debug", optional_argument
, 0, 'd'},
54 {"file", required_argument
, 0, 'f'},
55 {"search", required_argument
, 0, 's'},
56 {"log_output", required_argument
, 0, 'l'},
57 {"command", required_argument
, 0, 'c'},
61 int configuration_output_handler(struct command_context
*context
, const char *line
)
63 LOG_USER_N("%s", line
);
68 /* Return the canonical path to the directory the openocd executable is in.
69 * The path should be absolute, use / as path separator and have all symlinks
70 * resolved. The returned string is malloc'd. */
71 static char *find_exe_path(void)
76 #if IS_WIN32 && !IS_CYGWIN
77 exepath
= malloc(MAX_PATH
);
80 GetModuleFileName(NULL
, exepath
, MAX_PATH
);
82 /* Convert path separators to UNIX style, should work on Windows also. */
83 for (char *p
= exepath
; *p
; p
++) {
89 exepath
= malloc(PROC_PIDPATHINFO_MAXSIZE
);
92 if (proc_pidpath(getpid(), exepath
, PROC_PIDPATHINFO_MAXSIZE
) <= 0) {
97 #elif defined(CTL_KERN) && defined(KERN_PROC) && defined(KERN_PROC_PATHNAME) /* *BSD */
101 char *path
= malloc(PATH_MAX
);
104 int mib
[] = { CTL_KERN
, KERN_PROC
, KERN_PROC_PATHNAME
, -1 };
105 size_t size
= PATH_MAX
;
107 if (sysctl(mib
, (u_int
)ARRAY_SIZE(mib
), path
, &size
, NULL
, 0) != 0)
111 exepath
= realpath(path
, NULL
);
117 #elif defined(HAVE_REALPATH) /* Assume POSIX.1-2008 */
118 /* Try Unices in order of likelihood. */
119 exepath
= realpath("/proc/self/exe", NULL
); /* Linux/Cygwin */
121 exepath
= realpath("/proc/self/path/a.out", NULL
); /* Solaris */
123 exepath
= realpath("/proc/curproc/file", NULL
); /* FreeBSD (Should be covered above) */
127 if (exepath
!= NULL
) {
128 /* Strip executable file name, leaving path */
129 *strrchr(exepath
, '/') = '\0';
131 LOG_WARNING("Could not determine executable path, using configured BINDIR.");
132 LOG_DEBUG("BINDIR = %s", BINDIR
);
134 exepath
= realpath(BINDIR
, NULL
);
136 exepath
= strdup(BINDIR
);
143 static char *find_relative_path(const char *from
, const char *to
)
147 /* Skip common /-separated parts of from and to */
149 for (size_t n
= 0; from
[n
] == to
[n
]; n
++) {
150 if (from
[n
] == '\0') {
160 /* Count number of /-separated non-empty parts of from */
162 while (from
[0] != '\0') {
165 char *next
= strchr(from
, '/');
171 /* Prepend that number of ../ in front of to */
172 char *relpath
= malloc(i
* 3 + strlen(to
) + 1);
174 for (size_t n
= 0; n
< i
; n
++)
175 strcat(relpath
, "../");
181 static void add_user_dirs(void)
186 const char *appdata
= getenv("APPDATA");
189 path
= alloc_printf("%s/OpenOCD", appdata
);
191 /* Convert path separators to UNIX style, should work on Windows also. */
192 for (char *p
= path
; *p
; p
++) {
196 add_script_search_dir(path
);
200 /* WIN32 may also have HOME defined, particularly under Cygwin, so add those paths below too */
203 const char *home
= getenv("HOME");
206 path
= alloc_printf("%s/Library/Preferences/org.openocd", home
);
208 add_script_search_dir(path
);
213 const char *xdg_config
= getenv("XDG_CONFIG_HOME");
216 path
= alloc_printf("%s/openocd", xdg_config
);
218 add_script_search_dir(path
);
222 path
= alloc_printf("%s/.config/openocd", home
);
224 add_script_search_dir(path
);
230 path
= alloc_printf("%s/.openocd", home
);
232 add_script_search_dir(path
);
238 static void add_default_dirs(void)
241 char *exepath
= find_exe_path();
242 char *bin2data
= find_relative_path(BINDIR
, PKGDATADIR
);
244 LOG_DEBUG("bindir=%s", BINDIR
);
245 LOG_DEBUG("pkgdatadir=%s", PKGDATADIR
);
246 LOG_DEBUG("exepath=%s", exepath
);
247 LOG_DEBUG("bin2data=%s", bin2data
);
250 * The directory containing OpenOCD-supplied scripts should be
251 * listed last in the built-in search order, so the user can
252 * override these scripts with site-specific customizations.
254 path
= getenv("OPENOCD_SCRIPTS");
256 add_script_search_dir(path
);
260 path
= alloc_printf("%s/%s/%s", exepath
, bin2data
, "site");
262 add_script_search_dir(path
);
266 path
= alloc_printf("%s/%s/%s", exepath
, bin2data
, "scripts");
268 add_script_search_dir(path
);
276 int parse_cmdline_args(struct command_context
*cmd_ctx
, int argc
, char *argv
[])
281 /* getopt_long stores the option index here. */
282 int option_index
= 0;
284 c
= getopt_long(argc
, argv
, "hvd::l:f:s:c:", long_options
, &option_index
);
286 /* Detect the end of the options. */
293 case 'h': /* --help | -h */
296 case 'v': /* --version | -v */
299 case 'f': /* --file | -f */
301 char *command
= alloc_printf("script {%s}", optarg
);
302 add_config_command(command
);
306 case 's': /* --search | -s */
307 add_script_search_dir(optarg
);
309 case 'd': /* --debug | -d */
311 int retval
= command_run_linef(cmd_ctx
, "debug_level %s", optarg
? optarg
: "3");
312 if (retval
!= ERROR_OK
)
316 case 'l': /* --log_output | -l */
318 command_run_linef(cmd_ctx
, "log_output %s", optarg
);
320 case 'c': /* --command | -c */
322 add_config_command(optarg
);
325 /* getopt will emit an error message, all we have to do is bail. */
331 /* Catch extra arguments on the command line. */
332 LOG_OUTPUT("Unexpected command line argument: %s\n", argv
[optind
]);
337 LOG_OUTPUT("Open On-Chip Debugger\nLicensed under GNU GPL v2\n");
338 LOG_OUTPUT("--help | -h\tdisplay this help\n");
339 LOG_OUTPUT("--version | -v\tdisplay OpenOCD version\n");
340 LOG_OUTPUT("--file | -f\tuse configuration file <name>\n");
341 LOG_OUTPUT("--search | -s\tdir to search for config files and scripts\n");
342 LOG_OUTPUT("--debug | -d\tset debug level to 3\n");
343 LOG_OUTPUT(" | -d<n>\tset debug level to <level>\n");
344 LOG_OUTPUT("--log_output | -l\tredirect log output to file <name>\n");
345 LOG_OUTPUT("--command | -c\trun <command>\n");
350 /* Nothing to do, version gets printed automatically. */
351 /* It is not an error to request the VERSION number. */
355 /* paths specified on the command line take precedence over these