agd-core 0.2.0

//! `agd setup import`: finding the files of an Emacs or Neovim configuration
//! that mention Org ([`find_config_sources`]), and applying the settings the
//! editor reports ([`ResolvedEditorConfig`]) over the current configuration
//! ([`apply_import`]), with a diagnostic for everything that differs or cannot
//! be imported.
//!
//! The editor resolves its own settings (the agd binary runs it with a reader
//! script); this module never evaluates editor code, it maps the result. A
//! result that would not load as a config is refused (`invalid_import`).

use std::collections::BTreeMap;
use std::path::{Path, PathBuf};

use serde::{Deserialize, Serialize};

use crate::{
    AgdError, AgendaSpan, CaptureTemplate, ErrorCode, LogMode, SORTING_KEYS, Settings, ViewBlock,
    ViewSettings, WeekStart,
};

#[derive(Clone, Debug, Deserialize, Eq, PartialEq, Serialize)]
#[serde(rename_all = "snake_case")]
pub enum ImportStatus {
    Exact,
    Difference,
    Unsupported,
}

#[derive(Clone, Debug, Deserialize, Eq, PartialEq, Serialize)]
pub struct ImportDiagnostic {
    pub status: ImportStatus,
    pub key: String,
    pub message: String,
}

/// One capture template as the editor reports it; disabled templates are
/// reported, not imported.
#[derive(Clone, Debug, Deserialize, Eq, PartialEq, Serialize)]
pub struct ImportedCapture {
    pub key: String,
    pub desc: String,
    pub file: Option<String>,
    pub heading: Option<String>,
    pub olpath: Option<Vec<String>>,
    pub id: Option<String>,
    #[serde(default)]
    pub datetree: bool,
    pub template: String,
    pub template_file: Option<String>,
    pub enabled: bool,
    #[serde(default)]
    pub diagnostics: Vec<String>,
}

/// One custom agenda command as the editor reports it. Enabled commands
/// become views; `diagnostics` name what was left out.
#[derive(Clone, Debug, Deserialize, Eq, PartialEq, Serialize)]
#[serde(deny_unknown_fields)]
pub struct ImportedCommand {
    pub key: String,
    pub description: String,
    pub enabled: bool,
    #[serde(default)]
    pub blocks: Vec<ViewBlock>,
    #[serde(default)]
    pub diagnostics: Vec<String>,
}

#[derive(Clone, Debug, Deserialize, Serialize)]
#[serde(deny_unknown_fields)]
pub struct ResolvedEditorConfig {
    pub editor: String,
    #[serde(default)]
    pub editor_version: String,
    /// org-directory when the config sets it; it becomes the root on a first
    /// import.
    #[serde(default)]
    pub org_directory: Option<String>,
    /// Agenda entries as written in the editor config, made absolute: files,
    /// directories or globs.
    pub agenda_files: Vec<String>,
    pub todo_sequences: Vec<Vec<String>>,
    pub tags_column: i64,
    pub tag_inheritance_exclusions: Vec<String>,
    pub highest_priority: String,
    pub lowest_priority: String,
    pub default_priority: String,
    pub deadline_warning_days: i64,
    pub agenda_span: String,
    pub agenda_start_day: Option<String>,
    pub week_start: WeekStart,
    pub skip_scheduled_if_done: bool,
    pub skip_deadline_if_done: bool,
    pub skip_timestamp_if_done: bool,
    pub sorting_strategy: Vec<String>,
    pub log_done: String,
    pub log_repeat: String,
    pub log_reschedule: String,
    pub log_redeadline: String,
    pub log_into_drawer: bool,
    /// In the editor's order: as written for Emacs; by key for nvim-orgmode,
    /// whose Lua table keeps no order. config.toml keeps this order.
    #[serde(default)]
    pub capture: Vec<ImportedCapture>,
    #[serde(default)]
    pub commands: Vec<ImportedCommand>,
    #[serde(default)]
    pub diagnostics: Vec<ImportDiagnostic>,
    #[serde(default)]
    pub verification: BTreeMap<String, String>,
}

