retro-core 2.1.5

use crate::errors::CoreError;
use std::path::Path;
use std::process::Command;

const HOOK_MARKER: &str = "# retro hook - do not remove";

/// Check if we are inside a git repository.
pub fn is_in_git_repo() -> bool {
    Command::new("git")
        .args(["rev-parse", "--is-inside-work-tree"])
        .stdout(std::process::Stdio::null())
        .stderr(std::process::Stdio::null())
        .status()
        .map(|s| s.success())
        .unwrap_or(false)
}

/// Check if the `gh` CLI is available on PATH.
pub fn is_gh_available() -> bool {
    Command::new("gh")
        .arg("--version")
        .stdout(std::process::Stdio::null())
        .stderr(std::process::Stdio::null())
        .status()
        .map(|s| s.success())
        .unwrap_or(false)
}

/// Get the git remote origin URL, if available.
pub fn remote_url() -> Option<String> {
    let output = Command::new("git")
        .args(["remote", "get-url", "origin"])
        .output()
        .ok()?;
    if output.status.success() {
        let url = String::from_utf8_lossy(&output.stdout).trim().to_string();
        if url.is_empty() { None } else { Some(url) }
    } else {
        None
    }
}

/// Get the git repository root directory.
pub fn git_root() -> Result<String, CoreError> {
    let output = Command::new("git")
        .args(["rev-parse", "--show-toplevel"])
        .output()
        .map_err(|e| CoreError::Io(format!("running git: {e}")))?;

    if !output.status.success() {
        return Err(CoreError::Io("not inside a git repository".to_string()));
    }

    Ok(String::from_utf8_lossy(&output.stdout).trim().to_string())
}

/// Get the current git branch name.
pub fn current_branch() -> Result<String, CoreError> {
    let output = Command::new("git")
        .args(["rev-parse", "--abbrev-ref", "HEAD"])
        .output()
        .map_err(|e| CoreError::Io(format!("getting current branch: {e}")))?;

    if !output.status.success() {
        return Err(CoreError::Io("failed to get current branch".to_string()));
    }

    Ok(String::from_utf8_lossy(&output.stdout).trim().to_string())
}

/// Create and checkout a new git branch from a specific start point.
/// Use `start_point` like `"origin/main"` to branch from the remote default branch.
pub fn create_branch(name: &str, start_point: Option<&str>) -> Result<(), CoreError> {
    let mut args = vec!["checkout", "-b", name];
    if let Some(sp) = start_point {
        args.push(sp);
    }

    let output = Command::new("git")
        .args(&args)
        .output()
        .map_err(|e| CoreError::Io(format!("creating branch: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git checkout -b failed: {stderr}")));
    }

    Ok(())
}

/// Detect the repository's default branch name via `gh`.
pub fn default_branch() -> Result<String, CoreError> {
    let output = Command::new("gh")
        .args(["repo", "view", "--json", "defaultBranchRef", "-q", ".defaultBranchRef.name"])
        .output()
        .map_err(|e| CoreError::Io(format!("gh repo view: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("failed to detect default branch: {stderr}")));
    }

    let name = String::from_utf8_lossy(&output.stdout).trim().to_string();
    if name.is_empty() {
        return Err(CoreError::Io("default branch name is empty".to_string()));
    }
    Ok(name)
}

/// Fetch a specific branch from origin.
pub fn fetch_branch(branch: &str) -> Result<(), CoreError> {
    let output = Command::new("git")
        .args(["fetch", "origin", branch])
        .output()
        .map_err(|e| CoreError::Io(format!("git fetch: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git fetch origin {branch} failed: {stderr}")));
    }

    Ok(())
}

/// Stash uncommitted changes. Returns true if something was stashed.
pub fn stash_push() -> Result<bool, CoreError> {
    let output = Command::new("git")
        .args(["stash", "push", "-m", "retro: temporary stash for branch switch"])
        .output()
        .map_err(|e| CoreError::Io(format!("git stash: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git stash failed: {stderr}")));
    }

    let stdout = String::from_utf8_lossy(&output.stdout);
    // "No local changes to save" means nothing was stashed
    Ok(!stdout.contains("No local changes"))
}

