s3-gse Rename delegated_creds to match gensec_gssapi_context
[metze/samba/wip.git] / source3 / librpc / crypto / gse.c
index 0f97978256fcf8d40746aec167294928b62efbe6..9f8b3f770ea9e10e83f3877e0adaebdaec31aad3 100644 (file)
@@ -2,6 +2,8 @@
  *  GSSAPI Security Extensions
  *  RPC Pipe client and server routines
  *  Copyright (C) Simo Sorce 2010.
+ *  Copyright (C) Andrew Bartlett 2004-2011.
+ *  Copyright (C) Stefan Metzmacher <metze@samba.org> 2004-2005
  *
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
 #include "includes.h"
 #include "gse.h"
 #include "libads/kerberos_proto.h"
+#include "auth/common_auth.h"
+#include "auth/gensec/gensec.h"
+#include "auth/credentials/credentials.h"
+#include "../librpc/gen_ndr/dcerpc.h"
 
 #if defined(HAVE_KRB5) && defined(HAVE_GSS_WRAP_IOV)
 
 #include "smb_krb5.h"
 #include "gse_krb5.h"
 
+#ifndef GSS_C_DCE_STYLE
+#define GSS_C_DCE_STYLE 0x1000
+#endif
+
 #ifndef GSS_KRB5_INQ_SSPI_SESSION_KEY_OID
 #define GSS_KRB5_INQ_SSPI_SESSION_KEY_OID_LENGTH 11
 #define GSS_KRB5_INQ_SSPI_SESSION_KEY_OID "\x2a\x86\x48\x86\xf7\x12\x01\x02\x02\x05\x05"
@@ -73,7 +83,7 @@ struct gse_context {
 
        gss_OID ret_mech;
        OM_uint32 ret_flags;
-       gss_cred_id_t delegated_creds;
+       gss_cred_id_t delegated_cred_handle;
        gss_name_t client_name;
 
        bool more_processing;
@@ -134,9 +144,9 @@ static int gse_context_destructor(void *ptr)
                gss_maj = gss_release_cred(&gss_min,
                                           &gse_ctx->creds);
        }
-       if (gse_ctx->delegated_creds) {
+       if (gse_ctx->delegated_cred_handle) {
                gss_maj = gss_release_cred(&gss_min,
-                                          &gse_ctx->delegated_creds);
+                                          &gse_ctx->delegated_cred_handle);
        }
 
        /* MIT and Heimdal differ as to if you can call
@@ -221,15 +231,15 @@ err_out:
        return status;
 }
 
-NTSTATUS gse_init_client(TALLOC_CTX *mem_ctx,
-                         bool do_sign, bool do_seal,
-                         const char *ccache_name,
-                         const char *server,
-                         const char *service,
-                         const char *username,
-                         const char *password,
-                         uint32_t add_gss_c_flags,
-                         struct gse_context **_gse_ctx)
+static NTSTATUS gse_init_client(TALLOC_CTX *mem_ctx,
+                               bool do_sign, bool do_seal,
+                               const char *ccache_name,
+                               const char *server,
+                               const char *service,
+                               const char *username,
+                               const char *password,
+                               uint32_t add_gss_c_flags,
+                               struct gse_context **_gse_ctx)
 {
        struct gse_context *gse_ctx;
        OM_uint32 gss_maj, gss_min;
@@ -304,10 +314,10 @@ err_out:
        return status;
 }
 
-NTSTATUS gse_get_client_auth_token(TALLOC_CTX *mem_ctx,
-                                  struct gse_context *gse_ctx,
-                                  DATA_BLOB *token_in,
-                                  DATA_BLOB *token_out)
+static NTSTATUS gse_get_client_auth_token(TALLOC_CTX *mem_ctx,
+                                         struct gse_context *gse_ctx,
+                                         const DATA_BLOB *token_in,
+                                         DATA_BLOB *token_out)
 {
        OM_uint32 gss_maj, gss_min;
        gss_buffer_desc in_data;
@@ -326,7 +336,7 @@ NTSTATUS gse_get_client_auth_token(TALLOC_CTX *mem_ctx,
                                        gse_ctx->gss_c_flags,
                                        0, GSS_C_NO_CHANNEL_BINDINGS,
                                        &in_data, NULL, &out_data,
-                                       NULL, NULL);
+                                       &gse_ctx->ret_flags, NULL);
        switch (gss_maj) {
        case GSS_S_COMPLETE:
                /* we are done with it */
