From 58d7757ffc932111cfbece690b74a8f41c47d510 Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Mon, 13 Oct 1997 21:05:50 +0000
Subject: [PATCH] Store keytype twice, as MIT does.

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@3597 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/store.c | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/lib/krb5/store.c b/lib/krb5/store.c
index a25569452..534ceb95e 100644
--- a/lib/krb5/store.c
+++ b/lib/krb5/store.c
@@ -316,7 +316,10 @@ krb5_error_code
 krb5_store_keyblock(krb5_storage *sp, krb5_keyblock p)
 {
     int ret;
-    ret =krb5_store_int32(sp, p.keytype);
+    ret = krb5_store_int16(sp, p.keytype);
+    if(ret) return ret;
+    /* yes, this should be stored twice... */
+    ret = krb5_store_int16(sp, p.keytype);
     if(ret) return ret;
     ret = krb5_store_data(sp, p.keyvalue);
     return ret;
@@ -326,7 +329,12 @@ krb5_error_code
 krb5_ret_keyblock(krb5_storage *sp, krb5_keyblock *p)
 {
     int ret;
-    ret = krb5_ret_int32(sp, (int32_t*)&p->keytype); /* keytype + etype */
+    int16_t tmp;
+    ret = krb5_ret_int16(sp, &tmp);
+    if(ret) return ret;
+    p->keytype = tmp;
+    /* XXX only if cache-type >= 3 */
+    ret = krb5_ret_int16(sp, &tmp);
     if(ret) return ret;
     ret = krb5_ret_data(sp, &p->keyvalue);
     return ret;