From e7c1c64676f6e81f50efa36d038559637b2ce6c4 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Wed, 20 Aug 1997 15:41:08 +0000
Subject: [PATCH] (krb5_recvauth): Send a KRB-ERROR iff there's an error.

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

diff --git a/lib/krb5/recvauth.c b/lib/krb5/recvauth.c
index 23a485454..e6f954909 100644
--- a/lib/krb5/recvauth.c
+++ b/lib/krb5/recvauth.c
@@ -133,8 +133,24 @@ krb5_recvauth(krb5_context context,
 		     &ap_options,
 		     ticket);
   krb5_data_free (&data);
-  if (ret)
-    return ret;
+  if (ret) {
+      krb5_data error_data;
+      krb5_error_code ret2;
+
+      ret2 = krb5_mk_error (context,
+			    ret,
+			    NULL,
+			    NULL,
+			    NULL,
+			    server,
+			    0,
+			    &error_data);
+      if (ret2 == 0) {
+	  krb5_write_message (context, p_fd, &error_data);
+	  krb5_data_free (&error_data);
+      }
+      return ret;
+  }      
 
   len = 0;
   if (krb5_net_write (context, fd, &len, 4) != 4)