alioth/nixpkgs
3
0
Fork 0
forked from mirrors/nixpkgs
Code Releases Activity

lib/sources: Make pathIsGitRepo not evaluate toString path

Browse source 
This requires us to avoid the `tryEval` + `throw` combination,
because throw is strict in its error message, and we don't want
to drop our single clue when `commitIdFromGitRepo` is used
incorrectly.
This commit is contained in:
Robert Hensing 2022-11-07 12:52:13 +01:00
parent 8c1b0192c5
commit ec8f8f69bd
1 changed files with 18 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
lib/sources.nix
View file

@ -166,14 +166,25 @@ let
in type == "directory" || lib.any (ext: lib.hasSuffix ext base) exts; in type == "directory" || lib.any (ext: lib.hasSuffix ext base) exts;
in cleanSourceWith { inherit filter src; }; in cleanSourceWith { inherit filter src; };
pathIsGitRepo = path: (tryEval (commitIdFromGitRepo path)).success; pathIsGitRepo = path: (commitIdFromGitRepoOrError path)?value;
/* /*
Get the commit id of a git repo. Get the commit id of a git repo.
Example: commitIdFromGitRepo <nixpkgs/.git> Example: commitIdFromGitRepo <nixpkgs/.git>
*/ */
commitIdFromGitRepo = commitIdFromGitRepo = path:
let commitIdOrError = commitIdFromGitRepoOrError path;
in commitIdOrError.value or (throw commitIdOrError.error);
/*
Get the commit id of a git repo.
Returns `{ value = commitHash }` or `{ error = "... message ..." }`.
Example: commitIdFromGitRepo <nixpkgs/.git>
*/
commitIdFromGitRepoOrError =
let readCommitFromFile = file: path: let readCommitFromFile = file: path:
let fileName = path + "/${file}"; let fileName = path + "/${file}";
packedRefsName = path + "/packed-refs"; packedRefsName = path + "/packed-refs";
@ -186,7 +197,7 @@ let
then then
let m = match "^gitdir: (.*)$" (lib.fileContents path); let m = match "^gitdir: (.*)$" (lib.fileContents path);
in if m == null in if m == null
then throw ("File contains no gitdir reference: " + path) then { error = "File contains no gitdir reference: " + path; }
else else
let gitDir = absolutePath (dirOf path) (lib.head m); let gitDir = absolutePath (dirOf path) (lib.head m);
commonDir'' = if pathIsRegularFile "${gitDir}/commondir" commonDir'' = if pathIsRegularFile "${gitDir}/commondir"
@ -204,7 +215,7 @@ let
let fileContent = lib.fileContents fileName; let fileContent = lib.fileContents fileName;
matchRef = match "^ref: (.*)$" fileContent; matchRef = match "^ref: (.*)$" fileContent;
in if matchRef == null in if matchRef == null
then fileContent then { value = fileContent; }
else readCommitFromFile (lib.head matchRef) path else readCommitFromFile (lib.head matchRef) path
else if pathIsRegularFile packedRefsName else if pathIsRegularFile packedRefsName
@ -218,10 +229,10 @@ let
# https://github.com/NixOS/nix/issues/2147#issuecomment-659868795 # https://github.com/NixOS/nix/issues/2147#issuecomment-659868795
refs = filter isRef (split "\n" fileContent); refs = filter isRef (split "\n" fileContent);
in if refs == [] in if refs == []
then throw ("Could not find " + file + " in " + packedRefsName) then { error = "Could not find " + file + " in " + packedRefsName; }
else lib.head (matchRef (lib.head refs)) else { value = lib.head (matchRef (lib.head refs)); }
else throw ("Not a .git directory: " + path); else { error = "Not a .git directory: " + toString path; };
in readCommitFromFile "HEAD"; in readCommitFromFile "HEAD";
pathHasContext = builtins.hasContext or (lib.hasPrefix storeDir); pathHasContext = builtins.hasContext or (lib.hasPrefix storeDir);