move Master/Tools to Build/tools

git-svn-id: svn://tug.org/texlive/trunk@1514 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 16 insertions, 0 deletions

diff --git a/Build/tools/tpm-by-size b/Build/tools/tpm-by-size
new file mode 100755
index 00000000000..a1dde1fcc70
--- /dev/null
+++ b/Build/tools/tpm-by-size
@@ -0,0 +1,16 @@
+#!/bin/sh
+# $Id: //depot/Master/Tools/tpm-by-size#1 $
+# Public domain.  Originally written 2004, Karl Berry.
+# 
+# Simplistic script to get an idea of the biggest space consumers.
+# Just looks at the size fields in the tpm files.
+
+mydir=`dirname $0`
+cd $mydir/.. || exit 1  # assume invoked from Master/Tools
+
+find texmf*/tpm -type f \
+| xargs grep '<TPM:Size>' \
+| sed -e 's/<TPM:Size>/ /' -e 's,</TPM:Size>,,' -e 's,\.tpm:,,' \
+| awk '    {printf "%7d %s\n", $2/1024, $1; total+=$2} 
+       END {printf "%7d total\n", total/1024}' \
+| sort -nr