@@ -358,10 +368,10 @@ done:
        return status;
 }
 
-NTSTATUS gse_init_server(TALLOC_CTX *mem_ctx,
-                        bool do_sign, bool do_seal,
-                        uint32_t add_gss_c_flags,
-                        struct gse_context **_gse_ctx)
+static NTSTATUS gse_init_server(TALLOC_CTX *mem_ctx,
+                               bool do_sign, bool do_seal,
+                               uint32_t add_gss_c_flags,
+                               struct gse_context **_gse_ctx)
 {
        struct gse_context *gse_ctx;
        OM_uint32 gss_maj, gss_min;
@@ -453,10 +463,10 @@ done:
        return status;
 }
 
-NTSTATUS gse_get_server_auth_token(TALLOC_CTX *mem_ctx,
-                                  struct gse_context *gse_ctx,
-                                  DATA_BLOB *token_in,
-                                  DATA_BLOB *token_out)
+static NTSTATUS gse_get_server_auth_token(TALLOC_CTX *mem_ctx,
+                                         struct gse_context *gse_ctx,
+                                         const DATA_BLOB *token_in,
+                                         DATA_BLOB *token_out)
 {
        OM_uint32 gss_maj, gss_min;
        gss_buffer_desc in_data;
@@ -476,7 +486,7 @@ NTSTATUS gse_get_server_auth_token(TALLOC_CTX *mem_ctx,
                                         &gse_ctx->ret_mech,
                                         &out_data,
                                         &gse_ctx->ret_flags, NULL,
-                                        &gse_ctx->delegated_creds);
+                                        &gse_ctx->delegated_cred_handle);
        switch (gss_maj) {
        case GSS_S_COMPLETE:
                /* we are done with it */
@@ -519,7 +529,7 @@ done:
        return status;
 }
 
