use actix_web::{web, App, HttpResponse, HttpServer, Responder};
use log::{error, info};
use regex::Regex;
use serde::{Deserialize, Serialize};
use std::collections::HashMap;
use std::sync::{Arc, Mutex};
use tokio_postgres::{Client, NoTls};

use crate::db;

#[derive(Serialize, Deserialize, Clone, Debug)]
pub struct SshKey {
    pub server: String,
    pub public_key: String,
}

#[derive(Serialize, Deserialize, Clone, Debug)]
pub struct Flow {
    pub name: String,
    pub servers: Vec<SshKey>,
}

pub type Flows = Arc<Mutex<Vec<Flow>>>;

pub fn is_valid_ssh_key(key: &str) -> bool {
    let rsa_re = Regex::new(r"^ssh-rsa AAAA[0-9A-Za-z+/]+[=]{0,3}( .+)?$").unwrap();
    let dsa_re = Regex::new(r"^ssh-dss AAAA[0-9A-Za-z+/]+[=]{0,3}( .+)?$").unwrap();
    let ecdsa_re =
        Regex::new(r"^ecdsa-sha2-nistp(256|384|521) AAAA[0-9A-Za-z+/]+[=]{0,3}( .+)?$").unwrap();
    let ed25519_re = Regex::new(r"^ssh-ed25519 AAAA[0-9A-Za-z+/]+[=]{0,3}( .+)?$").unwrap();

    rsa_re.is_match(key)
        || dsa_re.is_match(key)
        || ecdsa_re.is_match(key)
        || ed25519_re.is_match(key)
}

pub async fn insert_key_if_not_exists(
    client: &Client,
    key: &SshKey,
) -> Result<i32, tokio_postgres::Error> {
    let row = client
        .query_opt(
            "SELECT key_id FROM public.keys WHERE host = $1 AND key = $2",
            &[&key.server, &key.public_key],
        )
        .await?;

    if let Some(row) = row {
        client
            .execute(
                "UPDATE public.keys SET updated = NOW() WHERE key_id = $1",
                &[&row.get::<_, i32>(0)],
            )
            .await?;
        info!("Updated existing key for server: {}", key.server);
        Ok(row.get(0))
    } else {
        let row = client.query_one(
            "INSERT INTO public.keys (host, key, updated) VALUES ($1, $2, NOW()) RETURNING key_id",
            &[&key.server, &key.public_key]
        ).await?;
        info!("Inserted new key for server: {}", key.server);
        Ok(row.get(0))
    }
}

pub async fn insert_flow_key(
    client: &Client,
    flow_name: &str,
    key_id: i32,
) -> Result<(), tokio_postgres::Error> {
    client
        .execute(
            "INSERT INTO public.flows (name, key_id) VALUES ($1, $2) ON CONFLICT DO NOTHING",
            &[&flow_name, &key_id],
        )
        .await?;
    info!("Inserted key_id {} into flow: {}", key_id, flow_name);
    Ok(())
}

pub async fn get_keys_from_db(client: &Client) -> Result<Vec<Flow>, tokio_postgres::Error> {
    let rows = client.query(
        "SELECT k.host, k.key, f.name FROM public.keys k INNER JOIN public.flows f ON k.key_id = f.key_id",
        &[]
    ).await?;

    let mut flows_map: HashMap<String, Flow> = HashMap::new();

    for row in rows {
        let host: String = row.get(0);
        let key: String = row.get(1);
        let flow: String = row.get(2);

        let ssh_key = SshKey {
            server: host,
            public_key: key,
        };

        if let Some(flow_entry) = flows_map.get_mut(&flow) {
            flow_entry.servers.push(ssh_key);
        } else {
            flows_map.insert(
                flow.clone(),
                Flow {
                    name: flow,
                    servers: vec![ssh_key],
                },
            );
        }
    }

    info!("Retrieved {} flows from database", flows_map.len());
    Ok(flows_map.into_values().collect())
}

pub async fn get_keys(
    flows: web::Data<Flows>,
    flow_id: web::Path<String>,
    allowed_flows: web::Data<Vec<String>>,
) -> impl Responder {
    let flow_id_str = flow_id.into_inner();
    if !allowed_flows.contains(&flow_id_str) {
        error!("Flow ID not allowed: {}", flow_id_str);
        return HttpResponse::Forbidden().body("Flow ID not allowed");
    }

    let flows = flows.lock().unwrap();
    if let Some(flow) = flows.iter().find(|flow| flow.name == flow_id_str) {
        let servers: Vec<&SshKey> = flow.servers.iter().collect();
        info!("Returning {} keys for flow: {}", servers.len(), flow_id_str);
        HttpResponse::Ok().json(servers)
    } else {
        error!("Flow ID not found: {}", flow_id_str);
        HttpResponse::NotFound().body("Flow ID not found")
    }
}

