Move the REPL functionality from GitCommand.jl to GitRepl.jl (#5)

Author: DilumAluthge

README.md

@@ -4,3 +4,15 @@
 [![Dev](https://img.shields.io/badge/docs-dev-blue.svg)](https://JuliaVersionControl.github.io/GitRepl.jl/dev)
 [![Build Status](https://github.com/JuliaVersionControl/GitRepl.jl/workflows/CI/badge.svg)](https://github.com/JuliaVersionControl/GitRepl.jl/actions)
 [![Coverage](https://codecov.io/gh/JuliaVersionControl/GitRepl.jl/branch/master/graph/badge.svg)](https://codecov.io/gh/JuliaVersionControl/GitRepl.jl)
+
+## Git REPL mode
+
+```julia
+julia> using GitRepl
+
+julia> gitrepl() # you only need to run this once per Julia session
+
+# Press , to enter the Git REPL mode
+
+git> clone https://github.com/JuliaRegistries/General
+```

src/GitRepl.jl

@@ -3,4 +3,32 @@ module GitRepl
 import GitCommand
 import ReplMaker
 
+export gitrepl
+
+const GIT_REPL_MODE_NAME = "GitRepl.jl Git REPL mode"
+const GIT_REPL_MODE_PROMPT_TEXT = "git> "
+const GIT_REPL_MODE_START_KEY = ','
+
+function _gitrepl_parser(repl_input::AbstractString)
+    return quote
+        repl_input = $(Expr(:quote, repl_input))
+        run(`$(GitRepl.GitCommand.git()) $(split(repl_input))`)
+        return nothing
+    end
+end
+
+function gitrepl(; mode_name = GIT_REPL_MODE_NAME,
+                   prompt_text = GIT_REPL_MODE_PROMPT_TEXT,
+                   start_key = GIT_REPL_MODE_START_KEY,
+                   kwargs...)
+    ReplMaker.initrepl(
+        _gitrepl_parser;
+        mode_name = mode_name,
+        prompt_text = prompt_text,
+        start_key = start_key,
+        kwargs...,
+    )
+    return nothing
+end
+
 end # module

test/runtests.jl

@@ -1,5 +1,25 @@
 using GitRepl
 using Test
 
+function withtempdir(f::Function)
+    original_directory = pwd()
+    mktempdir() do tmp_dir
+        return f(tmp_dir)
+    end
+    cd(original_directory)
+    return nothing
+end
+
 @testset "GitRepl.jl" begin
+    withtempdir() do tmp_dir
+        @test !isdir("GitRepl.jl")
+        @test !isfile(joinpath("GitRepl.jl", "Project.toml"))
+        expr = GitRepl._gitrepl_parser("clone https://github.com/JuliaVersionControl/GitRepl.jl")
+        @test expr isa Expr
+        @test !isdir("GitRepl.jl")
+        @test !isfile(joinpath("GitRepl.jl", "Project.toml"))
+        @eval $(expr)
+        @test isdir("GitRepl.jl")
+        @test isfile(joinpath("GitRepl.jl", "Project.toml"))
+    end
 end