use crate::common::server::{AuthProvider, Provider, Server, ServerAccessToken, Sso, Version};
use crate::server::http_client::HttpClient;
use crate::COCO_TAURI_STORE;
use lazy_static::lazy_static;
use reqwest::{Method, StatusCode};
use serde_json::from_value;
use serde_json::Value as JsonValue;
use std::collections::HashMap;
use std::sync::Arc;
use std::sync::RwLock;
use tauri::AppHandle;
use tauri::Runtime;
use tauri_plugin_store::StoreExt;
use crate::server::connector::refresh_all_connectors;
use crate::server::datasource::refresh_all_datasources;
// Assuming you're using serde_json

lazy_static! {
    static ref SERVER_CACHE: Arc<RwLock<HashMap<String,Server>>> = Arc::new(RwLock::new(HashMap::new()));
    static ref SERVER_TOKEN: Arc<RwLock<HashMap<String,ServerAccessToken>>> = Arc::new(RwLock::new(HashMap::new()));
}

fn check_server_exists(id: &str) -> bool {
    let cache = SERVER_CACHE.read().unwrap(); // Acquire read lock
    cache.contains_key(id)
}

pub fn get_server_by_id(id: &str) -> Option<Server> {
    let cache = SERVER_CACHE.read().unwrap(); // Acquire read lock
    cache.get(id).cloned()
}

pub fn get_server_token(id: &str) -> Option<ServerAccessToken> {
    let cache = SERVER_TOKEN.read().unwrap(); // Acquire read lock
    cache.get(id).cloned()
}

pub fn save_access_token(server_id: String, token: ServerAccessToken) -> bool {
    let mut cache = SERVER_TOKEN.write().unwrap();
    cache.insert(server_id, token).is_none()
}

fn check_endpoint_exists(endpoint: &str) -> bool {
    let cache = SERVER_CACHE.read().unwrap();
    cache.values().any(|server| server.endpoint == endpoint)
}

pub fn save_server(server: &Server) -> bool {
    let mut cache = SERVER_CACHE.write().unwrap();
    cache.insert(server.id.clone(), server.clone()).is_none() // If the server id did not exist, `insert` will return `None`
}

fn remove_server_by_id(id: String) -> bool {
    dbg!("remove server by id:", &id);
    let mut cache = SERVER_CACHE.write().unwrap();
    let deleted = cache.remove(id.as_str());
    deleted.is_some()
}


pub fn persist_servers<R: Runtime>(app_handle: &AppHandle<R>) -> Result<(), String> {
    let cache = SERVER_CACHE.read().unwrap(); // Acquire a read lock, not a write lock, since you're not modifying the cache

    // Convert HashMap to Vec for serialization (iterating over values of HashMap)
    let servers: Vec<Server> = cache.values().cloned().collect();

    // Serialize the servers into JSON automatically
    let json_servers: Vec<JsonValue> = servers
        .into_iter()
        .map(|server| serde_json::to_value(server).expect("Failed to serialize server")) // Automatically serialize all fields
        .collect();

    // dbg!(format!("persist servers: {:?}", &json_servers));

    // Save the serialized servers to Tauri's store
    app_handle
        .store(COCO_TAURI_STORE)
        .expect("create or load a store should never fail")
        .set(COCO_SERVERS, json_servers);

    Ok(())
}

pub fn remove_server_token(id: &str) -> bool {
    dbg!("remove server token by id:", &id);
    let mut cache = SERVER_TOKEN.write().unwrap();
    cache.remove(id).is_some()
}

pub fn persist_servers_token<R: Runtime>(app_handle: &AppHandle<R>) -> Result<(), String> {
    let cache = SERVER_TOKEN.read().unwrap(); // Acquire a read lock, not a write lock, since you're not modifying the cache

    // Convert HashMap to Vec for serialization (iterating over values of HashMap)
    let servers: Vec<ServerAccessToken> = cache.values().cloned().collect();

    // Serialize the servers into JSON automatically
    let json_servers: Vec<JsonValue> = servers
        .into_iter()
        .map(|server| serde_json::to_value(server).expect("Failed to serialize access_tokens")) // Automatically serialize all fields
        .collect();

    dbg!(format!("persist servers token: {:?}", &json_servers));

    // Save the serialized servers to Tauri's store
    app_handle
        .store(COCO_TAURI_STORE)
        .expect("create or load a store should never fail")
        .set(COCO_SERVER_TOKENS, json_servers);

    Ok(())
}