pub async fn add_keys(
    flows: web::Data<Flows>,
    flow_id: web::Path<String>,
    new_keys: web::Json<Vec<SshKey>>,
    db_client: web::Data<Arc<Client>>,
    allowed_flows: web::Data<Vec<String>>,
) -> impl Responder {
    let flow_id_str = flow_id.into_inner();
    if !allowed_flows.contains(&flow_id_str) {
        error!("Flow ID not allowed: {}", flow_id_str);
        return HttpResponse::Forbidden().body("Flow ID not allowed");
    }

    // Проверяем формат SSH ключей
    let mut valid_keys = Vec::new();
    for new_key in new_keys.iter() {
        if !is_valid_ssh_key(&new_key.public_key) {
            error!("Invalid SSH key format for server: {}", new_key.server);
            return HttpResponse::BadRequest().body(format!(
                "Invalid SSH key format for server: {}",
                new_key.server
            ));
        }
        valid_keys.push(new_key.clone());
    }

    info!("Processing batch of {} keys for flow: {}", valid_keys.len(), flow_id_str);
    
    // Батчевая вставка ключей с получением статистики
    let key_stats = match crate::db::batch_insert_keys(&db_client, &valid_keys).await {
        Ok(stats) => stats,
        Err(e) => {
            error!("Failed to batch insert keys into database: {}", e);
            return HttpResponse::InternalServerError()
                .body("Failed to batch insert keys into database");
        }
    };

    // Если нет новых ключей, нет необходимости обновлять связи с flow
    if key_stats.inserted > 0 {
        // Извлекаем только ID ключей из статистики
        let key_ids: Vec<i32> = key_stats.key_id_map
            .iter()
            .map(|(_, id)| *id)
            .collect();
        
        // Батчевая вставка связей ключей с flow
        if let Err(e) = crate::db::batch_insert_flow_keys(&db_client, &flow_id_str, &key_ids).await {
            error!("Failed to batch insert flow keys into database: {}", e);
            return HttpResponse::InternalServerError()
                .body("Failed to batch insert flow keys into database");
        }
        
        info!("Added flow associations for {} keys in flow '{}'", key_ids.len(), flow_id_str);
    } else {
        info!("No new keys to associate with flow '{}'", flow_id_str);
    }

    // Получаем обновленные данные
    let updated_flows = match get_keys_from_db(&db_client).await {
        Ok(flows) => flows,
        Err(e) => {
            error!("Failed to get updated flows from database: {}", e);
            return HttpResponse::InternalServerError()
                .body("Failed to refresh flows from database");
        }
    };

    let mut flows_guard = flows.lock().unwrap();
    *flows_guard = updated_flows;

    let updated_flow = flows_guard.iter().find(|flow| flow.name == flow_id_str);
    if let Some(flow) = updated_flow {
        let servers: Vec<&SshKey> = flow.servers.iter().collect();
        info!("Keys summary for flow '{}': total received={}, new={}, unchanged={}, total in flow={}",
              flow_id_str, key_stats.total, key_stats.inserted, key_stats.unchanged, servers.len());
        
        // Добавляем статистику в HTTP заголовки ответа
        let mut response = HttpResponse::Ok();
        response.append_header(("X-Keys-Total", key_stats.total.to_string()));
        response.append_header(("X-Keys-New", key_stats.inserted.to_string()));
        response.append_header(("X-Keys-Unchanged", key_stats.unchanged.to_string()));
        
        response.json(servers)
    } else {
        error!("Flow ID not found after update: {}", flow_id_str);
        HttpResponse::NotFound().body("Flow ID not found")
    }
}

pub async fn run_server(args: crate::Args) -> std::io::Result<()> {
    let db_user = args.db_user.expect("db_user is required in server mode");
    let db_password = args
        .db_password
        .expect("db_password is required in server mode");

    let db_conn_str = format!(
        "host={} user={} password={} dbname={}",
        args.db_host, db_user, db_password, args.db_name
    );

    info!("Connecting to database at {}", args.db_host);
    let (db_client, connection) = match tokio_postgres::connect(&db_conn_str, NoTls).await {
        Ok((client, conn)) => (client, conn),
        Err(e) => {
            error!("Failed to connect to the database: {}", e);
            return Err(std::io::Error::new(
                std::io::ErrorKind::ConnectionRefused,
                format!("Database connection error: {}", e),
            ));
        }
    };
    let db_client = Arc::new(db_client);

    // Spawn a new thread to run the database connection
    tokio::spawn(async move {
        if let Err(e) = connection.await {
            error!("Connection error: {}", e);
        }
    });

    // Initialize database schema if needed
    if let Err(e) = db::initialize_db_schema(&db_client).await {
        error!("Failed to initialize database schema: {}", e);
        return Err(std::io::Error::new(
            std::io::ErrorKind::Other,
            format!("Database schema initialization error: {}", e),
        ));
    }

    let mut initial_flows = match get_keys_from_db(&db_client).await {
        Ok(flows) => flows,
        Err(e) => {
            error!("Failed to get initial flows from database: {}", e);
            Vec::new()
        }
    };

    // Ensure all allowed flows are initialized
    for allowed_flow in &args.flows {
        if !initial_flows.iter().any(|flow| &flow.name == allowed_flow) {
            initial_flows.push(Flow {
                name: allowed_flow.clone(),
                servers: vec![],
            });
        }
    }

    let flows: Flows = Arc::new(Mutex::new(initial_flows));
    let allowed_flows = web::Data::new(args.flows);

    info!("Starting HTTP server on {}:{}", args.ip, args.port);
    HttpServer::new(move || {
        App::new()
            .app_data(web::Data::new(flows.clone()))
            .app_data(web::Data::new(db_client.clone()))
            .app_data(allowed_flows.clone())
            .route("/{flow_id}/keys", web::get().to(get_keys))
            .route("/{flow_id}/keys", web::post().to(add_keys))
    })
    .bind((args.ip.as_str(), args.port))?
    .run()
    .await
}