use crate::DbPool;
use crate::api::ClientVersion;
use crate::providers::{Provider, report_provider_error};
use crate::status::*;
use crate::util::cache::VideoCache;
use crate::util::flaresolverr::{FlareSolverrRequest, Flaresolverr};
use crate::util::time::parse_time_to_seconds;
use crate::videos::{ServerOptions, VideoItem};
use async_trait::async_trait;
use error_chain::error_chain;
use htmlentity::entity::{ICodedDataTrait, decode};
use std::env;
use std::vec;
use wreq::Client;
use wreq_util::Emulation;

pub const CHANNEL_METADATA: crate::providers::ProviderChannelMetadata =
    crate::providers::ProviderChannelMetadata {
        group_id: "gay-male",
        tags: &["gay", "male", "tube"],
    };

error_chain! {
    foreign_links {
        Io(std::io::Error);
        HttpRequest(wreq::Error);
    }
}

#[derive(Debug, Clone)]
pub struct HomoxxxProvider {
    url: String,
}
impl HomoxxxProvider {
    pub fn new() -> Self {
        HomoxxxProvider {
            url: "https://homo.xxx".to_string(),
        }
    }

    fn build_channel(&self, _clientversion: ClientVersion) -> Channel {
        Channel {
            id: "homoxxx".to_string(),
            name: "Homo.xxx".to_string(),
            description: "Best Gay Porn".to_string(),
            premium: false,
            favicon: "https://www.google.com/s2/favicons?sz=64&domain=homo.xxx".to_string(),
            status: "active".to_string(),
            categories: vec![],
            options: vec![ChannelOption {
                id: "sort".to_string(),
                title: "Sort".to_string(),
                description: "Sort the Videos".to_string(),
                systemImage: "list.number".to_string(),
                colorName: "blue".to_string(),
                options: vec![
                    FilterOption {
                        id: "new".to_string(),
                        title: "New".to_string(),
                    },
                    FilterOption {
                        id: "popular".to_string(),
                        title: "Popular".to_string(),
                    },
                    FilterOption {
                        id: "trending".to_string(),
                        title: "Trending".to_string(),
                    },
                ],
                multiSelect: false,
            }],
            nsfw: true,
            cacheDuration: Some(1800),
            ytdlpCommand: Some("yt-dlp --impersonate chrome-120".to_string())
        }
    }
    async fn get(&self, cache: VideoCache, page: u8, sort: &str) -> Result<Vec<VideoItem>> {
        let sort_string = match sort {
            "trending" => "/trending",
            "popular" => "/popular",
            _ => "/new",
        };
        let video_url = format!("{}{}/{}/", self.url, sort_string, page);
        let old_items = match cache.get(&video_url) {
            Some((time, items)) => {
                if time.elapsed().unwrap_or_default().as_secs() < 60 * 5 {
                    return Ok(items.clone());
                } else {
                    items.clone()
                }
            }
            None => {
                vec![]
            }
        };

        // let proxy = Proxy::all("http://192.168.0.103:8081").unwrap();
        let client = Client::builder()
            .cert_verification(false)
            .emulation(Emulation::Firefox136)
            .build()?;

        let mut response = client
            .get(video_url.clone())
            // .proxy(proxy.clone())
            .send()
            .await?;
        if response.status().is_redirection() {
            let location = match response
                .headers()
                .get("Location")
                .and_then(|h| h.to_str().ok())
            {
                Some(location) => location,
                None => {
                    report_provider_error(
                        "homoxxx",
                        "get.redirect_location",
                        &format!("url={video_url}; missing/invalid Location header"),
                    )
                    .await;
                    return Ok(old_items);
                }
            };
            println!("Redirection detected, following to: {}", location);
            response = client
                .get(location)
                // .proxy(proxy.clone())
                .send()
                .await?;
        }
        if response.status().is_success() {
            let text = response.text().await?;
            let video_items: Vec<VideoItem> = self.get_video_items_from_html(text.clone());
            if !video_items.is_empty() {
                cache.remove(&video_url);
                cache.insert(video_url.clone(), video_items.clone());
            } else {
                return Ok(old_items);
            }
            Ok(video_items)
        } else {
            let flare_url = match env::var("FLARE_URL") {
                Ok(url) => url,
                Err(e) => {
                    report_provider_error("homoxxx", "get.flare_url", &e.to_string()).await;
                    return Ok(old_items);
                }
            };
            let flare = Flaresolverr::new(flare_url);
            let result = flare
                .solve(FlareSolverrRequest {
                    cmd: "request.get".to_string(),
                    url: video_url.clone(),
                    maxTimeout: 60000,
                })
                .await;
            let video_items = match result {
                Ok(res) => {
                    // println!("FlareSolverr response: {}", res);
                    self.get_video_items_from_html(res.solution.response)
                }
                Err(e) => {
                    println!("Error solving FlareSolverr: {}", e);
                    return Err("Failed to solve FlareSolverr".into());
                }
            };
            if !video_items.is_empty() {
                cache.remove(&video_url);
                cache.insert(video_url.clone(), video_items.clone());
            } else {
                return Ok(old_items);
            }
            Ok(video_items)
        }
    }
    async fn query(&self, cache: VideoCache, page: u8, query: &str) -> Result<Vec<VideoItem>> {
        let search_string = query.to_lowercase().trim().replace(" ", "-");
        let mut video_url = format!("{}/search/{}/{}/", self.url, search_string, page);

        let trimmed = query.trim().trim_start_matches('@');
        if let Some((kind, value)) = trimmed.split_once(':') {
            let kind = kind.trim().to_ascii_lowercase();
            let value = value.trim().replace(' ', "-");
            if !value.is_empty()
                && matches!(
                    kind.as_str(),
                    "models" | "pornstars" | "stars" | "channels" | "categories" | "tags"
                )
            {
                video_url = format!("{}/{}/{}/", self.url, kind, value);
            }
        }
        // Check our Video Cache. If the result is younger than 1 hour, we return it.
        let old_items = match cache.get(&video_url) {
            Some((time, items)) => {
                if time.elapsed().unwrap_or_default().as_secs() < 60 * 5 {
                    return Ok(items.clone());
                } else {
                    let _ = cache.check().await;
                    return Ok(items.clone());
                }
            }
            None => {
                vec![]
            }
        };

        // let proxy = Proxy::all("http://192.168.0.103:8081").unwrap();
        let client = Client::builder()
            .cert_verification(false)
            .emulation(Emulation::Firefox136)
            .build()?;

        let mut response = client
            .get(video_url.clone())
            // .proxy(proxy.clone())
            .send()
            .await?;

        if response.status().is_redirection() {
            let location = match response
                .headers()
                .get("Location")
                .and_then(|h| h.to_str().ok())
            {
                Some(location) => location,
                None => {
                    report_provider_error(
                        "homoxxx",
                        "query.redirect_location",
                        &format!("url={video_url}; missing/invalid Location header"),
                    )
                    .await;
                    return Ok(old_items);
                }
            };
            response = client
                .get(self.url.clone() + location)
                // .proxy(proxy.clone())
                .send()
                .await?;
        }

        if response.status().is_success() {
            let text = response.text().await?;
            let video_items: Vec<VideoItem> = self.get_video_items_from_html(text.clone());
            if !video_items.is_empty() {
                cache.remove(&video_url);
                cache.insert(video_url.clone(), video_items.clone());
            } else {
                return Ok(old_items);
            }
            Ok(video_items)
        } else {
            let flare_url = match env::var("FLARE_URL") {
                Ok(url) => url,
                Err(e) => {
                    report_provider_error("homoxxx", "query.flare_url", &e.to_string()).await;
                    return Ok(old_items);
                }
            };
            let flare = Flaresolverr::new(flare_url);
            let result = flare
                .solve(FlareSolverrRequest {
                    cmd: "request.get".to_string(),
                    url: video_url.clone(),
                    maxTimeout: 60000,
                })
                .await;
            let video_items = match result {
                Ok(res) => self.get_video_items_from_html(res.solution.response),
                Err(e) => {
                    println!("Error solving FlareSolverr: {}", e);
                    return Err("Failed to solve FlareSolverr".into());
                }
            };
            if !video_items.is_empty() {
                cache.remove(&video_url);
                cache.insert(video_url.clone(), video_items.clone());
            } else {
                return Ok(old_items);
            }
            Ok(video_items)
        }
    }

