From: Dr. Stephen Henson <steve@openssl.org>
Date: Wed, 19 Mar 2008 14:18:36 +0000 (+0000)
Subject: Additional sanity check.
X-Git-Tag: OpenSSL_0_9_8k^2~503
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=041e7f2eee6a16a99f9edb5ce8e81878766199a8;p=openssl

Additional sanity check.
---

diff --git a/crypto/objects/objects.pl b/crypto/objects/objects.pl
index 76c06cc8f9..9bb26e2909 100644
--- a/crypto/objects/objects.pl
+++ b/crypto/objects/objects.pl
@@ -14,6 +14,8 @@ while(<NUMIN>)
 	$Cname =~ s/^X//;
 	if (defined($nidn{$mynum}))
 		{ die "$ARGV[1]:$o:There's already an object with NID ",$mynum," on line ",$order{$mynum},"\n"; }
+	if (defined($nid{$Cname}))
+		{ die "$ARGV[1]:$o:There's already an object with name ",$mynum," on line ",$order{$nid{$Cname}},"\n"; }
 	$nid{$Cname} = $mynum;
 	$nidn{$mynum} = $Cname;
 	$order{$mynum} = $o;