// Function to get the default server if the request or parsing fails
fn get_default_server() -> Server {
    Server {
        id: "default_coco_server".to_string(),
        builtin: true,
        name: "Coco Cloud".to_string(),
        endpoint: "https://coco.infini.cloud".to_string(),
        provider: Provider {
            name: "INFINI Labs".to_string(),
            icon: "https://coco.infini.cloud/icon.png".to_string(),
            website: "http://infinilabs.com".to_string(),
            eula: "http://infinilabs.com/eula.txt".to_string(),
            privacy_policy: "http://infinilabs.com/privacy_policy.txt".to_string(),
            banner: "https://coco.infini.cloud/banner.jpg".to_string(),
            description: "Coco AI Server - Search, Connect, Collaborate, AI-powered enterprise search, all in one space.".to_string(),
        },
        version: Version {
            number: "1.0.0_SNAPSHOT".to_string(),
        },
        updated: "2025-01-24T12:12:17.326286927+08:00".to_string(),
        public: false,
        available: true,
        profile: None,
        auth_provider: AuthProvider {
            sso: Sso {
                url: "https://coco.infini.cloud/sso/login/".to_string(),
            },
        },
        priority: 0,
    }
}

pub async fn load_servers_token<R: Runtime>(app_handle: &AppHandle<R>) -> Result<Vec<ServerAccessToken>, String> {

    dbg!("Attempting to load servers token");

    let store = app_handle
        .store(COCO_TAURI_STORE)
        .expect("create or load a store should not fail");

    // Check if the servers key exists in the store
    if !store.has(COCO_SERVER_TOKENS) {
        return Err("Failed to read servers from store: No servers found".to_string());
    }

    // Load servers from store
    let servers: Option<JsonValue> = store.get(COCO_SERVER_TOKENS);

    // Handle the None case
    let servers = servers.ok_or_else(|| "Failed to read servers from store: No servers found".to_string())?;

    // Convert each item in the JsonValue array to a Server
    if let JsonValue::Array(servers_array) = servers {
        // Deserialize each JsonValue into Server, filtering out any errors
        let deserialized_tokens: Vec<ServerAccessToken> = servers_array
            .into_iter()
            .filter_map(|server_json| from_value(server_json).ok()) // Only keep valid Server instances
            .collect();

        if deserialized_tokens.is_empty() {
            return Err("Failed to deserialize any servers from the store.".to_string());
        }

        for server in deserialized_tokens.iter() {
            save_access_token(server.id.clone(), server.clone());
        }

        dbg!(format!("loaded {:?} servers's token", &deserialized_tokens.len()));

        Ok(deserialized_tokens)
    } else {
        Err("Failed to read servers from store: Invalid format".to_string())
    }
}

pub async fn load_servers<R: Runtime>(app_handle: &AppHandle<R>) -> Result<Vec<Server>, String> {
    let store = app_handle
        .store(COCO_TAURI_STORE)
        .expect("create or load a store should not fail");

    // Check if the servers key exists in the store
    if !store.has(COCO_SERVERS) {
        return Err("Failed to read servers from store: No servers found".to_string());
    }

    // Load servers from store
    let servers: Option<JsonValue> = store.get(COCO_SERVERS);

    // Handle the None case
    let servers = servers.ok_or_else(|| "Failed to read servers from store: No servers found".to_string())?;

    // Convert each item in the JsonValue array to a Server
    if let JsonValue::Array(servers_array) = servers {
        // Deserialize each JsonValue into Server, filtering out any errors
        let deserialized_servers: Vec<Server> = servers_array
            .into_iter()
            .filter_map(|server_json| from_value(server_json).ok()) // Only keep valid Server instances
            .collect();

        if deserialized_servers.is_empty() {
            return Err("Failed to deserialize any servers from the store.".to_string());
        }

        for server in deserialized_servers.iter() {
            save_server(&server);
        }

        // dbg!(format!("load servers: {:?}", &deserialized_servers));

        Ok(deserialized_servers)
    } else {
        Err("Failed to read servers from store: Invalid format".to_string())
    }
}

