#include "bsp/bsp_driver.h"
#include "foc/core/foc_observer.h"
#include "foc/core/ladrc_observer.h"
#include "foc/core/smo_observer.h"
#include "foc/motor/motor.h"

static foc_observer_t foc_obser = {
	.enc_err_cnt = 0,
};
void foc_observer_init(void) {
	foc_obser.is_sensorless_enable = false;
	foc_obser.is_sensorless_running = false;
	foc_obser.enc_angle = INVALID_ANGLE;
	foc_obser.enc_est_angle = INVALID_ANGLE;
	foc_obser.enc_speed = 0;
	foc_obser.sensorless_angle = INVALID_ANGLE;
	foc_obser.sensorless_est_angle = INVALID_ANGLE;
	foc_obser.sensorless_speed = 0;
#ifdef CONFIG_SMO_OBSERVER
	smo_observer_init(CONFIG_SMO_PLL_BANDWITH, CONFIG_SMO_LFP_WC, CONFIG_SMO_GAIN_K, CONFIG_SMO_SIGMOID_MAX);
	foc_obser.is_sensorless_enable = true;
#endif
#ifdef CONFIG_LADRC_OBSERVER
	ladrc_observer_init(CONFIG_LADRC_OBSERVER_MIN_Wo, CONFIG_LADRC_OBSERVER_MIN_eVEL, CONFIG_LADRC_OBSERVER_LPF_FREQ);
	foc_obser.is_sensorless_enable = true;
#endif
}

#define RPM_2_degree(rpm)  ((rpm) * 6.0f * nv_get_motor_params()->poles * FOC_CTRL_US)

float foc_observer_update(float uAlp, float uBeta, float iAlp, float iBeta){
	foc_obser.sensorless_est_angle = foc_obser.sensorless_angle + RPM_2_degree(foc_obser.sensorless_speed);
#ifdef CONFIG_SMO_OBSERVER
	foc_obser.sensorless_angle = smo_observer_update(uAlp, uBeta, iAlp, iBeta);
	foc_obser.sensorless_speed = smo_observer_vel();
#elif defined CONFIG_LADRC_OBSERVER
	foc_obser.sensorless_angle = ladrc_observer_update(uAlp, uBeta, iAlp, iBeta);
	foc_obser.sensorless_speed = ladrc_observer_vel();
#endif
	return foc_obser.sensorless_angle;
}

bool foc_observer_diagnostic(float enc_angle, float enc_vel) {
	if (enc_vel <= (foc_observer_sensorless_working_speed() - 100.0f)) {
		foc_obser.enc_angle = enc_angle;
		foc_obser.enc_speed = ABS(enc_vel);
		return true;
	}
	if (!foc_obser.is_sensorless_running) {
		float est_diff = RPM_2_degree(foc_obser.enc_speed);
		float enc_angle_est = est_diff + foc_obser.enc_angle;
		rand_angle(enc_angle_est);
		float real_est_diff = enc_angle - enc_angle_est;
		float s, c;
		arm_sin_cos_f32(real_est_diff, &s, &c);
		real_est_diff = fast_atan2(s, c)/PI*180.0f;
		float ration = ABS(real_est_diff)/est_diff;
		float ration_thrl = 1.0f;
		if (est_diff < 3.0f) {
			ration_thrl = 0.5f;
		}else if (est_diff < 6.0f) {
			ration_thrl = 0.4;
		}else {
			ration_thrl = 0.3f;
		}
		if (ration > ration_thrl) {
			foc_obser.enc_err_cnt++;
		}
		foc_obser.real_est_diff = real_est_diff;
		foc_obser.real_est_ration = ration;
	}
	foc_obser.enc_angle = enc_angle;
	foc_obser.enc_speed = ABS(enc_vel);
	return !foc_obser.is_sensorless_running;
}

float foc_observer_speed(void) {
	return foc_obser.sensorless_speed;
}

bool  foc_observer_is_encoder(void) {
	return !foc_obser.is_sensorless_running;
}
void  foc_observer_use_sensorless(bool use_smo) {
	if (foc_obser.is_sensorless_enable) {
		foc_obser.is_sensorless_running = use_smo;
	}else {
		foc_obser.is_sensorless_running = false;
	}
}
void  foc_observer_enable_sensorless(bool enable) {
	foc_obser.is_sensorless_enable = enable;
}

float foc_observer_sensorless_angle(void) {
	return foc_obser.sensorless_angle;
}

float foc_observer_sensorless_speed(void) {
	return foc_obser.sensorless_speed;
}

u16 foc_observer_enc_errcount(void) {
	return foc_obser.enc_err_cnt;
}

float foc_observer_sensorless_diff(void) {
	return foc_obser.real_est_diff;
}

float foc_observer_sensorless_ration(void) {
	return foc_obser.real_est_ration;
}

float foc_observer_sensorless_working_speed(void) {
#ifdef CONFIG_SMO_OBSERVER
	return CONFIG_SMO_MIN_SPEED;
#elif defined CONFIG_LADRC_OBSERVER
	return CONFIG_LADRC_OBSERVER_MIN_SPEED;
#else
	return 20000.0f;
#endif
}