use std::{cmp, collections::HashSet, time::Duration};

use anyhow::Result;
use log::*;
use serde::{Deserialize, Serialize};
use serde_lexpr::{error, from_str};
use tokio::{sync::watch, time::sleep};

use crate::config::RuntimeConfigConsul;
use crate::{consul, messages};

#[derive(Serialize, Deserialize, Debug)]
pub enum DiplonatParameter {
  #[serde(rename = "tcp_port")]
  TcpPort(HashSet<u16>),
  #[serde(rename = "udp_port")]
  UdpPort(HashSet<u16>),
}

#[derive(Serialize, Deserialize, Debug)]
pub enum DiplonatConsul {
  #[serde(rename = "diplonat")]
  Diplonat(Vec<DiplonatParameter>),
}

pub struct ConsulActor {
  pub rx_open_ports: watch::Receiver<messages::PublicExposedPorts>,

  consul: consul::Consul,
  node: String,
  retries: u32,
  tx_open_ports: watch::Sender<messages::PublicExposedPorts>,
}

fn retry_to_time(retries: u32, max_time: Duration) -> Duration {
  // 1.2^x seems to be a good value to exponentially increase time at a good pace
  // eg. 1.2^32 = 341 seconds ~= 5 minutes - ie. after 32 retries we wait 5
  // minutes
  return Duration::from_secs(cmp::min(
    max_time.as_secs(),
    1.2f64.powf(retries as f64) as u64,
  ));
}

fn to_parameters(catalog: &consul::CatalogNode) -> Vec<DiplonatConsul> {
  let mut r = Vec::new();

  for (_, service_info) in &catalog.services {
    for tag in &service_info.tags {
      let diplo_conf: error::Result<DiplonatConsul> = from_str(tag);
      match diplo_conf {
        Ok(conf) => r.push(conf),
        Err(e) => debug!("Failed to parse entry {}. {}", tag, e),
      };
    }
  }

  return r;
}

fn to_open_ports(params: &Vec<DiplonatConsul>) -> messages::PublicExposedPorts {
  let mut op = messages::PublicExposedPorts {
    tcp_ports: HashSet::new(),
    udp_ports: HashSet::new(),
  };

  for conf in params {
    let DiplonatConsul::Diplonat(c) = conf;
    for parameter in c {
      match parameter {
        DiplonatParameter::TcpPort(p) => op.tcp_ports.extend(p),
        DiplonatParameter::UdpPort(p) => op.udp_ports.extend(p),
      };
    }
  }

  return op;
}

impl ConsulActor {
  pub fn new(config: &RuntimeConfigConsul, node: &str) -> Self {
    let (tx, rx) = watch::channel(messages::PublicExposedPorts {
      tcp_ports: HashSet::new(),
      udp_ports: HashSet::new(),
    });

    return Self {
      consul: consul::Consul::new(config),
      rx_open_ports: rx,
      tx_open_ports: tx,
      node: node.to_string(),
      retries: 0,
    };
  }

  pub async fn listen(&mut self) -> Result<()> {
    loop {
      let catalog = match self.consul.watch_node(&self.node).await {
        Ok(c) => c,
        Err(e) => {
          self.consul.watch_node_reset();
          self.retries = cmp::min(std::u32::MAX - 1, self.retries) + 1;
          let will_retry_in = retry_to_time(self.retries, Duration::from_secs(600));
          error!(
            "Failed to query consul. Will retry in {}s. {}",
            will_retry_in.as_secs(),
            e
          );
          sleep(will_retry_in).await;
          continue;
        }
      };
      self.retries = 0;
      let msg = to_open_ports(&to_parameters(&catalog));
      debug!("Extracted configuration: {:#?}", msg);

      self.tx_open_ports.send(msg)?;
    }
  }
}