thru-core 0.2.17

//! RPC command implementations

use std::collections::HashMap;
use std::convert::TryFrom;
use std::time::Duration;
use thru_base::tn_tools::Pubkey;
use tonic_health::pb::health_check_response::ServingStatus;

use crate::config::Config;
use crate::crypto::keypair_from_hex;
use crate::error::CliError;
use crate::output;
use thru_client::{Client, ClientBuilder, VersionContext};

/// Resolve account input to a public key
///
/// This function implements the key resolution logic:
/// 1. If input is None, use the default key from config
/// 2. If input is Some(value), try to parse as public key first
/// 3. If public key parsing fails, try to resolve as key name from config
/// 4. Provide helpful error messages for all failure cases
pub fn resolve_account_input(input: Option<&str>, config: &Config) -> Result<Pubkey, CliError> {
    match input {
        None => {
            // Use default key
            let private_key = config.keys.get_default_key()?;
            let keypair = keypair_from_hex(private_key)?;
            Ok(keypair.address_string)
        }
        Some(value) => {
            // Try as Thru format public key first (ta...)
            match Pubkey::new(value.to_string()) {
                Ok(pubkey) => Ok(pubkey),
                Err(_) => {
                    // Try as hex format public key (0x... or 64 hex chars)
                    match Pubkey::from_hex(value) {
                        Ok(pubkey) => Ok(pubkey),
                        Err(_) => {
                            // Try as key name
                            match config.keys.get_key(value) {
                                Ok(private_key) => {
                                    let keypair = keypair_from_hex(private_key)?;
                                    Ok(keypair.address_string)
                                }
                                Err(_) => Err(CliError::Validation(format!(
                                    "Invalid input '{}': not a valid public key (ta... or hex), or key name. Available keys: {}",
                                    value,
                                    config.keys.list_keys().join(", ")
                                ))),
                            }
                        }
                    }
                }
            }
        }
    }
}

/// Execute the getVersion command
pub async fn get_version(config: &Config, json_format: bool) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;
    let versions = client.get_version().await?;

    let thru_node = versions
        .get("thru-node")
        .cloned()
        .unwrap_or_else(|| "unknown".to_string());
    let thru_rpc = versions
        .get("thru-rpc")
        .cloned()
        .unwrap_or_else(|| "unknown".to_string());

    if json_format {
        let response = output::create_version_response(&thru_node, &thru_rpc);
        output::print_output(response, true);
    } else {
        println!("thru-node: {}", thru_node);
        println!("thru-rpc: {}", thru_rpc);
    }

    Ok(())
}

/// Execute the getHealth command
pub async fn get_health(config: &Config, json_format: bool) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;
    let response = client.get_health().await?;

    let status = ServingStatus::try_from(response.status).unwrap_or(ServingStatus::Unknown);
    let status_str = health_status_to_str(status);
    if json_format {
        let response_json = output::create_health_response(status_str);
        output::print_output(response_json, true);
    } else {
        println!("Status: {}", status_str);
    }

    if status != ServingStatus::Serving {
        return Err(CliError::Rpc(format!(
            "service not healthy: {}",
            status_str
        )));
    }

    Ok(())
}

pub async fn get_status(config: &Config, json_format: bool) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;
    let status = client.get_node_status().await?;

    if json_format {
        let response = serde_json::json!({
            "getstatus": {
                "status": "success",
                "ready": status.ready,
                "consensus": {
                    "active": status.consensus.active,
                    "mode": status.consensus.mode.as_str(),
                    "frontier": status.consensus.frontier,
                },
                "repair": {
                    "active": status.repair.active,
                },
                "finalized_slot": status.finalized_slot,
                "locally_executed_slot": status.locally_executed_slot,
            }
        });
        output::print_output(response, true);
    } else {
        println!("Ready: {}", status.ready);
        println!("Consensus:");
        println!("  Active:   {}", status.consensus.active);
        println!("  Mode:     {}", status.consensus.mode.as_str());
        println!("  Frontier: {}", status.consensus.frontier);
        println!("Repair:");
        println!("  Active:   {}", status.repair.active);
        println!("Finalized Slot:        {}", status.finalized_slot);
        println!("Locally Executed Slot: {}", status.locally_executed_slot);
    }

    Ok(())
}

pub async fn get_height(config: &Config, json_format: bool) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;
    let heights = client.get_block_height().await?;

    if json_format {
        let response = serde_json::json!({
            "getheight": {
                "status": "success",
                "finalized": heights.finalized_height,
                "locally_executed": heights.locally_executed_height,
                "cluster_executed": heights.cluster_executed_height,
            }
        });
        output::print_output(response, true);
    } else {
        println!("Finalized Height: {}", heights.finalized_height);
        println!(
            "Locally Executed Height: {}",
            heights.locally_executed_height
        );
        println!(
            "Cluster Executed Height: {}",
            heights.cluster_executed_height
        );
    }

    Ok(())
}

