farhand-core 0.2.13

//! Moving files between the allowlisted local directories and the remote.
//! Uploads go through the secret guard file by file; downloads only ever
//! land inside the allowlist.

use std::io::Seek;
use std::path::{Path, PathBuf};

use globset::{Glob, GlobSet, GlobSetBuilder};

use crate::config::Limits;
use crate::error::{Error, Result};
use crate::guard::Guard;
use crate::local::LocalScope;
use crate::remote::Remote;

/// Directory names skipped by default when uploading a tree. They are
/// either regenerated on the remote or never wanted there.
pub const DEFAULT_EXCLUDES: &[&str] = &[
    ".git",
    "node_modules",
    "target",
    ".venv",
    "venv",
    "__pycache__",
    ".DS_Store",
    ".idea",
    ".mypy_cache",
    ".pytest_cache",
    "dist",
    "build",
];

#[derive(Debug, Default)]
pub struct TransferReport {
    pub files: usize,
    pub bytes: u64,
    pub skipped: Vec<String>,
    pub destination: String,
}

pub struct Transfer<'a> {
    pub remote: &'a Remote,
    pub guard: &'a Guard,
    pub local: &'a LocalScope,
    pub limits: &'a Limits,
}

impl Transfer<'_> {
    /// Upload a local file or directory. A file lands at `remote_path`
    /// (or inside it when `remote_path` is an existing directory or ends
    /// with `/`). A directory's *contents* land inside `remote_path`.
    pub async fn upload(
        &self,
        local_raw: &str,
        remote_raw: &str,
        extra_excludes: &[String],
    ) -> Result<TransferReport> {
        let local = self.local.resolve_existing(local_raw)?;
        let remote_base = self.remote.resolve(remote_raw).await?;
        let excludes = build_excludes(extra_excludes)?;
        let mut report = TransferReport::default();

        if local.is_file() {
            let dest = if remote_raw.ends_with('/')
                || self.remote.exists(&remote_base).await? == Some(true)
            {
                let name = local.file_name().unwrap().to_string_lossy();
                format!("{remote_base}/{name}")
            } else {
                remote_base
            };
            let bytes = self.send_file(&local, &dest, &mut report).await?;
            report.bytes = bytes;
            report.destination = dest;
            return Ok(report);
        }
        if !local.is_dir() {
            return Err(Error::Invalid(format!(
                "`{}` is neither a file nor a directory",
                local.display()
            )));
        }

        // Plan first so limits are enforced before anything is sent.
        let mut plan: Vec<(PathBuf, String)> = Vec::new();
        let mut total: u64 = 0;
        let walker = walkdir::WalkDir::new(&local)
            .follow_links(false)
            .into_iter();
        for entry in walker.filter_entry(|e| !is_excluded(e.path(), &local, &excludes)) {
            let entry = entry.map_err(|e| Error::Io(std::io::Error::other(e.to_string())))?;
            let ft = entry.file_type();
            if ft.is_symlink() {
                report
                    .skipped
                    .push(format!("{} (symlink)", entry.path().display()));
                continue;
            }
            if !ft.is_file() {
                continue;
            }
            let rel = entry.path().strip_prefix(&local).unwrap();
            let rel_str = rel.to_string_lossy().replace('\\', "/");
            total += entry.metadata().map(|m| m.len()).unwrap_or(0);
            plan.push((
                entry.path().to_path_buf(),
                format!("{remote_base}/{rel_str}"),
            ));
            if plan.len() > self.limits.max_transfer_files {
                return Err(Error::Invalid(format!(
                    "more than {} files; narrow the upload or add excludes",
                    self.limits.max_transfer_files
                )));
            }
        }
        if total > self.limits.max_transfer_bytes {
            return Err(self.too_large(&format!("`{local_raw}` ({total} bytes)")));
        }

        // The guard runs over the whole plan before the first byte moves, so a
        // refused file never leaves a half-uploaded tree behind.
        for (path, _) in &plan {
            let mut file = self.local.open_resolved(path)?;
            self.guard.ensure_upload_reader(path, &mut file)?;
        }

        // `upload_file` creates parents as it goes; the remote remembers
        // which directories it has seen, so a deep tree costs one check per
        // directory, not per file. Each file is opened again and scanned
        // again as it is sent: the scan above is for the all-or-nothing
        // answer, this one is what makes it hold for the bytes that leave.
        self.remote.ensure_dir(&remote_base).await?;
        for (path, dest) in &plan {
            let file = self.local.open_resolved(path)?;
            let left = self.limits.max_transfer_bytes.saturating_sub(report.bytes);
            let (_, bytes) = self
                .remote
                .upload_file(file, dest, self.guard.stream(path), left)
                .await?;
            report.files += 1;
            report.bytes += bytes;
        }
        report.destination = remote_base;
        Ok(report)
    }

    async fn send_file(
        &self,
        local: &Path,
        dest: &str,
        report: &mut TransferReport,
    ) -> Result<u64> {
        let mut file = self.local.open_resolved(local)?;
        let len = file.metadata()?.len();
        let max = self.limits.max_transfer_bytes;
        if len > max {
            return Err(self.too_large(&format!("`{}` ({len} bytes)", local.display())));
        }
        self.guard.ensure_upload_reader(local, &mut file)?;
        file.rewind()?;
        let (_, bytes) = self
            .remote
            .upload_file(file, dest, self.guard.stream(local), max)
            .await?;
        report.files += 1;
        Ok(bytes)
    }

    /// The refusal for anything over `max_transfer_bytes`, naming the knob:
    /// the model cannot change the config itself, but it can say what to
    /// change.
    fn too_large(&self, what: &str) -> Error {
        Error::Invalid(format!(
            "{what} exceeds the transfer limit of {} bytes; raise `max_transfer_bytes` under \
             [limits] in .farhand.toml to allow it",
            self.limits.max_transfer_bytes
        ))
    }

    /// Download a remote file or directory into the allowlist. A file lands
    /// at `local_path` (or inside it when that is an existing directory or
    /// ends with `/`); a directory's contents land inside `local_path`.
    pub async fn download(&self, remote_raw: &str, local_raw: &str) -> Result<TransferReport> {
        let remote_path = self.remote.resolve(remote_raw).await?;
        let local = self.local.resolve_for_write(local_raw)?;
        let mut report = TransferReport::default();
        let max = self.limits.max_transfer_bytes;

        match self.remote.exists(&remote_path).await? {
            None => Err(Error::Invalid(format!(
                "`{remote_path}` does not exist on the remote"
            ))),
            Some(false) => {
                let dest = if local.is_dir() || local_raw.ends_with('/') {
                    // The remote path may use `\`, which is an ordinary
                    // character to the local `Path` on POSIX.
                    let name = remote_path
                        .rsplit(['/', '\\'])
                        .next()
                        .unwrap_or(&remote_path);
                    local.join(name)
                } else {
                    local
                };
                let dest = self.local_target(&dest)?;
                let len = self.remote.file_size(&remote_path).await?;
                if len > max {
                    return Err(self.too_large(&format!("`{remote_path}` ({len} bytes)")));
                }
                let bytes = self.fetch(&remote_path, &dest, max).await?;
                report.files = 1;
                report.bytes = bytes;
                report.destination = dest.display().to_string();
                Ok(report)
            }
            Some(true) => {
                let files = self
                    .remote
                    .walk_files(&remote_path, self.limits.max_transfer_files)
                    .await?;
                if files.len() > self.limits.max_transfer_files {
                    return Err(Error::Invalid(format!(
                        "more than {} files; narrow the download",
                        self.limits.max_transfer_files
                    )));
                }
                // Names come from the remote, so every destination is checked
                // like a model-supplied path before anything is written:
                // no `..`, no escaping through a local symlink, nothing an
                // editor or agent would trust.
                let mut plan: Vec<(String, PathBuf)> = Vec::with_capacity(files.len());
                for f in files {
                    // Native remote separators become `/` locally.
                    let rel = f
                        .strip_prefix(&remote_path)
                        .unwrap_or(&f)
                        .trim_start_matches(['/', '\\'])
                        .replace('\\', "/");
                    if rel.is_empty() || rel.split('/').any(|seg| seg == "..") {
                        report.skipped.push(f.clone());
                        continue;
                    }
                    let dest = self.local_target(&local.join(&rel))?;
                    plan.push((f, dest));
                }
                for (f, dest) in plan {
                    let len = self.remote.file_size(&f).await?;
                    if report.bytes + len > max {
                        return Err(self.too_large(&format!(
                            "`{remote_raw}` (at least {} bytes)",
                            report.bytes + len
                        )));
                    }
                    let bytes = self.fetch(&f, &dest, max - report.bytes).await?;
                    report.files += 1;
                    report.bytes += bytes;
                }
                report.destination = local.display().to_string();
                Ok(report)
            }
        }
    }
}