-NTSTATUS gse_verify_server_auth_flags(struct gse_context *gse_ctx)
+static NTSTATUS gse_verify_server_auth_flags(struct gse_context *gse_ctx)
 {
        if (!gse_ctx->authenticated) {
                return NT_STATUS_INVALID_HANDLE;
@@ -610,13 +620,8 @@ done:
        return errstr;
 }
 
-bool gse_require_more_processing(struct gse_context *gse_ctx)
-{
-       return gse_ctx->more_processing;
-}
-
-DATA_BLOB gse_get_session_key(TALLOC_CTX *mem_ctx,
-                               struct gse_context *gse_ctx)
+static DATA_BLOB gse_get_session_key(TALLOC_CTX *mem_ctx,
+                                    struct gse_context *gse_ctx)
 {
        OM_uint32 gss_min, gss_maj;
        gss_buffer_set_t set = GSS_C_NO_BUFFER_SET;
@@ -665,103 +670,21 @@ DATA_BLOB gse_get_session_key(TALLOC_CTX *mem_ctx,
        return ret;
 }
 
-NTSTATUS gse_get_client_name(struct gse_context *gse_ctx,
-                            TALLOC_CTX *mem_ctx, char **cli_name)
-{
-       OM_uint32 gss_min, gss_maj;
-       gss_buffer_desc name_buffer;
-
-       if (!gse_ctx->authenticated) {
-               return NT_STATUS_ACCESS_DENIED;
-       }
-
-       if (!gse_ctx->client_name) {
-               return NT_STATUS_NOT_FOUND;
-       }
-
-       /* TODO: check OID matches KRB5 Principal Name OID ? */
-
-       gss_maj = gss_display_name(&gss_min,
-                                  gse_ctx->client_name,
-                                  &name_buffer, NULL);
-       if (gss_maj) {
-               DEBUG(0, ("gss_display_name failed [%s]\n",
-                         gse_errstr(talloc_tos(), gss_maj, gss_min)));
-               return NT_STATUS_INTERNAL_ERROR;
-       }
-
-       *cli_name = talloc_strndup(talloc_tos(),
-                                       (char *)name_buffer.value,
-                                       name_buffer.length);
-
-       gss_maj = gss_release_buffer(&gss_min, &name_buffer);
-
-       if (!*cli_name) {
-               return NT_STATUS_NO_MEMORY;
-       }
-
-       return NT_STATUS_OK;
-}
-
-NTSTATUS gse_get_authz_data(struct gse_context *gse_ctx,
-                           TALLOC_CTX *mem_ctx, DATA_BLOB *pac)
-{
-       OM_uint32 gss_min, gss_maj;
-       gss_buffer_set_t set = GSS_C_NO_BUFFER_SET;
-
-       if (!gse_ctx->authenticated) {
-               return NT_STATUS_ACCESS_DENIED;
-       }
-
-       gss_maj = gss_inquire_sec_context_by_oid(
-                               &gss_min, gse_ctx->gss_ctx,
-                               &gse_authz_data_oid, &set);
-       if (gss_maj) {
-               DEBUG(0, ("gss_inquire_sec_context_by_oid failed [%s]\n",
-                         gse_errstr(talloc_tos(), gss_maj, gss_min)));
-               return NT_STATUS_NOT_FOUND;
-       }
-
-       if (set == GSS_C_NO_BUFFER_SET) {
-               DEBUG(0, ("gss_inquire_sec_context_by_oid returned unknown "
-                         "data in results.\n"));
-               return NT_STATUS_INTERNAL_ERROR;
-       }
-
-       /* for now we just hope it is the first value */
-       *pac = data_blob_talloc(mem_ctx,
-                               set->elements[0].value,
-                               set->elements[0].length);
-
-       gss_maj = gss_release_buffer_set(&gss_min, &set);
-
-       return NT_STATUS_OK;
-}
-
-NTSTATUS gse_get_pac_blob(struct gse_context *gse_ctx,
-                         TALLOC_CTX *mem_ctx, DATA_BLOB *pac_blob)
-{
-       if (!gse_ctx->authenticated) {
-               return NT_STATUS_ACCESS_DENIED;
-       }
-
-       return gssapi_obtain_pac_blob(mem_ctx, gse_ctx->gss_ctx,
-                                       gse_ctx->client_name, pac_blob);
-}
-
-size_t gse_get_signature_length(struct gse_context *gse_ctx,
-                               int seal, size_t payload_size)
+static size_t gse_get_signature_length(struct gse_context *gse_ctx,
+                                      bool seal, size_t payload_size)
 {
        OM_uint32 gss_min, gss_maj;
        gss_iov_buffer_desc iov[2];
-       uint8_t fakebuf[payload_size];
        int sealed;
 
+       /*
+        * gss_wrap_iov_length() only needs the type and length
+        */
        iov[0].type = GSS_IOV_BUFFER_TYPE_HEADER;
        iov[0].buffer.value = NULL;
        iov[0].buffer.length = 0;
        iov[1].type = GSS_IOV_BUFFER_TYPE_DATA;
-       iov[1].buffer.value = fakebuf;
+       iov[1].buffer.value = NULL;
        iov[1].buffer.length = payload_size;
 
        gss_maj = gss_wrap_iov_length(&gss_min, gse_ctx->gss_ctx,
@@ -776,17 +699,17 @@ size_t gse_get_signature_length(struct gse_context *gse_ctx,
        return iov[0].buffer.length;
 }
 
-NTSTATUS gse_seal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                 DATA_BLOB *data, DATA_BLOB *signature)
+static NTSTATUS gse_seal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
+                        DATA_BLOB *data, DATA_BLOB *signature)
 {
        OM_uint32 gss_min, gss_maj;
        gss_iov_buffer_desc iov[2];
        int req_seal = 1; /* setting to 1 means we request sign+seal */
-       int sealed;
+       int sealed = 1;
        NTSTATUS status;
 
        /* allocate the memory ourselves so we do not need to talloc_memdup */
-       signature->length = gse_get_signature_length(gse_ctx, 1, data->length);
+       signature->length = gse_get_signature_length(gse_ctx, true, data->length);
        if (!signature->length) {
                return NT_STATUS_INTERNAL_ERROR;
        }
@@ -828,8 +751,8 @@ done:
        return status;
 }
 
-NTSTATUS gse_unseal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                   DATA_BLOB *data, DATA_BLOB *signature)
+static NTSTATUS gse_unseal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
+                          DATA_BLOB *data, const DATA_BLOB *signature)
 {
        OM_uint32 gss_min, gss_maj;
        gss_iov_buffer_desc iov[2];
@@ -869,8 +792,8 @@ done:
        return status;
 }
 
