public/nixpkgs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

nuke-references: support -e option

Browse Source
This commit is contained in:
Nikolay Amiantov 2015-10-18 17:53:29 +03:00
parent c81fb457c9
commit 3c7871a1c0
2 changed files with 23 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
pkgs/build-support/nuke-references/builder.sh
View File

@ -3,11 +3,26 @@ source $stdenv/setup
mkdir -p $out/bin mkdir -p $out/bin
cat > $out/bin/nuke-refs <<EOF cat > $out/bin/nuke-refs <<EOF
#! $SHELL -e #! $SHELL -e
for i in \$*; do
if test ! -L \$i -a -f \$i; then excludes=""
cat \$i | sed "s|$NIX_STORE/[a-z0-9]*-|$NIX_STORE/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-|g" > \$i.tmp while getopts e: o; do
if test -x \$i; then chmod +x \$i.tmp; fi case "\$o" in
mv \$i.tmp \$i e) storeId=\$(echo "\$OPTARG" | sed -n "s|^$NIX_STORE/\\([a-z0-9]\{32\}\\)-.*|\1|p")
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|$NIX_STORE/\$excludes[a-z0-9]{32}-|$NIX_STORE/eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee-|g" > "\$i.tmp"
if test -x "\$i"; then chmod +x "\$i.tmp"; fi
mv "\$i.tmp" "\$i"
fi fi
done done
EOF EOF

5
pkgs/build-support/nuke-references/default.nix
View File

@ -3,9 +3,10 @@
# path (/nix/store/eeee...). This is useful for getting rid of # path (/nix/store/eeee...). This is useful for getting rid of
# dependencies that you know are not actually needed at runtime. # dependencies that you know are not actually needed at runtime.
{stdenv}: { stdenv, perl }:
stdenv.mkDerivation { stdenv.mkDerivation {
name = "nuke-references"; name = "nuke-references";
builder = ./builder.sh; builder = ./builder.sh;
} inherit perl;
}