#[derive(Clone, Copy, Debug, Eq, PartialEq)]
pub enum ConfigEditor {
    Emacs,
    Neovim,
}

impl ConfigEditor {
    pub fn name(self) -> &'static str {
        match self {
            Self::Emacs => "Emacs",
            Self::Neovim => "Neovim",
        }
    }
}

/// The editor config files an import reads, in load order, and what was
/// passed over.
#[derive(Clone, Debug)]
pub struct ConfigSources {
    pub editor: ConfigEditor,
    pub files: Vec<PathBuf>,
    pub notes: Vec<String>,
}

const MAX_DEPTH: usize = 4;
const MAX_FILES: usize = 300;
const MAX_BYTES: u64 = 1 << 20;
/// Package managers' and editors' own state: never the user's settings.
const SKIPPED_DIRECTORIES: [&str; 12] = [
    ".git",
    ".local",
    ".cache",
    "elpa",
    "straight",
    "eln-cache",
    "var",
    "auto-save-list",
    "pack",
    "plugged",
    "lazy",
    "node_modules",
];
/// Files read first, in this order, as the editors load them.
const ENTRY_POINTS: [&str; 7] = [
    "early-init.el",
    "init.el",
    "config.el",
    ".emacs",
    ".spacemacs",
    "config.org",
    "init.lua",
];

/// Finds the files to read under `paths`. A file is taken as given; a
/// directory is walked (respecting .gitignore, at most MAX_DEPTH levels,
/// MAX_FILES files and MAX_BYTES each, skipping SKIPPED_DIRECTORIES), keeping
/// Emacs Lisp files that mention `org-`, Lua files that mention `orgmode`
/// and Org files with emacs-lisp source blocks. Both editors' files under
/// one path is an error: import one editor at a time.
pub fn find_config_sources(paths: &[PathBuf]) -> Result<ConfigSources, AgdError> {
    let mut files = Vec::new();
    let mut notes = Vec::new();
    for path in paths {
        let path = PathBuf::from(shellexpand::tilde(&path.to_string_lossy()).into_owned());
        if path.is_file() {
            if editor_of(&path).is_none() {
                return Err(import_error(format!(
                    "{} is not an Emacs Lisp (.el, .org) or Lua (.lua) file",
                    path.display()
                )));
            }
            files.push(path);
        } else if path.is_dir() {
            walk_config_directory(&path, &mut files, &mut notes)?;
        } else {
            return Err(import_error(format!("{} does not exist", path.display())));
        }
    }
    let editors: Vec<ConfigEditor> = files.iter().filter_map(|file| editor_of(file)).collect();
    let Some(&editor) = editors.first() else {
        return Err(import_error(
            "found no org settings: no .el file mentioning org-, .lua file mentioning orgmode, or config.org",
        ));
    };
    if editors.iter().any(|other| *other != editor) {
        return Err(import_error(
            "found both Emacs and Neovim files; import one editor's config at a time",
        ));
    }
    files.sort_by_key(|file| {
        let name = file
            .file_name()
            .map(|name| name.to_string_lossy().into_owned());
        let rank = ENTRY_POINTS
            .iter()
            .position(|entry| Some(*entry) == name.as_deref())
            .unwrap_or(ENTRY_POINTS.len());
        (rank, file.clone())
    });
    files.dedup();
    Ok(ConfigSources {
        editor,
        files,
        notes,
    })
}

