From: Richard Levitte <levitte@openssl.org>
Date: Sun, 27 Jan 2002 15:58:34 +0000 (+0000)
Subject: Detect one-step shifts of the dso_scheme.
X-Git-Tag: OpenSSL-engine-0_9_6c^2^2~52
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=c9c21d3b896f3dedd21fddf523bed397831023ab;p=oweals%2Fopenssl.git

Detect one-step shifts of the dso_scheme.
---

diff --git a/Configure b/Configure
index 73f33bf71c..4abbec2877 100755
--- a/Configure
+++ b/Configure
@@ -1544,7 +1544,19 @@ sub test_sanity
 		{
 		@fields = split(/\s*:\s*/,$table{$target} . ":" x 30 , -1);
 
-		if ($fields[$idx_dso_scheme] !~ /^(dl|dlfcn|win32|vms|)$/)
+		if ($fields[$idx_dso_scheme-1] =~ /^(dl|dlfcn|win32|vms)$/)
+			{
+			$errorcnt++;
+			print STDERR "SANITY ERROR: '$target' has the dso_scheme [$idx_dso_scheme] values\n";
+			print STDERR "              in the previous field\n";
+			}
+		elsif ($fields[$idx_dso_scheme+1] =~ /^(dl|dlfcn|win32|vms)$/)
+			{
+			$errorcnt++;
+			print STDERR "SANITY ERROR: '$target' has the dso_scheme [$idx_dso_scheme] values\n";
+			print STDERR "              in the following field\n";
+			}
+		elsif ($fields[$idx_dso_scheme] !~ /^(dl|dlfcn|win32|vms|)$/)
 			{
 			$errorcnt++;
 			print STDERR "SANITY ERROR: '$target' has the dso_scheme [$idx_dso_scheme] field = ",$fields[$idx_dso_scheme],"\n";