X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=dh_strip;h=2796f9afb1d91645ed9e43e88ab92141cc82f06b;hb=ec77e19bf7a20d35edadb2089c3632fca8f54ed3;hp=ef91d65139abaaea6841ce88021502f71bfa7749;hpb=09bf5892fcc47c94d77c8457b533643ec3b58ef8;p=debhelper.git

diff --git a/dh_strip b/dh_strip
index ef91d65..2796f9a 100755
--- a/dh_strip
+++ b/dh_strip
@@ -149,6 +149,10 @@ sub make_debug {
 	my $file=shift;
 	my $tmp=shift;
 	my $desttmp=shift;
+	
+	# Don't try to copy debug symbols out if the file is already
+	# stripped.
+	return unless get_file_type($file) =~ /not stripped/;
 
 	my ($base_file)=$file=~/^\Q$tmp\E(.*)/;
 	my $debug_path=$desttmp."/usr/lib/debug/".$base_file;
@@ -156,9 +160,7 @@ sub make_debug {
 	if (! -d $debug_dir) {
 		doit("install", "-d", $debug_dir);
 	}
-	if (! -e $debug_path) {
-		doit("objcopy", "--only-keep-debug", $file, $debug_path);
-	}
+	doit("objcopy", "--only-keep-debug", $file, $debug_path);
 	# No reason for this to be executable.
 	doit("chmod", 644, $debug_path);
 	return $debug_path;
@@ -174,14 +176,18 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 	my $tmp=tmpdir($package);
 
 	# Support for keeping the debugging symbols in a detached file.
-	my $keep_debug=$dh{KEEP_DEBUG};
+	my $keep_debug=$dh{K_FLAG};
 	my $debugtmp=$tmp;
 	if (! compat(4)) {
 		if (ref $dh{DEBUGPACKAGES}) {
 			$keep_debug=1;
 			# Note that it's only an array for the v4 stuff;
 			# for v5 only one value is used.
-			$debugtmp=tmpdir(@{$dh{DEBUGPACKAGES}}[0]);
+			my $debugpackage=@{$dh{DEBUGPACKAGES}}[0];
+			if (! grep { $_ eq $debugpackage } getpackages()) {
+				error("debug package $debugpackage is not listed in the control file");
+			}
+			$debugtmp=tmpdir($debugpackage);
 		}
 	}
 	else {
@@ -200,14 +206,14 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 		# *must* inclde the --strip-unneeded.
 		doit("strip","--remove-section=.comment",
 			"--remove-section=.note","--strip-unneeded",$_);
-		attach_debug($_, $debug_path) if $keep_debug;
+		attach_debug($_, $debug_path) if defined $debug_path;
 	}
 	
 	foreach (@executables) {
 		my $debug_path = make_debug($_, $tmp, $debugtmp) if $keep_debug;
 		doit("strip","--remove-section=.comment",
 			"--remove-section=.note",$_);
- 		attach_debug($_, $debug_path) if $keep_debug
+ 		attach_debug($_, $debug_path) if defined $debug_path;
 	}
 
 	foreach (@static_libs) {