macltok

use std::{

    collections::{BTreeMap, BTreeSet},

    sync::{

        Arc,

        atomic::{AtomicBool, Ordering},

    },

    time::Duration,

};

use futures_util::{StreamExt, stream::FuturesUnordered};

use matrix_sdk::{

    Client, Room, RoomState,

    event_cache::RedecryptorReport,

    sliding_sync::{ResponseCommitBatch, ResponseCommitHook},

};

use ruma::{

    OwnedRoomId, OwnedUserId, RoomId,

    events::{

        AnySyncTimelineEvent, ignored_user_list::IgnoredUserListEventContent,

        room::encrypted::OriginalSyncRoomEncryptedEvent,

    },

    serde::Raw,

};

use serde_json::Value;

use tokio::sync::{mpsc, oneshot, watch};

use super::state::{Candidate, Checkpoint, Data, SavedEvent, SyncState, Window, id, invalid, now};

use crate::{

    CommandOutput, EngineConfig, Error, ErrorKind, Event, MentionCaptureState, MentionEntry,

    MentionGapReason, MentionKey, MentionReason, MentionsCommand, MentionsPage, MentionsUpdate,

    TimelineContent, TimelineItem,

    engine::{MediaService, MentionsStore, context, executor::EngineBoxFuture},

    normalise::{MediaRegistration, MediaScope, normalise_observed},

    transport::EventSender,

};

#[cfg(all(test, feature = "sqlite"))]

#[path = "service_tests.rs"]

mod tests;

const HOOK_TIMEOUT: Duration = Duration::from_secs(10);

const FLUSH_RETRY_MS: u64 = 60_000;

#[derive(Clone)]

pub(crate) struct Handle {

    requests: mpsc::Sender<Request>,

    timed_out: Arc<AtomicBool>,

}

enum Request {

    Batch(ResponseCommitBatch, oneshot::Sender<()>),

    Command(

        MentionsCommand,

        oneshot::Sender<Result<CommandOutput, Error>>,

    ),

    Stop(oneshot::Sender<()>),

}

pub(crate) struct Service {

    client: Client,

    account: OwnedUserId,

    media: Arc<MediaService>,

    /// as many media as the inbox keeps events

    media_scope: MediaScope,

    store: Option<MentionsStore>,

    data: Data,

    sync: SyncState,

    dirty: bool,

    flush_after: u64,

    ignored: BTreeSet<OwnedUserId>,

    leaving: BTreeSet<OwnedRoomId>,

    timed_out: Arc<AtomicBool>,

    config: EngineConfig,

    requests: mpsc::Receiver<Request>,

    updates: watch::Sender<MentionsPage>,

    recovery_budget: usize,

    latest_scan: bool,

    recovery_retry: u64,

}

enum Work {

    Capture(

        String,

        u64,

        Result<(crate::EventContext, Vec<MediaRegistration>, Vec<Value>), Error>,

    ),

    Candidate(String, Result<Value, Error>),

    History(

        bool,

        Option<String>,

        Result<ruma::api::client::push::get_notifications::v3::Response, Error>,

    ),

}

impl Handle {

    /// never fails, a mentions failure becomes a coverage gap rather than a stalled sync

    pub(crate) fn hook(&self) -> ResponseCommitHook {

        let handle = self.clone();

        ResponseCommitHook::new(move |batch| {

            let handle = handle.clone();

            async move {

                let committed = async {

                    let (reply, response) = oneshot::channel();

                    handle

                        .requests

                        .send(Request::Batch(batch, reply))

                        .await

                        .ok()?;

                    response.await.ok()

                };

                match matrix_sdk::timeout::timeout(committed, HOOK_TIMEOUT).await {

                    Ok(Some(())) => {}

                    Ok(None) => tracing::warn!("mentions service stopped, sync carries on"),

                    Err(_) => {

                        handle.timed_out.store(true, Ordering::Release);

                        tracing::warn!("mentions commit timed out, sync carries on");

                    }

                }

                Ok(())

            }

        })

    }

    pub(crate) async fn execute(&self, command: MentionsCommand) -> Result<CommandOutput, Error> {

        let (reply, response) = oneshot::channel();

        self.requests

            .send(Request::Command(command, reply))

            .await

            .map_err(|_| Error::interrupted())?;

        response.await.map_err(|_| Error::interrupted())?

    }

    pub(crate) async fn stop(&self) {

        let (reply, response) = oneshot::channel();

        if self.requests.send(Request::Stop(reply)).await.is_ok() {

            let _ = response.await;

        }

    }

}

#[cfg(any(feature = "sqlite", feature = "indexeddb"))]

