+#ifdef _WIN32
+static char *find_suffix(const char *text, const char *suffix)
+{
+ size_t text_len = strlen(text);
+ size_t suffix_len = strlen(suffix);
+
+ if (suffix_len == 0)
+ return (char *)text + text_len;
+
+ if (suffix_len > text_len || strncmp(text + text_len - suffix_len, suffix, suffix_len) != 0)
+ return NULL; /* Not a suffix of text */
+
+ return (char *)text + text_len - suffix_len;
+}
+#endif
+
+static void add_default_dirs(void)
+{
+ const char *run_prefix;
+ char *path;
+
+#ifdef _WIN32
+ char strExePath[MAX_PATH];
+ GetModuleFileName(NULL, strExePath, MAX_PATH);
+
+ /* Strip executable file name, leaving path */
+ *strrchr(strExePath, '\\') = '\0';
+
+ /* Convert path separators to UNIX style, should work on Windows also. */
+ for (char *p = strExePath; *p; p++) {
+ if (*p == '\\')
+ *p = '/';
+ }
+
+ char *end_of_prefix = find_suffix(strExePath, BINDIR);
+ if (end_of_prefix != NULL)
+ *end_of_prefix = '\0';
+
+ run_prefix = strExePath;
+#else
+ run_prefix = "";
+#endif
+
+ LOG_DEBUG("bindir=%s", BINDIR);
+ LOG_DEBUG("pkgdatadir=%s", PKGDATADIR);
+ LOG_DEBUG("run_prefix=%s", run_prefix);
+
+ /*
+ * The directory containing OpenOCD-supplied scripts should be
+ * listed last in the built-in search order, so the user can
+ * override these scripts with site-specific customizations.
+ */
+ const char *home = getenv("HOME");
+
+ if (home) {
+ path = alloc_printf("%s/.openocd", home);
+ if (path) {
+ add_script_search_dir(path);
+ free(path);
+ }
+ }
+
+ path = alloc_printf("%s%s%s", run_prefix, PKGDATADIR, "/site");
+ if (path) {
+ add_script_search_dir(path);
+ free(path);
+ }
+
+ path = alloc_printf("%s%s%s", run_prefix, PKGDATADIR, "/scripts");
+ if (path) {
+ add_script_search_dir(path);
+ free(path);
+ }
+}
+
+int parse_cmdline_args(struct command_context *cmd_ctx, int argc, char *argv[])