use std::sync::{Arc, RwLock};

use if_chain::if_chain;
use metrics::{describe_gauge, gauge, Gauge};
use serde::{Deserialize, Serialize};

use crate::{
    api_interface::InterfaceRequest,
    charge_controllers::pl::PlState,
    config::access_config,
    types::{CarState, ChargeState},
};

pub struct TeslaChargeRateController {
    pub car_state: Arc<RwLock<CarState>>,
    pub pl_state: Option<Arc<RwLock<PlState>>>,
    pub tcrc_state: Arc<RwLock<TcrcState>>,
    voltage_low: u64,
    control_enable_gauge: Gauge,
}

pub enum TcrcRequest {
    DisableAutomaticControl,
    EnableAutomaticControl,
}

#[derive(Clone, Copy, Serialize, Deserialize, Debug)]
pub struct TcrcState {
    pub control_enable: bool,
}

impl Default for TcrcState {
    fn default() -> Self {
        Self {
            control_enable: true,
        }
    }
}

impl TeslaChargeRateController {
    pub fn new(car_state: Arc<RwLock<CarState>>, pl_state: Option<Arc<RwLock<PlState>>>) -> Self {
        describe_gauge!("tcrc_control_enable", "Enable Tesla charge rate control");
        Self {
            car_state,
            pl_state,
            tcrc_state: Default::default(),
            voltage_low: 0,
            control_enable_gauge: gauge!("tcrc_control_enable"),
        }
    }

    pub fn control_charge_rate(&mut self) -> Option<InterfaceRequest> {
        if_chain! {
            if let Some(pl_state) = self.pl_state.as_ref().and_then(|v| v.read().ok());
            if let Some(charge_state) = self.car_state.read().ok().and_then(|v| v.charge_state);
            then {
                if pl_state.battery_voltage < access_config().shutoff_voltage {
                    self.voltage_low += 1;
                    if (self.voltage_low * access_config().charge_rate_update_interval_seconds)
                        >= access_config().shutoff_voltage_time_seconds
                    {
                        return Some(InterfaceRequest::StopCharge);
                    }
                } else {
                    self.voltage_low = 0;
                    if self.tcrc_state.read().is_ok_and(|v| v.control_enable) {
                        return get_control(&pl_state, &charge_state);
                    }
                }
            }
        }
        None
    }

    pub fn process_request(&mut self, message: TcrcRequest) {
        match message {
            TcrcRequest::DisableAutomaticControl => {
                self.tcrc_state
                    .write()
                    .expect("failed to write to tcrc state")
                    .control_enable = false;
                self.control_enable_gauge.set(0.);
            }
            TcrcRequest::EnableAutomaticControl => {
                self.tcrc_state
                    .write()
                    .expect("failed to write to tcrc state")
                    .control_enable = true;
                self.control_enable_gauge.set(1.);
            }
        }
    }
}

fn get_control(pl_state: &PlState, charge_state: &ChargeState) -> Option<InterfaceRequest> {
    let config = access_config();
    if pl_state.duty_cycle > config.duty_cycle_too_high {
        let rate = charge_state.charge_amps - 2;
        return valid_rate(rate, charge_state.charge_amps).map(InterfaceRequest::SetChargeRate);
    } else if pl_state.duty_cycle < config.duty_cycle_too_low {
        let rate = charge_state.charge_amps + 1;
        return valid_rate(rate, charge_state.charge_amps).map(InterfaceRequest::SetChargeRate);
    }

    // if max/min charge rate has changed, then the current charge rate might no longer be valid
    // and we should move up/down to keep it in the new bounds
    valid_rate(charge_state.charge_amps, charge_state.charge_amps)
        .map(InterfaceRequest::SetChargeRate)
}

fn valid_rate(rate: i64, previous: i64) -> Option<i64> {
    let config = access_config();
    let new = rate.clamp(config.min_rate, config.max_rate);
    if new == previous {
        None
    } else {
        Some(new)
    }
}