modo-rs 0.11.0

use std::collections::HashMap;
use std::path::Path;
use std::sync::Arc;

use intl_pluralrules::{PluralCategory, PluralRuleType, PluralRules};
use unic_langid::LanguageIdentifier;

#[derive(Debug, Clone)]
pub(super) enum Entry {
    Plain(String),
    Plural {
        zero: Option<String>,
        one: Option<String>,
        two: Option<String>,
        few: Option<String>,
        many: Option<String>,
        other: String,
    },
}

struct Inner {
    translations: HashMap<String, HashMap<String, Entry>>,
    default_locale: String,
    plural_rules: HashMap<String, PluralRules>,
    /// English cardinal plural rules used as a fallback when the requested
    /// locale has no loaded entry in `plural_rules`. Built once during
    /// construction so `translate_plural` for unknown locales does not
    /// allocate a new `PluralRules` on every call.
    fallback_plural_rules: PluralRules,
}

/// In-memory store of translation entries loaded from YAML files on disk.
///
/// Cheaply cloneable — wraps an `Arc` internally. Created by [`TranslationStore::load`].
/// Used by the [`Translator`](super::Translator) extractor and the template
/// engine's `t()` function (registered by
/// [`make_t_function`](super::make_t_function)).
#[derive(Clone)]
pub struct TranslationStore {
    inner: Arc<Inner>,
}

impl std::fmt::Debug for TranslationStore {
    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
        f.debug_struct("TranslationStore")
            .field("translations", &self.inner.translations)
            .field("default_locale", &self.inner.default_locale)
            .field(
                "plural_rules",
                &self.inner.plural_rules.keys().collect::<Vec<_>>(),
            )
            .finish()
    }
}

impl TranslationStore {
    /// Creates an empty store with no translations loaded.
    ///
    /// Translations fall back to the key itself when nothing is loaded. Plural
    /// rules are populated lazily as translations are loaded, so an empty
    /// store holds no plural-rule entries.
    pub(super) fn empty(default_locale: &str) -> Self {
        let en: LanguageIdentifier = "en".parse().expect("en is a valid language tag");
        let fallback_plural_rules = PluralRules::create(en, PluralRuleType::CARDINAL)
            .expect("en plural rules creation cannot fail");
        Self {
            inner: Arc::new(Inner {
                translations: HashMap::new(),
                default_locale: default_locale.to_string(),
                plural_rules: HashMap::new(),
                fallback_plural_rules,
            }),
        }
    }

    /// Loads translations from the given directory.
    ///
    /// Each subdirectory of `path` is treated as a locale. YAML/YML files inside
    /// become namespaces whose keys are flattened with `.` separators.
    ///
    /// # Errors
    ///
    /// Returns [`Error`](crate::Error) if the directory is unreadable or a YAML
    /// file cannot be parsed.
    pub fn load(path: &Path, default_locale: &str) -> crate::Result<Self> {
        let mut translations: HashMap<String, HashMap<String, Entry>> = HashMap::new();

        let entries = std::fs::read_dir(path).map_err(|e| {
            crate::Error::internal(format!(
                "Failed to read locales directory {}: {e}",
                path.display()
            ))
        })?;

        for entry in entries {
            let entry = entry.map_err(|e| {
                crate::Error::internal(format!("Failed to read directory entry: {e}"))
            })?;
            let locale_path = entry.path();
            if !locale_path.is_dir() {
                continue;
            }

            let Some(locale) = locale_path.file_name().and_then(|n| n.to_str()) else {
                tracing::warn!(
                    path = %locale_path.display(),
                    "skipping non-UTF-8 locale directory name"
                );
                continue;
            };

            let locale_entries = load_locale_dir(&locale_path)?;
            translations.insert(locale.to_string(), locale_entries);
        }

        let en: LanguageIdentifier = "en".parse().expect("en is a valid language tag");
        let en_rules = PluralRules::create(en, PluralRuleType::CARDINAL)
            .expect("en plural rules creation cannot fail");
        let mut plural_rules = HashMap::new();
        for locale_str in translations.keys() {
            let Ok(lang_id) = locale_str.parse::<LanguageIdentifier>() else {
                tracing::warn!(
                    locale = %locale_str,
                    "failed to parse locale as language identifier — plural rules will use English fallback"
                );
                continue;
            };
            let Ok(rules) = PluralRules::create(lang_id, PluralRuleType::CARDINAL) else {
                tracing::warn!(
                    locale = %locale_str,
                    "failed to create plural rules for locale — plural rules will use English fallback"
                );
                continue;
            };
            plural_rules.insert(locale_str.clone(), rules);
        }

        Ok(Self {
            inner: Arc::new(Inner {
                translations,
                default_locale: default_locale.to_string(),
                plural_rules,
                fallback_plural_rules: en_rules,
            }),
        })
    }

