use crate::DbPool;
use crate::api::ClientVersion;
use crate::providers::{Provider, report_provider_error_background};
use crate::status::*;
use crate::util::cache::VideoCache;
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 regex::Regex;
use std::sync::{Arc, RwLock};
use std::vec;

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

fn is_valid_date(s: &str) -> bool {
    // Regex: strict yyyy-mm-dd (no validation of real calendar dates, just format)
    match Regex::new(r"^\d{4}-(0[1-9]|1[0-2])-(0[1-9]|[12]\d|3[01])$") {
        Ok(re) => re.is_match(s),
        Err(e) => {
            report_provider_error_background("xxdbx", "is_valid_date.regex", &e.to_string());
            false
        }
    }
}

#[derive(Debug, Clone)]
pub struct XxdbxProvider {
    url: String,
    stars: Arc<RwLock<Vec<String>>>,
    channels: Arc<RwLock<Vec<String>>>,
}
impl XxdbxProvider {
    pub fn new() -> Self {
        let provider = XxdbxProvider {
            url: "https://xxdbx.com".to_string(),
            stars: Arc::new(RwLock::new(vec![])),
            channels: Arc::new(RwLock::new(vec![])),
        };
        provider
    }

    fn build_channel(&self, clientversion: ClientVersion) -> Channel {
        let _ = clientversion;
        Channel {
            id: "xxdbx".to_string(),
            name: "xxdbx".to_string(),
            description: "XXX Video Database".to_string(),
            premium: false,
            favicon: "https://www.google.com/s2/favicons?sz=64&domain=xxdbx.com".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".into(),
                        title: "New".into(),
                    },
                    FilterOption {
                        id: "popular".into(),
                        title: "Most Popular".into(),
                    },
                ],
                multiSelect: false,
            }],
            nsfw: true,
            cacheDuration: Some(1800),
        }
    }

    async fn get(
        &self,
        cache: VideoCache,
        page: u8,
        sort: &str,
        options: ServerOptions,
    ) -> Result<Vec<VideoItem>> {
        let sort_string: String = match sort {
            "popular" => "most-popular".to_string(),
            _ => "".to_string(),
        };
        let video_url = format!("{}/{}?page={}", 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 mut requester =
            crate::providers::requester_or_default(&options, module_path!(), "missing_requester");
        let text = match requester.get(&video_url, None).await {
            Ok(text) => text,
            Err(e) => {
                report_provider_error_background("xxdbx", "get.request", &e.to_string());
                return Ok(old_items);
            }
        };
        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)
    }

    async fn query(
        &self,
        cache: VideoCache,
        page: u8,
        query: &str,
        options: ServerOptions,
    ) -> Result<Vec<VideoItem>> {
        let search_string = query.trim().to_string();
        let mut search_type = "search";

        if self
            .channels
            .read()
            .map(|channels| {
                channels
                    .iter()
                    .map(|s| s.to_ascii_lowercase())
                    .collect::<Vec<String>>()
                    .contains(&search_string.to_ascii_lowercase())
            })
            .unwrap_or(false)
        {
            search_type = "channels";
        } else if self
            .stars
            .read()
            .map(|stars| {
                stars
                    .iter()
                    .map(|s| s.to_ascii_lowercase())
                    .collect::<Vec<String>>()
                    .contains(&search_string.to_ascii_lowercase())
            })
            .unwrap_or(false)
        {
            search_type = "stars";
        } else if is_valid_date(&search_string) {
            search_type = "dates";
        }

        let video_url = format!(
            "{}/{}/{}?page={}",
            self.url, search_type, search_string, page
        );
        // 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 mut requester =
            crate::providers::requester_or_default(&options, module_path!(), "missing_requester");

        let text = match requester.get(&video_url, None).await {
            Ok(text) => text,
            Err(e) => {
                report_provider_error_background("xxdbx", "query.request", &e.to_string());
                return Ok(old_items);
            }
        };
        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)
    }

    fn get_video_items_from_html(&self, html: String) -> Vec<VideoItem> {
        if html.is_empty() || html.contains("404 Not Found") {
            return vec![];
        }
        let mut items: Vec<VideoItem> = Vec::new();
        let raw_videos = html
            .split("</article>")
            .collect::<Vec<&str>>()
            .get(0)
            .copied()
            .unwrap_or_default()
            .split("<div class=\"vids\">")
            .collect::<Vec<&str>>()
            .get(1)
            .copied()
            .unwrap_or_default()
            .split("<div class=\"v\">")
            .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 {}: {}\n\n", index, line);
            // }
            let video_url: String = format!(
                "{}{}",
                self.url,
                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 mut title = video_segment
                .split("<div class=\"v_title\">")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("<")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .trim()
                .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 thumb = format!(
                "https:{}",
                video_segment
                    .split("<img ")
                    .collect::<Vec<&str>>()
                    .get(1)
                    .copied()
                    .unwrap_or_default()
                    .split("src=\"")
                    .collect::<Vec<&str>>()
                    .last()
                    .copied()
                    .unwrap_or_default()
                    .split("\"")
                    .collect::<Vec<&str>>()
                    .get(0)
                    .copied()
                    .unwrap_or_default()
                    .to_string()
            );
            let raw_duration = video_segment
                .split("<div class=\"v_dur\">")
                .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.as_str()).unwrap_or(0) as u32;

            let preview = format!(
                "https:{}",
                video_segment
                    .split("data-preview=\"")
                    .collect::<Vec<&str>>()
                    .get(1)
                    .copied()
                    .unwrap_or_default()
                    .split("\"")
                    .collect::<Vec<&str>>()
                    .get(0)
                    .copied()
                    .unwrap_or_default()
                    .to_string()
            );
            let tags = video_segment
                .split("<div class=\"v_tags\">")
                .collect::<Vec<&str>>()
                .get(1)
                .copied()
                .unwrap_or_default()
                .split("</div>")
                .collect::<Vec<&str>>()
                .get(0)
                .copied()
                .unwrap_or_default()
                .split("<a href=\"")
                .collect::<Vec<&str>>()[1..]
                .into_iter()
                .map(|s| {
                    s.split("\"")
                        .collect::<Vec<&str>>()
                        .get(0)
                        .copied()
                        .unwrap_or_default()
                        .replace("%20", " ")
                        .to_string()
                })
                .collect::<Vec<String>>();
            for tag in tags.clone() {
                let shorted_tag = tag
                    .split("/")
                    .collect::<Vec<&str>>()
                    .get(2)
                    .copied()
                    .unwrap_or_default()
                    .to_string();
                if tag.contains("channels")
                    && self
                        .channels
                        .read()
                        .map(|channels| !channels.contains(&shorted_tag))
                        .unwrap_or(false)
                {
                    if let Ok(mut channels) = self.channels.write() {
                        channels.push(shorted_tag.clone());
                    }
                }
                if tag.contains("stars")
                    && self
                        .stars
                        .read()
                        .map(|stars| !stars.contains(&shorted_tag))
                        .unwrap_or(false)
                {
                    if let Ok(mut stars) = self.stars.write() {
                        stars.push(shorted_tag.clone());
                    }
                }
            }
            let video_item = VideoItem::new(
                id,
                title,
                video_url.to_string(),
                "xxdbx".to_string(),
                thumb,
                duration,
            )
            .tags(
                tags.into_iter()
                    .map(|s| {
                        s.split("/")
                            .collect::<Vec<&str>>()
                            .last()
                            .copied()
                            .unwrap_or_default()
                            .to_string()
                    })
                    .collect::<Vec<String>>(),
            )
            .preview(preview);
            items.push(video_item);
        }
        return items;
    }
}

#[async_trait]
impl Provider for XxdbxProvider {
    async fn get_videos(
        &self,
        cache: VideoCache,
        pool: DbPool,
        sort: String,
        query: Option<String>,
        page: String,
        per_page: String,
        options: ServerOptions,
    ) -> Vec<VideoItem> {
        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, options)
                    .await
            }
            None => {
                self.get(cache, page.parse::<u8>().unwrap_or(1), &sort, options)
                    .await
            }
        };
        match videos {
            Ok(v) => v,
            Err(e) => {
                println!("Error fetching videos: {}", e);
                vec![]
            }
        }
    }
    fn get_channel(&self, clientversion: ClientVersion) -> Option<crate::status::Channel> {
        Some(self.build_channel(clientversion))
    }
}