From 52cc46a23709def337dccb3b329183533341aa99 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bodo=20M=C3=B6ller?= <bodo@openssl.org>
Date: Sun, 8 Jan 2006 20:03:08 +0000
Subject: [PATCH] Detect SSL error code mishandling.

---
 util/mkerr.pl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/util/mkerr.pl b/util/mkerr.pl
index 4cb48f9964..a5ba05a796 100644
--- a/util/mkerr.pl
+++ b/util/mkerr.pl
@@ -205,6 +205,13 @@ while (($hdr, $lib) = each %libinc)
 		}
 	}
 
+	if ($lib eq "SSL") {
+		if ($rmax{$lib} >= 1000) {
+			print STDERR "!! ERROR: SSL error codes 1000+ are reserved for alerts.\n";
+			print STDERR "!!        Any new alerts must be added to $config.\n";
+			print STDERR "\n";
+		}
+	}
 	close IN;
 }