    /// Translates `key` for the given `locale`, interpolating any `{placeholder}`
    /// values found in `kwargs`.
    ///
    /// Falls back to the default locale and finally to the key itself if no entry
    /// is found.
    ///
    /// # Errors
    ///
    /// Returns `Ok` in all current code paths; the [`Result`] return type is
    /// reserved for future expansion (e.g. strict-mode lookups).
    pub fn translate(
        &self,
        locale: &str,
        key: &str,
        kwargs: &[(&str, &str)],
    ) -> crate::Result<String> {
        // Try requested locale first
        if let Some(entry) = self.lookup(locale, key) {
            return Ok(interpolate(entry_to_string(entry), kwargs));
        }

        // Fall back to default locale
        if locale != self.inner.default_locale
            && let Some(entry) = self.lookup(&self.inner.default_locale, key)
        {
            return Ok(interpolate(entry_to_string(entry), kwargs));
        }

        // Return key itself as fallback
        Ok(key.to_string())
    }

    /// Translates `key` with plural-rule selection based on `count`.
    ///
    /// `count` is also injected into `kwargs` under the name `count`.
    ///
    /// # Cross-locale fallback
    ///
    /// When an entry is missing in the requested locale, the default locale's
    /// entry is used. Plural rule selection still uses the **requesting**
    /// locale's rules (e.g., Ukrainian `FEW` / `MANY` categories applied
    /// against English `one` / `other` forms map to `other`). This keeps
    /// grammatical selection consistent with the user's language even though
    /// the fallback copy is authored for a different one.
    ///
    /// # Errors
    ///
    /// Returns `Ok` in all current code paths; the [`Result`] return type is
    /// reserved for future expansion (e.g. strict-mode lookups).
    pub fn translate_plural(
        &self,
        locale: &str,
        key: &str,
        count: i64,
        kwargs: &[(&str, &str)],
    ) -> crate::Result<String> {
        let entry = self.lookup(locale, key).or_else(|| {
            if locale != self.inner.default_locale {
                self.lookup(&self.inner.default_locale, key)
            } else {
                None
            }
        });

        let Some(entry) = entry else {
            return Ok(key.to_string());
        };

        let template = match entry {
            Entry::Plural {
                zero,
                one,
                two,
                few,
                many,
                other,
            } => {
                let category = self.plural_category(locale, count);
                match category {
                    PluralCategory::ZERO => zero.as_deref().unwrap_or(other),
                    PluralCategory::ONE => one.as_deref().unwrap_or(other),
                    PluralCategory::TWO => two.as_deref().unwrap_or(other),
                    PluralCategory::FEW => few.as_deref().unwrap_or(other),
                    PluralCategory::MANY => many.as_deref().unwrap_or(other),
                    PluralCategory::OTHER => other,
                }
            }
            Entry::Plain(s) => s,
        };

        // Add count to kwargs
        let count_str = count.to_string();
        let mut all_kwargs: Vec<(&str, &str)> = kwargs.to_vec();
        all_kwargs.push(("count", &count_str));

        Ok(interpolate(template, &all_kwargs))
    }

    /// Returns the list of locales discovered on disk (unordered).
    pub fn available_locales(&self) -> Vec<String> {
        self.inner.translations.keys().cloned().collect()
    }

    /// Returns the configured default locale.
    pub fn default_locale(&self) -> &str {
        &self.inner.default_locale
    }

    fn lookup(&self, locale: &str, key: &str) -> Option<&Entry> {
        self.inner.translations.get(locale)?.get(key)
    }

    fn plural_category(&self, locale: &str, count: i64) -> PluralCategory {
        let abs_count = count.unsigned_abs() as usize;
        if let Some(rules) = self.inner.plural_rules.get(locale) {
            rules.select(abs_count).unwrap_or(PluralCategory::OTHER)
        } else {
            // Fallback to cached English rules for unknown locales.
            self.inner
                .fallback_plural_rules
                .select(abs_count)
                .unwrap_or(PluralCategory::OTHER)
        }
    }
}

pub(super) fn entry_to_string(entry: &Entry) -> &str {
    match entry {
        Entry::Plain(s) => s,
        Entry::Plural { other, .. } => other,
    }
}

