#include "paths.h"
#include "config.h"
#include <string.h>
#include <SDL.h>
#include <sys/stat.h>
#include "ibm.h"
#include "wx-utils.h"

char default_roms_paths[4096];
char default_nvr_path[512];
char default_configs_path[512];
char default_logs_path[512];
char default_screenshots_path[512];

/* the number of roms paths */
int num_roms_paths;
char roms_paths[4096];
/* this is where pcem.cfg is */
char pcem_path[512];
/* this is where nvr-files as stored */
char nvr_path[512];
/* this is where configs as stored */
char configs_path[512];
/* this is where log-files as stored */
char logs_path[512];
/* this is where screenshots as stored */
char screenshots_path[512];
/* this is where plugins are stored */
char plugins_default_path[512];

char nvr_default_path[512];

char get_path_separator() {
#ifdef _WIN32
	return ';';
#else
	return ':';
#endif
}

int get_roms_path(int pos, char *s, int size) {
	int j, i, z, len;
	char path_separator;

	path_separator = get_path_separator();
	len = strlen(roms_paths);
	j = 0;
	for (i = 0; i < len; i++) {
		if (roms_paths[i] == path_separator || i == len - 1) {
			if ((pos--) == 0) {
				z = (i - j) + ((i == len - 1) ? 1 : 0);
				safe_strncpy(s, roms_paths + j, size);
				s[(size - 1 < z) ? size - 1 : z] = 0;
				return 1;
			}
			j = i + 1;
		}
	}
	return 0;
}

void set_roms_paths(char *path) {
	char s[512];
	int j, i, z, len;
	char path_separator[2];

	roms_paths[0] = 0;
	path_separator[0] = get_path_separator();
	path_separator[1] = 0;
	len = strlen(path);
	j = 0;
	num_roms_paths = 0;
	for (i = 0; i < len; i++) {
		if (path[i] == path_separator[0] || i == len - 1) {
			z = (i - j) + ((i == len - 1) ? 1 : 0) + 1;
			safe_strncpy(s, path + j, z);
			s[(511 < z) ? 511 : z] = 0;
			append_slash(s, 512);
			if (dir_exists(s)) {
				if (num_roms_paths > 0)
					strcat(roms_paths, path_separator);
				strcat(roms_paths, s);
				num_roms_paths++;
			}
			j = i + 1;
		}
	}
}

int dir_exists(char *path) {
	return wx_dir_exists(path);
}

void set_nvr_path(char *s) {
	safe_strncpy(nvr_path, s, 512);
	append_slash(nvr_path, 512);
}

void set_logs_path(char *s) {
	safe_strncpy(logs_path, s, 512);
	append_slash(logs_path, 512);
}

void set_configs_path(char *s) {
	safe_strncpy(configs_path, s, 512);
	append_slash(configs_path, 512);
}

void set_screenshots_path(char *s) {
	safe_strncpy(screenshots_path, s, 512);
	append_slash(screenshots_path, 512);
}

/* set the default roms paths, this makes them permanent */
void set_default_roms_paths(char *s) {
	safe_strncpy(default_roms_paths, s, 4096);
	set_roms_paths(s);
}

/* set the default nvr path, this makes it permanent */
void set_default_nvr_path(char *s) {
	safe_strncpy(default_nvr_path, s, 512);
	set_nvr_path(s);
}

void set_default_nvr_default_path(char *s) {
	safe_strncpy(nvr_default_path, s, 512);
}

/* set the default logs path, this makes it permanent */
void set_default_logs_path(char *s) {
	safe_strncpy(default_logs_path, s, 512);
	set_logs_path(s);
}

/* set the default configs path, this makes it permanent */
void set_default_configs_path(char *s) {
	safe_strncpy(default_configs_path, s, 512);
	set_configs_path(s);
}

/* set the default screenshots path, this makes it permanent */
void set_default_screenshots_path(char *s) {
	safe_strncpy(default_screenshots_path, s, 512);
	set_screenshots_path(s);
}