fn walk_config_directory(
    root: &Path,
    files: &mut Vec<PathBuf>,
    notes: &mut Vec<String>,
) -> Result<(), AgdError> {
    let walker = ignore::WalkBuilder::new(root)
        .hidden(false)
        .max_depth(Some(MAX_DEPTH))
        .filter_entry(|entry| {
            !(entry.file_type().is_some_and(|kind| kind.is_dir())
                && SKIPPED_DIRECTORIES.contains(&entry.file_name().to_string_lossy().as_ref()))
        })
        .build();
    let mut seen = 0;
    for entry in walker {
        let entry = entry
            .map_err(|error| import_error(format!("cannot read {}: {error}", root.display())))?;
        let path = entry.path();
        let Some(editor) = editor_of(path) else {
            continue;
        };
        seen += 1;
        if seen > MAX_FILES {
            notes.push(format!(
                "stopped after {MAX_FILES} files; point at the config file instead"
            ));
            break;
        }
        if entry
            .metadata()
            .is_ok_and(|metadata| metadata.len() > MAX_BYTES)
        {
            notes.push(format!("{}: skipped, larger than 1 MB", path.display()));
            continue;
        }
        let Ok(text) = std::fs::read_to_string(path) else {
            notes.push(format!("{}: skipped, not UTF-8 text", path.display()));
            continue;
        };
        let relevant = match editor {
            ConfigEditor::Neovim => text.contains("orgmode"),
            ConfigEditor::Emacs if path.extension().is_some_and(|extension| extension == "org") => {
                text.contains("org-") && text.to_lowercase().contains("#+begin_src emacs-lisp")
            }
            ConfigEditor::Emacs => text.contains("org-"),
        };
        if relevant {
            files.push(path.to_path_buf());
        }
    }
    Ok(())
}

/// The editor a config file belongs to, by name: Emacs Lisp, literate Org
/// configs, `.emacs` and `.spacemacs`, or Lua.
fn editor_of(path: &Path) -> Option<ConfigEditor> {
    let name = path.file_name()?.to_string_lossy();
    match path.extension().and_then(|extension| extension.to_str()) {
        Some("el") => Some(ConfigEditor::Emacs),
        Some("lua") => Some(ConfigEditor::Neovim),
        Some("org")
            if ["config.org", "init.org", "emacs.org", "README.org"].contains(&name.as_ref()) =>
        {
            Some(ConfigEditor::Emacs)
        }
        _ if name == ".emacs" || name == ".spacemacs" => Some(ConfigEditor::Emacs),
        _ => None,
    }
}

fn import_error(message: impl Into<String>) -> AgdError {
    AgdError::new(ErrorCode::ImportFailed, message)
}

/// The editor's settings applied over `base`, and what could not be.
#[derive(Clone, Debug)]
pub struct ImportResult {
    pub settings: Settings,
    pub diagnostics: Vec<ImportDiagnostic>,
}

