use std::fs::File;
use std::io::prelude::*;
use std::os::unix::fs::PermissionsExt;
use std::path::{Path, PathBuf};
use std::{env, fs, io};

fn main() {
    match setup_pre_commit_hooks() {
        Ok(_) => {
            println!("Successfully set up pre-commit hooks.");
        }
        Err(e) => {
            println!("Error setting up pre-commit hooks: {e}.");
            std::process::exit(1);
        }
    }
}

// Find the crate root that consists of a Cargo.toml file with the pre-commit hooks metadata.
fn find_crate_root(p: &Path) -> io::Result<PathBuf> {
    println!("Looking for root in {p:?}.");

    // Find Cargo.toml file with the pre-commit hooks metadata up the directory tree.
    let mut current = p.to_path_buf();
    loop {
        let manifest = current.join("Cargo.toml");
        if manifest.exists() {
            println!("Found manifest {manifest:?}.");
            // Check if there's a pre-commit hooks metadata in the Cargo.toml file.
            let mut f = fs::File::open(manifest)?;
            let mut s = String::new();
            f.read_to_string(&mut s)?;
            if s.contains("[package.metadata.precommit]")
                || s.contains("[workspace.metadata.precommit]")
            {
                println!("Found pre-commit hooks metadata.");
                return Ok(current);
            }
        }

        match current.parent() {
            Some(p) => current = p.to_path_buf(),
            None => {
                return Err(io::Error::new(
                    io::ErrorKind::NotFound,
                    "Could not find pre-commit hooks metadata in Cargo.toml.",
                ))
            }
        }
    }
}

fn setup_pre_commit_hooks() -> io::Result<()> {
    let out: &String = &env::var("OUT_DIR").unwrap();
    let p = Path::new(out);
    let root = find_crate_root(p)?;
    let mut f = fs::File::open(root.join("Cargo.toml"))?;
    let mut s = String::new();
    f.read_to_string(&mut s)?;
    let contents = build_script(s);

    let hooks_dir = root.join(".git").join("hooks");

    println!("Hooks dir {hooks_dir:?}.");

    if !hooks_dir.exists() {
        return Ok(());
    }

    let pre_commit: PathBuf = hooks_dir.join("pre-commit");

    let mut f = File::create(&pre_commit)?;

    if cfg!(target_family = "unix") {
        let metadata = f.metadata()?;
        let mut permissions = metadata.permissions();
        permissions.set_mode(0o777);
        fs::set_permissions(&pre_commit, permissions)?;
    }

    f.write_all(contents.as_bytes())
}

fn build_script(s: String) -> String {
    let t = toml::from_str(&s).ok();

    let checks = t
        .as_ref()
        .and_then(|x| get_as_table("package", x))
        .and_then(|x| get_as_table("metadata", x))
        .and_then(|x| get_as_table("precommit", x))
        .iter()
        .flat_map(|xs| xs.iter())
        .map(format_test)
        .collect::<Vec<_>>()
        .join("\n");

    format_script(checks)
}

fn get_as_table<'a>(name: &str, x: &'a toml::Table) -> Option<&'a toml::Table> {
    let mut value = x.get(name);
    // Check if this is a workspace.
    if name == "package" && value.is_none() {
        value = x.get("workspace");
    }
    value.and_then(toml::Value::as_table)
}

fn format_script(s: String) -> String {
    format!(
        r#"
#!/bin/bash
set -eu

check_char='\xE2\x9C\x93'
cross_char='\xE2\x9C\x96'
green='\033[0;32m'
red='\033[0;31m'
nc='\033[0m'
check="$green$check_char$nc"
cross="$red$cross_char$nc"

{s}"#
    )
}

fn format_test((k, v): (&String, &toml::Value)) -> String {
    format!(
        r#"printf "{}"

if result=$({}); then
    echo " $check"
else
    echo " $cross"
    echo " $result"
    exit 1
fi
"#,
        k,
        v.as_str().unwrap()
    )
}