Add an rscript shell script to recursively find strippable binaries and strip unstrip...

SVN-Revision: 660

diff --git a/openwrt/scripts/rstrip.sh b/openwrt/scripts/rstrip.sh
new file mode 100755 (executable)
index 0000000..d9d3ad2
--- /dev/null
+++ b/openwrt/scripts/rstrip.sh
@@ -0,0 +1,26 @@
+#!/bin/sh
+
+SELF=${0##*/}
+
+[ -z "$STRIP" ] && {
+  echo "$SELF: strip command not defined (STRIP variable not set)"
+  exit 1
+}
+
+TARGETS=$*
+
+[ -z "$TARGETS" ] && {
+  echo "$SELF: no directories / files specified"
+  echo "usage: $SELF [PATH...]"
+  exit 1
+}
+
+find $TARGETS -type f -a -exec file {} \; | \
+  sed -n -e 's/^\(.*\):.*ELF.*\(executable\|relocatable\|shared object\).*, not stripped/\1:\2/p' | \
+(
+  IFS=":"
+  while read F S; do
+    echo "$SELF: $F:$S"
+    eval "$STRIP $F"
+  done
+)