pub(super) fn interpolate(template: &str, kwargs: &[(&str, &str)]) -> String {
    let mut result = String::with_capacity(template.len());
    let mut chars = template.chars().peekable();

    while let Some(ch) = chars.next() {
        if ch == '{' {
            // Try to read a key
            let mut key = String::new();
            let mut found_close = false;
            for next_ch in chars.by_ref() {
                if next_ch == '}' {
                    found_close = true;
                    break;
                }
                key.push(next_ch);
            }

            if found_close && !key.is_empty() {
                // Look up the key in kwargs
                if let Some((_, val)) = kwargs.iter().find(|(k, _)| *k == key) {
                    result.push_str(val);
                } else {
                    // Leave unmatched placeholders as-is
                    result.push('{');
                    result.push_str(&key);
                    result.push('}');
                }
            } else {
                result.push('{');
                result.push_str(&key);
            }
        } else {
            result.push(ch);
        }
    }

    result
}

pub(super) fn load_locale_dir(locale_path: &Path) -> crate::Result<HashMap<String, Entry>> {
    let mut entries = HashMap::new();

    let dir_entries = std::fs::read_dir(locale_path).map_err(|e| {
        crate::Error::internal(format!(
            "Failed to read locale directory {}: {e}",
            locale_path.display()
        ))
    })?;

    for entry in dir_entries {
        let entry = entry
            .map_err(|e| crate::Error::internal(format!("Failed to read directory entry: {e}")))?;
        let path = entry.path();

        let ext = path.extension().and_then(|e| e.to_str());
        if ext != Some("yaml") && ext != Some("yml") {
            continue;
        }

        let Some(namespace) = path.file_stem().and_then(|n| n.to_str()) else {
            tracing::warn!(
                path = %path.display(),
                "skipping non-UTF-8 translation file name"
            );
            continue;
        };
        let namespace = namespace.to_string();

        let content = std::fs::read_to_string(&path).map_err(|e| {
            crate::Error::internal(format!("Failed to read {}: {e}", path.display()))
        })?;

        let value: serde_yaml_ng::Value = serde_yaml_ng::from_str(&content).map_err(|e| {
            crate::Error::internal(format!("Failed to parse {}: {e}", path.display()))
        })?;

        flatten_yaml(&namespace, &value, &mut entries);
    }

    Ok(entries)
}

pub(super) fn flatten_yaml(
    prefix: &str,
    value: &serde_yaml_ng::Value,
    entries: &mut HashMap<String, Entry>,
) {
    match value {
        serde_yaml_ng::Value::Mapping(map) => {
            // Check if this is a plural entry (has "other" key)
            if is_plural_entry(map) {
                let other = map
                    .get(serde_yaml_ng::Value::String("other".into()))
                    .and_then(|v| v.as_str())
                    .unwrap_or("")
                    .to_string();

                let entry = Entry::Plural {
                    zero: get_str(map, "zero"),
                    one: get_str(map, "one"),
                    two: get_str(map, "two"),
                    few: get_str(map, "few"),
                    many: get_str(map, "many"),
                    other,
                };

                entries.insert(prefix.to_string(), entry);
                return;
            }

            // Regular nested map — recurse
            for (k, v) in map {
                if let Some(key_str) = k.as_str() {
                    let full_key = format!("{prefix}.{key_str}");
                    flatten_yaml(&full_key, v, entries);
                }
            }
        }
        serde_yaml_ng::Value::String(s) => {
            entries.insert(prefix.to_string(), Entry::Plain(s.clone()));
        }
        other => {
            tracing::warn!(
                key = %prefix,
                ?other,
                "translation value is not a string or mapping — ignored"
            );
        }
    }
}

fn is_plural_entry(map: &serde_yaml_ng::Mapping) -> bool {
    let has_other = map.contains_key(serde_yaml_ng::Value::String("other".into()));
    if !has_other {
        return false;
    }

    // All keys must be plural category names
    let plural_keys = ["zero", "one", "two", "few", "many", "other"];
    map.keys()
        .all(|k| k.as_str().is_some_and(|s| plural_keys.contains(&s)))
}

fn get_str(map: &serde_yaml_ng::Mapping, key: &str) -> Option<String> {
    map.get(serde_yaml_ng::Value::String(key.into()))
        .and_then(|v| v.as_str())
        .map(|s| s.to_string())
}