-NTSTATUS gse_sign(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                 DATA_BLOB *data, DATA_BLOB *signature)
+static NTSTATUS gse_sign(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
+                        DATA_BLOB *data, DATA_BLOB *signature)
 {
        OM_uint32 gss_min, gss_maj;
        gss_buffer_desc in_data = { 0, NULL };
@@ -906,8 +829,8 @@ done:
        return status;
 }
 
-NTSTATUS gse_sigcheck(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                     DATA_BLOB *data, DATA_BLOB *signature)
+static NTSTATUS gse_sigcheck(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
+                            const DATA_BLOB *data, const DATA_BLOB *signature)
 {
        OM_uint32 gss_min, gss_maj;
        gss_buffer_desc in_data = { 0, NULL };
@@ -934,107 +857,438 @@ done:
        return status;
 }
 
-#else
-
-NTSTATUS gse_init_client(TALLOC_CTX *mem_ctx,
-                         bool do_sign, bool do_seal,
-                         const char *ccache_name,
-                         const char *server,
-                         const char *service,
-                         const char *username,
-                         const char *password,
-                         uint32_t add_gss_c_flags,
-                         struct gse_context **_gse_ctx)
+static NTSTATUS gensec_gse_client_start(struct gensec_security *gensec_security)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
-}
+       struct gse_context *gse_ctx;
+       struct cli_credentials *creds = gensec_get_credentials(gensec_security);
+       NTSTATUS nt_status;
+       OM_uint32 want_flags = 0;
+       bool do_sign = false, do_seal = false;
+       const char *hostname = gensec_get_target_hostname(gensec_security);
+       const char *service = gensec_get_target_service(gensec_security);
+       const char *username = cli_credentials_get_username(creds);
+       const char *password = cli_credentials_get_password(creds);
+
+       if (!hostname) {
+               DEBUG(1, ("Could not determine hostname for target computer, cannot use kerberos\n"));
+               return NT_STATUS_INVALID_PARAMETER;
+       }
+       if (is_ipaddress(hostname)) {
+               DEBUG(2, ("Cannot do GSE to an IP address\n"));
+               return NT_STATUS_INVALID_PARAMETER;
+       }
+       if (strcmp(hostname, "localhost") == 0) {
+               DEBUG(2, ("GSE to 'localhost' does not make sense\n"));
+               return NT_STATUS_INVALID_PARAMETER;
+       }
 
-NTSTATUS gse_get_client_auth_token(TALLOC_CTX *mem_ctx,
-                                  struct gse_context *gse_ctx,
-                                  DATA_BLOB *token_in,
-                                  DATA_BLOB *token_out)
-{
-       return NT_STATUS_NOT_IMPLEMENTED;
+       if (gensec_security->want_features & GENSEC_FEATURE_SIGN) {
+               do_sign = true;
+       }
+       if (gensec_security->want_features & GENSEC_FEATURE_SEAL) {
+               do_seal = true;
+       }
+       if (gensec_security->want_features & GENSEC_FEATURE_DCE_STYLE) {
+               want_flags |= GSS_C_DCE_STYLE;
+       }
+
+       nt_status = gse_init_client(gensec_security, do_sign, do_seal, NULL,
+                                   hostname, service,
+                                   username, password, want_flags,
+                                   &gse_ctx);
+       if (!NT_STATUS_IS_OK(nt_status)) {
+               return nt_status;
+       }
+       gensec_security->private_data = gse_ctx;
+       return NT_STATUS_OK;
 }
 
