bevy_replicon 0.39.5

use core::cmp::Reverse;

use bevy::{ecs::component::ComponentId, prelude::*};
use log::debug;

use super::registry::{
    ReplicationRegistry,
    receive_fns::{MutWrite, RemoveFn, WriteFn},
};

/// Marker-based replication receive functions for [`App`].
///
/// Allows customizing behavior on clients when receiving updates from the server.
///
/// We check markers on receive instead of archetypes because on client we don't
/// know an incoming entity's archetype in advance.
pub trait AppMarkerExt {
    /// Registers a component as a marker.
    ///
    /// Can be used to override how this component or other components will be written or removed
    /// based on marker-component presence.
    /// For details see [`Self::set_marker_fns`].
    ///
    /// This function registers markers with default [`MarkerConfig`].
    /// See also [`Self::register_marker_with`].
    fn register_marker<M: Component>(&mut self) -> &mut Self;

    /// Same as [`Self::register_marker`], but also accepts marker configuration.
    fn register_marker_with<M: Component>(&mut self, config: MarkerConfig) -> &mut Self;

    /**
    Associates receive functions with a marker for a component.

    If this marker is present on an entity and its priority is the highest,
    then these functions will be called for this component during replication
    instead of [`default_write`](super::registry::receive_fns::default_write) /
    [`default_insert_write`](super::registry::receive_fns::default_insert_write) and
    [`default_remove`](super::registry::receive_fns::default_remove).
    See also [`Self::set_receive_fns`].

    # Examples

    In this example we write all received updates for `Health` component into user's
    `History<Health>` if `Predicted` marker is present on the client entity. In this
    scenario, you'd insert `Predicted` the first time the entity is replicated.
    Then `Health` updates after that will be inserted to the history.

    ```
    # use bevy::state::app::StatesPlugin;
    use bevy::{ecs::component::Mutable, platform::collections::HashMap, prelude::*};
    use bevy_replicon::{
        bytes::Bytes,
        prelude::*,
        shared::{
            replication::{
                receive_markers::MarkerConfig,
                deferred_entity::DeferredEntity,
                registry::{
                    ctx::{RemoveCtx, WriteCtx},
                    rule_fns::RuleFns,
                },
            },
            replicon_tick::RepliconTick,
        },
    };
    use serde::{Deserialize, Serialize};

    # let mut app = App::new();
    # app.add_plugins((StatesPlugin, RepliconPlugins));
    app.replicate::<Health>()
        .register_marker_with::<Predicted>(MarkerConfig {
            need_history: true, // Enable writing for values that are older than the last received value.
            ..Default::default()
        })
        .set_marker_fns::<Predicted, Health>(write_history, remove_history::<Health>);

    /// Instead of writing into a component directly, it writes data into [`History<C>`].
    fn write_history<C: Component<Mutability = Mutable>>(
        ctx: &mut WriteCtx,
        rule_fns: &RuleFns<C>,
        entity: &mut DeferredEntity,
        message: &mut Bytes,
    ) -> Result<()> {
        let component: C = rule_fns.deserialize(ctx, message)?;
        if let Some(mut history) = entity.get_mut::<History<C>>() {
            history.insert(ctx.message_tick, component);
        } else {
            entity.insert(History([(ctx.message_tick, component)].into()));
        }

        Ok(())
    }

    /// Removes component `C` and its history.
    fn remove_history<C: Component>(_ctx: &mut RemoveCtx, entity: &mut DeferredEntity) {
        entity.remove::<History<C>>().remove::<C>();
    }

    /// If this marker is present on an entity, registered components will be stored in [`History<T>`].
    ///
    /// Present only on clients.
    #[derive(Component)]
    struct Predicted;

    /// Stores history of values of `C` received from server.
    ///
    /// Present only on clients.
    #[derive(Component, Deref, DerefMut)]
    struct History<C>(HashMap<RepliconTick, C>);

    #[derive(Component, Deref, DerefMut, Serialize, Deserialize)]
    struct Health(u32);
    ```
    **/
    fn set_marker_fns<M: Component, C: Component<Mutability: MutWrite<C>>>(
        &mut self,
        write: WriteFn<C>,
        remove: RemoveFn,
    ) -> &mut Self;

