use std::{fmt, fmt::Write as _, sync::Arc};

use color_eyre::eyre::{WrapErr as _, eyre};

use crate::{
    config::{Config, HttpbinResponse, USER_AGENT},
    parsers::parse_ipv4,
};

#[derive(serde::Serialize, Clone, PartialEq, Eq, Hash, PartialOrd, Ord)]
pub enum ProxyType {
    #[serde(rename = "http")]
    Http,
    #[serde(rename = "socks4")]
    Socks4,
    #[serde(rename = "socks5")]
    Socks5,
}

impl TryFrom<&str> for ProxyType {
    type Error = color_eyre::Report;

    fn try_from(string: &str) -> color_eyre::Result<Self> {
        match string.to_ascii_lowercase().as_str() {
            "http" | "https" => Ok(Self::Http),
            "socks4" => Ok(Self::Socks4),
            "socks5" => Ok(Self::Socks5),
            _ => Err(eyre!("Failed to convert {string} to ProxyType")),
        }
    }
}

impl fmt::Display for ProxyType {
    fn fmt(&self, f: &mut fmt::Formatter) -> fmt::Result {
        write!(
            f,
            "{}",
            match self {
                Self::Http => "http",
                Self::Socks4 => "socks4",
                Self::Socks5 => "socks5",
            }
        )
    }
}

#[derive(derivative::Derivative, Eq)]
#[derivative(Hash, PartialEq)]
pub struct Proxy {
    pub protocol: ProxyType,
    pub host: String,
    pub port: u16,
    pub username: Option<String>,
    pub password: Option<String>,
    #[derivative(Hash = "ignore")]
    #[derivative(PartialEq = "ignore")]
    pub timeout: Option<tokio::time::Duration>,
    #[derivative(Hash = "ignore")]
    #[derivative(PartialEq = "ignore")]
    pub exit_ip: Option<String>,
}

impl TryFrom<&mut Proxy> for reqwest::Proxy {
    type Error = color_eyre::Report;

    fn try_from(value: &mut Proxy) -> Result<Self, Self::Error> {
        let proxy = Self::all(format!(
            "{}://{}:{}",
            value.protocol, value.host, value.port
        ))
        .wrap_err("failed to create reqwest::Proxy")?;

        if let (Some(username), Some(password)) =
            (value.username.as_ref(), value.password.as_ref())
        {
            Ok(proxy.basic_auth(username, password))
        } else {
            Ok(proxy)
        }
    }
}

impl Proxy {
    pub async fn check(
        &mut self,
        config: Arc<Config>,
    ) -> color_eyre::Result<()> {
        let client = reqwest::Client::builder()
            .user_agent(USER_AGENT)
            .proxy(self.try_into()?)
            .timeout(config.timeout)
            .pool_max_idle_per_host(0)
            .tcp_keepalive(None)
            .use_rustls_tls()
            .build()
            .wrap_err("failed to create reqwest::Client")?;
        let start = tokio::time::Instant::now();
        let response = client
            .get(&config.check_website)
            .send()
            .await
            .wrap_err_with(|| {
                format!(
                    "failed to send HTTP request to {}",
                    config.check_website
                )
            })?
            .error_for_status()
            .wrap_err("Got error HTTP status code when checking proxy")?;
        drop(client);
        self.timeout = Some(start.elapsed());
        self.exit_ip = response.text().await.map_or(None, move |text| {
            if let Ok(httpbin) = serde_json::from_str::<HttpbinResponse>(&text)
            {
                match parse_ipv4(&httpbin.origin) {
                    Ok(Some(ipv4)) => Some(ipv4),
                    Ok(None) | Err(_) => None,
                }
            } else {
                match parse_ipv4(&text) {
                    Ok(Some(ipv4)) => Some(ipv4),
                    Ok(None) | Err(_) => None,
                }
            }
        });
        Ok(())
    }

    pub fn as_str(&self, include_protocol: bool) -> String {
        let mut s = String::new();
        if include_protocol {
            write!(&mut s, "{}://", self.protocol).unwrap();
        }
        if let (Some(username), Some(password)) =
            (self.username.as_ref(), self.password.as_ref())
        {
            write!(&mut s, "{username}:{password}@").unwrap();
        }
        write!(&mut s, "{}:{}", self.host, self.port).unwrap();
        s
    }
}