/// Execute the getAccountInfo command
pub async fn get_account_info(
    config: &Config,
    account_input: Option<&str>,
    data_start: Option<usize>,
    data_len: Option<usize>,
    json_format: bool,
) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;

    // Resolve account input to public key
    let pubkey = resolve_account_input(account_input, config)?;

    match client.get_account_info(&pubkey, None, Some(VersionContext::Current)).await {
        Ok(Some(account)) => {
            let mut account_data = HashMap::new();
            account_data.insert(
                "pubkey".to_string(),
                serde_json::Value::String(pubkey.to_string()),
            );
            account_data.insert(
                "balance".to_string(),
                serde_json::Value::Number(account.balance.into()),
            );
            account_data.insert(
                "owner".to_string(),
                serde_json::Value::String(account.owner.to_string()),
            );
            account_data.insert(
                "dataSize".to_string(),
                serde_json::Value::Number(account.data_size.into()),
            );
            account_data.insert(
                "nonce".to_string(),
                serde_json::Value::Number(account.nonce.into()),
            );
            account_data.insert(
                "seq".to_string(),
                serde_json::Value::Number(account.seq.into()),
            );
            account_data.insert(
                "program".to_string(),
                serde_json::Value::Bool(account.program),
            );
            account_data.insert("isNew".to_string(), serde_json::Value::Bool(account.is_new));
            account_data.insert(
                "isEphemeral".to_string(),
                serde_json::Value::Bool(account.is_ephemeral),
            );
            account_data.insert(
                "isDeleted".to_string(),
                serde_json::Value::Bool(account.is_deleted),
            );
            account_data.insert(
                "isPrivileged".to_string(),
                serde_json::Value::Bool(account.is_privileged),
            );

            // Handle data display based on data_start/data_len parameters
            if data_start.is_some() || data_len.is_some() {
                // User wants to see hex data
                if let Some(data_b64) = account.data {
                    // Decode base64 data
                    match base64::Engine::decode(&base64::engine::general_purpose::STANDARD, &data_b64) {
                        Ok(data_bytes) => {
                            let start = data_start.unwrap_or(0);
                            let len = data_len.unwrap_or(data_bytes.len().saturating_sub(start));
                            let end = std::cmp::min(start + len, data_bytes.len());

                            if start < data_bytes.len() {
                                let slice = &data_bytes[start..end];
                                let hex_data = hex::encode(slice);
                                account_data.insert(
                                    "dataHex".to_string(),
                                    serde_json::Value::String(hex_data),
                                );
                                account_data.insert(
                                    "dataHexStart".to_string(),
                                    serde_json::Value::Number(start.into()),
                                );
                                account_data.insert(
                                    "dataHexLen".to_string(),
                                    serde_json::Value::Number((end - start).into()),
                                );
                            } else {
                                account_data.insert(
                                    "dataHex".to_string(),
                                    serde_json::Value::String("".to_string()),
                                );
                                account_data.insert(
                                    "error".to_string(),
                                    serde_json::Value::String(format!("data_start {} exceeds data size {}", start, data_bytes.len())),
                                );
                            }
                        }
                        Err(e) => {
                            return Err(CliError::Validation(format!("Failed to decode account data: {}", e)));
                        }
                    }
                } else {
                    account_data.insert(
                        "dataHex".to_string(),
                        serde_json::Value::String("".to_string()),
                    );
                }
            } else {
                // Default behavior - include base64 data
                account_data.insert(
                    "data".to_string(),
                    serde_json::Value::String(account.data.unwrap_or_default()),
                );
            }

            // Add version_context fields
            if let Some(slot) = account.slot {
                account_data.insert("slot".to_string(), serde_json::Value::Number(slot.into()));
            }
            if let Some(timestamp) = account.block_timestamp {
                if let Ok(duration) = timestamp.duration_since(std::time::UNIX_EPOCH) {
                    let timestamp_str =
                        format!("{}.{:09}", duration.as_secs(), duration.subsec_nanos());
                    account_data.insert(
                        "blockTimestamp".to_string(),
                        serde_json::Value::String(timestamp_str),
                    );
                }
            }

            let response = output::create_account_info_response(account_data);
            output::print_output(response, json_format);
            Ok(())
        }
        Ok(None) => {
            let error_msg = "Account not found";
            if json_format {
                let error_response = serde_json::json!({
                    "error": {
                        "type": "account_not_found",
                        "message": error_msg,
                        "pubkey": pubkey.to_string()
                    }
                });
                output::print_output(error_response, true);
            } else {
                output::print_error(&format!(
                    "{} for address: {}",
                    error_msg,
                    pubkey.to_string()
                ));
            }
            Err(CliError::Reported)
        }
        Err(e) => {
            let error_msg = format!("Failed to get account info: {}", e);
            if json_format {
                let error_response = serde_json::json!({
                    "error": {
                        "type": "rpc",
                        "message": error_msg
                    }
                });
                output::print_output(error_response, true);
            } else {
                output::print_error(&error_msg);
            }
            Err(CliError::Reported)
        }
    }
}

