Fix buggy object definitions (Svenning Sorensen <sss@sss.dnsalias.net>).

2002-04-04 17:48:37 +00:00
parent bbd79bdf03
commit 4825092bbe
4 changed files with 13 additions and 4 deletions
--- a/crypto/objects/objects.pl
+++ b/crypto/objects/objects.pl
@@ -210,6 +210,8 @@ sub process_oid
 	if (!($a[0] =~ /^[0-9]+$/))
 		{
 		$a[0] =~ s/-/_/g;
+		if (!defined($obj{$a[0]}))
+			{ die "$ARGV[0]:$o:Undefined identifier ",$a[0],"\n"; }
 		$pref_oid = "OBJ_" . $a[0];
 		$pref_sep = ",";
 		shift @a;