scripts: extend rstrip.sh to remove bad rpaths

[openwrt/svn-archive/archive.git] / scripts / rstrip.sh

diff --git a/scripts/rstrip.sh b/scripts/rstrip.sh
index 252522bfaa1c718a2adeb5954400a05c1a0f80e5..4e4232db60d6b67689c70ca36568d7790b006714 100755 (executable)
--- a/scripts/rstrip.sh
+++ b/scripts/rstrip.sh
@@ -5,8 +5,6 @@
 # This is free software, licensed under the GNU General Public License v2.
 # See /LICENSE for more information.
 #
-
-
 SELF=${0##*/}
 
 [ -z "$STRIP" ] && {
@@ -27,10 +25,25 @@ find $TARGETS -type f -a -exec file {} \; | \
 (
   IFS=":"
   while read F S; do
-    echo "$SELF: $F:$S"
-       [ "${F##*\.}" = "o" -o "${F##*\.}" = "ko" ] && \
-               eval "$STRIP_KMOD $F" || \
+    echo "$SELF: $F: $S"
+       [ "${S}" = "relocatable" ] && {
+               eval "$STRIP_KMOD $F"
+       } || {
+               b=$(stat -c '%a' $F)
+               [ -z "$PATCHELF" ] || [ -z "$TOPDIR" ] || {
+                       old_rpath="$($PATCHELF --print-rpath $F)"; new_rpath=""
+                       for path in $old_rpath; do
+                               case "$path" in
+                                       /lib/[^/]*|/usr/lib/[^/]*|\$ORIGIN/*) new_rpath="${new_rpath:+$new_rpath:}$path" ;;
+                                       *) echo "$SELF: $F: removing rpath $path" ;;
+                               esac
+                       done
+                       [ "$new_rpath" = "$old_rpath" ] || $PATCHELF --set-rpath "$new_rpath" $F
+               }
                eval "$STRIP $F"
+               a=$(stat -c '%a' $F)
+               [ "$a" = "$b" ] || chmod $b $F
+       }
   done
   true
 )