-NTSTATUS gse_init_server(TALLOC_CTX *mem_ctx,
-                        bool do_sign, bool do_seal,
-                        uint32_t add_gss_c_flags,
-                        struct gse_context **_gse_ctx)
+static NTSTATUS gensec_gse_server_start(struct gensec_security *gensec_security)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx;
+       NTSTATUS nt_status;
+       OM_uint32 want_flags = 0;
+       bool do_sign = false, do_seal = false;
+
+       if (gensec_security->want_features & GENSEC_FEATURE_SIGN) {
+               do_sign = true;
+       }
+       if (gensec_security->want_features & GENSEC_FEATURE_SEAL) {
+               do_seal = true;
+       }
+       if (gensec_security->want_features & GENSEC_FEATURE_DCE_STYLE) {
+               want_flags |= GSS_C_DCE_STYLE;
+       }
+
+       nt_status = gse_init_server(gensec_security, do_sign, do_seal, want_flags,
+                                   &gse_ctx);
+       if (!NT_STATUS_IS_OK(nt_status)) {
+               return nt_status;
+       }
+       gensec_security->private_data = gse_ctx;
+       return NT_STATUS_OK;
 }
 
-NTSTATUS gse_get_server_auth_token(TALLOC_CTX *mem_ctx,
-                                  struct gse_context *gse_ctx,
-                                  DATA_BLOB *token_in,
-                                  DATA_BLOB *token_out)
+/**
+ * Check if the packet is one for this mechansim
+ *
+ * @param gensec_security GENSEC state
+ * @param in The request, as a DATA_BLOB
+ * @return Error, INVALID_PARAMETER if it's not a packet for us
+ *                or NT_STATUS_OK if the packet is ok.
+ */
+
+static NTSTATUS gensec_gse_magic(struct gensec_security *gensec_security,
+                                const DATA_BLOB *in)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       if (gensec_gssapi_check_oid(in, GENSEC_OID_KERBEROS5)) {
+               return NT_STATUS_OK;
+       } else {
+               return NT_STATUS_INVALID_PARAMETER;
+       }
 }
 
-NTSTATUS gse_verify_server_auth_flags(struct gse_context *gse_ctx)
+
+/**
+ * Next state function for the GSE GENSEC mechanism
+ *
+ * @param gensec_gse_state GSE State
+ * @param mem_ctx The TALLOC_CTX for *out to be allocated on
+ * @param in The request, as a DATA_BLOB
+ * @param out The reply, as an talloc()ed DATA_BLOB, on *mem_ctx
+ * @return Error, MORE_PROCESSING_REQUIRED if a reply is sent,
+ *                or NT_STATUS_OK if the user is authenticated.
+ */
+
+static NTSTATUS gensec_gse_update(struct gensec_security *gensec_security,
+                                 TALLOC_CTX *mem_ctx,
+                                 struct tevent_context *ev,
+                                 const DATA_BLOB in, DATA_BLOB *out)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       NTSTATUS status;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+
+       switch (gensec_security->gensec_role) {
+       case GENSEC_CLIENT:
+               status = gse_get_client_auth_token(mem_ctx, gse_ctx,
+                                                  &in, out);
+               break;
+       case GENSEC_SERVER:
+               status = gse_get_server_auth_token(mem_ctx, gse_ctx,
+                                                  &in, out);
+               break;
+       }
+       if (!NT_STATUS_IS_OK(status)) {
+               return status;
+       }
+       if (gse_ctx->more_processing) {
+               return NT_STATUS_MORE_PROCESSING_REQUIRED;
+       }
+
+       if (gensec_security->gensec_role == GENSEC_SERVER) {
+               return gse_verify_server_auth_flags(gse_ctx);
+       }
+
+       return NT_STATUS_OK;
 }
 
