/*

# Dolwin user variables access. Json-based.

## How the settings worked before.

Previously stored in the registry, in separate keys.

## As it is now.

Settings are stored in Json. The default settings are stored in DefaultSettings.json and overrided by the current settings from Settings.json.
New settings are saved only in Settings.json.

*/

#include "pch.h"

static SpinLock settingsLock;
static bool SettingsLoaded = false;
static Json defaultSettings;		// singletone. Autodeleted at exit
static Json settings;		// singletone. Autodeleted at exit

static void LoadSettings()
{
	if (SettingsLoaded)
		return;

	// Load default settings

	assert(UI::FileExists(DOLWIN_DEFAULT_SETTINGS));

	size_t jsonTextSize = 0;
	uint8_t* jsonText = (uint8_t *)UI::FileLoad(DOLWIN_DEFAULT_SETTINGS, &jsonTextSize);
	assert(jsonText);

	try
	{
		defaultSettings.Deserialize(jsonText, jsonTextSize);
	}
	catch (...)
	{
		UI::DolwinError(_T("Critical Error"), _T("Default settings cannot be loaded!"));
		return;
	}

	free(jsonText);

	// Merge with current settings

	settings.Clone(&defaultSettings);

	if (UI::FileExists(DOLWIN_SETTINGS))
	{
		jsonText = (uint8_t*)UI::FileLoad(DOLWIN_SETTINGS, &jsonTextSize);
		assert(jsonText);

		Json currentSettings;

		try
		{
			currentSettings.Deserialize(jsonText, jsonTextSize);
		}
		catch (...)
		{
			UI::DolwinReport(_T("Current settings cannot be deserialized. Check json syntax. Falling back to defaults."));
			return;
		}

		free(jsonText);

		settings.Merge(&currentSettings);
	}

	SettingsLoaded = true;
}

static void SaveSettings()
{
	uint8_t bogus[0x100] = { 0, };
	size_t textSize = 0;

	// Calculate Json size

	if (!SettingsLoaded)
	{
		UI::DolwinError(_T("Critical Error"), _T("Settings must be loaded first!"));
		return;
	}

	try
	{
		settings.GetSerializedTextSize(bogus, -1, textSize);
	}
	catch (...)
	{
		UI::DolwinError(_T("Critical Error"), _T("Settings cannot be saved!"));
		return;
	}

	// Serialize and save current settings

	uint8_t* text = new uint8_t[2 * textSize];
	assert(text);

	try
	{
		settings.Serialize(text, 2 * textSize, textSize);
	}
	catch (...)
	{
		UI::DolwinError(_T("Critical Error"), _T("Settings cannot be saved!"));
		return;
	}

	UI::FileSave(DOLWIN_SETTINGS, text, textSize);
}


#pragma region "Legacy Dolwin config API"

TCHAR *GetConfigString(const char *var, const char *path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value* section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddString(var, _T(""));
	}

	assert(value->type == Json::ValueType::String);

	settingsLock.Unlock();

	return value->value.AsString;
}

void SetConfigString(const char *var, TCHAR *newVal, const char *path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value * section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddString(var, newVal);
	}

	assert(value->type == Json::ValueType::String);

	value->ReplaceString(newVal);

	SaveSettings();

	settingsLock.Unlock();
}

int GetConfigInt(const char *var, const char *path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value* section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddInt(var, 0);
	}

	assert(value->type == Json::ValueType::Int);

	settingsLock.Unlock();

	return (int)value->value.AsInt;
}

void SetConfigInt(const char *var, int newVal, const char *path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value* section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddInt(var, newVal);
	}

	assert(value->type == Json::ValueType::Int);

	value->value.AsInt = (uint64_t)newVal;

	SaveSettings();

	settingsLock.Unlock();
}

bool GetConfigBool(const char* var, const char* path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value* section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddBool(var, false);
	}

	assert(value->type == Json::ValueType::Bool);

	settingsLock.Unlock();

	return (int)value->value.AsBool;
}

void SetConfigBool(const char* var, bool newVal, const char* path)
{
	settingsLock.Lock();

	LoadSettings();

	Json::Value* section = settings.root.children.back()->ByName(path);
	assert(section);

	Json::Value* value = section->ByName(var);
	if (value == nullptr)
	{
		value = section->AddBool(var, newVal);
	}

	assert(value->type == Json::ValueType::Bool);

	value->value.AsBool = newVal;

	SaveSettings();

	settingsLock.Unlock();
}

#pragma endregion "Legacy Dolwin config API"