/// Function to load servers or insert a default one if none exist
pub async fn load_or_insert_default_server<R: Runtime>(app_handle: &AppHandle<R>) -> Result<Vec<Server>, String> {

    dbg!("Attempting to load or insert default server");

    let exists_servers = load_servers(&app_handle).await;
    if exists_servers.is_ok() && !exists_servers.as_ref()?.is_empty() {
        dbg!(format!("loaded {} servers", &exists_servers.clone()?.len()));
        return exists_servers;
    }

    let default = get_default_server();
    save_server(&default);

    dbg!("loaded default servers");

    Ok(vec![default])
}

#[tauri::command]
pub async fn list_coco_servers<R: Runtime>(
    app_handle: AppHandle<R>,
) -> Result<Vec<Server>, String> {
    let servers: Vec<Server> =get_all_servers();
    Ok(servers)
}

pub fn get_servers_as_hashmap() -> HashMap<String, Server> {
    let cache = SERVER_CACHE.read().unwrap();
    cache.clone()
}

pub fn get_all_servers() -> Vec<Server> {
    let cache = SERVER_CACHE.read().unwrap();
    cache.values().cloned().collect()
}

/// We store added Coco servers in the Tauri store using this key.
pub const COCO_SERVERS: &str = "coco_servers";

const COCO_SERVER_TOKENS: &str = "coco_server_tokens";

#[tauri::command]
pub async fn refresh_coco_server_info<R: Runtime>(
    app_handle: AppHandle<R>,
    id: String,
) -> Result<Server, String> {
    // Retrieve the server from the cache
    let server = {
        let cache = SERVER_CACHE.read().unwrap();
        cache.get(&id).cloned()
    };

    if let Some(server) = server {
        let is_builtin = server.builtin;
        let profile = server.profile;

        // Use the HttpClient to send the request
        let response = HttpClient::get(&id, "/provider/_info") // Assuming "/provider-info" is the endpoint
            .await
            .map_err(|e| format!("Failed to send request to the server: {}", e))?;

        if response.status() == StatusCode::OK {
            if let Some(content_length) = response.content_length() {
                if content_length > 0 {
                    let new_coco_server: Result<Server, _> = response.json().await;

                    match new_coco_server {
                        Ok(mut server) => {
                            server.id = id;
                            server.builtin = is_builtin;
                            server.available = true;
                            server.profile = profile;
                            trim_endpoint_last_forward_slash(&mut server);
                            save_server(&server);
                            persist_servers(&app_handle).expect("Failed to persist coco servers.");


                            //refresh connectors and datasources
                            if let Err(err) = refresh_all_connectors(&app_handle).await {
                                return Err(format!("Failed to load server connectors: {}", err))
                            }

                            if let Err(err) = refresh_all_datasources(&app_handle).await {
                                return Err(format!("Failed to load server datasources: {}", err))
                            }

                            Ok(server)
                        }
                        Err(e) => {
                            Err(format!("Failed to deserialize the response: {}", e))
                        }
                    }
                } else {
                    Err("Received empty response body.".to_string())
                }
            } else {
                Err("Could not determine the content length.".to_string())
            }
        } else {
            Err(format!("Request failed with status: {}", response.status()))
        }
    } else {
        Err("Server not found.".to_string())
    }
}