    /**
    Sets default functions for a component when there are no markers.

    If there are no markers present on an entity, then these functions will
    be called for this component during replication instead of
    [`default_write`](super::registry::receive_fns::default_write) /
    [`default_insert_write`](super::registry::receive_fns::default_insert_write) and
    [`default_remove`](super::registry::receive_fns::default_remove).
    See also [`Self::set_marker_fns`].

    # Examples

    Don't update the component if the client receives the same value:

    ```
    # use bevy::state::app::StatesPlugin;
    use bevy::prelude::*;
    use bevy_replicon::{prelude::*, shared::replication::registry::receive_fns};
    use serde::{Deserialize, Serialize};

    # let mut app = App::new();
    # app.add_plugins((StatesPlugin, RepliconPlugins));
    app.replicate::<Health>().set_receive_fns::<Health>(
        receive_fns::write_if_neq, // We provide a built-in function for it, but you can write your own functions.
        receive_fns::default_remove::<Health>,
    );

    #[derive(Component, Serialize, Deserialize, PartialEq)]
    struct Health(u32);
    ```
    */
    fn set_receive_fns<C: Component<Mutability: MutWrite<C>>>(
        &mut self,
        write: WriteFn<C>,
        remove: RemoveFn,
    ) -> &mut Self;
}

impl AppMarkerExt for App {
    fn register_marker<M: Component>(&mut self) -> &mut Self {
        self.register_marker_with::<M>(MarkerConfig::default())
    }

    fn register_marker_with<M: Component>(&mut self, config: MarkerConfig) -> &mut Self {
        debug!("registering marker `{}`", ShortName::of::<M>());
        let component_id = self.world_mut().register_component::<M>();
        let mut receive_markers = self.world_mut().resource_mut::<ReceiveMarkers>();
        let marker_id = receive_markers.insert(ReceiveMarker {
            component_id,
            config,
        });

        let mut replicaton_fns = self.world_mut().resource_mut::<ReplicationRegistry>();
        replicaton_fns.register_marker(marker_id);

        self
    }

    fn set_marker_fns<M: Component, C: Component<Mutability: MutWrite<C>>>(
        &mut self,
        write: WriteFn<C>,
        remove: RemoveFn,
    ) -> &mut Self {
        debug!(
            "adding fns for marker `{}` for component `{}`",
            ShortName::of::<M>(),
            ShortName::of::<C>()
        );
        let component_id = self.world_mut().register_component::<M>();
        let receive_markers = self.world().resource::<ReceiveMarkers>();
        let marker_id = receive_markers.marker_id(component_id);
        self.world_mut()
            .resource_scope(|world, mut registry: Mut<ReplicationRegistry>| {
                registry.set_marker_fns::<C>(world, marker_id, write, remove);
            });

        self
    }

    fn set_receive_fns<C: Component<Mutability: MutWrite<C>>>(
        &mut self,
        write: WriteFn<C>,
        remove: RemoveFn,
    ) -> &mut Self {
        debug!(
            "setting receive fns for component `{}`",
            ShortName::of::<C>()
        );
        self.world_mut()
            .resource_scope(|world, mut registry: Mut<ReplicationRegistry>| {
                registry.set_receive_fns::<C>(world, write, remove);
            });

        self
    }
}

/// Registered markers that override receive functions if present.
#[derive(Resource, Default)]
pub(crate) struct ReceiveMarkers(Vec<ReceiveMarker>);

impl ReceiveMarkers {
    /// Inserts a new marker, maintaining sorting by their priority in descending order.
    ///
    /// May invalidate previously returned [`ReceiveMarkerIndex`] due to sorting.
    ///
    /// Use [`ReplicationRegistry::register_marker`] to register a slot for receive functions for this marker.
    fn insert(&mut self, marker: ReceiveMarker) -> ReceiveMarkerIndex {
        let key = Reverse(marker.config.priority);
        let index = self
            .0
            .binary_search_by_key(&key, |marker| Reverse(marker.config.priority))
            .unwrap_or_else(|index| index);

        self.0.insert(index, marker);

        ReceiveMarkerIndex(index)
    }

    /// Returns marker ID from its component ID.
    fn marker_id(&self, component_id: ComponentId) -> ReceiveMarkerIndex {
        let index = self
            .0
            .iter()
            .position(|marker| marker.component_id == component_id)
            .unwrap_or_else(|| panic!("marker {component_id:?} wasn't registered"));

        ReceiveMarkerIndex(index)
    }