/// Pop the most recent stash entry.
pub fn stash_pop() -> Result<(), CoreError> {
    let output = Command::new("git")
        .args(["stash", "pop"])
        .output()
        .map_err(|e| CoreError::Io(format!("git stash pop: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git stash pop failed: {stderr}")));
    }

    Ok(())
}

/// Push the current branch to origin.
pub fn push_current_branch() -> Result<(), CoreError> {
    let output = Command::new("git")
        .args(["push", "-u", "origin", "HEAD"])
        .output()
        .map_err(|e| CoreError::Io(format!("git push: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git push failed: {stderr}")));
    }

    Ok(())
}

/// Switch back to a branch.
pub fn checkout_branch(name: &str) -> Result<(), CoreError> {
    let output = Command::new("git")
        .args(["checkout", name])
        .output()
        .map_err(|e| CoreError::Io(format!("checking out branch: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git checkout failed: {stderr}")));
    }

    Ok(())
}

/// Stage specific files and commit.
/// Retries once on commit failure to handle pre-commit hooks that auto-fix files
/// (e.g., end-of-file-fixer, trailing-whitespace) — these hooks modify files and
/// return exit code 1, expecting a re-stage + re-commit.
pub fn commit_files(files: &[&str], message: &str) -> Result<(), CoreError> {
    stage_files(files)?;

    let output = Command::new("git")
        .args(["commit", "-m", message])
        .output()
        .map_err(|e| CoreError::Io(format!("git commit: {e}")))?;

    if output.status.success() {
        return Ok(());
    }

    // Pre-commit hooks may have auto-fixed files. Re-stage and retry once.
    stage_files(files)?;

    let output = Command::new("git")
        .args(["commit", "-m", message])
        .output()
        .map_err(|e| CoreError::Io(format!("git commit (retry): {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git commit failed: {stderr}")));
    }

    Ok(())
}

