From 8096d906bc70e7d8c4f6e037764a6e355d4e0bb7 Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Mon, 10 Mar 1997 00:16:33 +0000
Subject: [PATCH] Use krb5_mk_req rather than inlined code.

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1340 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/get_cred.c | 43 +++++++++++++++----------------------------
 1 file changed, 15 insertions(+), 28 deletions(-)

diff --git a/lib/krb5/get_cred.c b/lib/krb5/get_cred.c
index 87ba8328f..cd5bb310a 100644
--- a/lib/krb5/get_cred.c
+++ b/lib/krb5/get_cred.c
@@ -119,42 +119,29 @@ krb5_get_credentials (krb5_context context,
     a.req_body.enc_authorization_data = NULL;
 
     {
+	krb5_data in_data;
 	unsigned char buf[1024];
+	krb5_auth_context ac = NULL;
 	int len;
-	Checksum c;
-	krb5_creds cred, mcred;
 	
-	krb5_build_principal(context, &mcred.server, 
-			     in_creds->client->realm.length,
-			     in_creds->client->realm.data,
-			     "krbtgt", a.req_body.realm, NULL);
-	krb5_cc_retrieve_cred(context, ccache, 0, &mcred, &cred);
-	memcpy(&key, cred.session.contents.data, sizeof(key));
 
 	len = encode_KDC_REQ_BODY(buf + sizeof(buf) - 1, sizeof(buf),
 				  &a.req_body);
-	err = krb5_create_checksum (context,
-				    CKSUMTYPE_RSA_MD4,
-				    buf + sizeof(buf) - len,
-				    len,
-				    &c);
-	if (err)
-	  return err;
-	err = krb5_build_authenticator (context, NULL,
-					&cred,
-					&c,
-					NULL,
-					&authenticator);
-	if (err)
-	  return err;
+	in_data.length;
+	in_data.data = buf + sizeof(buf) - len;
+	
+	err = krb5_mk_req(context,
+			  &ac,
+			  0,
+			  "krbtgt",
+			  a.req_body.realm,
+			  &in_data,
+			  ccache,
+			  &foo.padata_value);
+	if(err)
+	    return err;
 
 	foo.padata_type = pa_tgs_req;
-	err = krb5_build_ap_req(context, &cred, 
-				0,
-				authenticator,
-				&foo.padata_value);
-	if(err)
-	  return err;
     }
 
     a.padata = malloc(sizeof(*a.padata));