diff options
Diffstat (limited to 'test/test-gall.commit.lua')
-rw-r--r-- | test/test-gall.commit.lua | 108 |
1 files changed, 108 insertions, 0 deletions
diff --git a/test/test-gall.commit.lua b/test/test-gall.commit.lua new file mode 100644 index 0000000..dfb5454 --- /dev/null +++ b/test/test-gall.commit.lua @@ -0,0 +1,108 @@ +-- test/test-gall.commit.lua +-- +-- Git Abstraction layer for Lua - Commit object tests +-- +-- Copyright 2012 Daniel Silverstone <dsilvers@digital-scurf.org> +-- +-- For Licence terms, see COPYING +-- + +-- This test includes object wibbling +dofile "test/withrepo.lua" + +-- Step one, start coverage + +local luacov = require 'luacov' + +local gall = require 'gall' + +local testnames = {} + +local real_assert = assert +local total_asserts = 0 +local function assert(...) + local retval = real_assert(...) + total_asserts = total_asserts + 1 + return retval +end + +local function add_test(suite, name, value) + rawset(suite, name, value) + testnames[#testnames+1] = name +end + +local suite = setmetatable({}, {__newindex = add_test}) + +function suite.commit_get() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + assert(commit) +end + +function suite.commit_tostring() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + local commitstr = tostring(commit) + assert(commitstr:find("GitCommit")) +end + +function suite.commit_message() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + local commitmsg = commit.message + assert(commitmsg:find("Merge branch")) +end + +function suite.commit_parents() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + local parents = commit.parents + assert(parents[1]) + assert(parents[2]) + assert(parents[1].type == "commit") + assert(parents[2].type == "commit") + assert(not parents[3]) +end + +function suite.commit_committer() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + local person = commit.committer + assert(person.realname:find("Committer")) + assert(person.email:find("gall%-committer")) + assert(person.unixtime == "1347114766") + assert(person.timezone == "+0100") +end + +function suite.commit_author() + local repo = test_repo() + local commit = repo:get("refs/heads/master").content + local person = commit.author + assert(person.realname:find("Author")) + assert(person.email:find("gall%-author")) + assert(person.unixtime == "1347114766") + assert(person.timezone == "+0000") +end + +function suite.commit_signature() + local repo = test_repo() + local commit = repo:get("refs/heads/signed").content + local sig = commit.signature + assert(sig) +end + +local count_ok = 0 +for _, testname in ipairs(testnames) do +-- print("Run: " .. testname) + local ok, err = xpcall(suite[testname], debug.traceback) + if not ok then + print(err) + print() + else + count_ok = count_ok + 1 + end +end + +print(tostring(count_ok) .. "/" .. tostring(#testnames) .. " [" .. tostring(total_asserts) .. "] OK") + +os.exit(count_ok == #testnames and 0 or 1) |