fn stage_files(files: &[&str]) -> Result<(), CoreError> {
    let mut args = vec!["add", "--"];
    args.extend(files);

    let output = Command::new("git")
        .args(&args)
        .output()
        .map_err(|e| CoreError::Io(format!("git add: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("git add failed: {stderr}")));
    }

    Ok(())
}

/// Create a PR using `gh pr create`. Returns the PR URL on success.
/// `base` specifies the target branch for the PR (e.g., "main").
pub fn create_pr(title: &str, body: &str, base: &str) -> Result<String, CoreError> {
    let output = Command::new("gh")
        .args(["pr", "create", "--title", title, "--body", body, "--base", base])
        .output()
        .map_err(|e| CoreError::Io(format!("gh pr create: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("gh pr create failed: {stderr}")));
    }

    Ok(String::from_utf8_lossy(&output.stdout).trim().to_string())
}

/// Create a retro PR: chdir → stash → branch from default → write files → commit → push → PR → restore.
/// Returns the PR URL on success, or None if PR creation was skipped.
pub fn create_retro_pr(
    project_path: &str,
    files: &[(&str, &str)],
    commit_message: &str,
    pr_title: &str,
    pr_body: &str,
) -> Result<Option<String>, CoreError> {
    let original_dir = std::env::current_dir()
        .map_err(|e| CoreError::Io(format!("getting cwd: {e}")))?;
    std::env::set_current_dir(project_path)
        .map_err(|e| CoreError::Io(format!("changing to {project_path}: {e}")))?;

    let result = create_retro_pr_inner(project_path, files, commit_message, pr_title, pr_body);

    // Always restore original directory
    let _ = std::env::set_current_dir(&original_dir);

    result
}

fn create_retro_pr_inner(
    project_path: &str,
    files: &[(&str, &str)],
    commit_message: &str,
    pr_title: &str,
    pr_body: &str,
) -> Result<Option<String>, CoreError> {
    let original_branch = current_branch()?;
    let default = default_branch()?;
    let _ = fetch_branch(&default);

    let stashed = stash_push()?;

    let timestamp = chrono::Utc::now().format("%Y%m%d-%H%M%S");
    let branch_name = format!("retro/updates-{timestamp}");
    if let Err(e) = create_branch(&branch_name, Some(&format!("origin/{default}"))) {
        if stashed {
            let _ = stash_pop();
        }
        return Err(e);
    }

    // All operations from here must restore state on error
    let result = do_pr_work(project_path, files, commit_message, pr_title, pr_body, &default);

    // Always restore original branch and stash
    let _ = checkout_branch(&original_branch);
    if stashed {
        let _ = stash_pop();
    }

    result
}

/// Helper that performs the file write → commit → push → PR work.
/// Separated so that `create_retro_pr_inner` can always restore branch/stash on error.
fn do_pr_work(
    project_path: &str,
    files: &[(&str, &str)],
    commit_message: &str,
    pr_title: &str,
    pr_body: &str,
    default: &str,
) -> Result<Option<String>, CoreError> {
    // Write files
    for (path, content) in files {
        let full_path = std::path::Path::new(project_path).join(path);
        if let Some(parent) = full_path.parent() {
            let _ = std::fs::create_dir_all(parent);
        }
        std::fs::write(&full_path, content)
            .map_err(|e| CoreError::Io(format!("writing {path}: {e}")))?;
    }

    // Commit
    let file_paths: Vec<&str> = files.iter().map(|(p, _)| *p).collect();
    commit_files(&file_paths, commit_message)?;

    // Push + PR
    let pr_url = match push_current_branch() {
        Ok(()) => {
            if is_gh_available() {
                match create_pr(pr_title, pr_body, default) {
                    Ok(url) => Some(url),
                    Err(_) => None,
                }
            } else {
                None
            }
        }
        Err(_) => None,
    };

    Ok(pr_url)
}

/// Check the state of a PR by its URL. Returns "OPEN", "CLOSED", or "MERGED".
pub fn pr_state(pr_url: &str) -> Result<String, CoreError> {
    let output = Command::new("gh")
        .args(["pr", "view", pr_url, "--json", "state", "-q", ".state"])
        .output()
        .map_err(|e| CoreError::Io(format!("gh pr view: {e}")))?;

    if !output.status.success() {
        let stderr = String::from_utf8_lossy(&output.stderr);
        return Err(CoreError::Io(format!("gh pr view failed: {stderr}")));
    }

    Ok(String::from_utf8_lossy(&output.stdout).trim().to_string())
}

/// Result of installing hook lines into a file.
#[derive(Debug, PartialEq)]
pub enum HookInstallResult {
    /// Hook was freshly installed (no retro marker existed before).
    Installed,
    /// Hook was updated (old retro lines replaced with new ones).
    Updated,
    /// Hook already had the exact same lines — no change needed.
    UpToDate,
}

/// Install retro git hooks (post-commit only) into the repository.
/// Also cleans up old post-merge hooks that were retro-managed.
pub fn install_hooks(repo_root: &str) -> Result<Vec<(String, HookInstallResult)>, CoreError> {
    let hooks_dir = Path::new(repo_root).join(".git").join("hooks");
    let mut results = Vec::new();

    // Single post-commit hook: ingest + opportunistic analyze/apply
    let post_commit_path = hooks_dir.join("post-commit");
    let hook_lines = format!("{HOOK_MARKER}\nretro ingest --auto 2>>~/.retro/hook-stderr.log &\n");
    let result = install_hook_lines(&post_commit_path, &hook_lines)?;
    results.push(("post-commit".to_string(), result));

    // Remove old post-merge hook if it was retro-managed
    let post_merge_path = hooks_dir.join("post-merge");
    if post_merge_path.exists()
        && let Ok(content) = std::fs::read_to_string(&post_merge_path)
        && content.contains(HOOK_MARKER)
    {
        let cleaned = remove_hook_lines(&content);
        if cleaned.trim() == "#!/bin/sh" || cleaned.trim().is_empty() {
            std::fs::remove_file(&post_merge_path).ok();
        } else {
            std::fs::write(&post_merge_path, cleaned).ok();
        }
    }

    Ok(results)
}

/// Install hook lines into a hook file.
/// If retro lines already exist, removes them first and re-adds the new lines.
/// Returns the install result (Installed, Updated, or UpToDate).
fn install_hook_lines(hook_path: &Path, lines: &str) -> Result<HookInstallResult, CoreError> {
    let existing = if hook_path.exists() {
        std::fs::read_to_string(hook_path)
            .map_err(|e| CoreError::Io(format!("reading hook {}: {e}", hook_path.display())))?
    } else {
        String::new()
    };

    let (base_content, was_present) = if existing.contains(HOOK_MARKER) {
        // Check if the existing lines are already exactly what we want
        if existing.contains(lines.trim()) {
            return Ok(HookInstallResult::UpToDate);
        }
        // Remove old retro lines so we can add the new ones
        (remove_hook_lines(&existing), true)
    } else {
        (existing, false)
    };

    let mut content = if base_content.is_empty() {
        "#!/bin/sh\n".to_string()
    } else {
        let mut s = base_content;
        if !s.ends_with('\n') {
            s.push('\n');
        }
        s
    };

    content.push_str(lines);

    std::fs::write(hook_path, &content)
        .map_err(|e| CoreError::Io(format!("writing hook {}: {e}", hook_path.display())))?;

    // Make executable
    #[cfg(unix)]
    {
        use std::os::unix::fs::PermissionsExt;
        let perms = std::fs::Permissions::from_mode(0o755);
        std::fs::set_permissions(hook_path, perms)
            .map_err(|e| CoreError::Io(format!("chmod hook: {e}")))?;
    }

    Ok(if was_present {
        HookInstallResult::Updated
    } else {
        HookInstallResult::Installed
    })
}

/// Remove retro hook lines from git hooks in the given repository.
/// Returns the list of hooks that were modified.
pub fn remove_hooks(repo_root: &str) -> Result<Vec<String>, CoreError> {
    let hooks_dir = Path::new(repo_root).join(".git").join("hooks");
    if !hooks_dir.exists() {
        return Ok(Vec::new());
    }

    let mut modified = Vec::new();

    for hook_name in &["post-commit", "post-merge"] {
        let hook_path = hooks_dir.join(hook_name);
        if !hook_path.exists() {
            continue;
        }

        let content = std::fs::read_to_string(&hook_path)
            .map_err(|e| CoreError::Io(format!("reading hook: {e}")))?;

        if !content.contains(HOOK_MARKER) {
            continue;
        }

        let cleaned = remove_hook_lines(&content);

        // If only the shebang remains (or empty), remove the file
        let trimmed = cleaned.trim();
        if trimmed.is_empty() || trimmed == "#!/bin/sh" || trimmed == "#!/bin/bash" {
            std::fs::remove_file(&hook_path)
                .map_err(|e| CoreError::Io(format!("removing hook file: {e}")))?;
        } else {
            std::fs::write(&hook_path, &cleaned)
                .map_err(|e| CoreError::Io(format!("writing cleaned hook: {e}")))?;
        }

        modified.push(hook_name.to_string());
    }

    Ok(modified)
}

/// Remove retro hook lines from hook content.
/// Removes the marker line and the command line immediately after it.
fn remove_hook_lines(content: &str) -> String {
    let mut result = Vec::new();
    let mut skip_next = false;

    for line in content.lines() {
        if skip_next {
            skip_next = false;
            continue;
        }
        if line.trim() == HOOK_MARKER {
            skip_next = true;
            continue;
        }
        result.push(line);
    }

    let mut output = result.join("\n");
    if !output.is_empty() && content.ends_with('\n') {
        output.push('\n');
    }
    output
}

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

    #[test]
    fn test_remove_hook_lines_basic() {
        let content = "#!/bin/sh\n# retro hook - do not remove\nretro ingest 2>/dev/null &\n";
        let result = remove_hook_lines(content);
        assert_eq!(result, "#!/bin/sh\n");
    }

    #[test]
    fn test_remove_hook_lines_preserves_other_hooks() {
        let content = "#!/bin/sh\nsome-other-tool run\n# retro hook - do not remove\nretro ingest 2>/dev/null &\nanother-command\n";
        let result = remove_hook_lines(content);
        assert_eq!(result, "#!/bin/sh\nsome-other-tool run\nanother-command\n");
    }

    #[test]
    fn test_remove_hook_lines_no_marker() {
        let content = "#!/bin/sh\nsome-command\n";
        let result = remove_hook_lines(content);
        assert_eq!(result, "#!/bin/sh\nsome-command\n");
    }

    #[test]
    fn test_remove_hook_lines_multiple_markers() {
        let content = "#!/bin/sh\n# retro hook - do not remove\nretro ingest 2>/dev/null &\n# retro hook - do not remove\nretro analyze --auto 2>/dev/null &\n";
        let result = remove_hook_lines(content);
        assert_eq!(result, "#!/bin/sh\n");
    }

    #[test]
    fn test_install_hooks_only_post_commit() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        let results = install_hooks(dir.path().to_str().unwrap()).unwrap();

        assert_eq!(results.len(), 1);
        assert_eq!(results[0].0, "post-commit");
        assert_eq!(results[0].1, HookInstallResult::Installed);

        let post_commit = std::fs::read_to_string(hooks_dir.join("post-commit")).unwrap();
        assert!(post_commit.contains("retro ingest --auto"));

        // post-merge should NOT exist
        assert!(!hooks_dir.join("post-merge").exists());
    }

    #[test]
    fn test_install_hooks_removes_old_post_merge() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        // Simulate old retro post-merge hook
        let old_content =
            "#!/bin/sh\n# retro hook - do not remove\nretro analyze --auto 2>/dev/null &\n";
        std::fs::write(hooks_dir.join("post-merge"), old_content).unwrap();

        install_hooks(dir.path().to_str().unwrap()).unwrap();

        // post-merge should be removed (was retro-only)
        assert!(!hooks_dir.join("post-merge").exists());
    }

    #[test]
    fn test_install_hooks_preserves_non_retro_post_merge() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        // post-merge with retro + other content
        let mixed = "#!/bin/sh\nother-tool run\n# retro hook - do not remove\nretro analyze --auto 2>/dev/null &\n";
        std::fs::write(hooks_dir.join("post-merge"), mixed).unwrap();

        install_hooks(dir.path().to_str().unwrap()).unwrap();

        // post-merge should still exist with other-tool preserved
        let content = std::fs::read_to_string(hooks_dir.join("post-merge")).unwrap();
        assert!(content.contains("other-tool run"));
        assert!(!content.contains("retro"));
    }

    #[test]
    fn test_install_hooks_updates_old_redirect() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        // Simulate old hook with 2>/dev/null redirect
        let old_content =
            "#!/bin/sh\n# retro hook - do not remove\nretro ingest --auto 2>/dev/null &\n";
        std::fs::write(hooks_dir.join("post-commit"), old_content).unwrap();

        let results = install_hooks(dir.path().to_str().unwrap()).unwrap();

        assert_eq!(results.len(), 1);
        assert_eq!(results[0].0, "post-commit");
        assert_eq!(results[0].1, HookInstallResult::Updated);

        // Verify new redirect is in place
        let content = std::fs::read_to_string(hooks_dir.join("post-commit")).unwrap();
        assert!(content.contains("2>>~/.retro/hook-stderr.log"));
        assert!(!content.contains("2>/dev/null"));
    }

    #[test]
    fn test_install_hooks_up_to_date() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        // First install
        let results = install_hooks(dir.path().to_str().unwrap()).unwrap();
        assert_eq!(results[0].1, HookInstallResult::Installed);

        // Second install — should be up to date
        let results = install_hooks(dir.path().to_str().unwrap()).unwrap();
        assert_eq!(results[0].1, HookInstallResult::UpToDate);
    }

    #[test]
    fn test_install_hooks_updates_preserves_other_hooks() {
        let dir = tempfile::tempdir().unwrap();
        let hooks_dir = dir.path().join(".git").join("hooks");
        std::fs::create_dir_all(&hooks_dir).unwrap();

        // Simulate old hook with other tool + old retro redirect
        let old_content = "#!/bin/sh\nother-tool run\n# retro hook - do not remove\nretro ingest --auto 2>/dev/null &\n";
        std::fs::write(hooks_dir.join("post-commit"), old_content).unwrap();

        let results = install_hooks(dir.path().to_str().unwrap()).unwrap();

        assert_eq!(results[0].1, HookInstallResult::Updated);

        let content = std::fs::read_to_string(hooks_dir.join("post-commit")).unwrap();
        assert!(content.contains("other-tool run"));
        assert!(content.contains("2>>~/.retro/hook-stderr.log"));
        assert!(!content.contains("2>/dev/null"));
    }
}