use std::collections::HashMap;
use std::fs::File;
use std::sync::atomic::{AtomicU64, Ordering};
use std::sync::{Arc, RwLock};
use std::time::{Duration, Instant};

use data_plane::blob_transfer::{
    BlobTransferCompletion, BlobTransferEvent, BlobTransferId, BlobTransferReceiver,
    BlobTransferSender, FileTransferRequest,
};
use iroh::RelayMode;
use iroh_driver::{
    EDGE_ALPN, IrohBlobTransferReceiver, IrohBlobTransferSender, IrohDriver, IrohDriverConfig,
};
use swactor::actor::{ActorAddress, ActorInterface};
use swactor::config::RuntimeConfig;
use swactor::runtime::{Runtime, RuntimeParts};
use swactor_engine::{Engine, TokioBackend, TokioConfig};
use swactor_transport::{CodecRegistry, CodecRemoteSink, TransportRouter};

static NEXT_TEMP: AtomicU64 = AtomicU64::new(1);

struct Completion(std::sync::mpsc::Sender<Result<(), String>>);

impl BlobTransferCompletion for Completion {
    fn complete(self: Box<Self>, result: Result<(), String>) {
        let _ = self.0.send(result);
    }
}
struct EventRelay(std::sync::mpsc::Sender<BlobTransferEvent>);

impl ActorInterface for EventRelay {
    type Incoming = BlobTransferEvent;
    type Response = ();

    fn handle(&mut self, _ctx: &swactor::runtime::Ctx<'_>, event: Self::Incoming) {
        let _ = self.0.send(event);
    }
}

struct Node {
    engine: Engine,
    runtime: Runtime,
    driver: IrohDriver,
}

fn node() -> Node {
    let parts = RuntimeParts::new(RuntimeConfig::default());
    let runtime = parts.runtime().clone();
    let engine = Engine::new(
        parts,
        TokioBackend::new(TokioConfig::default()).expect("tokio backend"),
    )
    .expect("engine");
    let mut driver = IrohDriver::with_engine(
        engine.handle(),
        IrohDriverConfig {
            secret_key: None,
            relay_mode: RelayMode::Disabled,
            bind_port: None,
            node: distribution::node::DistributedNodeConfig::default(),
            peer_auth: None,
            additional_alpns: vec![EDGE_ALPN.to_vec()],
        },
    )
    .expect("Iroh driver");
    let codecs = Arc::new(CodecRegistry::new());
    let router = Arc::new(TransportRouter::new());
    runtime.set_remote_sink(Arc::new(CodecRemoteSink::new(Arc::clone(&codecs), router)));
    driver.enable_actor_bridge(iroh_driver::ActorBridgeConfig {
        runtime: runtime.clone(),
        codec: codecs,
        routes: HashMap::new(),
        swim: ActorAddress::default(),
        relay_mirror: Arc::new(RwLock::new(HashMap::new())),
        route_view: Arc::new(RwLock::new(HashMap::new())),
        outbox: Arc::new(Default::default()),
    });
    driver.install_actor_bridge_pump(Duration::from_millis(5));
    Node {
        engine,
        runtime,
        driver,
    }
}

