cli-engine 0.9.3

use std::{path::Path, sync::Arc};

use schemars::JsonSchema;

use crate::{
    FeatureFlag, GuideEntry, HumanViewDef, Middleware, OutputSchema, RuntimeGroupSpec,
    SchemaRegistry, Stage, parse_guides_from_markdown,
};

/// Function used by closure-based modules to register a runtime command group.
pub type ModuleRegister = Arc<dyn Fn(&mut ModuleContext<'_>) -> RuntimeGroupSpec + Send + Sync>;

/// Trait-based module API for larger command domains.
///
/// Implement this when a module has dependencies or enough setup logic that a
/// named type is clearer than a closure.
pub trait CommandModule: Send + Sync + std::fmt::Debug + 'static {
    /// Help category used in root command long help.
    fn category(&self) -> String;

    /// Guide entries contributed by this module.
    fn guides(&self) -> Vec<GuideEntry> {
        Vec::new()
    }

    /// Human views contributed by this module.
    fn views(&self) -> Vec<HumanViewDef> {
        Vec::new()
    }

    /// Registers the module's top-level runtime group.
    fn register(&self, context: &mut ModuleContext<'_>) -> RuntimeGroupSpec;
}

/// Domain-bounded unit of CLI functionality.
///
/// A module usually maps to a product, platform, resource family, or team
/// ownership boundary. It contributes one top-level group plus optional guides
/// and human output views.
///
/// Construct with [`Module::new`], then chain `with_*` methods — never as a
/// struct literal. `#[non_exhaustive]` enforces this so the engine can add
/// fields without a breaking release.
#[derive(Clone)]
#[non_exhaustive]
pub struct Module {
    /// Root help category.
    pub category: String,
    /// Guide entries merged into the CLI-wide guide command.
    pub guides: Vec<GuideEntry>,
    /// Human output views registered before command execution.
    pub views: Vec<HumanViewDef>,
    /// This module's own feature-flag declaration, if any.
    ///
    /// `None` means the module has no explicit stage declaration of its own,
    /// in which case its group and descendants inherit their effective stage
    /// from their nearest ancestor (nested group, then enclosing group, then
    /// module — nearest declaration wins), implicitly resolving to
    /// [`Stage::Ga`] if nothing in the ancestor chain declares a flag either;
    /// see [`Stage`]'s documentation for why that is its default. A module is
    /// the top-level ancestor in that chain: nothing sits above it. Set with
    /// [`with_feature_flag`](Module::with_feature_flag). This field only
    /// records the module's own declaration; cascading resolution (and
    /// pruning of nodes the active [`FlagPolicy`](crate::FlagPolicy) hides)
    /// happens when a [`Cli`](crate::Cli) mounts this module via
    /// [`Cli::add_module`](crate::Cli::add_module).
    pub feature_flag: Option<FeatureFlag>,
    /// Registration function that returns the module's runtime group.
    pub register: ModuleRegister,
}

impl Module {
    /// Creates a closure-based module.
    #[must_use]
    pub fn new<F>(category: impl Into<String>, register: F) -> Self
    where
        F: Fn(&mut ModuleContext<'_>) -> RuntimeGroupSpec + Send + Sync + 'static,
    {
        Self {
            category: category.into(),
            guides: Vec::new(),
            views: Vec::new(),
            feature_flag: None,
            register: Arc::new(register),
        }
    }

    /// Converts a trait-based module into the runtime module type.
    #[must_use]
    pub fn from_command_module<M>(module: M) -> Self
    where
        M: CommandModule,
    {
        let category = module.category();
        let guides = module.guides();
        let views = module.views();
        let module = Arc::new(module);
        Self {
            category,
            guides,
            views,
            feature_flag: None,
            register: Arc::new(move |context| module.register(context)),
        }
    }

    /// Adds one guide entry.
    #[must_use]
    pub fn with_guide(mut self, guide: GuideEntry) -> Self {
        self.guides.push(guide);
        self
    }

    /// Adds several guide entries.
    #[must_use]
    pub fn with_guides(mut self, guides: impl IntoIterator<Item = GuideEntry>) -> Self {
        self.guides.extend(guides);
        self
    }

    /// Parses markdown guide entries from embedded `(path, bytes)` pairs.
    #[must_use]
    pub fn with_guides_from_markdown(
        self,
        files: impl IntoIterator<Item = (impl AsRef<Path>, impl AsRef<[u8]>)>,
    ) -> Self {
        self.with_guides(parse_guides_from_markdown(files))
    }

    /// Adds one human output view.
    #[must_use]
    pub fn with_view(mut self, view: HumanViewDef) -> Self {
        self.views.push(view);
        self
    }

    /// Declares this module's own feature flag: the key used for policy
    /// overrides and introspection, and the stage at which it becomes visible.
    #[must_use]
    pub fn with_feature_flag(mut self, key: impl Into<String>, stage: Stage) -> Self {
        self.feature_flag = Some(FeatureFlag::new(key, stage));
        self
    }
}

/// Materializes a module's command tree standalone, outside a running
/// [`Cli`](crate::Cli).
///
/// Builds a throwaway [`Middleware`] and runs the module's registration
/// function against it — the same call [`Cli::new`](crate::Cli::new) makes —
/// so callers can walk the real [`RuntimeGroupSpec`] — e.g. to derive a
/// scope→command registry from
/// [`CommandSpec::metadata`](crate::CommandSpec::metadata) — without
/// duplicating each module's command declarations. Guides and views the
/// module registers via [`ModuleContext`] are discarded; only the command
/// tree is returned.
///
/// Unlike mounting a module through [`Cli::new`](crate::Cli::new)/`add_module`,
/// this does **not** apply feature-flag pruning: the returned tree includes every node
/// regardless of the active [`FlagPolicy`](crate::FlagPolicy), so it may
/// contain commands or groups that are actually hidden at runtime. Fine for
/// callers that only need the static declarations (e.g. scope metadata), but
/// don't treat the result as "what's mounted right now."
#[must_use]
pub fn build_module_group(module: &Module) -> RuntimeGroupSpec {
    let mut middleware = Middleware::new();
    let mut ctx = ModuleContext::new(&mut middleware);
    (module.register)(&mut ctx)
}

impl std::fmt::Debug for Module {
    fn fmt(&self, formatter: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        formatter
            .debug_struct("Module")
            .field("category", &self.category)
            .field("guides", &self.guides)
            .field("views", &self.views)
            .field("feature_flag", &self.feature_flag)
            .finish_non_exhaustive()
    }
}

/// Context available while a module registers itself.
///
/// The context gives module code access to shared registries without exposing
/// parser internals. This keeps module registration declarative and easy to
/// copy for new teams.
#[derive(Debug)]
pub struct ModuleContext<'middleware> {
    middleware: &'middleware mut Middleware,
    guides: Vec<GuideEntry>,
    views: Vec<HumanViewDef>,
}

impl<'middleware> ModuleContext<'middleware> {
    pub(crate) fn new(middleware: &'middleware mut Middleware) -> Self {
        Self {
            middleware,
            guides: Vec::new(),
            views: Vec::new(),
        }
    }

    /// Returns a shared view of middleware while registering the module.
    pub fn middleware(&self) -> &Middleware {
        self.middleware
    }

    /// Returns mutable middleware for module-specific setup.
    pub fn middleware_mut(&mut self) -> &mut Middleware {
        self.middleware
    }

    /// Returns the per-application config file as loaded at startup.
    ///
    /// Read a consumer-owned section with
    /// [`ConfigFile::section`](crate::config::ConfigFile::section). This is
    /// the same startup snapshot surfaced via
    /// [`CommandContext::config`](crate::command::CommandContext::config); see
    /// its documentation for snapshot-semantics caveats.
    pub fn config(&self) -> &crate::config::ConfigFile {
        &self.middleware.config
    }

    /// Returns the schema registry for direct registration.
    pub fn schema_registry(&mut self) -> &mut SchemaRegistry {
        &mut self.middleware.schema_registry
    }

    /// Registers a compact framework schema for a command path.
    pub fn register_schema<T: OutputSchema>(&mut self, command_path: impl Into<String>) {
        self.middleware
            .schema_registry
            .register::<T>(command_path.into());
    }

    /// Registers JSON Schema generated with `schemars` for a command path.
    pub fn register_json_schema<T: JsonSchema>(&mut self, command_path: impl Into<String>) {
        self.middleware
            .schema_registry
            .register_json_schema::<T>(command_path.into());
    }

    /// Registers a human output view and keeps it with the module.
    pub fn register_view(&mut self, view: HumanViewDef) {
        self.middleware.human_views.register(view.clone());
        self.views.push(view);
    }

    /// Adds one guide entry.
    pub fn add_guide(&mut self, guide: GuideEntry) {
        self.guides.push(guide);
    }

    /// Adds several guide entries.
    pub fn add_guides(&mut self, guides: impl IntoIterator<Item = GuideEntry>) {
        self.guides.extend(guides);
    }

    /// Parses and adds markdown guides from embedded `(path, bytes)` pairs.
    pub fn add_guides_from_markdown(
        &mut self,
        files: impl IntoIterator<Item = (impl AsRef<Path>, impl AsRef<[u8]>)>,
    ) {
        self.add_guides(parse_guides_from_markdown(files));
    }

    pub(crate) fn into_parts(self) -> (Vec<GuideEntry>, Vec<HumanViewDef>) {
        (self.guides, self.views)
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use crate::GroupSpec;

    fn trivial_module(category: &str) -> Module {
        Module::new(category.to_string(), |_ctx| {
            RuntimeGroupSpec::new(GroupSpec::new("g", "short"))
        })
    }

    #[test]
    fn module_with_feature_flag_sets_key_and_stage() {
        let module = trivial_module("cat").with_feature_flag("my-module-flag", Stage::Beta);

        let flag = module.feature_flag.expect("feature flag should be set");
        assert_eq!(flag.key, "my-module-flag");
        assert_eq!(flag.stage, Stage::Beta);
    }

    #[test]
    fn module_feature_flag_defaults_to_none() {
        let module = trivial_module("cat");

        assert!(module.feature_flag.is_none());
    }
}