/// Execute the getBalance command
pub async fn get_balance(
    config: &Config,
    account_input: Option<&str>,
    json_format: bool,
) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;

    // Resolve account input to public key
    let pubkey = resolve_account_input(account_input, config)?;

    match client.get_balance(&pubkey).await {
        Ok(balance) => {
            let response = output::create_balance_response(&pubkey.to_string(), balance);
            output::print_output(response, json_format);
            Ok(())
        }
        Err(e) => {
            let error_msg = format!("Failed to get balance: {}", e);
            if json_format {
                let error_response = serde_json::json!({
                    "error": error_msg
                });
                output::print_output(error_response, true);
            } else {
                output::print_error(&error_msg);
            }
            Err(e.into())
        }
    }
}

/// Execute the getSlotMetrics command
pub async fn get_slot_metrics(
    config: &Config,
    slot: u64,
    end_slot: Option<u64>,
    json_format: bool,
) -> Result<(), CliError> {
    let client = create_rpc_client(config)?;

    match end_slot {
        None => {
            /* Single slot: use GetSlotMetrics */
            match client.get_slot_metrics(slot).await {
                Ok(metrics) => {
                    if json_format {
                        let response = serde_json::json!({
                            "getslotmetrics": {
                                "status": "success",
                                "slot": metrics.slot,
                                "global_activated_state_counter": metrics.global_activated_state_counter,
                                "global_deactivated_state_counter": metrics.global_deactivated_state_counter,
                                "collected_fees": metrics.collected_fees,
                                "block_timestamp": metrics.block_timestamp.map(|ts| {
                                    ts.duration_since(std::time::UNIX_EPOCH)
                                        .map(|d| format!("{}.{:09}", d.as_secs(), d.subsec_nanos()))
                                        .unwrap_or_default()
                                }),
                            }
                        });
                        output::print_output(response, true);
                    } else {
                        println!("Slot: {}", metrics.slot);
                        println!("Global Activated State Counter: {}", metrics.global_activated_state_counter);
                        println!("Global Deactivated State Counter: {}", metrics.global_deactivated_state_counter);
                        println!("Collected Fees: {}", metrics.collected_fees);
                        if let Some(ts) = metrics.block_timestamp {
                            if let Ok(duration) = ts.duration_since(std::time::UNIX_EPOCH) {
                                println!("Block Timestamp: {}.{:09}", duration.as_secs(), duration.subsec_nanos());
                            }
                        }
                    }
                    Ok(())
                }
                Err(e) => {
                    let error_msg = format!("Failed to get slot metrics: {}", e);
                    if json_format {
                        let error_response = serde_json::json!({
                            "error": error_msg
                        });
                        output::print_output(error_response, true);
                    } else {
                        output::print_error(&error_msg);
                    }
                    Err(e.into())
                }
            }
        }
        Some(end) => {
            /* Range of slots: use ListSlotMetrics */
            /* Server limit is 10000, chunk requests if range is larger */
            const MAX_CHUNK_SIZE: u64 = 10000;

            let mut all_metrics = Vec::new();
            let mut current_start = slot;

            while current_start <= end {
                let chunk_end = std::cmp::min(current_start + MAX_CHUNK_SIZE - 1, end);
                let chunk_size = (chunk_end - current_start + 1) as u32;

                match client.list_slot_metrics(current_start, Some(chunk_end), Some(chunk_size)).await {
                    Ok(metrics_list) => {
                        all_metrics.extend(metrics_list);
                    }
                    Err(e) => {
                        let error_msg = format!("Failed to list slot metrics: {}", e);
                        if json_format {
                            let error_response = serde_json::json!({
                                "error": error_msg
                            });
                            output::print_output(error_response, true);
                        } else {
                            output::print_error(&error_msg);
                        }
                        return Err(e.into());
                    }
                }

                /* Break before increment to avoid overflow when chunk_end == u64::MAX */
                if chunk_end == end {
                    break;
                }
                current_start = chunk_end + 1;
            }

            if json_format {
                let metrics_json: Vec<_> = all_metrics.iter().map(|m| {
                    serde_json::json!({
                        "slot": m.slot,
                        "global_activated_state_counter": m.global_activated_state_counter,
                        "global_deactivated_state_counter": m.global_deactivated_state_counter,
                        "collected_fees": m.collected_fees,
                        "block_timestamp": m.block_timestamp.map(|ts| {
                            ts.duration_since(std::time::UNIX_EPOCH)
                                .map(|d| format!("{}.{:09}", d.as_secs(), d.subsec_nanos()))
                                .unwrap_or_default()
                        }),
                    })
                }).collect();
                let response = serde_json::json!({
                    "listslotmetrics": {
                        "status": "success",
                        "count": all_metrics.len(),
                        "metrics": metrics_json,
                    }
                });
                output::print_output(response, true);
            } else {
                println!("Slot Metrics ({} entries):", all_metrics.len());
                println!("{:-<80}", "");
                for m in &all_metrics {
                    println!("Slot {}: activated={}, deactivated={}, fees={}",
                        m.slot,
                        m.global_activated_state_counter,
                        m.global_deactivated_state_counter,
                        m.collected_fees);
                }
            }
            Ok(())
        }
    }
}

