tablo-test 0.9.0

//! Drives a built `Router` without a socket, carrying cookies, CSRF token, and
//! tenant, and reads values back out of its responses.

mod db;
mod protocol;
mod resource;
mod two_factor;

pub use db::{TEST_DATABASE_URL, migrated_db, test_db};
use http::header::{ACCEPT_LANGUAGE, CONTENT_TYPE, COOKIE};
pub use protocol::{
    Bell, BellNotification, CellEdit, ChartData, ChartSeries, CreateOptionLink, DetailEntry,
    DisabledAction, EmptyReason, EmptyTable, ErrorKind, FilterOption, Group, IgnoredFilter,
    IgnoredReason, ImpersonationBanner, ImportError, ImportRefusal, LanguageChoice, NavGroup,
    PageFilterBar, Picked, PickerColumn, RecordNavLink, RecordTableData, Row, RowActions,
    SearchGroup, SearchResult, Section, StatTile, SummaryFigure, Tab, TabLink, WizardStep,
    action_badge, action_label, action_tooltip, area_back_link, bell, body_bytes, body_string,
    charts, column_picker, columns, confirms_first, cookie_header, create_option_links,
    declined_message, detail_entries, dirty_form, disabled_actions, empty_table, external_sign_out,
    field_error, field_error_message, filter_options, find_href_with, form_body, groups,
    ignored_filters, impersonate_buttons, impersonation_banner, import_columns, import_errors,
    import_refusal, inline_scripts, input_value, input_values, language_choices, multipart_body,
    nav_badge, nav_groups, nav_links, notification, page_direction, page_filter_bar, page_language,
    page_title, picked, posts_picking, record_navigation, record_tables, refreshes_to,
    response_cookies, rich_text_values, robots, row_actions, row_keys, rows, search_box,
    search_results, sections, selects_matching, session_cookie_value, set_cookie_header,
    sortable_columns, stale_form, stats, summaries, tab_links, tabs, tenant_page_link, trail,
    widgets, wizard_steps,
};
pub use resource::{FieldOf, Reply, ResourceClient, Submission};
use tablo_core::{
    DeclarationError, MountError, Panel, PanelHandle, PanelUser, Resource, RouterBuilderPanelExt,
    auth::session_cookie,
};
use topcoat::router::{Body, Router, RouterBuilderDiscoverExt};
pub use two_factor::{
    authenticator_code, authenticator_code_at, now, recovery_codes, two_factor_secret,
    two_factor_state,
};

/// `panel` mounted on a router holding `db`, beside the app's own discovered pages and routes:
/// the router an app builds, without its asset bundle.
///
/// # Errors
///
/// The [`MountError`] the panel refuses to mount with, which [`refusal`] lists.
pub fn mount(db: toasty::Db, panel: Panel) -> topcoat::Result<Router> {
    mount_with_handle(db, panel).map(|(router, _)| router)
}

/// [`mount`]'s router and the mounted panel's handle, which [`TestClient::panel`] resolves
/// [`TestClient::resource`]'s URLs in.
///
/// # Errors
///
/// The [`MountError`] the panel refuses to mount with.
pub fn mount_with_handle(db: toasty::Db, panel: Panel) -> topcoat::Result<(Router, PanelHandle)> {
    let prefix = panel.prefix().to_string();
    let builder = Router::builder().discover().with(db).panel(panel)?;
    let handle = builder
        .panel_handle(&prefix)
        .expect("the builder mounts the panel at its prefix");
    Ok((builder.build(), handle))
}

/// The declaration mistakes a panel refused to mount with, for a test to match on their
/// [`kind`](DeclarationError::kind).
///
/// ```rust,no_run
/// # fn refused(db: toasty::Db, panel: tablo_core::Panel) {
/// use tablo_test::{mount, refusal};
///
/// let mistakes = refusal(mount(db, panel));
/// assert!(matches!(
///     mistakes[0].kind,
///     tablo_core::DeclarationErrorKind::MissingAuthModels { .. }
/// ));
/// # }
/// ```
///
/// # Panics
///
/// When `mounted` succeeded, or failed with an error that is not a [`MountError`].
pub fn refusal<T>(mounted: topcoat::Result<T>) -> Vec<DeclarationError> {
    let Err(error) = mounted else {
        panic!("the panel must not mount");
    };
    error
        .downcast_ref::<MountError>()
        .unwrap_or_else(|| panic!("a declaration mistake refuses the panel, got {error}"))
        .errors()
        .to_vec()
}

/// Sends requests carrying cookies and tenant.
#[derive(Clone)]
pub struct TestClient<'a> {
    router: &'a Router,
    cookies: Vec<(String, String)>,
    tenant: Option<tablo_core::TenantId>,
    panel: Option<PanelHandle>,
    language: Option<String>,
}

impl<'a> TestClient<'a> {
    pub fn new(router: &'a Router) -> Self {
        Self {
            router,
            cookies: Vec::new(),
            tenant: None,
            panel: None,
            language: None,
        }
    }

