1
2
3
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
57
58
61
62
63
64
65
66
67
78
79
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
103
104
105
106
107
108
114
115
116
117
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
191
192
193
194
195
203
204
205
218
219
226
227
228
229
230
231
232
233
234
235
236
237
238
239
244
245
246
247
248
249
250
251
255
256
257
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
283
286
289
296
299
306
310
314
322
325
326
327
328
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
352
353
354
355
356
357
360
361
362
363
/* ... */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include "configuration.h"
#include "log.h"
#include "command.h"
#include <getopt.h>
#include <limits.h>
#include <stdlib.h>
#include <string.h>
7 includes#if IS_DARWIN
#include <libproc.h>
#endif
#ifndef __linux__
#ifdef HAVE_SYS_SYSCTL_H
#include <sys/sysctl.h>
#endif/* ... */
#endif
#if IS_WIN32 && !IS_CYGWIN
#include <windows.h>
#endif
static int help_flag, version_flag;
static const struct option long_options[] = {
{"help", no_argument, &help_flag, 1},
{"version", no_argument, &version_flag, 1},
{"debug", optional_argument, NULL, 'd'},
{"file", required_argument, NULL, 'f'},
{"search", required_argument, NULL, 's'},
{"log_output", required_argument, NULL, 'l'},
{"command", required_argument, NULL, 'c'},
{"set", required_argument, NULL, 'e'},
{NULL, 0, NULL, 0}
...};
int configuration_output_handler(struct command_context *context, const char *line)
{
LOG_USER_N("%s", line);
return ERROR_OK;
}{ ... }
/* ... */
static char *find_exe_path(void)
{
char *exepath = NULL;
do {
#if IS_WIN32 && !IS_CYGWIN
exepath = malloc(MAX_PATH);
if (!exepath)
break;
GetModuleFileName(NULL, exepath, MAX_PATH);
for (char *p = exepath; *p; p++) {
if (*p == '\\')
*p = '/';
}for (char *p = exepath; *p; p++) { ... }
/* ... */
#elif IS_DARWIN
exepath = malloc(PROC_PIDPATHINFO_MAXSIZE);
if (!exepath)
break;
if (proc_pidpath(getpid(), exepath, PROC_PIDPATHINFO_MAXSIZE) <= 0) {
free(exepath);
exepath = NULL;
}if (proc_pidpath(getpid(), exepath, PROC_PIDPATHINFO_MAXSIZE) <= 0) { ... }
/* ... */
#elif defined(CTL_KERN) && defined(KERN_PROC) && defined(KERN_PROC_PATHNAME)
#ifndef PATH_MAX
#define PATH_MAX 1024
#endif
char *path = malloc(PATH_MAX);
if (!path)
break;
int mib[] = { CTL_KERN, KERN_PROC, KERN_PROC_PATHNAME, -1 };
size_t size = PATH_MAX;
if (sysctl(mib, (u_int)ARRAY_SIZE(mib), path, &size, NULL, 0) != 0)
break;
#ifdef HAVE_REALPATH
exepath = realpath(path, NULL);
free(path);/* ... */
#else
exepath = path;
#endif
/* ... */
#elif defined(HAVE_REALPATH)
exepath = realpath("/proc/self/exe", NULL);
if (!exepath)
exepath = realpath("/proc/self/path/a.out", NULL);
if (!exepath)
exepath = realpath("/proc/curproc/file", NULL); /* ... */
#endif
...} while (0);
if (exepath) {
*strrchr(exepath, '/') = '\0';
}if (exepath) { ... } else {
LOG_WARNING("Could not determine executable path, using configured BINDIR.");
LOG_DEBUG("BINDIR = %s", BINDIR);
#ifdef HAVE_REALPATH
exepath = realpath(BINDIR, NULL);
#else
exepath = strdup(BINDIR);
#endif
}else { ... }
return exepath;
}{ ... }
static char *find_relative_path(const char *from, const char *to)
{
size_t i;
i = 0;
for (size_t n = 0; from[n] == to[n]; n++) {
if (from[n] == '\0') {
i = n;
break;
}if (from[n] == '\0') { ... }
if (from[n] == '/')
i = n + 1;
}for (size_t n = 0; from[n] == to[n]; n++) { ... }
from += i;
to += i;
i = 0;
while (from[0] != '\0') {
if (from[0] != '/')
i++;
char *next = strchr(from, '/');
if (!next)
break;
from = next + 1;
}while (from[0] != '\0') { ... }
char *relpath = malloc(i * 3 + strlen(to) + 1);
relpath[0] = '\0';
for (size_t n = 0; n < i; n++)
strcat(relpath, "../");
strcat(relpath, to);
return relpath;
}{ ... }
static void add_user_dirs(void)
{
char *path;
#if IS_WIN32
const char *appdata = getenv("APPDATA");
if (appdata) {
path = alloc_printf("%s/OpenOCD", appdata);
if (path) {
for (char *p = path; *p; p++) {
if (*p == '\\')
*p = '/';
}for (char *p = path; *p; p++) { ... }
add_script_search_dir(path);
free(path);
}if (path) { ... }
}if (appdata) { ... }
/* ... */
#endif
const char *home = getenv("HOME");
#if IS_DARWIN
if (home) {
path = alloc_printf("%s/Library/Preferences/org.openocd", home);
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
}if (home) { ... }
/* ... */#endif
const char *xdg_config = getenv("XDG_CONFIG_HOME");
if (xdg_config) {
path = alloc_printf("%s/openocd", xdg_config);
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
}if (xdg_config) { ... } else if (home) {
path = alloc_printf("%s/.config/openocd", home);
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
}else if (home) { ... }
if (home) {
path = alloc_printf("%s/.openocd", home);
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
}if (home) { ... }
}{ ... }
static void add_default_dirs(void)
{
char *path;
char *exepath = find_exe_path();
char *bin2data = find_relative_path(BINDIR, PKGDATADIR);
LOG_DEBUG("bindir=%s", BINDIR);
LOG_DEBUG("pkgdatadir=%s", PKGDATADIR);
LOG_DEBUG("exepath=%s", exepath);
LOG_DEBUG("bin2data=%s", bin2data);
/* ... */
path = getenv("OPENOCD_SCRIPTS");
if (path)
add_script_search_dir(path);
add_user_dirs();
path = alloc_printf("%s/%s/%s", exepath, bin2data, "site");
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
path = alloc_printf("%s/%s/%s", exepath, bin2data, "scripts");
if (path) {
add_script_search_dir(path);
free(path);
}if (path) { ... }
free(exepath);
free(bin2data);
}{ ... }
int parse_cmdline_args(struct command_context *cmd_ctx, int argc, char *argv[])
{
int c;
while (1) {
int option_index = 0;
c = getopt_long(argc, argv, "hvd::l:f:s:c:", long_options, &option_index);
if (c == -1)
break;
switch (c) {
case 0:
break;case 0:
case 'h':
help_flag = 1;
break;case 'h':
case 'v':
version_flag = 1;
break;case 'v':
case 'f':
{
char *command = alloc_printf("script {%s}", optarg);
add_config_command(command);
free(command);
break;
...}case 'f':
case 's':
add_script_search_dir(optarg);
break;case 's':
case 'd':
{
int retval = command_run_linef(cmd_ctx, "debug_level %s", optarg ? optarg : "3");
if (retval != ERROR_OK)
return retval;
break;
...}case 'd':
case 'l':
if (optarg)
command_run_linef(cmd_ctx, "log_output %s", optarg);
break;case 'l':
case 'c':
if (optarg)
add_config_command(optarg);
break;case 'c':
case 'e':
if (optarg)
{
char *command = alloc_printf("set %s", optarg);
add_config_command(command);
free(command);
}if (optarg) { ... }
break; case 'e':
default:
return ERROR_FAIL;default
}switch (c) { ... }
}while (1) { ... }
if (optind < argc) {
LOG_OUTPUT("Unexpected command line argument: %s\n", argv[optind]);
return ERROR_FAIL;
}if (optind < argc) { ... }
if (help_flag) {
LOG_OUTPUT("Open On-Chip Debugger\nLicensed under GNU GPL v2\n");
LOG_OUTPUT("--help | -h\tdisplay this help\n");
LOG_OUTPUT("--version | -v\tdisplay OpenOCD version\n");
LOG_OUTPUT("--file | -f\tuse configuration file <name>\n");
LOG_OUTPUT("--search | -s\tdir to search for config files and scripts\n");
LOG_OUTPUT("--debug | -d\tset debug level to 3\n");
LOG_OUTPUT(" | -d<n>\tset debug level to <level>\n");
LOG_OUTPUT("--log_output | -l\tredirect log output to file <name>\n");
LOG_OUTPUT("--command | -c\trun <command>\n");
exit(-1);
}if (help_flag) { ... }
if (version_flag) {
exit(0);
}if (version_flag) { ... }
for (int i = 0; i < argc; i++)
LOG_DEBUG("ARGV[%d] = \"%s\"", i, argv[i]);
/* ... */
add_default_dirs();
return ERROR_OK;
}{ ... }