533f0f1b87
Replace the FSF boilerplate with the SPDX tag. The SPDX tag on files *.c is incorrect, as it should use the C99 single line comment using '//'. But current checkpatch doesn't allow C99 comments, so keep using standard C comments, by now. Change-Id: I7851617e2682f97ccc3927e3941aadef2df63b54 Signed-off-by: Antonio Borneo <borneo.antonio@gmail.com> Reviewed-on: https://review.openocd.org/c/openocd/+/7068 Tested-by: jenkins
179 lines
3.6 KiB
C
179 lines
3.6 KiB
C
/* SPDX-License-Identifier: GPL-2.0-or-later */
|
|
|
|
/***************************************************************************
|
|
* Copyright (C) 2004, 2005 by Dominic Rath *
|
|
* Dominic.Rath@gmx.de *
|
|
* *
|
|
* Copyright (C) 2007,2008 Øyvind Harboe *
|
|
* oyvind.harboe@zylin.com *
|
|
***************************************************************************/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "configuration.h"
|
|
#include "log.h"
|
|
#include "replacements.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 = 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 = 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;
|
|
}
|
|
|
|
void free_config(void)
|
|
{
|
|
while (num_config_files)
|
|
free(config_file_names[--num_config_files]);
|
|
|
|
free(config_file_names);
|
|
config_file_names = NULL;
|
|
|
|
while (num_script_dirs)
|
|
free(script_search_dirs[--num_script_dirs]);
|
|
|
|
free(script_search_dirs);
|
|
script_search_dirs = 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)
|
|
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;
|
|
}
|
|
|
|
#ifndef _WIN32
|
|
#include <pwd.h>
|
|
#endif
|
|
|
|
char *get_home_dir(const char *append_path)
|
|
{
|
|
#ifdef _WIN32
|
|
char homepath[MAX_PATH];
|
|
#endif
|
|
|
|
char *home = getenv("HOME");
|
|
|
|
if (!home) {
|
|
|
|
#ifdef _WIN32
|
|
home = getenv("USERPROFILE");
|
|
|
|
if (!home) {
|
|
char *drive = getenv("HOMEDRIVE");
|
|
char *path = getenv("HOMEPATH");
|
|
if (drive && path) {
|
|
snprintf(homepath, MAX_PATH, "%s/%s", drive, path);
|
|
home = homepath;
|
|
}
|
|
}
|
|
#else
|
|
struct passwd *pwd = getpwuid(getuid());
|
|
if (pwd)
|
|
home = pwd->pw_dir;
|
|
|
|
#endif
|
|
}
|
|
|
|
if (!home)
|
|
return home;
|
|
|
|
char *home_path;
|
|
|
|
if (append_path)
|
|
home_path = alloc_printf("%s/%s", home, append_path);
|
|
else
|
|
home_path = alloc_printf("%s", home);
|
|
|
|
return home_path;
|
|
}
|