/// Applies resolved editor settings over `base` (the current config). The
/// editor's values replace the keys it reports; agd-only keys (editor,
/// theme, agents, triage) keep their `base` values. On a first import
/// (`derive_roots`) the roots become org-directory, or the directories the
/// agenda entries live in; otherwise `base.roots` stay and entries outside
/// them are left out with a diagnostic.
pub fn apply_import(
    resolved: &ResolvedEditorConfig,
    base: &Settings,
    derive_roots: bool,
) -> Result<ImportResult, AgdError> {
    validate_resolved(resolved)?;
    let mut diagnostics = resolved.diagnostics.clone();
    let mut settings = base.clone();
    let entries: Vec<PathBuf> = resolved
        .agenda_files
        .iter()
        .map(|entry| PathBuf::from(shellexpand::tilde(entry).into_owned()))
        .collect();
    if derive_roots {
        let derived = derived_roots(resolved.org_directory.as_deref(), &entries);
        if !derived.is_empty() {
            settings.roots = derived;
        }
    }
    settings.agenda_files = Vec::new();
    for (entry, original) in entries.iter().zip(&resolved.agenda_files) {
        match agenda_pattern(entry, &settings.roots) {
            Some(pattern) => settings.agenda_files.push(pattern),
            None => diagnostics.push(ImportDiagnostic {
                status: ImportStatus::Unsupported,
                key: original.clone(),
                message: "agenda entry left out: outside the roots".to_string(),
            }),
        }
    }
    settings.agenda_files.dedup();

    // Each sequence as its #+TODO: line; (type …) keywords read the same.
    settings.todo_keywords = resolved
        .todo_sequences
        .iter()
        .map(|sequence| sequence.join(" "))
        .collect();
    settings.tags_column = resolved.tags_column;
    match imported_span(&resolved.agenda_span) {
        Some(span) => settings.agenda_span = span,
        None => diagnostics.push(ImportDiagnostic {
            status: ImportStatus::Unsupported,
            key: "org-agenda-span".to_string(),
            message: format!(
                "{} is not supported; agenda_span stays {}",
                resolved.agenda_span, settings.agenda_span
            ),
        }),
    }
    settings.agenda_start_day = resolved.agenda_start_day.clone();
    settings.week_start = resolved.week_start;
    settings.deadline_warning_days = resolved.deadline_warning_days;
    settings.skip_scheduled_if_done = resolved.skip_scheduled_if_done;
    settings.skip_deadline_if_done = resolved.skip_deadline_if_done;
    settings.skip_timestamp_if_done = resolved.skip_timestamp_if_done;
    settings.sorting_strategy.clear();
    for key in &resolved.sorting_strategy {
        if SORTING_KEYS.contains(&key.as_str()) {
            settings.sorting_strategy.push(key.clone());
        } else {
            diagnostics.push(ImportDiagnostic {
                status: ImportStatus::Difference,
                key: "sorting_strategy".to_string(),
                message: format!("sorting key {key} is not supported and was left out"),
            });
        }
    }
    settings.highest_priority = resolved.highest_priority.clone();
    settings.lowest_priority = resolved.lowest_priority.clone();
    settings.default_priority = resolved.default_priority.clone();
    settings.tag_inheritance_exclusions = resolved.tag_inheritance_exclusions.clone();
    for (variable, value, mode) in [
        ("org-log-done", &resolved.log_done, &mut settings.log_done),
        (
            "org-log-repeat",
            &resolved.log_repeat,
            &mut settings.log_repeat,
        ),
        (
            "org-log-reschedule",
            &resolved.log_reschedule,
            &mut settings.log_reschedule,
        ),
        (
            "org-log-redeadline",
            &resolved.log_redeadline,
            &mut settings.log_redeadline,
        ),
    ] {
        match imported_log_mode(value) {
            Some(imported) => *mode = imported,
            None => diagnostics.push(ImportDiagnostic {
                status: ImportStatus::Unsupported,
                key: variable.to_string(),
                message: format!("{value} is not nil, time or note; left out"),
            }),
        }
    }
    settings.log_into_drawer = resolved.log_into_drawer;

    settings.captures = imported_captures(resolved, &settings.roots, &mut diagnostics);
    // The defaults stay only when the editor defines no templates at all.
    if resolved.capture.is_empty() {
        settings.captures = base.captures.clone();
    }

    settings.views.clear();
    for command in &resolved.commands {
        let key = format!("view {}", command.key);
        let unusable_match = command
            .blocks
            .iter()
            .find_map(|block| crate::agenda::validate_view_block(block).err());
        if let Some(error) = &unusable_match {
            diagnostics.push(ImportDiagnostic {
                status: ImportStatus::Unsupported,
                key: key.clone(),
                message: error.to_string(),
            });
        }
        if command.enabled && unusable_match.is_none() {
            settings.views.push(ViewSettings {
                key: command.key.clone(),
                desc: command.description.clone(),
                blocks: command.blocks.clone(),
            });
        }
        let status = if command.enabled {
            ImportStatus::Difference
        } else {
            ImportStatus::Unsupported
        };
        for message in &command.diagnostics {
            diagnostics.push(ImportDiagnostic {
                status: status.clone(),
                key: key.clone(),
                message: message.clone(),
            });
        }
    }
    if resolved.commands.is_empty() {
        settings.views = base.views.clone();
    }

    // The written config must load; only its roots may not exist yet.
    crate::config::validate_values(&settings).map_err(|error| {
        AgdError::new(
            ErrorCode::InvalidImport,
            format!("the imported settings would not load: {error}"),
        )
    })?;
    Ok(ImportResult {
        settings,
        diagnostics,
    })
}

