// Copyright 2021, 2022 The Matrix.org Foundation C.I.C.
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
//     http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.

use std::collections::{BTreeSet, HashMap};

use mas_data_model::{BrowserSession, Session, User};
use sqlx::{PgConnection, PgExecutor, QueryBuilder};
use tracing::{info_span, Instrument};
use ulid::Ulid;
use uuid::Uuid;

use self::client::OAuth2ClientRepository;
use crate::{
    pagination::{process_page, QueryBuilderExt},
    user::BrowserSessionRepository,
    Clock, DatabaseError, DatabaseInconsistencyError, Repository,
};

pub mod access_token;
pub mod authorization_grant;
pub mod client;
pub mod consent;
pub mod refresh_token;

#[tracing::instrument(
    skip_all,
    fields(
        %session.id,
        user.id = %session.browser_session.user.id,
        user_session.id = %session.browser_session.id,
        client.id = %session.client.id,
    ),
    err,
)]
pub async fn end_oauth_session(
    executor: impl PgExecutor<'_>,
    clock: &Clock,
    session: Session,
) -> Result<(), DatabaseError> {
    let finished_at = clock.now();
    let res = sqlx::query!(
        r#"
            UPDATE oauth2_sessions
            SET finished_at = $2
            WHERE oauth2_session_id = $1
        "#,
        Uuid::from(session.id),
        finished_at,
    )
    .execute(executor)
    .await?;

    DatabaseError::ensure_affected_rows(&res, 1)
}

#[derive(sqlx::FromRow)]
struct OAuthSessionLookup {
    oauth2_session_id: Uuid,
    user_session_id: Uuid,
    oauth2_client_id: Uuid,
    scope: String,
}

#[tracing::instrument(
    skip_all,
    fields(
        %user.id,
        %user.username,
    ),
    err,
)]
pub async fn get_paginated_user_oauth_sessions(
    conn: &mut PgConnection,
    user: &User,
    before: Option<Ulid>,
    after: Option<Ulid>,
    first: Option<usize>,
    last: Option<usize>,
) -> Result<(bool, bool, Vec<Session>), DatabaseError> {
    let mut query = QueryBuilder::new(
        r#"
            SELECT
                os.oauth2_session_id,
                os.user_session_id,
                os.oauth2_client_id,
                os.scope,
                os.created_at,
                os.finished_at
            FROM oauth2_sessions os
            LEFT JOIN user_sessions us
              USING (user_session_id)
        "#,
    );

    query
        .push(" WHERE us.user_id = ")
        .push_bind(Uuid::from(user.id))
        .generate_pagination("oauth2_session_id", before, after, first, last)?;

    let span = info_span!(
        "Fetch paginated user oauth sessions",
        db.statement = query.sql()
    );
    let page: Vec<OAuthSessionLookup> = query
        .build_query_as()
        .fetch_all(&mut *conn)
        .instrument(span)
        .await?;

    let (has_previous_page, has_next_page, page) = process_page(page, first, last)?;

    let client_ids: BTreeSet<Ulid> = page
        .iter()
        .map(|i| Ulid::from(i.oauth2_client_id))
        .collect();

    let browser_session_ids: BTreeSet<Ulid> =
        page.iter().map(|i| Ulid::from(i.user_session_id)).collect();

    let clients = conn.oauth2_client().load_batch(client_ids).await?;

    // TODO: this can generate N queries instead of batching. This is less than
    // ideal
    let mut browser_sessions: HashMap<Ulid, BrowserSession> = HashMap::new();
    for id in browser_session_ids {
        let v = conn.browser_session().lookup(id).await?.ok_or_else(|| {
            DatabaseInconsistencyError::on("oauth2_sessions").column("user_session_id")
        })?;

        browser_sessions.insert(id, v);
    }

    let page: Result<Vec<_>, DatabaseInconsistencyError> = page
        .into_iter()
        .map(|item| {
            let id = Ulid::from(item.oauth2_session_id);
            let client = clients
                .get(&Ulid::from(item.oauth2_client_id))
                .ok_or_else(|| {
                    DatabaseInconsistencyError::on("oauth2_sessions")
                        .column("oauth2_client_id")
                        .row(id)
                })?
                .clone();

            let browser_session = browser_sessions
                .get(&Ulid::from(item.user_session_id))
                .ok_or_else(|| {
                    DatabaseInconsistencyError::on("oauth2_sessions")
                        .column("user_session_id")
                        .row(id)
                })?
                .clone();

            let scope = item.scope.parse().map_err(|e| {
                DatabaseInconsistencyError::on("oauth2_sessions")
                    .column("scope")
                    .row(id)
                    .source(e)
            })?;

            Ok(Session {
                id: Ulid::from(item.oauth2_session_id),
                client,
                browser_session,
                scope,
            })
        })
        .collect();

    Ok((has_previous_page, has_next_page, page?))
}