/// Creates a MiniJinja-compatible `t()` function that reads the `locale` variable
/// from the template context and delegates to the `TranslationStore`.
pub fn make_t_function(
    store: TranslationStore,
) -> impl Fn(
    &minijinja::State,
    &[minijinja::Value],
    minijinja::value::Kwargs,
) -> Result<String, minijinja::Error>
+ Send
+ Sync
+ 'static {
    move |state: &minijinja::State, args: &[minijinja::Value], kwargs: minijinja::value::Kwargs| {
        let key = args.first().ok_or_else(|| {
            minijinja::Error::new(
                minijinja::ErrorKind::MissingArgument,
                "t() requires a translation key",
            )
        })?;
        let key = key.to_string();

        // Read locale from template context
        let locale = state
            .lookup("locale")
            .and_then(|v| {
                let s = v.to_string();
                if s.is_empty() { None } else { Some(s) }
            })
            .unwrap_or_else(|| store.default_locale().to_string());

        // Check for count kwarg (plural)
        let count: Option<i64> = kwargs.get("count").ok();

        // Collect all kwargs for interpolation
        let mut kw_pairs: Vec<(String, String)> = Vec::new();
        for k in kwargs.args() {
            if let Ok(v) = kwargs.get::<minijinja::Value>(k) {
                kw_pairs.push((k.to_string(), v.to_string()));
            }
        }

        let kw_refs: Vec<(&str, &str)> = kw_pairs
            .iter()
            .map(|(k, v)| (k.as_str(), v.as_str()))
            .collect();

        let result = if let Some(count) = count {
            store
                .translate_plural(&locale, &key, count, &kw_refs)
                .map_err(|e| {
                    minijinja::Error::new(minijinja::ErrorKind::InvalidOperation, e.to_string())
                })?
        } else {
            store.translate(&locale, &key, &kw_refs).map_err(|e| {
                minijinja::Error::new(minijinja::ErrorKind::InvalidOperation, e.to_string())
            })?
        };

        // Consume all kwargs to avoid "unexpected keyword argument" errors.
        // Surface unused kwargs via tracing so typos are visible during
        // development without breaking template rendering.
        if let Err(e) = kwargs.assert_all_used() {
            tracing::warn!(key = %key, error = %e, "unused template kwargs in t() call");
        }

        Ok(result)
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use std::path::Path;

    fn write_locale_file(dir: &Path, locale: &str, filename: &str, content: &str) {
        let locale_dir = dir.join(locale);
        std::fs::create_dir_all(&locale_dir).unwrap();
        std::fs::write(locale_dir.join(filename), content).unwrap();
    }

    fn test_store(dir: &Path) -> TranslationStore {
        TranslationStore::load(dir, "en").unwrap()
    }

    #[test]
    fn load_plain_translations() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "common.yaml",
            "greeting: Hello\nbye: Goodbye",
        );
        let store = test_store(dir.path());
        assert_eq!(
            store.translate("en", "common.greeting", &[]).unwrap(),
            "Hello"
        );
        assert_eq!(store.translate("en", "common.bye", &[]).unwrap(), "Goodbye");
    }

    #[test]
    fn load_nested_keys() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "auth.yaml",
            "login:\n  title: \"Log In\"\n  submit: Submit",
        );
        let store = test_store(dir.path());
        assert_eq!(
            store.translate("en", "auth.login.title", &[]).unwrap(),
            "Log In"
        );
        assert_eq!(
            store.translate("en", "auth.login.submit", &[]).unwrap(),
            "Submit"
        );
    }

    #[test]
    fn interpolation_replaces_placeholders() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "greet.yaml",
            "welcome: \"Hello, {name}! Age: {age}\"",
        );
        let store = test_store(dir.path());
        let result = store
            .translate("en", "greet.welcome", &[("name", "Dmytro"), ("age", "30")])
            .unwrap();
        assert_eq!(result, "Hello, Dmytro! Age: 30");
    }

    #[test]
    fn interpolation_leaves_unmatched_placeholders() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "test.yaml",
            "msg: \"Hello {name}, {missing}\"",
        );
        let store = test_store(dir.path());
        let result = store
            .translate("en", "test.msg", &[("name", "Dmytro")])
            .unwrap();
        assert_eq!(result, "Hello Dmytro, {missing}");
    }

    #[test]
    fn plural_english_one_other() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "items.yaml",
            "count:\n  one: \"{count} item\"\n  other: \"{count} items\"",
        );
        let store = test_store(dir.path());
        assert_eq!(
            store.translate_plural("en", "items.count", 1, &[]).unwrap(),
            "1 item"
        );
        assert_eq!(
            store.translate_plural("en", "items.count", 0, &[]).unwrap(),
            "0 items"
        );
        assert_eq!(
            store.translate_plural("en", "items.count", 5, &[]).unwrap(),
            "5 items"
        );
    }

    #[test]
    fn plural_falls_back_to_other() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "items.yaml",
            "count:\n  other: \"{count} things\"",
        );
        let store = test_store(dir.path());
        assert_eq!(
            store.translate_plural("en", "items.count", 1, &[]).unwrap(),
            "1 things"
        );
    }

    #[test]
    fn falls_back_to_default_locale() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(dir.path(), "en", "common.yaml", "greeting: Hello");
        write_locale_file(dir.path(), "uk", "common.yaml", "bye: Бувай");
        let store = test_store(dir.path());
        // "uk" doesn't have "common.greeting", falls back to "en"
        assert_eq!(
            store.translate("uk", "common.greeting", &[]).unwrap(),
            "Hello"
        );
    }

    #[test]
    fn missing_key_returns_key_itself() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(dir.path(), "en", "common.yaml", "greeting: Hello");
        let store = test_store(dir.path());
        assert_eq!(
            store.translate("en", "nonexistent.key", &[]).unwrap(),
            "nonexistent.key"
        );
    }

    #[test]
    fn missing_locale_falls_back_to_default() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(dir.path(), "en", "common.yaml", "greeting: Hello");
        let store = test_store(dir.path());
        assert_eq!(
            store.translate("fr", "common.greeting", &[]).unwrap(),
            "Hello"
        );
    }

    #[test]
    fn load_returns_error_on_missing_directory() {
        let result = TranslationStore::load(Path::new("/nonexistent/path"), "en");
        assert!(result.is_err());
    }

    #[test]
    fn plural_slavic_rules_ukrainian() {
        let dir = tempfile::tempdir().unwrap();
        let uk_dir = dir.path().join("uk");
        std::fs::create_dir_all(&uk_dir).unwrap();
        std::fs::write(
            uk_dir.join("items.yaml"),
            "count:\n  one: \"{count} елемент\"\n  few: \"{count} елементи\"\n  many: \"{count} елементів\"\n  other: \"{count} елементів\"",
        )
        .unwrap();
        let en_dir = dir.path().join("en");
        std::fs::create_dir_all(&en_dir).unwrap();
        std::fs::write(
            en_dir.join("items.yaml"),
            "count:\n  one: \"{count} item\"\n  other: \"{count} items\"",
        )
        .unwrap();

        let store = TranslationStore::load(dir.path(), "en").unwrap();
        assert_eq!(
            store.translate_plural("uk", "items.count", 1, &[]).unwrap(),
            "1 елемент"
        );
        assert_eq!(
            store.translate_plural("uk", "items.count", 3, &[]).unwrap(),
            "3 елементи"
        );
        assert_eq!(
            store.translate_plural("uk", "items.count", 5, &[]).unwrap(),
            "5 елементів"
        );
        assert_eq!(
            store
                .translate_plural("uk", "items.count", 21, &[])
                .unwrap(),
            "21 елемент"
        );
        assert_eq!(
            store
                .translate_plural("uk", "items.count", 22, &[])
                .unwrap(),
            "22 елементи"
        );
    }

    #[test]
    fn translate_plural_negative_count() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "items.yaml",
            "count:\n  one: \"{count} item\"\n  other: \"{count} items\"",
        );
        let store = TranslationStore::load(dir.path(), "en").unwrap();
        // Negative counts use absolute value for plural category selection,
        // but {count} interpolates the original signed value.
        assert_eq!(
            store
                .translate_plural("en", "items.count", -1, &[])
                .unwrap(),
            "-1 item"
        );
        assert_eq!(
            store
                .translate_plural("en", "items.count", -5, &[])
                .unwrap(),
            "-5 items"
        );
    }

    #[test]
    fn yml_extension_support() {
        let dir = tempfile::tempdir().unwrap();
        let en_dir = dir.path().join("en");
        std::fs::create_dir_all(&en_dir).unwrap();
        std::fs::write(en_dir.join("messages.yml"), "hello: Hi there").unwrap();
        let store = TranslationStore::load(dir.path(), "en").unwrap();
        assert_eq!(
            store.translate("en", "messages.hello", &[]).unwrap(),
            "Hi there"
        );
    }

    #[test]
    fn t_function_with_count_kwarg() {
        let dir = tempfile::tempdir().unwrap();
        write_locale_file(
            dir.path(),
            "en",
            "items.yaml",
            "count:\n  one: \"{count} item\"\n  other: \"{count} items\"",
        );
        let store = TranslationStore::load(dir.path(), "en").unwrap();

        let mut env = minijinja::Environment::new();
        let t_fn = make_t_function(store);
        env.add_function("t", t_fn);
        env.add_template("test", "{{ t('items.count', count=5) }}")
            .unwrap();

        let tmpl = env.get_template("test").unwrap();
        let result = tmpl.render(minijinja::context! { locale => "en" }).unwrap();
        assert_eq!(result, "5 items");
    }
}