#[tauri::command]
pub async fn add_coco_server<R: Runtime>(
    app_handle: AppHandle<R>,
    endpoint: String,
) -> Result<Server, String> {
    load_or_insert_default_server(&app_handle).await
        .expect("Failed to load default servers");

    // Remove the trailing '/' from the endpoint to ensure correct URL construction
    let endpoint = endpoint.trim_end_matches('/');

    // Check if the server with this endpoint already exists
    if check_endpoint_exists(endpoint) {
        dbg!(format!("This Coco server has already been registered: {:?}", &endpoint));
        return Err("This Coco server has already been registered.".into());
    }

    let url = provider_info_url(&endpoint);

    // Use the HttpClient to fetch provider information
    let response = HttpClient::send_raw_request(Method::GET, url.as_str(), None, None)
        .await
        .map_err(|e| format!("Failed to send request to the server: {}", e))?;

    dbg!(format!("Get provider info response: {:?}", &response));

    // Check if the response status is OK (200)
    if response.status() == StatusCode::OK {
        if let Some(content_length) = response.content_length() {
            if content_length > 0 {
                let new_coco_server: Result<Server, _> = response.json().await;

                match new_coco_server {
                    Ok(mut server) => {
                        // Perform necessary checks and adjustments on the server data
                        trim_endpoint_last_forward_slash(&mut server);

                        if server.id.is_empty() {
                            server.id = pizza_common::utils::uuid::Uuid::new().to_string();
                        }

                        if server.name.is_empty() {
                            server.name = "Coco Cloud".to_string();
                        }

                        // Save the new server to the cache
                        save_server(&server);

                        // Persist the servers to the store
                        persist_servers(&app_handle)
                            .expect("Failed to persist Coco servers.");

                        dbg!(format!("Successfully registered server: {:?}", &endpoint));
                        Ok(server)
                    }
                    Err(e) => {
                        Err(format!("Failed to deserialize the response: {}", e))
                    }
                }
            } else {
                Err("Received empty response body.".to_string())
            }
        } else {
            Err("Could not determine the content length.".to_string())
        }
    } else {
        Err(format!("Request failed with status: {}", response.status()))
    }
}

#[tauri::command]
pub async fn remove_coco_server<R: Runtime>(
    app_handle: AppHandle<R>,
    id: String,
) -> Result<(), ()> {
    remove_server_token(id.as_str());
    remove_server_by_id(id);
    persist_servers(&app_handle).expect("failed to save servers");
    persist_servers_token(&app_handle).expect("failed to save server tokens");
    Ok(())
}

#[tauri::command]
pub async fn logout_coco_server<R: Runtime>(
    app_handle: AppHandle<R>,
    id: String,
) -> Result<(), String> {

    dbg!("Attempting to log out server by id:", &id);

    // Check if server token exists
    if let Some(token) = get_server_token(id.as_str()) {
        dbg!("Found server token for id:", &id);

        // Remove the server token from cache
        remove_server_token(id.as_str());

        // Persist the updated tokens
        if let Err(e) = persist_servers_token(&app_handle) {
            dbg!("Failed to save tokens for id: {}. Error: {:?}", &id, &e);
            return Err(format!("Failed to save tokens: {}", &e));
        }
    } else {
        // Log the case where server token is not found
        dbg!("No server token found for id: {}", &id);
    }

    // Check if the server exists
    if let Some(mut server) = get_server_by_id(id.as_str()) {
        dbg!("Found server for id:", &id);

        // Clear server profile
        server.profile = None;

        // Save the updated server data
        save_server(&server);

        // Persist the updated server data
        if let Err(e) = persist_servers(&app_handle) {
            dbg!("Failed to save server for id: {}. Error: {:?}", &id, &e);
            return Err(format!("Failed to save server: {}", &e));
        }
    } else {
        // Log the case where server is not found
        dbg!("No server found for id: {}", &id);
        return Err(format!("No server found for id: {}", id));
    }

    dbg!("Successfully logged out server with id:", &id);
    Ok(())
}

/// Removes the trailing slash from the server's endpoint if present.
fn trim_endpoint_last_forward_slash(server: &mut Server) {
    if server.endpoint.ends_with('/') {
        server.endpoint.pop(); // Remove the last character
        while server.endpoint.ends_with('/') {
            server.endpoint.pop();
        }
    }
}

/// Helper function to construct the provider info URL.
fn provider_info_url(endpoint: &str) -> String {
    format!("{endpoint}/provider/_info")
}

#[test]
fn test_trim_endpoint_last_forward_slash() {
    let mut server = Server {
        id: "test".to_string(),
        builtin: false,
        name: "".to_string(),
        endpoint: "https://example.com///".to_string(),
        provider: Provider {
            name: "".to_string(),
            icon: "".to_string(),
            website: "".to_string(),
            eula: "".to_string(),
            privacy_policy: "".to_string(),
            banner: "".to_string(),
            description: "".to_string(),
        },
        version: Version {
            number: "".to_string(),
        },
        updated: "".to_string(),
        public: false,
        available: false,
        profile: None,
        auth_provider: AuthProvider {
            sso: Sso {
                url: "".to_string(),
            },
        },
        priority: 0,
    };

    trim_endpoint_last_forward_slash(&mut server);

    assert_eq!(server.endpoint, "https://example.com");
}