/// The literal directory an agenda entry starts from: a directory itself, a
/// file's parent, or a glob's components before its first wildcard.
fn entry_base(entry: &Path) -> PathBuf {
    let mut base = PathBuf::new();
    for component in entry.components() {
        if component
            .as_os_str()
            .to_string_lossy()
            .contains(['*', '?', '['])
        {
            return base;
        }
        base.push(component);
    }
    if entry.is_dir() {
        base
    } else {
        base.parent().map(Path::to_path_buf).unwrap_or(base)
    }
}

/// org-directory if set, else each agenda entry's directory; nested
/// directories collapse into their ancestor. Home-relative paths are written
/// with `~`.
fn derived_roots(org_directory: Option<&str>, entries: &[PathBuf]) -> Vec<String> {
    let mut directories: Vec<PathBuf> = match org_directory {
        Some(directory) => vec![PathBuf::from(shellexpand::tilde(directory).into_owned())],
        None => entries.iter().map(|entry| entry_base(entry)).collect(),
    };
    directories.retain(|directory| directory.is_dir());
    directories.sort();
    directories.dedup();
    let mut roots: Vec<PathBuf> = Vec::new();
    for directory in directories {
        if !roots.iter().any(|root| directory.starts_with(root)) {
            roots.push(directory);
        }
    }
    roots.iter().map(|root| home_relative(root)).collect()
}

/// `path` with the home directory written as `~`.
fn home_relative(path: &Path) -> String {
    let home = dirs::home_dir();
    match home
        .as_deref()
        .and_then(|home| path.strip_prefix(home).ok())
    {
        Some(rest) if rest.as_os_str().is_empty() => "~".to_string(),
        Some(rest) => format!("~/{}", rest.to_string_lossy()),
        None => path.to_string_lossy().into_owned(),
    }
}

/// The root an import writes for `agd -r DIR setup import`: DIR made
/// absolute (symlinks kept, as the editor's paths keep them) with `~` for
/// the home directory. DIR must exist, since agenda entries and capture
/// files are placed under it.
pub fn import_root(directory: &Path) -> Result<String, AgdError> {
    let expanded = PathBuf::from(shellexpand::tilde(&directory.to_string_lossy()).into_owned());
    let absolute = std::path::absolute(&expanded).map_err(|error| {
        import_error(format!(
            "cannot resolve root {}: {error}",
            directory.display()
        ))
    })?;
    if !absolute.is_dir() {
        return Err(import_error(format!(
            "root {} is not a directory",
            directory.display()
        )));
    }
    Ok(home_relative(&absolute))
}

/// An agenda entry as a pattern relative to the root that holds it: a file
/// stays a file, a directory becomes its `*.org` files (Emacs does not
/// recurse), and a glob keeps its wildcards. None when no root holds it.
fn agenda_pattern(entry: &Path, roots: &[String]) -> Option<String> {
    let root = holding_root(&entry_base(entry), roots)?;
    let relative = entry
        .strip_prefix(&root)
        .ok()?
        .to_string_lossy()
        .into_owned();
    if entry.is_dir() {
        Some(if relative.is_empty() {
            "*.org".to_string()
        } else {
            format!("{relative}/*.org")
        })
    } else {
        Some(relative)
    }
}

