diff options
Diffstat (limited to 'sh/gitmetap')
-rwxr-xr-x | sh/gitmetap | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/sh/gitmetap b/sh/gitmetap new file mode 100755 index 0000000..c058986 --- /dev/null +++ b/sh/gitmetap @@ -0,0 +1,17 @@ +#!/bin/sh +# GIT META Print + +# -rw-r--r-- == binary 110100100 == octal 644 +# https://stackoverflow.com/a/1796009 +$1 ls-tree -r --name-only --full-tree HEAD | dirnameall | awk -v a="$2/" '{printf("%s%s\n",a,$0)}' | tr '\n' '\0' | xargs -0 ls -ldA -- | awk '{ + k=0 + for(i=0;i<=8;i++) + k+=((substr($1,i+2,1)~/[rwx]/)*2^(8-i)) + if(k) { + for(i=10;$i && $i!="->";i++) + $9=$9" "$i + printf("%0o %s %s %s\n",k,$3,$4,$9) + } +}' > "$3" + +#$1 ls-tree -r --name-only --full-tree HEAD | awk -v a="$2/" '{printf("%s%s\n",a,$0)}' | tr '\n' '\0' | xargs -0 ls -ldA -- | awk '{k=0;for(i=0;i<=8;i++)k+=((substr($1,i+2,1)~/[rwx]/)*2^(8-i));if(k){for(i=10;$i && $i!="->";i++)$9=$9" "$i;printf("%0o %s %s %s\n",k,$3,$4,$9)}}' > "$3" |