-bool gse_require_more_processing(struct gse_context *gse_ctx)
+static NTSTATUS gensec_gse_wrap(struct gensec_security *gensec_security,
+                               TALLOC_CTX *mem_ctx,
+                               const DATA_BLOB *in,
+                               DATA_BLOB *out)
 {
-       return false;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       OM_uint32 maj_stat, min_stat;
+       gss_buffer_desc input_token, output_token;
+       int conf_state;
+       input_token.length = in->length;
+       input_token.value = in->data;
+
+       maj_stat = gss_wrap(&min_stat,
+                           gse_ctx->gss_ctx,
+                           gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL),
+                           GSS_C_QOP_DEFAULT,
+                           &input_token,
+                           &conf_state,
+                           &output_token);
+       if (GSS_ERROR(maj_stat)) {
+               DEBUG(0, ("gensec_gse_wrap: GSS Wrap failed: %s\n",
+                         gse_errstr(talloc_tos(), maj_stat, min_stat)));
+               return NT_STATUS_ACCESS_DENIED;
+       }
+
+       *out = data_blob_talloc(mem_ctx, output_token.value, output_token.length);
+       gss_release_buffer(&min_stat, &output_token);
+
+       if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)
+           && !conf_state) {
+               return NT_STATUS_ACCESS_DENIED;
+       }
+       return NT_STATUS_OK;
 }
 
-DATA_BLOB gse_get_session_key(TALLOC_CTX *mem_ctx,
-                             struct gse_context *gse_ctx)
+static NTSTATUS gensec_gse_unwrap(struct gensec_security *gensec_security,
+                                    TALLOC_CTX *mem_ctx,
+                                    const DATA_BLOB *in,
+                                    DATA_BLOB *out)
 {
-       return data_blob_null;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       OM_uint32 maj_stat, min_stat;
+       gss_buffer_desc input_token, output_token;
+       int conf_state;
+       gss_qop_t qop_state;
+       input_token.length = in->length;
+       input_token.value = in->data;
+
+       maj_stat = gss_unwrap(&min_stat,
+                             gse_ctx->gss_ctx,
+                             &input_token,
+                             &output_token,
+                             &conf_state,
+                             &qop_state);
+       if (GSS_ERROR(maj_stat)) {
+               DEBUG(0, ("gensec_gse_unwrap: GSS UnWrap failed: %s\n",
+                         gse_errstr(talloc_tos(), maj_stat, min_stat)));
+               return NT_STATUS_ACCESS_DENIED;
+       }
+
+       *out = data_blob_talloc(mem_ctx, output_token.value, output_token.length);
+       gss_release_buffer(&min_stat, &output_token);
+
+       if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)
+           && !conf_state) {
+               return NT_STATUS_ACCESS_DENIED;
+       }
+       return NT_STATUS_OK;
 }
 
-NTSTATUS gse_get_client_name(struct gse_context *gse_ctx,
-                            TALLOC_CTX *mem_ctx, char **cli_name)
+static NTSTATUS gensec_gse_seal_packet(struct gensec_security *gensec_security,
+                                      TALLOC_CTX *mem_ctx,
+                                      uint8_t *data, size_t length,
+                                      const uint8_t *whole_pdu, size_t pdu_length,
+                                      DATA_BLOB *sig)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       DATA_BLOB payload = data_blob_const(data, length);
+       return gse_seal(mem_ctx, gse_ctx, &payload, sig);
 }
 
-NTSTATUS gse_get_authz_data(struct gse_context *gse_ctx,
-                           TALLOC_CTX *mem_ctx, DATA_BLOB *pac)
+static NTSTATUS gensec_gse_unseal_packet(struct gensec_security *gensec_security,
+                                        uint8_t *data, size_t length,
+                                        const uint8_t *whole_pdu, size_t pdu_length,
+                                        const DATA_BLOB *sig)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       DATA_BLOB payload = data_blob_const(data, length);
+       return gse_unseal(talloc_tos() /* unused */, gse_ctx, &payload, sig);
 }
 
