use ruma::{
    OwnedUserId, RoomId, UserId,
    api::client::threads::get_threads::v1::IncludeThreads,
};

use crate::{
    Error, PduEvent, Result,
    database::KeyValueDatabase,
    service::{self, rooms::timeline::PduId},
    services, utils,
};

impl service::rooms::threads::Data for KeyValueDatabase {
    fn threads_until<'a>(
        &'a self,
        user_id: &'a UserId,
        room_id: &'a RoomId,
        until: u64,
        _include: &'a IncludeThreads,
    ) -> Result<Box<dyn Iterator<Item = Result<(u64, PduEvent)>> + 'a>> {
        let prefix = services()
            .rooms
            .short
            .get_shortroomid(room_id)?
            .expect("room exists")
            .get()
            .to_be_bytes()
            .to_vec();

        let mut current = prefix.clone();
        current.extend_from_slice(&(until - 1).to_be_bytes());

        Ok(Box::new(
            self.threadid_userids
                .iter_from(&current, true)
                .take_while(move |(k, _)| k.starts_with(&prefix))
                .map(move |(pduid, _users)| {
                    let count =
                        utils::u64_from_bytes(&pduid[(size_of::<u64>())..])
                            .map_err(|_| {
                                Error::bad_database(
                                    "Invalid pduid in threadid_userids.",
                                )
                            })?;

                    let pduid = PduId::new(pduid);

                    let mut pdu = services()
                        .rooms
                        .timeline
                        .get_pdu_from_id(&pduid)?
                        .ok_or_else(|| {
                            Error::bad_database(
                                "Invalid pduid reference in threadid_userids",
                            )
                        })?;
                    if pdu.sender != user_id {
                        pdu.remove_transaction_id()?;
                    }
                    Ok((count, pdu))
                }),
        ))
    }

    fn update_participants(
        &self,
        root_id: &PduId,
        participants: &[OwnedUserId],
    ) -> Result<()> {
        let users = participants
            .iter()
            .map(|user| user.as_bytes())
            .collect::<Vec<_>>()
            .join(&[0xFF][..]);

        self.threadid_userids.insert(root_id.as_bytes(), &users)?;

        Ok(())
    }

    fn get_participants(
        &self,
        root_id: &PduId,
    ) -> Result<Option<Vec<OwnedUserId>>> {
        if let Some(users) = self.threadid_userids.get(root_id.as_bytes())? {
            Ok(Some(
                users
                    .split(|b| *b == 0xFF)
                    .map(|bytes| {
                        UserId::parse(utils::string_from_bytes(bytes).map_err(
                            |_| {
                                Error::bad_database(
                                    "Invalid UserId bytes in threadid_userids.",
                                )
                            },
                        )?)
                        .map_err(|_| {
                            Error::bad_database(
                                "Invalid UserId in threadid_userids.",
                            )
                        })
                    })
                    .filter_map(Result::ok)
                    .collect(),
            ))
        } else {
            Ok(None)
        }
    }
}