#include <algorithm>

#include <engine/ParamQuantity.hpp>
#include <context.hpp>
#include <engine/Engine.hpp>
#include <string.hpp>


namespace rack {
namespace engine {


engine::Param* ParamQuantity::getParam() {
	if (!module)
		return NULL;
	if (!(0 <= paramId && paramId < (int) module->params.size()))
		return NULL;
	return &module->params[paramId];
}


void ParamQuantity::setValue(float value) {
	if (!module)
		return;
	value = math::clampSafe(value, getMinValue(), getMaxValue());
	if (snapEnabled)
		value = std::round(value);
	if (smoothEnabled)
		APP->engine->setParamSmoothValue(module, paramId, value);
	else
		APP->engine->setParamValue(module, paramId, value);
}


float ParamQuantity::getValue() {
	if (!module)
		return 0.f;
	// Get smoothing target value regardless of `smoothEnabled`.
	// If smoothing is enabled, value is set, and smoothing is then disabled, calling getParamValue() will return the incorrect value.
	return APP->engine->getParamSmoothValue(module, paramId);
}


void ParamQuantity::setImmediateValue(float value) {
	if (!module)
		return;
	value = math::clampSafe(value, getMinValue(), getMaxValue());
	if (snapEnabled)
		value = std::round(value);
	APP->engine->setParamValue(module, paramId, value);
}


float ParamQuantity::getImmediateValue() {
	if (!module)
		return 0.f;
	return APP->engine->getParamValue(module, paramId);
}


float ParamQuantity::getMinValue() {
	return minValue;
}

float ParamQuantity::getMaxValue() {
	return maxValue;
}

float ParamQuantity::getDefaultValue() {
	return defaultValue;
}

float ParamQuantity::getDisplayValue() {
	float v = getValue();
	if (displayBase == 0.f) {
		// Linear
		// v is unchanged
	}
	else if (displayBase < 0.f) {
		// Logarithmic
		v = std::log(v) / std::log(-displayBase);
	}
	else {
		// Exponential
		v = std::pow(displayBase, v);
	}
	return v * displayMultiplier + displayOffset;
}


void ParamQuantity::setDisplayValue(float displayValue) {
	// Handle displayOffset
	float v = displayValue - displayOffset;

	// Handle displayMultiplier
	if (displayMultiplier == 0.f)
		v = 0.f;
	else
		v /= displayMultiplier;

	// Handle displayBase
	if (displayBase == 0.f) {
		// Linear
		// v is unchanged
	}
	else if (displayBase < 0.f) {
		// Logarithmic
		v = std::pow(-displayBase, v);
	}
	else {
		// Exponential
		v = std::log(v) / std::log(displayBase);
	}

	if (std::isnan(v))
		return;

	// Set the value directly without smoothing
	setImmediateValue(v);
}


int ParamQuantity::getDisplayPrecision() {
	return displayPrecision;
}


std::string ParamQuantity::getDisplayValueString() {
	return Quantity::getDisplayValueString();
}


void ParamQuantity::setDisplayValueString(std::string s) {
	Quantity::setDisplayValueString(s);
}


std::string ParamQuantity::getLabel() {
	if (name == "")
		return string::f("#%d", paramId + 1);
	return name;
}


std::string ParamQuantity::getUnit() {
	return unit;
}


void ParamQuantity::reset() {
	setImmediateValue(getDefaultValue());
}


void ParamQuantity::randomize() {
	if (!isBounded())
		return;

	if (snapEnabled) {
		// Randomize inclusive of the maximum value
		float value = math::rescale(random::uniform(), 0.f, 1.f, getMinValue(), getMaxValue() + 1.f);
		value = std::floor(value);
		setImmediateValue(value);
	}
	else {
		// Same as Quantity::randomize() but with setImmediateValue()
		setImmediateValue(fromScaled(random::uniform()));
	}
}


std::string ParamQuantity::getDescription() {
	return description;
}


json_t* ParamQuantity::toJson() {
	json_t* rootJ = json_object();
	json_object_set_new(rootJ, "value", json_real(getValue()));
	return rootJ;
}


void ParamQuantity::fromJson(json_t* rootJ) {
	json_t* valueJ = json_object_get(rootJ, "value");
	if (valueJ)
		setImmediateValue(json_number_value(valueJ));
}


void ParamQuantity::setSmoothValue(float value) {
	setValue(value);
}


float ParamQuantity::getSmoothValue() {
	return getValue();
}


// SwitchQuantity


std::string SwitchQuantity::getDisplayValueString() {
	int index = (int) std::floor(getValue() - getMinValue());
	if (!(0 <= index && index < (int) labels.size()))
		return "";
	return labels[index];
}


void SwitchQuantity::setDisplayValueString(std::string s) {
	// Find label that matches string, case insensitive.
	auto it = std::find_if(labels.begin(), labels.end(), [&](const std::string& a) {
		return string::lowercase(a) == string::lowercase(s);
	});
	if (it == labels.end())
		return;
	int index = std::distance(labels.begin(), it);
	setImmediateValue(getMinValue() + index);
}


} // namespace engine
} // namespace rack