From 63dede62669d040bf15151c11a9dae50b0baf536 Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Thu, 22 Jan 1998 23:32:05 +0000
Subject: [PATCH] Add krb5_convert_etype function - converts from protocol
 keytypes (that really are enctypes) to internal representation.

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@4353 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/encrypt.c | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/lib/krb5/encrypt.c b/lib/krb5/encrypt.c
index 85465cb27..615f6923e 100644
--- a/lib/krb5/encrypt.c
+++ b/lib/krb5/encrypt.c
@@ -186,6 +186,23 @@ krb5_etype_to_keytype(krb5_context context,
     return 0;
 }
 
+krb5_error_code
+krb5_convert_etype(krb5_context context,
+		   krb5_keytype *keytype)
+{
+#ifdef KTYPE_IS_ETYPE
+    krb5_error_code ret;
+    krb5_keytype kt;
+    ret = krb5_etype_to_keytype(context, 
+				(krb5_enctype)*keytype, 
+				&kt);
+    if(ret)
+	return ret;
+    *keytype = kt;
+#endif
+    return 0;
+}
+
 void
 krb5_generate_random_block(void *buf, size_t len)
 {