#[test]
fn real_iroh_transfer_delivers_exact_file_bytes() {
    let source = node();
    let destination = node();
    let receiver = Arc::new(IrohBlobTransferReceiver::new(
        destination.driver.endpoint_addr(),
        destination.driver.edge_events_handle(),
    ));
    receiver.install_pump(
        &destination.engine.handle(),
        destination.runtime.clone(),
        Duration::from_millis(5),
        destination.driver.edge_events_changed(),
    );
    let sender = IrohBlobTransferSender::new(
        source.driver.edge_connector(),
        &source.engine.handle(),
        source.runtime.clone(),
    );
    let inbox = destination
        .runtime
        .new_inbox::<BlobTransferEvent>()
        .expect("destination inbox");
    let transfer_id = BlobTransferId(77);
    let offer = receiver
        .open(*inbox.addr(), transfer_id)
        .expect("open transfer receiver");

    let sequence = NEXT_TEMP.fetch_add(1, Ordering::Relaxed);
    let path = std::env::temp_dir().join(format!(
        "swactor-iroh-blob-{}-{sequence}",
        std::process::id()
    ));
    let expected = b"iroh-file-blob";
    std::fs::write(&path, expected).expect("write fixture");
    let (completion_tx, completion_rx) = std::sync::mpsc::channel();
    sender
        .start_file(FileTransferRequest {
            offer,
            file: File::open(&path).expect("open fixture"),
            offset: 0,
            length: expected.len() as u64,
            completion: Box::new(Completion(completion_tx)),
        })
        .expect("start Iroh transfer");
    completion_rx
        .recv_timeout(Duration::from_secs(10))
        .expect("source completion")
        .expect("source transfer");

    let deadline = Instant::now() + Duration::from_secs(10);
    let mut received = Vec::new();
    loop {
        if let Some(event) = inbox.try_recv() {
            match event {
                BlobTransferEvent::Chunk {
                    transfer_id: found,
                    bytes,
                } => {
                    assert_eq!(found, transfer_id);
                    received.extend_from_slice(&bytes);
                }
                BlobTransferEvent::Finished { transfer_id: found } => {
                    assert_eq!(found, transfer_id);
                    break;
                }
                BlobTransferEvent::Failed { reason, .. } => {
                    panic!("Iroh blob transfer failed: {reason}")
                }
                event => panic!("unexpected local blob transfer event: {event:?}"),
            }
        } else {
            assert!(
                Instant::now() < deadline,
                "destination transfer deadline elapsed"
            );
            std::thread::sleep(Duration::from_millis(5));
        }
    }
    assert_eq!(received, expected);
    let empty_id = BlobTransferId(79);
    let empty_offer = receiver
        .open(*inbox.addr(), empty_id)
        .expect("open empty Iroh transfer receiver");
    let (empty_completion_tx, empty_completion_rx) = std::sync::mpsc::channel();
    sender
        .start_file(FileTransferRequest {
            offer: empty_offer,
            file: File::open(&path).expect("open empty Iroh fixture"),
            offset: 0,
            length: 0,
            completion: Box::new(Completion(empty_completion_tx)),
        })
        .expect("start empty Iroh transfer");
    empty_completion_rx
        .recv_timeout(Duration::from_secs(10))
        .expect("empty Iroh source completion")
        .expect("empty Iroh source transfer");
    let empty_deadline = Instant::now() + Duration::from_secs(10);
    loop {
        if let Some(event) = inbox.try_recv() {
            assert_eq!(
                event,
                BlobTransferEvent::Finished {
                    transfer_id: empty_id
                }
            );
            break;
        }
        assert!(
            Instant::now() < empty_deadline,
            "empty Iroh destination deadline elapsed"
        );
        std::thread::sleep(Duration::from_millis(5));
    }
    let _ = std::fs::remove_file(path);
}
#[test]
fn same_runtime_transfer_bypasses_iroh_self_connection() {
    let node = node();
    let receiver = IrohBlobTransferReceiver::new(
        node.driver.endpoint_addr(),
        node.driver.edge_events_handle(),
    );
    let sender = IrohBlobTransferSender::new(
        node.driver.edge_connector(),
        &node.engine.handle(),
        node.runtime.clone(),
    );
    let (event_tx, event_rx) = std::sync::mpsc::channel();
    let destination = node.runtime.spawn(EventRelay(event_tx)).unwrap();
    let transfer_id = BlobTransferId(91);
    let offer = receiver
        .open(destination, transfer_id)
        .expect("open local transfer receiver");

    let sequence = NEXT_TEMP.fetch_add(1, Ordering::Relaxed);
    let path = std::env::temp_dir().join(format!(
        "swactor-local-blob-{}-{sequence}",
        std::process::id()
    ));
    let expected = b"same-runtime-file-blob";
    std::fs::write(&path, expected).expect("write local fixture");
    let (completion_tx, completion_rx) = std::sync::mpsc::channel();
    sender
        .start_file(FileTransferRequest {
            offer: offer.clone(),
            file: File::open(&path).expect("open local fixture"),
            offset: 0,
            length: expected.len() as u64,
            completion: Box::new(Completion(completion_tx)),
        })
        .expect("start local transfer");
    completion_rx
        .recv_timeout(Duration::from_secs(10))
        .expect("local source completion")
        .expect("local source transfer");

    let mut received = Vec::new();
    loop {
        match event_rx
            .recv_timeout(Duration::from_secs(10))
            .expect("local destination event")
        {
            BlobTransferEvent::Chunk {
                transfer_id: found,
                bytes,
            } => {
                assert_eq!(found, transfer_id);
                received.extend_from_slice(&bytes);
            }
            BlobTransferEvent::Finished { transfer_id: found } => {
                assert_eq!(found, transfer_id);
                break;
            }
            BlobTransferEvent::Failed { reason, .. } => {
                panic!("local blob transfer failed: {reason}")
            }
            event => panic!("unexpected local blob transfer event: {event:?}"),
        }
    }
    assert_eq!(received, expected);
    receiver.cancel(&offer);
    let empty_id = BlobTransferId(92);
    let empty_offer = receiver
        .open(destination, empty_id)
        .expect("open empty transfer receiver");
    let (empty_completion_tx, empty_completion_rx) = std::sync::mpsc::channel();
    sender
        .start_file(FileTransferRequest {
            offer: empty_offer.clone(),
            file: File::open(&path).expect("open empty fixture"),
            offset: 0,
            length: 0,
            completion: Box::new(Completion(empty_completion_tx)),
        })
        .expect("start empty transfer");
    empty_completion_rx
        .recv_timeout(Duration::from_secs(10))
        .expect("empty source completion")
        .expect("empty source transfer");
    assert!(matches!(
        event_rx
            .recv_timeout(Duration::from_secs(10))
            .expect("empty destination event"),
        BlobTransferEvent::Finished { transfer_id } if transfer_id == empty_id
    ));
    receiver.cancel(&empty_offer);
    let _ = std::fs::remove_file(path);
}