async fn open_store(

    store: Option<Result<MentionsStore, Error>>,

) -> (

    Option<MentionsStore>,

    Data,

    SyncState,

    Vec<MentionGapReason>,

) {

    let mut store = match store {

        None => return (None, Data::default(), SyncState::default(), Vec::new()),

        Some(Err(error)) => {

            tracing::error!(%error, "mentions store unavailable, the inbox runs in memory");

            return (

                None,

                Data::default(),

                SyncState::default(),

                vec![MentionGapReason::StoreFailed],

            );

        }

        Some(Ok(store)) => store,

    };

    let loaded = (|| {

        let data: Data = store.read("inbox")?.unwrap_or_default();

        let sync: SyncState = store.read("sync")?.unwrap_or_default();

        if sync.inbox_revision != data.revision {

            return Err(Error::new(

                ErrorKind::Store,

                "mentions checkpoint does not match its inbox",

            ));

        }

        Ok((data, sync))

    })();

    let (data, sync) = match loaded {

        Ok(loaded) => loaded,

        Err(error) => {

            tracing::warn!(%error, "resetting an unreadable mentions inbox");

            if let Err(error) = store.reset().await {

                tracing::error!(%error, "mentions store unavailable, the inbox runs in memory");

                return (

                    None,

                    Data::default(),

                    SyncState::default(),

                    vec![MentionGapReason::StoreFailed],

                );

            }

            (Data::default(), SyncState::default())

        }

    };

    let gaps = if store.was_reset() {

        vec![MentionGapReason::StoreReset]

    } else {

        Vec::new()

    };

    (Some(store), data, sync, gaps)

}

#[cfg(not(any(feature = "sqlite", feature = "indexeddb")))]

async fn open_store(

    store: Option<Result<MentionsStore, Error>>,

) -> (

    Option<MentionsStore>,

    Data,

    SyncState,

    Vec<MentionGapReason>,

) {

    let gaps = match store {

        None => Vec::new(),

        Some(Err(_)) => vec![MentionGapReason::StoreFailed],

        Some(Ok(store)) => match store {},

    };

    (None, Data::default(), SyncState::default(), gaps)

}

impl Service {

    pub(crate) async fn new(

        client: Client,

        media: Arc<MediaService>,

        store: Option<Result<MentionsStore, Error>>,

        config: EngineConfig,

    ) -> Result<(Handle, Self, watch::Receiver<MentionsPage>), Error> {

        let account = client

            .user_id()

            .ok_or_else(|| {

                Error::new(

                    ErrorKind::Unauthenticated,

                    "mentions require an authenticated account",

                )

            })?

            .to_owned();

        let (store, mut data, sync, gaps) = open_store(store).await;

        for reason in &gaps {

            data.gap(None, *reason, None);

        }

        let page = data.page(&account, None, 50)?;

        let media_scope = MediaScope::bounded(config.max_mention_context_events);

        media

            .register(

                &media_scope,

                page.entries

                    .iter()

                    .filter_map(|entry| data.events.get(&id(&entry.key)))

                    .flat_map(|event| event.media.clone())

                    .collect(),

            )

            .await;

        let (updates, receiver) = watch::channel(page);

        let (sender, requests) = mpsc::channel(config.command_capacity.max(1));

        let timed_out = Arc::new(AtomicBool::new(false));

        let mut service = Self {

            client,

            account,

            media,

            media_scope,

            store,

            data,

            sync,

            dirty: !gaps.is_empty(),

            flush_after: 0,

            ignored: BTreeSet::new(),

            leaving: BTreeSet::new(),

            timed_out: timed_out.clone(),

            config,

            requests,

            updates,

            recovery_budget: 20,

            latest_scan: true,

            recovery_retry: 0,

        };

        service.ignored = service.ignored_users().await;

        Ok((

            Handle {

                requests: sender,

                timed_out,

            },

            service,

            receiver,

        ))

    }

    async fn ignored_users(&self) -> BTreeSet<OwnedUserId> {

        self.client

            .account()

            .account_data::<IgnoredUserListEventContent>()

            .await

            .ok()

            .flatten()

            .and_then(|raw| raw.deserialize().ok())

            .map(|content| content.ignored_users.into_keys().collect())

            .unwrap_or_default()

    }

    async fn publish(&mut self) {

        let Ok(page) = self.data.page(&self.account, None, 50) else {

            return;

        };

        self.media

            .register(

                &self.media_scope,

                page.entries

                    .iter()

                    .filter_map(|entry| self.data.events.get(&id(&entry.key)))

                    .flat_map(|event| event.media.clone())

                    .collect(),

            )

            .await;

        self.updates.send_replace(page);

    }

    /// writes the sync record, and the inbox with it when `dirty`, in one commit so a

    /// checkpoint never lands without the inbox changes it covers

