new file

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1372 ec53bebd-3082-4978-b11e-865c3cabbd6b

lib/krb5/mk_req_ext.c

@@ -0,0 +1,48 @@
+#include <krb5_locl.h>
+
+RCSID("$Id$");
+
+krb5_error_code
+krb5_mk_req_extended(krb5_context context,
+		     krb5_auth_context *auth_context,
+		     const krb5_flags ap_req_options,
+		     krb5_data *in_data,
+		     krb5_creds *in_creds,
+		     krb5_data *outbuf)
+{
+  krb5_error_code r;
+  Authenticator *auth;
+  krb5_data authenticator;
+  Checksum c;
+
+  if (*auth_context == NULL) {
+      r = krb5_auth_con_init(context, auth_context);
+      if (r)
+	  return r;
+  }
+
+  (*auth_context)->key.keytype = in_creds->session.keytype;
+  krb5_data_copy (&(*auth_context)->key.contents,
+		  in_creds->session.contents.data,
+		  in_creds->session.contents.length);
+
+  r = krb5_create_checksum (context,
+			    CKSUMTYPE_RSA_MD4,
+			    in_data->data,
+			    in_data->length,
+			    &c);
+  
+  r = krb5_build_authenticator (context,
+				*auth_context,
+				in_creds,
+				&c,
+				&auth,
+				&authenticator);
+  if (r)
+    return r;
+
+  r = krb5_build_ap_req (context, in_creds, ap_req_options,
+			 authenticator, outbuf);
+  krb5_data_free (&authenticator);
+  return r;
+}