mirror of https://github.com/bjc/prosody
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
34 lines
997 B
34 lines
997 B
|
|
local lfs = require"lfs";
|
|
|
|
local hg = { };
|
|
|
|
function hg.check_id(path)
|
|
if lfs.attributes(path, 'mode') ~= "directory" then
|
|
return nil, "not a directory";
|
|
end
|
|
local hg_dirstate = io.open(path.."/.hg/dirstate");
|
|
local hgid, hgrepo
|
|
if hg_dirstate then
|
|
hgid = ("%02x%02x%02x%02x%02x%02x"):format(hg_dirstate:read(6):byte(1, 6));
|
|
hg_dirstate:close();
|
|
local hg_changelog = io.open(path.."/.hg/store/00changelog.i");
|
|
if hg_changelog then
|
|
hg_changelog:seek("set", 0x20);
|
|
hgrepo = ("%02x%02x%02x%02x%02x%02x"):format(hg_changelog:read(6):byte(1, 6));
|
|
hg_changelog:close();
|
|
end
|
|
else
|
|
local hg_archival,e = io.open(path.."/.hg_archival.txt"); -- luacheck: ignore 211/e
|
|
if hg_archival then
|
|
local repo = hg_archival:read("*l");
|
|
local node = hg_archival:read("*l");
|
|
hg_archival:close()
|
|
hgid = node and node:match("^node: (%x%x%x%x%x%x%x%x%x%x%x%x)")
|
|
hgrepo = repo and repo:match("^repo: (%x%x%x%x%x%x%x%x%x%x%x%x)")
|
|
end
|
|
end
|
|
return hgid, hgrepo;
|
|
end
|
|
|
|
return hg;
|
|
|