    async fn flush(&mut self) -> Result<(), Error> {

        if self.dirty {

            self.advance()?;

        }

        #[cfg(any(feature = "sqlite", feature = "indexeddb"))]

        if let Some(store) = &mut self.store {

            use super::state::json_len;

            use super::store::Write;

            let encode = |error| {

                Error::with_source(

                    ErrorKind::Store,

                    "encoding the mentions inbox failed",

                    error,

                )

            };

            let sync = serde_json::to_value(&self.sync).map_err(encode)?;

            let mut writes = Vec::new();

            if self.dirty {

                let available = store

                    .available(&["inbox", "sync"])

                    .saturating_sub(store.sealed_bound("sync", json_len(&sync)));

                let mut size = store.sealed_bound("inbox", json_len(&self.data));

                while size > available {

                    let Some(freed) = self.data.evict_one() else {

                        break;

                    };

                    size = size.saturating_sub(freed * 3);

                }

                writes.push(Write::Set(

                    "inbox".to_owned(),

                    serde_json::to_value(&self.data).map_err(encode)?,

                ));

            }

            writes.push(Write::Set("sync".to_owned(), sync));

            store.commit(store.revision(), writes).await?;

        }

        if self.dirty {

            self.dirty = false;

            self.publish().await;

        }

        Ok(())

    }

    fn advance(&mut self) -> Result<(), Error> {

        self.data.revision = self

            .data

            .revision

            .checked_add(1)

            .ok_or_else(|| invalid("mentions revision exhausted"))?;

        self.data.bound(

            self.config.max_mentions_entries,

            self.config.max_mention_context_events,

            self.config.max_mention_candidates,

        );

        self.sync.inbox_revision = self.data.revision;

        Ok(())

    }

    async fn apply(&mut self, data: Data) -> Result<(), Error> {

        let dirty = std::mem::replace(&mut self.dirty, true);

        let previous = std::mem::replace(&mut self.data, data);

        let result = self.flush().await;

        if result.is_err() {

            self.data = previous;

            self.dirty = dirty;

        }

        result

    }

    async fn store_failed(&mut self, error: Error) {

        tracing::error!(%error, "saving the mentions inbox failed");

        self.data.gap(None, MentionGapReason::StoreFailed, None);

        self.dirty = true;

        self.flush_after = now().saturating_add(FLUSH_RETRY_MS);

        self.publish().await;

    }

    async fn command(&mut self, command: MentionsCommand) -> Result<CommandOutput, Error> {

        match command {

            MentionsCommand::Page { cursor, limit } => {

                let page = self.data.page(&self.account, cursor.as_deref(), limit)?;

                self.media

                    .register(

                        &self.media_scope,

                        page.entries

                            .iter()

                            .filter_map(|entry| self.data.events.get(&id(&entry.key)))

                            .flat_map(|event| event.media.clone())

                            .collect(),

                    )

                    .await;

                Ok(CommandOutput::MentionsPage(page))

            }

            MentionsCommand::Context(key) => {

                let (context, media) = self.data.context(&key)?;

                self.media.register(&self.media_scope, media).await;

                Ok(CommandOutput::MentionContext(context))

            }

            MentionsCommand::RetryContext(key) => {

                let room = self

                    .client

                    .get_room(&key.room_id)

                    .filter(|room| room.state() == RoomState::Joined)

                    .ok_or_else(|| {

                        Error::new(

                            ErrorKind::Forbidden,

                            "saved context cannot be refetched after leaving the room",

                        )

                    })?;

                drop(room);

                let mut next = self.data.clone();

                let entry = next

                    .entries

                    .get_mut(&id(&key))

                    .ok_or_else(|| Error::new(ErrorKind::EventNotFound, "mention was not found"))?;

                entry.capture = MentionCaptureState::Pending;

                entry.revision = self.data.revision + 1;

                next.windows.entry(id(&key)).or_insert(Window {

                    before: Vec::new(),

                    target: Some(id(&key)),

                    after: Vec::new(),

                    start: None,

                    end: None,

                });

                self.apply(next).await?;

                let (context, media) = self.data.context(&key)?;

                self.media.register(&self.media_scope, media).await;

                Ok(CommandOutput::MentionContext(context))

            }

            MentionsCommand::SetRead { keys, read } => {

                let mut next = self.data.clone();

                for key in keys {

                    if let Some(entry) = next.entries.get_mut(&id(&key)) {

                        entry.read = read;

                        entry.revision = self.data.revision + 1;

                    }

                }

                self.apply(next).await?;

                Ok(CommandOutput::Done)

            }

            MentionsCommand::ReadThrough(boundary) => {

                if boundary.account != self.account || boundary.revision > self.data.revision {

                    return Err(invalid("invalid mentions read boundary"));

                }

                let mut next = self.data.clone();

                for entry in next

                    .entries

                    .values_mut()

                    .filter(|entry| entry.discovery_revision <= boundary.revision)

                {

                    entry.read = true;

                    entry.revision = self.data.revision + 1;

                }

                self.apply(next).await?;

                Ok(CommandOutput::Done)

            }

            MentionsCommand::Recover => {

                self.recovery_budget = 20;

                self.latest_scan = true;

                self.recovery_retry = 0;

                let mut next = self.data.clone();

                next.coverage.recovering = true;

                next.coverage.historical_supported = None;