X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_strip;h=57c45f5c7e5a9786091da07ea450381219c4975a;hb=e2a6d4cec4a7ee952cf6a7f250d80f1d75a38f95;hp=b4098be6fd23b5164e3c269b09a64aee70dd5c61;hpb=7bc99d44cfc0275e1b44b390bed1362c457da9ab;p=debhelper.git

diff --git a/dh_strip b/dh_strip
index b4098be..57c45f5 100755
--- a/dh_strip
+++ b/dh_strip
@@ -82,18 +82,12 @@ init(options => {
 });
 
 # This variable can be used to turn off stripping (see Policy).
-if (defined $ENV{DEB_BUILD_OPTIONS} && $ENV{DEB_BUILD_OPTIONS} =~ /nostrip/) {
+if (get_buildoption('nostrip')) {
 	exit;
 }
 
-my $objcopy = "objcopy";
-my $strip = "strip";
-# cross-compiling?
-if (dpkg_architecture_value("DEB_BUILD_GNU_TYPE")
-    ne dpkg_architecture_value("DEB_HOST_GNU_TYPE")) {
-	$objcopy=dpkg_architecture_value("DEB_HOST_GNU_TYPE") . "-objcopy";
-	$strip=dpkg_architecture_value("DEB_HOST_GNU_TYPE") . "-strip";
-}
+my $objcopy = cross_command("objcopy");
+my $strip = cross_command("strip");
 
 # I could just use `file $_[0]`, but this is safer
 sub get_file_type {
@@ -167,12 +161,24 @@ sub make_debug {
 	return unless get_file_type($file) =~ /not stripped/;
 
 	my ($base_file)=$file=~/^\Q$tmp\E(.*)/;
-	my $debug_path=$desttmp."/usr/lib/debug/".$base_file;
+	my $debug_path;
+	if (! compat(8) && 
+	    `readelf -n $file`=~ /^\s+Build ID: ([0-9a-f]{2})([0-9a-f]+)$/m) {
+		$debug_path=$desttmp."/usr/lib/debug/.build-id/$1/$2.debug"
+	}
+	else {
+		$debug_path=$desttmp."/usr/lib/debug/".$base_file;
+	}
 	my $debug_dir=dirname($debug_path);
 	if (! -d $debug_dir) {
 		doit("install", "-d", $debug_dir);
 	}
-	doit($objcopy, "--only-keep-debug", $file, $debug_path);
+	if (compat(8)) {
+		doit($objcopy, "--only-keep-debug", $file, $debug_path);
+	}
+	else {
+		doit($objcopy, "--only-keep-debug", "--compress-debug-sections", $file, $debug_path);
+	}
 	# No reason for this to be executable.
 	doit("chmod", 644, $debug_path);
 	return $debug_path;