//! Packet ingress and local call dispatch.

use crate::protocol::types::{ArchivedCallMessage, ArchivedDataMessage, ArchivedFaultMessage};
use crate::protocol::{
    CallMessage, ProtocolFault, decode_frame, deserialize_archived_bytes,
    introspection::INTROSPECTION_PROCEDURE_ID, validate_call, validate_header,
};

use super::super::{ActiveHook, HookKey, RouteDecision};
use super::core::{
    Endpoint, EndpointError, EndpointOutcome, Ingress, LocalEvent, ProtocolEndpoint,
};

impl ProtocolEndpoint {
    fn supports_local_procedure(&self, dst_leaf: Option<&str>, procedure_id: &str) -> bool {
        match dst_leaf {
            Some(leaf_name) => self
                .leaves
                .get(leaf_name)
                .map(|leaf| {
                    leaf.procedures
                        .iter()
                        .any(|procedure| procedure == procedure_id)
                })
                .unwrap_or(false),
            None => self.endpoint_procedures.contains(procedure_id),
        }
    }

    pub(crate) fn handle_local_call(
        &mut self,
        header: crate::protocol::PacketHeader,
        message: CallMessage,
    ) -> Result<EndpointOutcome, EndpointError> {
        let key = message
            .response_hook
            .as_ref()
            .map(|hook| HookKey::new(hook.return_path.clone(), hook.hook_id));

        if message.procedure_id == INTROSPECTION_PROCEDURE_ID {
            return self.handle_introspection(&header, key);
        }

        let procedure_is_supported =
            self.supports_local_procedure(header.dst_leaf.as_deref(), &message.procedure_id);

        if !procedure_is_supported {
            let fault = if header
                .dst_leaf
                .as_ref()
                .is_some_and(|name| !self.leaves.contains_key(name))
            {
                ProtocolFault::UNKNOWN_LEAF
            } else {
                ProtocolFault::UNKNOWN_PROCEDURE
            };
            return self.emit_fault_if_possible(key, fault);
        }

        if let Some(hook) = &message.response_hook
            && let Some(key) = key.clone()
            && hook.return_path != self.path
            && self
                .hooks
                .insert_active(
                    key.clone(),
                    ActiveHook {
                        peer_path: header.src_path.clone(),
                        procedure_id: message.procedure_id.clone(),
                        local_ended: false,
                        peer_ended: false,
                    },
                )
                .is_err()
        {
            return self.emit_fault_if_possible(Some(key), ProtocolFault::INTERNAL_ERROR);
        }

        Ok(EndpointOutcome::Local(LocalEvent::Call { header, message }))
    }
}

impl Endpoint for ProtocolEndpoint {
    fn path(&self) -> &[alloc::string::String] {
        &self.path
    }

    fn receive(
        &mut self,
        ingress: &Ingress,
        frame: crate::protocol::FrameBytes,
    ) -> Result<EndpointOutcome, EndpointError> {
        let parsed = decode_frame(&frame)?;
        let header = parsed.header();
        validate_header(header)?;

        if !self.valid_source_for_ingress(ingress, &header.src_path) {
            return Ok(EndpointOutcome::Dropped);
        }

        match header.packet_type {
            crate::protocol::PacketType::Call => {
                // Calls only enter from the parent side of the tree or from the endpoint
                // itself. Children can return data/faults, but they do not initiate new
                // calls through this node.
                if !matches!(ingress, Ingress::Parent | Ingress::Local) {
                    return Ok(EndpointOutcome::Dropped);
                }

                match self.decide_route(&header.dst_path) {
                    RouteDecision::Child(index) => Ok(EndpointOutcome::Forward {
                        route: RouteDecision::Child(index),
                        frame,
                    }),
                    RouteDecision::Parent => Ok(EndpointOutcome::Forward {
                        route: RouteDecision::Parent,
                        frame,
                    }),
                    RouteDecision::Drop => Ok(EndpointOutcome::Dropped),
                    RouteDecision::Local => {
                        let (header, payload) = parsed.into_parts();
                        let message = deserialize_archived_bytes::<ArchivedCallMessage, CallMessage>(
                            payload,
                        )?;
                        validate_call(&header, &message)?;
                        self.handle_local_call(header, message)
                    }
                }
            }
            crate::protocol::PacketType::Data => match self.decide_route(&header.dst_path) {
                RouteDecision::Local => {
                    let (header, payload) = parsed.into_parts();
                    let message = deserialize_archived_bytes::<
                        ArchivedDataMessage,
                        crate::protocol::DataMessage,
                    >(payload)?;
                    self.handle_local_data(header, message)
                }
                RouteDecision::Child(index) => Ok(EndpointOutcome::Forward {
                    route: RouteDecision::Child(index),
                    frame,
                }),
                RouteDecision::Parent => Ok(EndpointOutcome::Forward {
                    route: RouteDecision::Parent,
                    frame,
                }),
                RouteDecision::Drop => Ok(EndpointOutcome::Dropped),
            },
            crate::protocol::PacketType::Fault => match self.decide_route(&header.dst_path) {
                RouteDecision::Local => {
                    let (header, payload) = parsed.into_parts();
                    let message = deserialize_archived_bytes::<
                        ArchivedFaultMessage,
                        crate::protocol::FaultMessage,
                    >(payload)?;
                    self.handle_local_fault(header, message)
                }
                RouteDecision::Child(index) => Ok(EndpointOutcome::Forward {
                    route: RouteDecision::Child(index),
                    frame,
                }),
                RouteDecision::Parent => Ok(EndpointOutcome::Forward {
                    route: RouteDecision::Parent,
                    frame,
                }),
                RouteDecision::Drop => Ok(EndpointOutcome::Dropped),
            },
        }
    }
}