646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
33 lines
856 B
Bash
33 lines
856 B
Bash
#! @shell@
|
|
|
|
fixupHooks=()
|
|
|
|
if [[ -n "@signingUtils@" ]]; then
|
|
source "@signingUtils@"
|
|
fi
|
|
|
|
excludes=""
|
|
while getopts e: o; do
|
|
case "$o" in
|
|
e) storeId=$(echo "$OPTARG" | @perl@/bin/perl -ne "print \"\$1\" if m|^\Q@storeDir@\E/([a-z0-9]{32})-.*|")
|
|
if [ -z "$storeId" ]; then
|
|
echo "-e argument must be a Nix store path"
|
|
exit 1
|
|
fi
|
|
excludes="$excludes(?!$storeId)"
|
|
;;
|
|
esac
|
|
done
|
|
shift $(($OPTIND-1))
|
|
|
|
for i in "$@"; do
|
|
if test ! -L "$i" -a -f "$i"; then
|
|
cat "$i" | @perl@/bin/perl -pe "s|\Q@storeDir@\E/$excludes[a-z0-9]{32}-|@storeDir@/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-|g" > "$i.tmp"
|
|
if test -x "$i"; then chmod +x "$i.tmp"; fi
|
|
mv "$i.tmp" "$i"
|
|
if [[ -n "@signingUtils@" ]]; then
|
|
signIfRequired "$i"
|
|
fi
|
|
fi
|
|
done
|