    /// Resolves [`resource`](Self::resource)'s URLs in `panel`, the handle the router's builder
    /// gives through [`panel_handle`](RouterBuilderPanelExt::panel_handle).
    ///
    /// ```rust,no_run
    /// # use tablo_core::{Panel, RouterBuilderPanelExt};
    /// # use topcoat::router::{Router, RouterBuilderDiscoverExt};
    /// # fn build(db: toasty::Db, panel: Panel) -> topcoat::Result<()> {
    /// let builder = Router::builder().discover().with(db).panel(panel)?;
    /// let admin = builder.panel_handle("admin").expect("mounted above");
    /// let router = builder.build();
    /// let client = tablo_test::TestClient::new(&router).panel(&admin);
    /// # let _ = client;
    /// # Ok(())
    /// # }
    /// ```
    pub fn panel(&self, panel: &PanelHandle) -> Self {
        let mut client = self.clone();
        client.panel = Some(panel.clone());
        client
    }

    /// Typed requests to `R`, whose URLs and form keys come from the panel's own declaration.
    ///
    /// # Panics
    ///
    /// When no [`panel`](Self::panel) is set.
    pub fn resource<R: Resource>(&self) -> ResourceClient<'_, 'a, R> {
        let panel = self
            .panel
            .as_ref()
            .expect("set the panel with `TestClient::panel` before `resource`");
        ResourceClient::new(self, panel)
    }

    /// Attaches a cookie to every request; a later value for the same name
    /// replaces the earlier one.
    pub fn cookie(&self, name: &str, value: &str) -> Self {
        self.with_cookies(&[(name.to_string(), value.to_string())])
    }

    /// Attaches every `(name, value)` pair, replacing earlier values for the
    /// same name.
    pub fn cookies(&self, cookies: &[(String, String)]) -> Self {
        self.with_cookies(cookies)
    }

    fn with_cookies(&self, cookies: &[(String, String)]) -> Self {
        let mut client = self.clone();
        for (name, value) in cookies {
            match client.cookies.iter_mut().find(|(kept, _)| kept == name) {
                Some(existing) => existing.1 = value.clone(),
                None => client.cookies.push((name.clone(), value.clone())),
            }
        }
        client
    }

    /// Sends `Accept-Language: {languages}` with every request, as a browser preferring them does:
    /// `"fr-CA, en;q=0.5"`.
    pub fn language(&self, languages: &str) -> Self {
        let mut client = self.clone();
        client.language = Some(languages.to_string());
        client
    }

    /// Attach the CSRF cookie the form's `csrf_token` field must match.
    pub fn csrf(&self, token: &str) -> Self {
        self.cookie(tablo_core::csrf::COOKIE_NAME, token)
    }

    /// Signs `user` in to the panel `Panel::new(panel)` mounts, as a successful login does, and
    /// attaches the session cookie; no password is hashed or checked.
    ///
    /// The session row goes into `db`, the router's database, keyed to [`PanelUser::user_id`]:
    /// each request loads the user back through the panel's `Authenticator::find_by_id`, so a
    /// custom authenticator works as the shipped one does.
    ///
    /// ```rust,no_run
    /// # async fn sign_in(router: &topcoat::router::Router, mut db: toasty::Db) {
    /// # use tablo_test::TestClient;
    /// let admin = tablo_core::auth::create_admin(&mut db, "admin@example.com", "secret", "Admin")
    ///     .await
    ///     .expect("seed the admin");
    /// let client = TestClient::new(router).sign_in(&db, "admin", &admin).await;
    /// # let _ = client;
    /// # }
    /// ```
    ///
    /// # Panics
    ///
    /// When the session row cannot be written, e.g. the database does not register
    /// `AuthSession`.
    ///
    /// [`PanelUser::user_id`]: tablo_core::PanelUser::user_id
    pub async fn sign_in(&self, db: &toasty::Db, panel: &str, user: &impl PanelUser) -> Self {
        let token = tablo_core::auth::mint_session(&mut db.clone(), panel, user)
            .await
            .expect("record the test session");
        self.cookie(&session_cookie(panel), &token)
    }

    /// Signs in through the login form of the panel `Panel::new(panel)` mounts, as a browser
    /// does: loads the page, posts `email` and `password` with the page's CSRF token, and keeps
    /// the cookies both responses set. Returns the client and the login response, which
    /// redirects on success and re-renders the form on a refusal.
    ///
    /// `next` is the page to land on after signing in, `""` for the panel's home. Prefer
    /// [`sign_in`](Self::sign_in) unless the test is about the login itself.
    ///
    /// # Panics
    ///
    /// When the login page renders no `csrf_token` input: the panel's authentication is off.
    pub async fn log_in(
        &self,
        panel: &str,
        email: &str,
        password: &str,
        next: &str,
    ) -> (Self, http::Response<Body>) {
        let url = format!("/{panel}/login");
        let page = self.get(&url).await;
        let cookies = response_cookies(&page);
        let html = body_string(page).await;
        let csrf = input_value(&html, "csrf_token")
            .unwrap_or_else(|| panic!("the login page embeds a csrf_token input: {html}"));
        let body = form_body(&[
            ("email", email),
            ("password", password),
            ("next", next),
            ("csrf_token", &csrf),
        ]);
        let client = self.cookies(&cookies);
        let response = client.post_form(&url, body).await;
        let session = response_cookies(&response);
        (client.cookies(&session), response)
    }