/// Create an RPC client from configuration
fn create_rpc_client(config: &Config) -> Result<Client, CliError> {
    let rpc_url = config.get_grpc_url()?;
    let timeout = Duration::from_secs(config.timeout_seconds);

    ClientBuilder::new()
        .http_endpoint(rpc_url)
        .timeout(timeout)
        .auth_token(config.auth_token.clone())
        .build()
        .map_err(|e| e.into())
}

fn health_status_to_str(status: ServingStatus) -> &'static str {
    match status {
        ServingStatus::Serving => "serving",
        ServingStatus::NotServing => "not_serving",
        ServingStatus::ServiceUnknown => "service_unknown",
        _ => "unknown",
    }
}

#[cfg(test)]
mod tests {
    use super::*;

    #[tokio::test]
    async fn test_create_rpc_client() {
        let config = Config::default();
        let client = create_rpc_client(&config);
        assert!(client.is_ok());
    }

    #[test]
    fn test_resolve_account_input_with_none() {
        let config = Config::default();
        let result = resolve_account_input(None, &config);
        assert!(result.is_ok(), "Should resolve default key successfully");
    }

    #[test]
    fn test_resolve_account_input_with_valid_public_key() {
        let config = Config::default();
        // Create a valid public key using the same method as the code
        let default_key = config.keys.get_default_key().unwrap();
        let keypair = keypair_from_hex(default_key).unwrap();
        let valid_pubkey = keypair.address_string.to_string();

        let result = resolve_account_input(Some(&valid_pubkey), &config);
        assert!(
            result.is_ok(),
            "Should resolve valid public key successfully"
        );
        assert_eq!(result.unwrap().to_string(), valid_pubkey);
    }

    #[test]
    fn test_resolve_account_input_with_key_name() {
        let config = Config::default();
        let result = resolve_account_input(Some("default"), &config);
        assert!(
            result.is_ok(),
            "Should resolve key name 'default' successfully"
        );
    }

    #[test]
    fn test_resolve_account_input_with_invalid_key_name() {
        let config = Config::default();
        let result = resolve_account_input(Some("nonexistent"), &config);
        assert!(result.is_err(), "Should fail for nonexistent key name");

        let error_msg = result.unwrap_err().to_string();
        assert!(error_msg.contains("Invalid input 'nonexistent'"));
        assert!(error_msg.contains("Available keys: default"));
    }

    #[test]
    fn test_resolve_account_input_with_invalid_public_key() {
        let config = Config::default();
        let result = resolve_account_input(Some("invalid_pubkey"), &config);
        assert!(result.is_err(), "Should fail for invalid public key format");

        let error_msg = result.unwrap_err().to_string();
        assert!(error_msg.contains("Invalid input 'invalid_pubkey'"));
        assert!(error_msg.contains("Available keys: default"));
    }

    #[test]
    fn test_resolve_account_input_with_hex_pubkey() {
        let config = Config::default();
        // Test with zero address (all zeros)
        let hex_zero = "0000000000000000000000000000000000000000000000000000000000000000";
        let result = resolve_account_input(Some(hex_zero), &config);
        assert!(result.is_ok(), "Should resolve hex public key successfully");

        // Test with 0x prefix
        let hex_with_prefix = "0x0000000000000000000000000000000000000000000000000000000000000001";
        let result_with_prefix = resolve_account_input(Some(hex_with_prefix), &config);
        assert!(result_with_prefix.is_ok(), "Should resolve hex public key with 0x prefix");
    }

    #[test]
    fn test_resolve_account_input_with_invalid_hex_length() {
        let config = Config::default();
        // Test with invalid hex length
        let short_hex = "0x123456";
        let result = resolve_account_input(Some(short_hex), &config);
        assert!(result.is_err(), "Should fail for invalid hex length");
    }
}