/// The root `path` is under, the deepest one when roots nest.
fn holding_root(path: &Path, roots: &[String]) -> Option<PathBuf> {
    roots
        .iter()
        .map(|root| PathBuf::from(shellexpand::tilde(root).into_owned()))
        .filter(|root| path.starts_with(root))
        .max_by_key(|root| root.components().count())
}

/// The editor's enabled capture templates, each file written relative to
/// the root that holds it, as agenda entries are. Disabled templates, and
/// templates whose file is outside the roots (agd could not write there),
/// are left out and reported.
fn imported_captures(
    resolved: &ResolvedEditorConfig,
    roots: &[String],
    diagnostics: &mut Vec<ImportDiagnostic>,
) -> Vec<CaptureTemplate> {
    let mut captures = Vec::new();
    for capture in &resolved.capture {
        let left_out = |message: String| ImportDiagnostic {
            status: ImportStatus::Unsupported,
            key: format!("capture {}", capture.key),
            message,
        };
        if !capture.enabled {
            diagnostics.push(left_out(capture.diagnostics.join("; ")));
            continue;
        }
        let file = match &capture.file {
            Some(file) => {
                let path = PathBuf::from(shellexpand::tilde(file).into_owned());
                let relative = holding_root(&path, roots)
                    .and_then(|root| path.strip_prefix(root).ok().map(Path::to_path_buf));
                let Some(relative) = relative else {
                    diagnostics.push(left_out(format!(
                        "capture template left out: {file} is outside the roots"
                    )));
                    continue;
                };
                Some(relative.to_string_lossy().into_owned())
            }
            None => None,
        };
        captures.push(CaptureTemplate {
            key: capture.key.clone(),
            desc: capture.desc.clone(),
            file,
            heading: capture.heading.clone(),
            olpath: capture.olpath.clone(),
            id: capture.id.clone(),
            datetree: capture.datetree,
            template: capture.template.clone(),
            template_file: capture.template_file.clone(),
        });
    }
    captures
}

/// An org-log-* value as agd writes it: Emacs's nil is off and t is time.
fn imported_log_mode(value: &str) -> Option<LogMode> {
    match value {
        "nil" => Some(LogMode::Off),
        "t" | "time" => Some(LogMode::Time),
        "note" => Some(LogMode::Note),
        _ => None,
    }
}

/// org-agenda-span as agd writes it: Org's `fortnight` is 14 days; None for
/// a span agd has no form for, such as `year`.
fn imported_span(value: &str) -> Option<AgendaSpan> {
    match value {
        "fortnight" => AgendaSpan::days(14).ok(),
        value => value.parse().ok(),
    }
}

