retroglyph-window 0.4.0

//! [`WindowBackend`]: the generic [`Backend`](retroglyph_core::Backend) implementation for
//! windowed presenters.

use crate::presenter::Presenter;
use retroglyph_core::DrawCell;
use retroglyph_core::backend::{Cursor, Input, Output};
use retroglyph_core::event::{Event, MouseEvent, MouseEventKind};
use retroglyph_core::grid::Size;
use std::collections::VecDeque;
use std::time::Duration;

/// A [`Backend`](retroglyph_core::Backend) built from a [`Presenter`] plus an input event queue.
///
/// [`Input`] and [`Output`] are independent facets of `Backend`, which does not fit a window as
/// one type: some event loop owns input, while a per-renderer surface owns output.
/// `WindowBackend` reunites the two (implementing `Output` by delegating to `P`, `Input` via
/// its own event queue, and the no-op default `Cursor`), so [`Terminal`](retroglyph_core::Terminal)
/// gets the full `Backend` it needs, while renderer crates implement only [`Presenter`]:
///
/// ```text
/// event loop.push_event(e) ──> VecDeque<Event> ──> app.poll_event()
///                                                        │
///                                                        v
///                                             Terminal<WindowBackend<P>>
///                                                        │
///                              draw / flush / resize     v
///                              ◄────────────────────  WindowBackend
///                                                        │
///                                                        v
///                                                 P: Presenter (output)
/// ```
///
/// Because `WindowBackend` owns input, a [`Presenter`] should **not** implement [`Input`] or
/// [`Cursor`] itself for windowed use: those impls would be dead (the event loop pushes to
/// *this* queue, not the presenter's) and would silently miss the `Mouse(Moved)` coalescing that
/// [`push_event`](WindowBackend::push_event) applies. A presenter that also wants a direct
/// headless `Terminal<Self>` input path (as `retroglyph-software` does for pixel tests) may still
/// implement `Input` for that path, accepting that a bare queue does not coalesce; a presenter
/// with no such path (as `retroglyph-gl`) implements only `Presenter`.
///
/// With the `winit` feature enabled, `winit::run_windowed` and `winit::run_app` own the event
/// loop, call `push_event` as winit events are translated, and call [`Presenter::present`] once
/// per frame; callers never touch `WindowBackend` directly. With `winit` disabled,
/// `retroglyph-window` exports no event loop at all: a caller driving its own loop (SDL2, tao, a
/// custom driver) constructs `WindowBackend::new(presenter)` itself, calls `push_event` for each
/// translated input event, and calls `Terminal::present` (which drives `Presenter::flush`) plus
/// `presenter_mut().present()` once per frame.
///
/// # Examples
///
/// ```
/// use retroglyph_core::{Backend, DrawCell, Event, Input, Output, Pos, Size, Terminal, Tile};
/// use retroglyph_window::{Presenter, WindowBackend, WindowHandle};
/// use std::sync::Arc;
/// use std::time::Duration;
///
/// struct NullPresenter;
///
/// impl Output for NullPresenter {
///     type Error = core::convert::Infallible;
///
///     fn draw<'a, I>(&mut self, _content: I) -> Result<(), Self::Error>
///     where
///         I: Iterator<Item = DrawCell<'a>>,
///     {
///         Ok(())
///     }
///
///     fn draw_layers<'a, I>(&mut self, _content: I) -> Result<(), Self::Error>
///     where
///         I: Iterator<Item = DrawCell<'a>>,
///     {
///         Ok(())
///     }
///
///     fn flush(&mut self) -> Result<(), Self::Error> {
///         Ok(())
///     }
///
///     fn size(&self) -> Size {
///         Size { width: 4, height: 2 }
///     }
///
///     fn clear(&mut self) -> Result<(), Self::Error> {
///         Ok(())
///     }
///
///     fn resize(&mut self, _size: Size) {}
/// }
///
/// impl Presenter for NullPresenter {
///     type SurfaceError = core::convert::Infallible;
///
///     fn init_surface(&mut self, _window: Arc<dyn WindowHandle>) -> Result<(), Self::SurfaceError> {
///         Ok(())
///     }
///
///     fn resize_surface(&mut self, _width: u32, _height: u32) {}
///
///     fn present(&mut self) -> Result<(), Self::SurfaceError> {
///         Ok(())
///     }
///
///     fn cell_size(&self) -> (u32, u32) {
///         (8, 16)
///     }
/// }
///
/// // A caller driving its own loop (SDL2, tao, a hand-rolled driver) builds
/// // `WindowBackend` directly, no `winit` feature required.
/// let backend = WindowBackend::new(NullPresenter);
/// let mut term = Terminal::new(backend);
///
/// // The loop pushes each translated input event onto the queue...
/// term.backend_mut().push_event(Event::FocusGained);
///
/// // ...and the app drains it through the normal `Terminal` polling API,
/// // which never blocks for `WindowBackend`.
/// while term.poll(Duration::ZERO).is_some() {}
///
/// // Once per frame: `Terminal::present` diffs the grid and drives
/// // `Presenter::flush`, then the caller drives `Presenter::present` itself
/// // to push pixels to the window.
/// term.present().unwrap();
/// term.backend_mut().presenter_mut().present().unwrap();
/// ```
///
/// [`poll_event`](Input::poll_event) never blocks: frame timing is owned by the event loop, not
/// by input waits.
pub struct WindowBackend<P: Presenter> {
    presenter: P,
    events: VecDeque<Event>,
}

