feat: filled last gaps in existing stuff and added start for git support
This commit is contained in:
133
test/bds/git_test.exs
Normal file
133
test/bds/git_test.exs
Normal file
@@ -0,0 +1,133 @@
|
||||
defmodule BDS.GitTest do
|
||||
use ExUnit.Case, async: false
|
||||
|
||||
alias BDS.Git
|
||||
|
||||
setup do
|
||||
:ok = Ecto.Adapters.SQL.Sandbox.checkout(BDS.Repo)
|
||||
|
||||
temp_root = Path.join(System.tmp_dir!(), "bds-git-#{System.unique_integer([:positive])}")
|
||||
File.mkdir_p!(temp_root)
|
||||
|
||||
on_exit(fn -> File.rm_rf(temp_root) end)
|
||||
|
||||
project_dir = Path.join(temp_root, "project")
|
||||
File.mkdir_p!(project_dir)
|
||||
|
||||
{:ok, project} = BDS.Projects.create_project(%{name: "Git Project", data_path: project_dir})
|
||||
|
||||
%{project: project, project_dir: project_dir, temp_root: temp_root}
|
||||
end
|
||||
|
||||
test "initialize_repo writes ignore files, configures LFS tracking, and returns repo info", %{
|
||||
project: project,
|
||||
project_dir: project_dir
|
||||
} do
|
||||
runner = fake_runner(fn
|
||||
"git", ["init", "-b", "master"], _opts -> {"", 0}
|
||||
"git", ["lfs", "track" | _rest], _opts -> {"Tracking *.png\n", 0}
|
||||
"git", ["rev-parse", "--abbrev-ref", "HEAD"], _opts -> {"master\n", 0}
|
||||
"git", ["remote", "get-url", "origin"], _opts -> {"", 2}
|
||||
"git", ["lfs", "ls-files"], _opts -> {"", 0}
|
||||
end)
|
||||
|
||||
assert {:ok, repo} = Git.initialize_repo(project.id, runner: runner)
|
||||
|
||||
assert repo.is_initialized == true
|
||||
assert repo.current_branch == "master"
|
||||
assert repo.has_lfs == true
|
||||
assert File.read!(Path.join(project_dir, ".gitignore")) =~ "/html/"
|
||||
assert File.read!(Path.join(project_dir, ".gitattributes")) =~ "*.png filter=lfs"
|
||||
end
|
||||
|
||||
test "status, diff, history, and provider detection are parsed from git output", %{project: project} do
|
||||
runner = fake_runner(fn
|
||||
"git", ["status", "--porcelain=v1", "--untracked-files=all"], _opts ->
|
||||
{"A posts/new.md\n M meta/project.json\nR old.txt -> new.txt\n?? note.txt\n", 0}
|
||||
|
||||
"git", ["diff", "--cached", "--no-ext-diff"], _opts -> {"staged diff", 0}
|
||||
"git", ["diff", "--no-ext-diff"], _opts -> {"unstaged diff", 0}
|
||||
"git", ["remote", "get-url", "origin"], _opts -> {"git@github.com:owner/repo.git\n", 0}
|
||||
"git", ["rev-parse", "--abbrev-ref", "HEAD"], _opts -> {"main\n", 0}
|
||||
"git", ["log", "--format=%H%x09%s", "main"], _opts -> {"a1\tLocal commit\nb2\tShared commit\n", 0}
|
||||
"git", ["log", "--format=%H", "origin/main"], _opts -> {"b2\nc3\n", 0}
|
||||
end)
|
||||
|
||||
assert {:ok, status} = Git.status(project.id, runner: runner)
|
||||
assert Enum.any?(status.files, &(&1.path == "posts/new.md" and &1.status == :added))
|
||||
assert Enum.any?(status.files, &(&1.path == "new.txt" and &1.status == :renamed and &1.old_path == "old.txt"))
|
||||
assert Enum.any?(status.files, &(&1.path == "note.txt" and &1.status == :untracked))
|
||||
|
||||
assert {:ok, diff} = Git.diff(project.id, runner: runner)
|
||||
assert diff.staged_diff == "staged diff"
|
||||
assert diff.unstaged_diff == "unstaged diff"
|
||||
|
||||
assert {:ok, history} = Git.history(project.id, "main", runner: runner)
|
||||
assert Enum.find(history.commits, &(&1.hash == "a1")).sync_status.kind == :local_only
|
||||
assert Enum.find(history.commits, &(&1.hash == "b2")).sync_status.kind == :both
|
||||
assert Enum.find(history.commits, &(&1.hash == "c3")).sync_status.kind == :remote_only
|
||||
|
||||
assert {:ok, repo} = Git.repository(project.id, runner: runner)
|
||||
assert repo.provider.kind == :github
|
||||
assert repo.current_branch == "main"
|
||||
end
|
||||
|
||||
test "fetch, pull, push, commit_all, reconcile, and prune_lfs_cache run non-interactively", %{
|
||||
project: project
|
||||
} do
|
||||
parent = self()
|
||||
|
||||
runner = fn command, args, opts ->
|
||||
send(parent, {:git_command, command, args, opts})
|
||||
|
||||
case {command, args} do
|
||||
{"git", ["fetch", "--all", "--prune"]} -> {"", 0}
|
||||
{"git", ["pull", "--ff-only"]} -> {"", 0}
|
||||
{"git", ["push"]} -> {"", 0}
|
||||
{"git", ["add", "-A"]} -> {"", 0}
|
||||
{"git", ["commit", "-m", "save everything"]} -> {"", 0}
|
||||
{"git", ["diff", "--name-status", "old", "new"]} ->
|
||||
{"A\tposts/2026/04/new-post.md\nM\tscripts/tool.lua\nD\ttemplates/old.liquid\n", 0}
|
||||
|
||||
{"git", ["lfs", "prune", "--recent"]} -> {"", 0}
|
||||
_other -> {"", 0}
|
||||
end
|
||||
end
|
||||
|
||||
assert {:ok, _fetch} = Git.fetch(project.id, runner: runner)
|
||||
assert {:ok, _pull} = Git.pull(project.id, runner: runner)
|
||||
assert {:ok, _push} = Git.push(project.id, runner: runner)
|
||||
assert {:ok, commit} = Git.commit_all(project.id, "save everything", runner: runner)
|
||||
assert commit.message == "save everything"
|
||||
|
||||
assert {:ok, reconcile} = Git.reconcile(project.id, "old", "new", runner: runner)
|
||||
assert reconcile.changed.posts.added == ["posts/2026/04/new-post.md"]
|
||||
assert reconcile.changed.scripts.modified == ["scripts/tool.lua"]
|
||||
assert reconcile.changed.templates.deleted == ["templates/old.liquid"]
|
||||
|
||||
assert {:ok, prune} = Git.prune_lfs_cache(project.id, 5, runner: runner)
|
||||
assert prune.retained_recent == 5
|
||||
|
||||
assert_received {:git_command, "git", ["fetch", "--all", "--prune"], fetch_opts}
|
||||
assert fetch_opts[:env]["GIT_TERMINAL_PROMPT"] == "0"
|
||||
assert fetch_opts[:env]["GCM_INTERACTIVE"] == "never"
|
||||
assert fetch_opts[:env]["GIT_SSH_COMMAND"] =~ "BatchMode=yes"
|
||||
end
|
||||
|
||||
test "fetch returns structured auth errors with provider guidance", %{project: project} do
|
||||
runner = fake_runner(fn
|
||||
"git", ["remote", "get-url", "origin"], _opts -> {"git@gitlab.com:owner/repo.git\n", 0}
|
||||
"git", ["fetch", "--all", "--prune"], _opts -> {"fatal: Authentication failed for 'origin'", 128}
|
||||
end)
|
||||
|
||||
assert {:error, error} = Git.fetch(project.id, runner: runner)
|
||||
assert error.kind == :auth
|
||||
assert error.provider == :gitlab
|
||||
assert error.platform == :macos
|
||||
assert is_binary(error.guidance)
|
||||
end
|
||||
|
||||
defp fake_runner(handler) do
|
||||
fn command, args, opts -> handler.(command, args, opts) end
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user