-NTSTATUS gse_get_pac_blob(struct gse_context *gse_ctx,
-                         TALLOC_CTX *mem_ctx, DATA_BLOB *pac_blob)
+static NTSTATUS gensec_gse_sign_packet(struct gensec_security *gensec_security,
+                                      TALLOC_CTX *mem_ctx,
+                                      const uint8_t *data, size_t length,
+                                      const uint8_t *whole_pdu, size_t pdu_length,
+                                      DATA_BLOB *sig)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       DATA_BLOB payload = data_blob_const(data, length);
+       return gse_sign(mem_ctx, gse_ctx, &payload, sig);
 }
 
-size_t gse_get_signature_length(struct gse_context *gse_ctx,
-                               int seal, size_t payload_size)
+static NTSTATUS gensec_gse_check_packet(struct gensec_security *gensec_security,
+                                       const uint8_t *data, size_t length,
+                                       const uint8_t *whole_pdu, size_t pdu_length,
+                                       const DATA_BLOB *sig)
 {
-       return 0;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       DATA_BLOB payload = data_blob_const(data, length);
+       return gse_sigcheck(NULL, gse_ctx, &payload, sig);
 }
 
-NTSTATUS gse_seal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                 DATA_BLOB *data, DATA_BLOB *signature)
+/* Try to figure out what features we actually got on the connection */
+static bool gensec_gse_have_feature(struct gensec_security *gensec_security,
+                                   uint32_t feature)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+
+       if (feature & GENSEC_FEATURE_SIGN) {
+               return gse_ctx->ret_flags & GSS_C_INTEG_FLAG;
+       }
+       if (feature & GENSEC_FEATURE_SEAL) {
+               return gse_ctx->ret_flags & GSS_C_CONF_FLAG;
+       }
+       if (feature & GENSEC_FEATURE_SESSION_KEY) {
+               /* Only for GSE/Krb5 */
+               if (gss_oid_equal(gse_ctx->ret_mech, gss_mech_krb5)) {
+                       return true;
+               }
+       }
+       if (feature & GENSEC_FEATURE_DCE_STYLE) {
+               return gse_ctx->ret_flags & GSS_C_DCE_STYLE;
+       }
+       /* We can always do async (rather than strict request/reply) packets.  */
+       if (feature & GENSEC_FEATURE_ASYNC_REPLIES) {
+               return true;
+       }
+       return false;
 }
 
-NTSTATUS gse_unseal(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                   DATA_BLOB *data, DATA_BLOB *signature)
+/*
+ * Extract the 'sesssion key' needed by SMB signing and ncacn_np
+ * (for encrypting some passwords).
+ *
+ * This breaks all the abstractions, but what do you expect...
+ */
+static NTSTATUS gensec_gse_session_key(struct gensec_security *gensec_security,
+                                      TALLOC_CTX *mem_ctx,
+                                      DATA_BLOB *session_key_out)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+
+       DATA_BLOB session_key = gse_get_session_key(mem_ctx, gse_ctx);
+       if (session_key.data == NULL) {
+               return NT_STATUS_NO_USER_SESSION_KEY;
+       }
+
+       *session_key_out = session_key;
+
+       return NT_STATUS_OK;
 }
 