void paths_loadconfig() {
	char *cfg_roms_paths = config_get_string(CFG_GLOBAL, "Paths", "roms_paths", 0);
	char *cfg_nvr_path = config_get_string(CFG_GLOBAL, "Paths", "nvr_path", 0);
	char *cfg_configs_path = config_get_string(CFG_GLOBAL, "Paths", "configs_path", 0);
	char *cfg_logs_path = config_get_string(CFG_GLOBAL, "Paths", "logs_path", 0);
	char *cfg_screenshots_path = config_get_string(CFG_GLOBAL, "Paths", "screenshots_path", 0);

	if (cfg_roms_paths)
		safe_strncpy(default_roms_paths, cfg_roms_paths, 4096);
	if (cfg_nvr_path)
		safe_strncpy(default_nvr_path, cfg_nvr_path, 512);
	if (cfg_configs_path)
		safe_strncpy(default_configs_path, cfg_configs_path, 512);
	if (cfg_logs_path)
		safe_strncpy(default_logs_path, cfg_logs_path, 512);
	if (cfg_screenshots_path)
		safe_strncpy(default_screenshots_path, cfg_screenshots_path, 512);
}

void paths_saveconfig() {
	config_set_string(CFG_GLOBAL, "Paths", "roms_paths", default_roms_paths);
	config_set_string(CFG_GLOBAL, "Paths", "nvr_path", default_nvr_path);
	config_set_string(CFG_GLOBAL, "Paths", "configs_path", default_configs_path);
	config_set_string(CFG_GLOBAL, "Paths", "logs_path", default_logs_path);
	config_set_string(CFG_GLOBAL, "Paths", "screenshots_path", default_screenshots_path);
}

void paths_onconfigloaded() {
	if (strlen(default_roms_paths) > 0)
		set_roms_paths(default_roms_paths);

	if (strlen(default_nvr_path) > 0)
		set_nvr_path(default_nvr_path);

	if (strlen(default_configs_path) > 0)
		set_configs_path(default_configs_path);

	if (strlen(default_logs_path) > 0)
		set_logs_path(default_logs_path);

	if (strlen(default_screenshots_path) > 0)
		set_screenshots_path(default_screenshots_path);

	pclog("path = %s\n", pcem_path);
}

/* initialize default paths */
void paths_init() {
	char s[512];

	char *p;

	get_pcem_path(pcem_path, 512);
	/* pcem_path may be path to executable */
	p = get_filename(pcem_path);
	*p = 0;

	/* set up default paths for this session */
	append_filename(s, pcem_path, "roms/", 512);
	set_roms_paths(s);
	append_filename(s, pcem_path, "nvr/", 512);
	set_nvr_path(s);
	append_filename(s, pcem_path, "configs/", 512);
	set_configs_path(s);
	append_filename(s, pcem_path, "screenshots/", 512);
	set_screenshots_path(s);
	append_filename(s, pcem_path, "logs/", 512);
	set_logs_path(s);
	append_filename(s, pcem_path, "nvr/default/", 512);
	set_default_nvr_default_path(s);

	add_config_callback(paths_loadconfig, paths_saveconfig, paths_onconfigloaded);
}

void get_pcem_path(char *s, int size) {
#ifdef __linux
	wx_get_home_directory(s);
	strcat(s, ".pcem/");
#elif defined(__APPLE__)
	/*TODO: Use CoreFoundation functions to get proper directory, in case
	  the Application Support directory is different (I.E., with signing)*/
	wx_get_home_directory(s);
	strcat(s, "Library/Application Support/PCem/");

	struct stat st = {0};

	// create ~/Library/Application Support/PCem/
	// if it doesn't exist
	if (stat(s, &st) == -1)
	{
		mkdir(s, 0700);
	}
#else
	char *path = SDL_GetBasePath();
	strcpy(s, path);
#endif
}