    pub(super) fn iter_require_history(&self) -> impl Iterator<Item = bool> + '_ {
        self.0.iter().map(|marker| marker.config.need_history)
    }
}

/// Component marker information.
///
/// See also [`ReceiveMarkers`].
struct ReceiveMarker {
    /// Marker ID.
    component_id: ComponentId,

    /// User-registered configuration.
    config: MarkerConfig,
}

/// Parameters for a marker.
#[derive(Default)]
pub struct MarkerConfig {
    /// Priority of this marker.
    ///
    /// All tokens are sorted by priority, and if there are multiple matching
    /// markers, the marker with the highest priority will be used.
    ///
    /// By default set to `0`.
    pub priority: usize,

    /// Represents whether a marker needs to process old mutations.
    ///
    /// Since mutations use [`Channel::Unreliable`](crate::shared::backend::channels::Channel),
    /// a client may receive an older mutation for an entity component. By default these mutations are discarded,
    /// but some markers may need them. If this field is set to `true`, old component mutations will
    /// be passed to the writing function for this marker.
    ///
    /// By default set to `false`.
    pub need_history: bool,
}

/// Stores which markers are present on an entity.
pub(crate) struct EntityMarkers {
    markers: Vec<bool>,
    need_history: bool,
}

impl EntityMarkers {
    pub(crate) fn read<'a>(
        &'a mut self,
        markers: &ReceiveMarkers,
        entity: impl Into<EntityRef<'a>>,
    ) {
        self.markers.clear();
        self.need_history = false;

        let entity = entity.into();
        for marker in &markers.0 {
            let contains = entity.contains_id(marker.component_id);
            self.markers.push(contains);
            if contains && marker.config.need_history {
                self.need_history = true;
            }
        }
    }

    /// Returns a slice of which markers are present on an entity.
    ///
    /// Indices corresponds markers in to [`ReceiveMarkers`].
    pub(super) fn markers(&self) -> &[bool] {
        &self.markers
    }

    /// Returns `true` if an entity has at least one marker that needs history.
    pub(crate) fn need_history(&self) -> bool {
        self.need_history
    }
}

impl FromWorld for EntityMarkers {
    fn from_world(world: &mut World) -> Self {
        let markers = world.resource::<ReceiveMarkers>();
        Self {
            markers: Vec::with_capacity(markers.0.len()),
            need_history: false,
        }
    }
}

/// Can be obtained from [`ReceiveMarkers::insert`].
///
/// Shouldn't be stored anywhere since insertion may invalidate old indices.
#[derive(Clone, Copy, Deref, Debug)]
pub(super) struct ReceiveMarkerIndex(usize);

#[cfg(test)]
mod tests {
    use serde::{Deserialize, Serialize};

    use super::*;
    use crate::shared::replication::registry::receive_fns;

    #[test]
    #[should_panic]
    fn non_registered_marker() {
        let mut app = App::new();
        app.init_resource::<ReceiveMarkers>()
            .init_resource::<ReplicationRegistry>()
            .set_marker_fns::<Marker, TestComponent>(
                receive_fns::default_write,
                receive_fns::default_remove::<TestComponent>,
            );
    }

    #[test]
    fn sorting() {
        let mut app = App::new();
        app.init_resource::<ReceiveMarkers>()
            .init_resource::<ReplicationRegistry>()
            .register_marker::<MarkerA>()
            .register_marker_with::<MarkerB>(MarkerConfig {
                priority: 2,
                ..Default::default()
            })
            .register_marker_with::<MarkerC>(MarkerConfig {
                priority: 1,
                ..Default::default()
            })
            .register_marker::<MarkerD>();

        let markers = app.world().resource::<ReceiveMarkers>();
        let priorities: Vec<_> = markers
            .0
            .iter()
            .map(|marker| marker.config.priority)
            .collect();
        assert_eq!(priorities, [2, 1, 0, 0]);
    }

    #[derive(Component)]
    struct Marker;

    #[derive(Component)]
    struct MarkerA;

    #[derive(Component)]
    struct MarkerB;

    #[derive(Component)]
    struct MarkerC;

    #[derive(Component)]
    struct MarkerD;

    #[derive(Component, Serialize, Deserialize)]
    struct TestComponent;
}