    /// Acts for `tenant`, as a browser that switched to it from the tenant menu: a signed-in user
    /// who is not one of its members acts for their own tenant instead, so a cross-tenant test
    /// reaches only what a browser would. With nobody signed in, such as on a panel with auth
    /// disabled, the request acts for `tenant`.
    pub fn tenant(&self, tenant: tablo_core::TenantId) -> Self {
        let mut client = self.clone();
        client.tenant = Some(tenant);
        client
    }

    pub async fn get(&self, uri: &str) -> http::Response<Body> {
        self.router
            .handle(self.request(http::Method::GET, uri))
            .await
    }

    pub async fn head(&self, uri: &str) -> http::Response<Body> {
        self.router
            .handle(self.request(http::Method::HEAD, uri))
            .await
    }

    pub async fn post_form(&self, uri: &str, body: String) -> http::Response<Body> {
        self.post(
            uri,
            http::HeaderValue::from_static("application/x-www-form-urlencoded"),
            body,
        )
        .await
    }

    /// Posts the urlencoded `body` as a panel form does: with the CSRF token in both the cookie
    /// and the `csrf_token` field, the one [`csrf`](Self::csrf) attached, else a fresh one.
    pub async fn submit(&self, uri: &str, body: &str) -> http::Response<Body> {
        let token = self.csrf_token();
        let field = form_body(&[("csrf_token", &token)]);
        let body = if body.is_empty() {
            field
        } else {
            format!("{body}&{field}")
        };
        self.csrf(&token).post_form(uri, body).await
    }

    /// Posts [`multipart_body`]'s `parts` as a panel form with a file input does: with the CSRF
    /// token in both the cookie and a `csrf_token` part, as [`submit`](Self::submit) picks it.
    pub async fn submit_multipart(
        &self,
        uri: &str,
        parts: &[(&str, Option<&str>, &str)],
    ) -> http::Response<Body> {
        const BOUNDARY: &str = "tablo-test-boundary";
        let token = self.csrf_token();
        let mut parts = parts.to_vec();
        parts.push(("csrf_token", None, &token));
        let body = multipart_body(BOUNDARY, &parts);
        self.csrf(&token).post_multipart(uri, BOUNDARY, body).await
    }

    pub async fn post_multipart(
        &self,
        uri: &str,
        boundary: &str,
        body: String,
    ) -> http::Response<Body> {
        self.post(
            uri,
            format!("multipart/form-data; boundary={boundary}")
                .parse()
                .expect("multipart content type"),
            body,
        )
        .await
    }

    /// Calls the runtime procedure served at `path` with `args`, the JSON array of its
    /// arguments, as the browser's runtime does: a JSON `POST` that answers with the JSON of its
    /// result.
    ///
    /// ```rust,no_run
    /// # async fn read(client: &tablo_test::TestClient<'_>, id: &str) {
    /// let response = client
    ///     .call_procedure(
    ///         "/_topcoat/runtime/procedures/tablo-notifications/mark",
    ///         &format!(r#"["{id}", true]"#),
    ///     )
    ///     .await;
    /// assert_eq!(response.status(), 200);
    /// # }
    /// ```
    pub async fn call_procedure(&self, path: &str, args: &str) -> http::Response<Body> {
        self.post(
            path,
            http::HeaderValue::from_static("application/json"),
            args.to_string(),
        )
        .await
    }

    async fn post(
        &self,
        uri: &str,
        content_type: http::HeaderValue,
        body: String,
    ) -> http::Response<Body> {
        let mut request = self.request(http::Method::POST, uri);
        request.headers_mut().insert(CONTENT_TYPE, content_type);
        *request.body_mut() = Body::from(body);
        self.router.handle(request).await
    }

    /// The CSRF cookie the client carries, as a browser keeps it across posts, else a fresh one.
    fn csrf_token(&self) -> String {
        self.cookies
            .iter()
            .find(|(name, _)| name == tablo_core::csrf::COOKIE_NAME)
            .map_or_else(
                || uuid::Uuid::new_v4().to_string(),
                |(_, token)| token.clone(),
            )
    }

    fn request(&self, method: http::Method, uri: &str) -> http::Request<Body> {
        let mut builder = http::Request::builder().method(method).uri(uri);
        if let Some(jar) = cookie_header(
            self.cookies
                .iter()
                .map(|(name, value)| (name.as_str(), value.as_str())),
        ) {
            builder = builder.header(COOKIE, jar);
        }
        if let Some(languages) = &self.language {
            builder = builder.header(ACCEPT_LANGUAGE, languages);
        }
        let (mut parts, body) = builder.body(Body::empty()).unwrap().into_parts();
        if let Some(tenant) = self.tenant {
            parts.extensions.insert(tablo_core::ClaimedTenant(tenant));
        }
        http::Request::from_parts(parts, body)
    }
}