impl Transfer<'_> {
    /// Download one remote file to `dest`, at most `max` bytes. The data
    /// goes to a temporary file in the destination folder, reached without
    /// following a symlink, and is renamed into place once complete, so an
    /// interrupted download leaves nothing that looks finished.
    async fn fetch(&self, remote_path: &str, dest: &Path, max: u64) -> Result<u64> {
        let part = self.local.create_part(dest)?;
        let bytes = self
            .remote
            .download_into(remote_path, part.file(), max)
            .await?;
        part.commit()?;
        Ok(bytes)
    }

    /// Re-check a download destination: it must still resolve inside the
    /// allowlist (a symlink under the root could point elsewhere) and its
    /// path relative to that root must pass the guard.
    fn local_target(&self, dest: &Path) -> Result<PathBuf> {
        let dest = self.local.resolve_for_write(&dest.to_string_lossy())?;
        let rel = self
            .local
            .roots()
            .iter()
            .find_map(|r| dest.strip_prefix(r).ok())
            .unwrap_or(&dest);
        self.guard.ensure_download(rel)?;
        Ok(dest)
    }
}

fn build_excludes(extra: &[String]) -> Result<GlobSet> {
    let mut b = GlobSetBuilder::new();
    for g in DEFAULT_EXCLUDES
        .iter()
        .map(|s| s.to_string())
        .chain(extra.iter().cloned())
    {
        b.add(Glob::new(&g).map_err(|e| Error::Invalid(format!("exclude `{g}`: {e}")))?);
    }
    b.build().map_err(|e| Error::Invalid(e.to_string()))
}

fn is_excluded(path: &Path, root: &Path, set: &GlobSet) -> bool {
    if path == root {
        return false;
    }
    let name = path
        .file_name()
        .map(|n| n.to_string_lossy())
        .unwrap_or_default();
    if set.is_match(name.as_ref()) {
        return true;
    }
    path.strip_prefix(root)
        .map(|rel| set.is_match(rel))
        .unwrap_or(false)
}

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

    #[test]
    fn default_excludes_match_names_anywhere() {
        let set = build_excludes(&["*.log".into()]).unwrap();
        let root = Path::new("/p");
        assert!(is_excluded(Path::new("/p/a/node_modules"), root, &set));
        assert!(is_excluded(Path::new("/p/x.log"), root, &set));
        assert!(!is_excluded(Path::new("/p/src/main.rs"), root, &set));
        assert!(!is_excluded(root, root, &set));
    }
}