impl<P: Presenter> WindowBackend<P> {
    /// Wrap a presenter, creating an empty event queue.
    #[must_use]
    pub const fn new(presenter: P) -> Self {
        Self {
            presenter,
            events: VecDeque::new(),
        }
    }

    /// The wrapped presenter.
    #[must_use]
    pub const fn presenter(&self) -> &P {
        &self.presenter
    }

    /// The wrapped presenter, mutably.
    pub const fn presenter_mut(&mut self) -> &mut P {
        &mut self.presenter
    }

    /// Unwrap into the presenter, discarding queued events.
    #[must_use]
    pub fn into_presenter(self) -> P {
        self.presenter
    }
}

impl<P: Presenter> Output for WindowBackend<P> {
    type Error = P::Error;

    fn draw<'a, I>(&mut self, content: I) -> Result<(), Self::Error>
    where
        I: Iterator<Item = DrawCell<'a>>,
    {
        self.presenter.draw(content)
    }

    fn draw_layers<'a, I>(&mut self, content: I) -> Result<(), Self::Error>
    where
        I: Iterator<Item = DrawCell<'a>>,
    {
        self.presenter.draw_layers(content)
    }

    fn flush(&mut self) -> Result<(), Self::Error> {
        self.presenter.flush()
    }

    fn size(&self) -> Size {
        self.presenter.size()
    }

    fn clear(&mut self) -> Result<(), Self::Error> {
        self.presenter.clear()
    }

    fn resize(&mut self, size: Size) {
        self.presenter.resize(size);
    }

    fn needs_full_frame(&self) -> bool {
        self.presenter.needs_full_frame()
    }

    fn composites_layers(&self) -> bool {
        self.presenter.composites_layers()
    }
}

impl<P: Presenter> Input for WindowBackend<P> {
    fn poll_event(&mut self, _timeout: Duration) -> Option<Event> {
        // Non-blocking by design: the caller's event loop drives frame
        // timing, so there is nothing to sleep on here.
        self.events.pop_front()
    }

    fn push_event(&mut self, event: Event) {
        // Coalesce consecutive `Mouse(Moved)` events: winit can deliver `CursorMoved` at device
        // polling rate (hundreds/sec) though only the latest position matters once the next frame
        // polls the queue, so replace the queue's tail in place instead of growing it unbounded
        // (retroglyph#294). Every other event kind (clicks, scrolls, keys, resize, ...) still
        // pushes in O(1) as before; only two back-to-back `Moved` events collapse.
        if let Event::Mouse(MouseEvent {
            kind: MouseEventKind::Moved,
            ..
        }) = &event
            && let Some(
                back @ Event::Mouse(MouseEvent {
                    kind: MouseEventKind::Moved,
                    ..
                }),
            ) = self.events.back_mut()
        {
            *back = event;
            return;
        }
        self.events.push_back(event);
    }
}

