changeset 4297:ada3277692df

6518331 Eliminate duplicate addresses from ON ELF symbol sort sections (fix build noise)
author ab196087
date Tue, 22 May 2007 18:58:34 -0700
parents 29d5c1292251
children 411ec4c6f829
files usr/src/tools/scripts/check_rtime.pl
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/usr/src/tools/scripts/check_rtime.pl	Tue May 22 18:42:01 2007 -0700
+++ b/usr/src/tools/scripts/check_rtime.pl	Tue May 22 18:58:34 2007 -0700
@@ -623,6 +623,8 @@
 	# Only use ldd unless we've encountered an interpreter that should
 	# be skipped.
 	if (!$SkipLdd && $Interp) {
+		my $LDDFullPath = $FullPath;
+
 		if ($Secure) {
 			# The execution of a secure application over an nfs file
 			# system mounted nosuid will result in warning messages
@@ -634,9 +636,9 @@
 	
 			my($TmpPath) = "$Tmpdir/$File";
 
-			system('cp', $FullPath, $TmpPath);
+			system('cp', $LDDFullPath, $TmpPath);
 			chmod 0777, $TmpPath;
-			$FullPath = $TmpPath;
+			$LDDFullPath = $TmpPath;
 		}
 
 		# Use ldd(1) to determine the objects relocatability and use.
@@ -649,9 +651,9 @@
 		} else {
 			$Lddopt = "-rU";
 		}
-		@Ldd = split(/\n/, `ldd $Lddopt $Env $FullPath 2>&1`);
+		@Ldd = split(/\n/, `ldd $Lddopt $Env $LDDFullPath 2>&1`);
 		if ($Secure) {
-			unlink $FullPath;
+			unlink $LDDFullPath;
 		}
 	}