    fn get_video_items_from_html(&self, html: String) -> Vec<VideoItem> {
        if html.is_empty() {
            println!("HTML is empty");
            return vec![];
        }
        let mut items: Vec<VideoItem> = Vec::new();
        let raw_videos = html
            .split("pagination")
            .collect::<Vec<&str>>()
            .get(0)
            .copied()
            .unwrap_or_default()
            .split("<div class=\"item  \">")
            .collect::<Vec<&str>>()[1..]
            .to_vec();
        for video_segment in &raw_videos {
            // let vid = video_segment.split("\n").collect::<Vec<&str>>();
            // for (index, line) in vid.iter().enumerate() {
            //     println!("Line {}: {}", index, line);
            // }
            let video_url: String = video_segment
                .split("<a href=\"")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("\"")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .to_string();
            let preview_url = video_segment
                .split("data-preview-custom=\"")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("\"")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .to_string();
            let mut title = video_segment
                .split("\" title=\"")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("\"")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .to_string();
            // html decode
            title = decode(title.as_bytes()).to_string().unwrap_or(title);
            let id = video_url
                .split("/")
                .collect::<Vec<&str>>()
                .get(4)
                .copied()
                .unwrap_or_default()
                .to_string();
            let raw_duration = video_segment
                .split("<p class=\"duration_item\">")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("<")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .to_string();
            let duration = parse_time_to_seconds(&raw_duration).unwrap_or(0) as u32;

            let thumb = video_segment
                .split("thumb lazyload")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("data-src=\"")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("\"")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .to_string();
            let video_item = VideoItem::new(
                id,
                title,
                video_url.to_string(),
                "homoxxx".to_string(),
                thumb,
                duration,
            )
            .preview(preview_url);
            items.push(video_item);
        }
        return items;
    }
}

#[async_trait]
impl Provider for HomoxxxProvider {
    async fn get_videos(
        &self,
        cache: VideoCache,
        pool: DbPool,
        sort: String,
        query: Option<String>,
        page: String,
        per_page: String,
        options: ServerOptions,
    ) -> Vec<VideoItem> {
        let _ = options;
        let _ = per_page;
        let _ = pool;
        let videos: std::result::Result<Vec<VideoItem>, Error> = match query {
            Some(q) => self.query(cache, page.parse::<u8>().unwrap_or(1), &q).await,
            None => {
                self.get(cache, page.parse::<u8>().unwrap_or(1), &sort)
                    .await
            }
        };
        match videos {
            Ok(v) => v,
            Err(e) => {
                println!("Error fetching videos: {}", e);
                vec![]
            }
        }
    }

    fn get_channel(&self, clientversion: ClientVersion) -> Option<Channel> {
        Some(self.build_channel(clientversion))
    }
}