fn validate_resolved(resolved: &ResolvedEditorConfig) -> Result<(), AgdError> {
    if resolved.todo_sequences.is_empty()
        || resolved
            .todo_sequences
            .iter()
            .any(|sequence| sequence.is_empty())
    {
        return Err(AgdError::new(
            ErrorCode::InvalidImport,
            "editor returned no usable TODO sequence",
        ));
    }
    Ok(())
}

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

    #[test]
    fn discovery_reads_entry_points_first_and_only_org_mentions() {
        let temp = tempfile::tempdir().unwrap();
        let root = temp.path();
        fs::write(root.join("config.el"), "(setq org-log-done 'time)\n").unwrap();
        fs::write(root.join("init.el"), "(setq org-directory \"~/org\")\n").unwrap();
        fs::write(root.join("keys.el"), "(map! :n \"x\" #'ignore)\n").unwrap();
        fs::create_dir_all(root.join(".local/straight")).unwrap();
        fs::write(root.join(".local/straight/org.el"), "(setq org-x 1)\n").unwrap();
        let sources = find_config_sources(&[root.to_path_buf()]).unwrap();
        assert_eq!(sources.editor, ConfigEditor::Emacs);
        assert_eq!(
            sources.files,
            vec![root.join("init.el"), root.join("config.el")]
        );

        fs::write(root.join("init.lua"), "require('orgmode').setup({})\n").unwrap();
        let error = find_config_sources(&[root.to_path_buf()]).unwrap_err();
        assert!(
            error.to_string().contains("both Emacs and Neovim"),
            "{error}"
        );
    }

    #[test]
    fn first_import_derives_roots_and_relative_patterns() {
        let temp = tempfile::tempdir().unwrap();
        let org = temp.path().join("org");
        fs::create_dir_all(org.join("projects")).unwrap();
        let entries = [
            org.join("projects"),
            org.join("**/*.org"),
            org.join("inbox.org"),
        ];
        let roots = derived_roots(None, &entries);
        assert_eq!(roots, vec![org.to_string_lossy().into_owned()]);
        let patterns: Vec<Option<String>> = entries
            .iter()
            .map(|entry| agenda_pattern(entry, &roots))
            .collect();
        assert_eq!(
            patterns,
            vec![
                Some("projects/*.org".to_string()),
                Some("**/*.org".to_string()),
                Some("inbox.org".to_string())
            ]
        );
        assert_eq!(
            agenda_pattern(&temp.path().join("elsewhere.org"), &roots),
            None
        );
    }

    #[test]
    fn reimport_keeps_roots_and_agd_only_keys_and_drops_outside_entries() {
        let temp = tempfile::tempdir().unwrap();
        let base = Settings {
            roots: vec![temp.path().to_string_lossy().into_owned()],
            theme: "dark".to_string(),
            ..Settings::default()
        };
        let resolved = resolved_with(serde_json::json!({
            "org_directory": "/elsewhere",
            "agenda_files": [temp.path().join("inbox.org"), "/elsewhere/private.org"],
            "sorting_strategy": ["time-up"], "log_done": "time",
        }));
        let result = apply_import(&resolved, &base, false).unwrap();
        assert_eq!(result.settings.roots, base.roots);
        assert_eq!(result.settings.theme, "dark");
        assert_eq!(result.settings.agenda_files, vec!["inbox.org"]);
        assert!(
            result
                .diagnostics
                .iter()
                .any(|diagnostic| diagnostic.key == "/elsewhere/private.org")
        );
        assert_eq!(result.settings.captures, base.captures);
    }

    /// A reader payload with Org's defaults, `fields` replacing its keys.
    fn resolved_with(fields: serde_json::Value) -> ResolvedEditorConfig {
        let mut payload = serde_json::json!({
            "editor": "emacs",
            "agenda_files": [],
            "todo_sequences": [["TODO", "|", "DONE"]],
            "tags_column": -77,
            "tag_inheritance_exclusions": [],
            "highest_priority": "A", "lowest_priority": "C", "default_priority": "B",
            "deadline_warning_days": 14, "agenda_span": "week", "agenda_start_day": null,
            "week_start": "monday", "skip_scheduled_if_done": false,
            "skip_deadline_if_done": false, "skip_timestamp_if_done": false,
            "sorting_strategy": [], "log_done": "nil", "log_repeat": "time",
            "log_reschedule": "nil", "log_redeadline": "nil", "log_into_drawer": false
        });
        for (key, value) in fields.as_object().unwrap() {
            payload[key] = value.clone();
        }
        serde_json::from_value(payload).unwrap()
    }

    fn diagnostic<'a>(result: &'a ImportResult, key: &str) -> Option<&'a str> {
        result
            .diagnostics
            .iter()
            .find(|diagnostic| diagnostic.key == key)
            .map(|diagnostic| diagnostic.message.as_str())
    }

    #[test]
    fn emacs_log_values_import_as_off_time_or_note() {
        let resolved = resolved_with(serde_json::json!({
            "log_done": "nil", "log_repeat": "t", "log_reschedule": "note", "log_redeadline": "yes"
        }));
        let result = apply_import(&resolved, &Settings::default(), false).unwrap();
        let settings = &result.settings;
        assert_eq!(
            [
                settings.log_done,
                settings.log_repeat,
                settings.log_reschedule,
                settings.log_redeadline
            ],
            [LogMode::Off, LogMode::Time, LogMode::Note, LogMode::Off]
        );
        assert_eq!(
            diagnostic(&result, "org-log-redeadline"),
            Some("yes is not nil, time or note; left out")
        );
        let rendered = crate::render_config(settings, "logs").unwrap();
        assert!(rendered.contains("log_done = \"off\"\n"), "{rendered}");
        assert!(!rendered.contains("nil"), "{rendered}");
    }

    #[test]
    fn a_config_that_would_not_load_is_refused() {
        let resolved = resolved_with(serde_json::json!({
            "highest_priority": "1", "default_priority": "3", "lowest_priority": "5"
        }));
        let error = apply_import(&resolved, &Settings::default(), false).unwrap_err();
        assert_eq!(
            error.to_string(),
            "the imported settings would not load: highest_priority is \"1\": numeric priorities are not supported; use letters A–Z"
        );

        let resolved = resolved_with(serde_json::json!({ "deadline_warning_days": -1 }));
        let error = apply_import(&resolved, &Settings::default(), false).unwrap_err();
        assert_eq!(error.code().as_str(), "invalid_import");
        assert_eq!(
            error.to_string(),
            "the imported settings would not load: deadline_warning_days must be 0 or more, not -1"
        );
    }

    #[test]
    fn import_root_is_an_absolute_existing_directory() {
        let temp = tempfile::tempdir().unwrap();
        assert_eq!(
            import_root(temp.path()).unwrap(),
            temp.path().to_string_lossy()
        );
        let missing = temp.path().join("missing");
        let error = import_root(&missing).unwrap_err();
        assert_eq!(error.code().as_str(), "import_failed");
        assert_eq!(
            error.to_string(),
            format!("root {} is not a directory", missing.display())
        );
    }

    #[test]
    fn capture_files_are_written_relative_to_their_root() {
        let temp = tempfile::tempdir().unwrap();
        let base = Settings {
            roots: vec![temp.path().to_string_lossy().into_owned()],
            ..Settings::default()
        };
        let capture = |key: &str, file: std::path::PathBuf| {
            serde_json::json!({
                "key": key, "desc": key, "file": file, "template": "* %?", "enabled": true
            })
        };
        let resolved = resolved_with(serde_json::json!({
            "capture": [
                capture("t", temp.path().join("notes/inbox.org")),
                capture("x", std::path::PathBuf::from("/elsewhere/inbox.org")),
            ]
        }));
        let result = apply_import(&resolved, &base, false).unwrap();
        let files: Vec<(&str, Option<&str>)> = result
            .settings
            .captures
            .iter()
            .map(|template| (template.key.as_str(), template.file.as_deref()))
            .collect();
        assert_eq!(files, [("t", Some("notes/inbox.org"))]);
        assert_eq!(
            diagnostic(&result, "capture x"),
            Some("capture template left out: /elsewhere/inbox.org is outside the roots")
        );
    }

    #[test]
    fn emacs_spans_import_as_names_or_days() {
        let span = |value: &str| {
            let resolved = resolved_with(serde_json::json!({ "agenda_span": value }));
            apply_import(&resolved, &Settings::default(), false).unwrap()
        };
        assert_eq!(span("10").settings.agenda_span, AgendaSpan::Days(10));
        assert_eq!(span("fortnight").settings.agenda_span, AgendaSpan::Days(14));
        assert_eq!(span("day").settings.agenda_span, AgendaSpan::Day);
        let year = span("year");
        assert_eq!(year.settings.agenda_span, AgendaSpan::Week);
        assert_eq!(
            diagnostic(&year, "org-agenda-span"),
            Some("year is not supported; agenda_span stays week")
        );
    }
}