-NTSTATUS gse_sign(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                 DATA_BLOB *data, DATA_BLOB *signature)
+/* Get some basic (and authorization) information about the user on
+ * this session.  This uses either the PAC (if present) or a local
+ * database lookup */
+static NTSTATUS gensec_gse_session_info(struct gensec_security *gensec_security,
+                                       TALLOC_CTX *mem_ctx,
+                                       struct auth_session_info **_session_info)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+       NTSTATUS nt_status;
+       TALLOC_CTX *tmp_ctx;
+       struct auth_session_info *session_info = NULL;
+       OM_uint32 maj_stat, min_stat;
+       DATA_BLOB pac_blob, *pac_blob_ptr = NULL;
+
+       gss_buffer_desc name_token;
+       char *principal_string;
+
+       tmp_ctx = talloc_named(mem_ctx, 0, "gensec_gse_session_info context");
+       NT_STATUS_HAVE_NO_MEMORY(tmp_ctx);
+
+       maj_stat = gss_display_name(&min_stat,
+                                   gse_ctx->client_name,
+                                   &name_token,
+                                   NULL);
+       if (GSS_ERROR(maj_stat)) {
+               DEBUG(1, ("GSS display_name failed: %s\n",
+                         gse_errstr(talloc_tos(), maj_stat, min_stat)));
+               talloc_free(tmp_ctx);
+               return NT_STATUS_FOOBAR;
+       }
+
+       principal_string = talloc_strndup(tmp_ctx,
+                                         (const char *)name_token.value,
+                                         name_token.length);
+
+       gss_release_buffer(&min_stat, &name_token);
+
+       if (!principal_string) {
+               talloc_free(tmp_ctx);
+               return NT_STATUS_NO_MEMORY;
+       }
+
+       nt_status = gssapi_obtain_pac_blob(tmp_ctx,  gse_ctx->gss_ctx,
+                                          gse_ctx->client_name,
+                                          &pac_blob);
+
+       /* IF we have the PAC - otherwise we need to get this
+        * data from elsewere
+        */
+       if (NT_STATUS_IS_OK(nt_status)) {
+               pac_blob_ptr = &pac_blob;
+       }
+       nt_status = gensec_generate_session_info_pac(tmp_ctx,
+                                                    gensec_security,
+                                                    NULL,
+                                                    pac_blob_ptr, principal_string,
+                                                    gensec_get_remote_address(gensec_security),
+                                                    &session_info);
+       if (!NT_STATUS_IS_OK(nt_status)) {
+               talloc_free(tmp_ctx);
+               return nt_status;
+       }
+
+       nt_status = gensec_gse_session_key(gensec_security, session_info,
+                                          &session_info->session_key);
+       if (!NT_STATUS_IS_OK(nt_status)) {
+               talloc_free(tmp_ctx);
+               return nt_status;
+       }
+
+       *_session_info = talloc_move(mem_ctx, &session_info);
+       talloc_free(tmp_ctx);
+
+       return NT_STATUS_OK;
 }
 
-NTSTATUS gse_sigcheck(TALLOC_CTX *mem_ctx, struct gse_context *gse_ctx,
-                     DATA_BLOB *data, DATA_BLOB *signature)
+static size_t gensec_gse_sig_size(struct gensec_security *gensec_security,
+                                 size_t data_size)
 {
-       return NT_STATUS_NOT_IMPLEMENTED;
+       struct gse_context *gse_ctx =
+               talloc_get_type_abort(gensec_security->private_data,
+               struct gse_context);
+
+       return gse_get_signature_length(gse_ctx,
+                                       gensec_security->want_features & GENSEC_FEATURE_SEAL,
+                                       data_size);
 }
 
+static const char *gensec_gse_krb5_oids[] = {
+       GENSEC_OID_KERBEROS5_OLD,
+       GENSEC_OID_KERBEROS5,
+       NULL
+};
+
+const struct gensec_security_ops gensec_gse_krb5_security_ops = {
+       .name           = "gse_krb5",
+       .auth_type      = DCERPC_AUTH_TYPE_KRB5,
+       .oid            = gensec_gse_krb5_oids,
+       .client_start   = gensec_gse_client_start,
+       .server_start   = gensec_gse_server_start,
+       .magic          = gensec_gse_magic,
+       .update         = gensec_gse_update,
+       .session_key    = gensec_gse_session_key,
+       .session_info   = gensec_gse_session_info,
+       .sig_size       = gensec_gse_sig_size,
+       .sign_packet    = gensec_gse_sign_packet,
+       .check_packet   = gensec_gse_check_packet,
+       .seal_packet    = gensec_gse_seal_packet,
+       .unseal_packet  = gensec_gse_unseal_packet,
+       .wrap           = gensec_gse_wrap,
+       .unwrap         = gensec_gse_unwrap,
+       .have_feature   = gensec_gse_have_feature,
+       .enabled        = true,
+       .kerberos       = true,
+       .priority       = GENSEC_GSSAPI
+};
+
 #endif /* HAVE_KRB5 && HAVE_GSS_WRAP_IOV */