// No hardware text cursor in windowed mode (games draw their own): the trait's no-op default
// bodies are exactly right here.
impl<P: Presenter> Cursor for WindowBackend<P> {}

#[cfg(test)]
mod tests {
    use super::*;
    use crate::presenter::WindowHandle;
    use retroglyph_core::event::{KeyModifiers, MouseButton};
    use retroglyph_core::grid::Pos;
    use std::sync::Arc;

    struct NullPresenter;

    impl Output for NullPresenter {
        type Error = core::convert::Infallible;

        fn draw<'a, I>(&mut self, _content: I) -> Result<(), Self::Error>
        where
            I: Iterator<Item = DrawCell<'a>>,
        {
            Ok(())
        }

        fn draw_layers<'a, I>(&mut self, _content: I) -> Result<(), Self::Error>
        where
            I: Iterator<Item = DrawCell<'a>>,
        {
            Ok(())
        }

        fn flush(&mut self) -> Result<(), Self::Error> {
            Ok(())
        }

        fn size(&self) -> Size {
            Size {
                width: 4,
                height: 2,
            }
        }

        fn clear(&mut self) -> Result<(), Self::Error> {
            Ok(())
        }

        fn resize(&mut self, _size: Size) {}
    }

    impl Presenter for NullPresenter {
        type SurfaceError = core::convert::Infallible;

        fn init_surface(
            &mut self,
            _window: Arc<dyn WindowHandle>,
        ) -> Result<(), Self::SurfaceError> {
            Ok(())
        }

        fn resize_surface(&mut self, _width: u32, _height: u32) {}

        fn present(&mut self) -> Result<(), Self::SurfaceError> {
            Ok(())
        }

        fn cell_size(&self) -> (u32, u32) {
            (8, 16)
        }
    }

    fn moved(x: u16) -> Event {
        Event::Mouse(MouseEvent {
            kind: MouseEventKind::Moved,
            position: Pos { x, y: 0 },
            pixel_position: None,
            modifiers: KeyModifiers::NONE,
        })
    }

    /// Regression test for retroglyph#294: a burst of consecutive `Moved` events must coalesce
    /// down to the single most recent one instead of growing the queue by one entry per event.
    #[test]
    fn consecutive_moved_events_coalesce_to_one() {
        let mut backend = WindowBackend::new(NullPresenter);
        for x in 0..1_000u16 {
            backend.push_event(moved(x));
        }
        assert_eq!(backend.events.len(), 1);
        assert_eq!(backend.poll_event(Duration::ZERO), Some(moved(999)));
        assert_eq!(backend.poll_event(Duration::ZERO), None);
    }

    /// A non-`Moved` event between two `Moved` bursts must not be swallowed: only *consecutive*
    /// `Moved` events collapse, so interleaving a click still yields three distinct events.
    #[test]
    fn non_moved_event_breaks_coalescing() {
        let mut backend = WindowBackend::new(NullPresenter);
        backend.push_event(moved(1));
        backend.push_event(moved(2));
        backend.push_event(Event::Mouse(MouseEvent {
            kind: MouseEventKind::Down(MouseButton::Left),
            position: Pos { x: 2, y: 0 },
            pixel_position: None,
            modifiers: KeyModifiers::NONE,
        }));
        backend.push_event(moved(3));
        assert_eq!(backend.events.len(), 3);
        assert_eq!(backend.poll_event(Duration::ZERO), Some(moved(2)));
        assert!(matches!(
            backend.poll_event(Duration::ZERO),
            Some(Event::Mouse(MouseEvent {
                kind: MouseEventKind::Down(MouseButton::Left),
                ..
            }))
        ));
        assert_eq!(backend.poll_event(Duration::ZERO), Some(moved(3)));
    }
}