source3/smbd/seal.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    SMB Transport encryption (sealing) code - server code.
   4    Copyright (C) Jeremy Allison 2007.
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 2 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program; if not, write to the Free Software
  18    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19 */
  20
  21 #include "includes.h"
  22
  23 /******************************************************************************
  24  Server side encryption.
  25 ******************************************************************************/
  26
  27 /******************************************************************************
  28  Global server state.
  29 ******************************************************************************/
  30
  31 struct smb_srv_trans_enc_ctx {
  32         struct smb_trans_enc_state *es;
  33         AUTH_NTLMSSP_STATE *auth_ntlmssp_state; /* Must be kept in sync with pointer in ec->ntlmssp_state. */
  34 };
  35
  36 static struct smb_srv_trans_enc_ctx *partial_srv_trans_enc_ctx;
  37 static struct smb_srv_trans_enc_ctx *srv_trans_enc_ctx;
  38
  39 /******************************************************************************
  40  Is server encryption on ?
  41 ******************************************************************************/
  42
  43 BOOL srv_encryption_on(void)
  44 {
  45         if (srv_trans_enc_ctx) {
  46                 return common_encryption_on(srv_trans_enc_ctx->es);
  47         }
  48         return False;
  49 }
  50
  51 /******************************************************************************
  52  Create an auth_ntlmssp_state and ensure pointer copy is correct.
  53 ******************************************************************************/
  54
  55 static NTSTATUS make_auth_ntlmssp(struct smb_srv_trans_enc_ctx *ec)
  56 {
  57         NTSTATUS status = auth_ntlmssp_start(&ec->auth_ntlmssp_state);
  58         if (!NT_STATUS_IS_OK(status)) {
  59                 return nt_status_squash(status);
  60         }
  61
  62         /*
  63          * We must remember to update the pointer copy for the common
  64          * functions after any auth_ntlmssp_start/auth_ntlmssp_end.
  65          */
  66         ec->es->s.ntlmssp_state = ec->auth_ntlmssp_state->ntlmssp_state;
  67         return status;
  68 }
  69
  70 /******************************************************************************
  71  Destroy an auth_ntlmssp_state and ensure pointer copy is correct.
  72 ******************************************************************************/
  73
  74 static void destroy_auth_ntlmssp(struct smb_srv_trans_enc_ctx *ec)
  75 {
  76         /*
  77          * We must remember to update the pointer copy for the common
  78          * functions after any auth_ntlmssp_start/auth_ntlmssp_end.
  79          */
  80
  81         if (ec->auth_ntlmssp_state) {
  82                 auth_ntlmssp_end(&ec->auth_ntlmssp_state);
  83                 /* The auth_ntlmssp_end killed this already. */
  84                 ec->es->s.ntlmssp_state = NULL;
  85         }
  86 }
  87
  88 #if defined(HAVE_GSSAPI) && defined(HAVE_KRB5)
  89
  90 /******************************************************************************
  91  Import a name.
  92 ******************************************************************************/
  93
  94 static NTSTATUS get_srv_gss_creds(const char *service,
  95                                 const char *name,
  96                                 gss_cred_usage_t cred_type,
  97                                 gss_cred_id_t *p_srv_cred)
  98 {
  99         OM_uint32 ret;
 100         OM_uint32 min;
 101         gss_name_t srv_name;
 102         gss_buffer_desc input_name;
 103         char *host_princ_s = NULL;
 104         NTSTATUS status = NT_STATUS_OK;
 105
 106         gss_OID_desc nt_hostbased_service =
 107         {10, CONST_DISCARD(char *,"\x2a\x86\x48\x86\xf7\x12\x01\x02\x01\x04")};
 108
 109         asprintf(&host_princ_s, "%s@%s", service, name);
 110         if (host_princ_s == NULL) {
 111                 return NT_STATUS_NO_MEMORY;
 112         }
 113
 114         input_name.value = host_princ_s;
 115         input_name.length = strlen(host_princ_s) + 1;
 116
 117         ret = gss_import_name(&min,
 118                                 &input_name,
 119                                 &nt_hostbased_service,
 120                                 &srv_name);
 121
 122         if (ret != GSS_S_COMPLETE) {
 123                 SAFE_FREE(host_princ_s);
 124                 return map_nt_error_from_gss(ret, min);
 125         }
 126
 127         ret = gss_acquire_cred(&min,
 128                                 &srv_name,
 129                                 GSS_C_INDEFINITE,
 130                                 GSS_C_NULL_OID_SET,
 131                                 cred_type,
 132                                 p_srv_cred,
 133                                 NULL,
 134                                 NULL);
 135
 136         if (ret != GSS_S_COMPLETE) {
 137                 status = map_nt_error_from_gss(ret, min);
 138         }
 139
 140         SAFE_FREE(host_princ_s);
 141         gss_release_name(&min, &srv_name);
 142         return status;
 143 }
 144
 145 /******************************************************************************
 146  Create a gss state.
 147  Try and get the cifs/server@realm principal first, then fall back to
 148  host/server@realm.
 149 ******************************************************************************/
 150
 151 static NTSTATUS make_auth_gss(struct smb_srv_trans_enc_ctx *ec)
 152 {
 153         NTSTATUS status;
 154         gss_cred_id_t srv_cred;
 155         fstring fqdn;
 156
 157         name_to_fqdn(fqdn, global_myname());
 158         strlower_m(fqdn);
 159
 160         status = get_srv_gss_creds("cifs", fqdn, GSS_C_ACCEPT, &srv_cred);
 161         if (!NT_STATUS_IS_OK(status)) {
 162                 status = get_srv_gss_creds("host", fqdn, GSS_C_ACCEPT, &srv_cred);
 163                 if (!NT_STATUS_IS_OK(status)) {
 164                         return nt_status_squash(status);
 165                 }
 166         }
 167
 168         ec->es->s.gss_state = SMB_MALLOC_P(struct smb_tran_enc_state_gss);
 169         if (!ec->es->s.gss_state) {
 170                 OM_uint32 min;
 171                 gss_release_cred(&min, &srv_cred);
 172                 return NT_STATUS_NO_MEMORY;
 173         }
 174         ZERO_STRUCTP(ec->es->s.gss_state);
 175         ec->es->s.gss_state->creds = srv_cred;
 176
 177         /* No context yet. */
 178         ec->es->s.gss_state->gss_ctx = GSS_C_NO_CONTEXT;
 179
 180         return NT_STATUS_OK;
 181 }
 182 #endif
 183
 184 /******************************************************************************
 185  Shutdown a server encryption context.
 186 ******************************************************************************/
 187
 188 static void srv_free_encryption_context(struct smb_srv_trans_enc_ctx **pp_ec)
 189 {
 190         struct smb_srv_trans_enc_ctx *ec = *pp_ec;
 191
 192         if (!ec) {
 193                 return;
 194         }
 195
 196         if (ec->es) {
 197                 switch (ec->es->smb_enc_type) {
 198                         case SMB_TRANS_ENC_NTLM:
 199                                 destroy_auth_ntlmssp(ec);
 200                                 break;
 201 #if defined(HAVE_GSSAPI) && defined(HAVE_KRB5)
 202                         case SMB_TRANS_ENC_GSS:
 203                                 break;
 204 #endif
 205                 }
 206                 common_free_encryption_state(&ec->es);
 207         }
 208
 209         SAFE_FREE(ec);
 210         *pp_ec = NULL;
 211 }
 212
 213 /******************************************************************************
 214  Create a server encryption context.
 215 ******************************************************************************/
 216
 217 static NTSTATUS make_srv_encryption_context(enum smb_trans_enc_type smb_enc_type, struct smb_srv_trans_enc_ctx **pp_ec)
 218 {
 219         struct smb_srv_trans_enc_ctx *ec;
 220
 221         *pp_ec = NULL;
 222
 223         ec = SMB_MALLOC_P(struct smb_srv_trans_enc_ctx);
 224         if (!ec) {
 225                 return NT_STATUS_NO_MEMORY;
 226         }
 227         ZERO_STRUCTP(partial_srv_trans_enc_ctx);
 228         ec->es = SMB_MALLOC_P(struct smb_trans_enc_state);
 229         if (!ec->es) {
 230                 SAFE_FREE(ec);
 231                 return NT_STATUS_NO_MEMORY;
 232         }
 233         ZERO_STRUCTP(ec->es);
 234         ec->es->smb_enc_type = smb_enc_type;
 235         switch (smb_enc_type) {
 236                 case SMB_TRANS_ENC_NTLM:
 237                         {
 238                                 NTSTATUS status = make_auth_ntlmssp(ec);
 239                                 if (!NT_STATUS_IS_OK(status)) {
 240                                         srv_free_encryption_context(&ec);
 241                                         return status;
 242                                 }
 243                         }
 244                         break;
 245
 246 #if defined(HAVE_GSSAPI) && defined(HAVE_KRB5)
 247                 case SMB_TRANS_ENC_GSS:
 248                         /* Acquire our credentials by calling gss_acquire_cred here. */
 249                         {
 250                                 NTSTATUS status = make_auth_gss(ec);
 251                                 if (!NT_STATUS_IS_OK(status)) {
 252                                         srv_free_encryption_context(&ec);
 253                                         return status;
 254                                 }
 255                         }
 256                         break;
 257 #endif
 258                 default:
 259                         srv_free_encryption_context(&ec);
 260                         return NT_STATUS_INVALID_PARAMETER;
 261         }
 262         *pp_ec = ec;
 263         return NT_STATUS_OK;
 264 }
 265
 266 /******************************************************************************
 267  Free an encryption-allocated buffer.
 268 ******************************************************************************/
 269
 270 void srv_free_enc_buffer(char *buf)
 271 {
 272         /* We know this is an smb buffer, and we
 273          * didn't malloc, only copy, for a keepalive,
 274          * so ignore session keepalives. */
 275
 276         if(CVAL(buf,0) == SMBkeepalive) {
 277                 return;
 278         }
 279
 280         if (srv_trans_enc_ctx) {
 281                 common_free_enc_buffer(srv_trans_enc_ctx->es, buf);
 282         }
 283 }
 284
 285 /******************************************************************************
 286  Decrypt an incoming buffer.
 287 ******************************************************************************/
 288
 289 NTSTATUS srv_decrypt_buffer(char *buf)
 290 {
 291         /* Ignore session keepalives. */
 292         if(CVAL(buf,0) == SMBkeepalive) {
 293                 return NT_STATUS_OK;
 294         }
 295
 296         if (srv_trans_enc_ctx) {
 297                 return common_decrypt_buffer(srv_trans_enc_ctx->es, buf);
 298         }
 299
 300         return NT_STATUS_OK;
 301 }
 302
 303 /******************************************************************************
 304  Encrypt an outgoing buffer. Return the encrypted pointer in buf_out.
 305 ******************************************************************************/
 306
 307 NTSTATUS srv_encrypt_buffer(char *buf, char **buf_out)
 308 {
 309         *buf_out = buf;
 310
 311         /* Ignore session keepalives. */
 312         if(CVAL(buf,0) == SMBkeepalive) {
 313                 return NT_STATUS_OK;
 314         }
 315
 316         if (srv_trans_enc_ctx) {
 317                 return common_encrypt_buffer(srv_trans_enc_ctx->es, buf, buf_out);
 318         }
 319         /* Not encrypting. */
 320         return NT_STATUS_OK;
 321 }
 322
 323 /******************************************************************************
 324  Do the gss encryption negotiation. Parameters are in/out.
 325  Until success we do everything on the partial enc ctx.
 326 ******************************************************************************/
 327
 328 #if defined(HAVE_GSSAPI) && defined(HAVE_KRB5)
 329 static NTSTATUS srv_enc_spnego_gss_negotiate(unsigned char **ppdata, size_t *p_data_size, DATA_BLOB secblob)
 330 {
 331         OM_uint32 ret;
 332         OM_uint32 min;
 333         OM_uint32 flags = 0;
 334         gss_buffer_desc in_buf, out_buf;
 335         struct smb_tran_enc_state_gss *gss_state;
 336
 337         if (!partial_srv_trans_enc_ctx) {
 338                 NTSTATUS status = make_srv_encryption_context(SMB_TRANS_ENC_GSS, &partial_srv_trans_enc_ctx);
 339                 if (!NT_STATUS_IS_OK(status)) {
 340                         return status;
 341                 }
 342         }
 343
 344         gss_state = partial_srv_trans_enc_ctx->es->s.gss_state;
 345
 346         in_buf.value = secblob.data;
 347         in_buf.length = secblob.length;
 348
 349         out_buf.value = NULL;
 350         out_buf.length = 0;
 351
 352         ret = gss_accept_sec_context(&min,
 353                                 &gss_state->gss_ctx,
 354                                 gss_state->creds,
 355                                 &in_buf,
 356                                 GSS_C_NO_CHANNEL_BINDINGS,
 357                                 NULL,
 358                                 NULL,           /* Ignore oids. */
 359                                 &out_buf,       /* To return. */
 360                                 &flags,
 361                                 NULL,           /* Ingore time. */
 362                                 NULL);          /* Ignore delegated creds. */
 363
 364         if (ret != GSS_S_COMPLETE && ret != GSS_S_CONTINUE_NEEDED) {
 365                 return gss_err_to_ntstatus(ret, min);
 366         }
 367
 368         /* Ensure we've got sign+seal available. */
 369         if (ret == GSS_S_COMPLETE) {
 370                 if ((flags & (GSS_C_INTEG_FLAG|GSS_C_CONF_FLAG|GSS_C_REPLAY_FLAG|GSS_C_SEQUENCE_FLAG)) !=
 371                                 (GSS_C_INTEG_FLAG|GSS_C_CONF_FLAG|GSS_C_REPLAY_FLAG|GSS_C_SEQUENCE_FLAG)) {
 372                         DEBUG(0,("srv_enc_spnego_gss_negotiate: quality of service not good enough "
 373                                 "for SMB sealing.\n"));
 374                         gss_release_buffer(&min, &out_buf);
 375                         return NT_STATUS_ACCESS_DENIED;
 376                 }
 377         }
 378
 379         SAFE_FREE(*ppdata);
 380         *ppdata = memdup(out_buf.value, out_buf.length);
 381         if (!*ppdata) {
 382                 gss_release_buffer(&min, &out_buf);
 383                 return NT_STATUS_NO_MEMORY;
 384         }
 385         *p_data_size = out_buf.length;
 386         gss_release_buffer(&min, &out_buf);
 387
 388         if (ret != GSS_S_CONTINUE_NEEDED) {
 389                 return NT_STATUS_MORE_PROCESSING_REQUIRED;
 390         } else {
 391                 return NT_STATUS_OK;
 392         }
 393 }
 394 #endif
 395
 396 /******************************************************************************
 397  Do the NTLM SPNEGO (or raw) encryption negotiation. Parameters are in/out.
 398  Until success we do everything on the partial enc ctx.
 399 ******************************************************************************/
 400
 401 static NTSTATUS srv_enc_ntlm_negotiate(unsigned char **ppdata, size_t *p_data_size, DATA_BLOB secblob, BOOL spnego_wrap)
 402 {
 403         NTSTATUS status;
 404         DATA_BLOB chal = data_blob(NULL, 0);
 405         DATA_BLOB response = data_blob(NULL, 0);
 406
 407         status = make_srv_encryption_context(SMB_TRANS_ENC_NTLM, &partial_srv_trans_enc_ctx);
 408         if (!NT_STATUS_IS_OK(status)) {
 409                 return status;
 410         }
 411
 412         status = auth_ntlmssp_update(partial_srv_trans_enc_ctx->auth_ntlmssp_state, secblob, &chal);
 413
 414         /* status here should be NT_STATUS_MORE_PROCESSING_REQUIRED
 415          * for success ... */
 416
 417         if (spnego_wrap) {
 418                 response = spnego_gen_auth_response(&chal, status, OID_NTLMSSP);
 419                 data_blob_free(&chal);
 420         } else {
 421                 /* Return the raw blob. */
 422                 response = chal;
 423         }
 424
 425         SAFE_FREE(*ppdata);
 426         *ppdata = response.data;
 427         *p_data_size = response.length;
 428         return status;
 429 }
 430
 431 /******************************************************************************
 432  Do the SPNEGO encryption negotiation. Parameters are in/out.
 433  Based off code in smbd/sesssionsetup.c
 434  Until success we do everything on the partial enc ctx.
 435 ******************************************************************************/
 436
 437 static NTSTATUS srv_enc_spnego_negotiate(connection_struct *conn,
 438                                         unsigned char **ppdata,
 439                                         size_t *p_data_size,
 440                                         unsigned char **pparam,
 441                                         size_t *p_param_size)
 442 {
 443         NTSTATUS status;
 444         DATA_BLOB blob = data_blob(NULL,0);
 445         DATA_BLOB secblob = data_blob(NULL, 0);
 446         BOOL got_kerberos_mechanism = False;
 447
 448         blob = data_blob_const(*ppdata, *p_data_size);
 449
 450         status = parse_spnego_mechanisms(blob, &secblob, &got_kerberos_mechanism);
 451         if (!NT_STATUS_IS_OK(status)) {
 452                 return nt_status_squash(status);
 453         }
 454
 455         /* We should have no partial context at this point. */
 456
 457         srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 458
 459 #if defined(HAVE_GSSAPI) && defined(HAVE_KRB5)
 460         if (got_kerberos_mechanism && lp_use_kerberos_keytab() ) {
 461                 status = srv_enc_spnego_gss_negotiate(ppdata, p_data_size, secblob);
 462         } else
 463 #endif
 464         {
 465                 status = srv_enc_ntlm_negotiate(ppdata, p_data_size, secblob, True);
 466         }
 467
 468         data_blob_free(&secblob);
 469
 470         if (!NT_STATUS_EQUAL(status,NT_STATUS_MORE_PROCESSING_REQUIRED) && !NT_STATUS_IS_OK(status)) {
 471                 srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 472                 return nt_status_squash(status);
 473         }
 474
 475         if (NT_STATUS_IS_OK(status)) {
 476                 /* Return the context we're using for this encryption state. */
 477                 *pparam = SMB_MALLOC(2);
 478                 if (!*pparam) {
 479                         return NT_STATUS_NO_MEMORY;
 480                 }
 481                 SSVAL(*pparam,0,partial_srv_trans_enc_ctx->es->enc_ctx_num);
 482                 *p_param_size = 2;
 483         }
 484
 485         return status;
 486 }
 487
 488 /******************************************************************************
 489  Complete a SPNEGO encryption negotiation. Parameters are in/out.
 490  We only get this for a NTLM auth second stage.
 491 ******************************************************************************/
 492
 493 static NTSTATUS srv_enc_spnego_ntlm_auth(connection_struct *conn,
 494                                         unsigned char **ppdata,
 495                                         size_t *p_data_size,
 496                                         unsigned char **pparam,
 497                                         size_t *p_param_size)
 498 {
 499         NTSTATUS status;
 500         DATA_BLOB blob = data_blob(NULL,0);
 501         DATA_BLOB auth = data_blob(NULL,0);
 502         DATA_BLOB auth_reply = data_blob(NULL,0);
 503         DATA_BLOB response = data_blob(NULL,0);
 504         struct smb_srv_trans_enc_ctx *ec = partial_srv_trans_enc_ctx;
 505
 506         /* We must have a partial context here. */
 507
 508         if (!ec || !ec->es || ec->auth_ntlmssp_state == NULL || ec->es->smb_enc_type != SMB_TRANS_ENC_NTLM) {
 509                 srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 510                 return NT_STATUS_INVALID_PARAMETER;
 511         }
 512
 513         blob = data_blob_const(*ppdata, *p_data_size);
 514         if (!spnego_parse_auth(blob, &auth)) {
 515                 srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 516                 return NT_STATUS_INVALID_PARAMETER;
 517         }
 518
 519         status = auth_ntlmssp_update(ec->auth_ntlmssp_state, auth, &auth_reply);
 520         data_blob_free(&auth);
 521
 522         response = spnego_gen_auth_response(&auth_reply, status, OID_NTLMSSP);
 523         data_blob_free(&auth_reply);
 524
 525         if (NT_STATUS_IS_OK(status)) {
 526                 /* Return the context we're using for this encryption state. */
 527                 *pparam = SMB_MALLOC(2);
 528                 if (!*pparam) {
 529                         return NT_STATUS_NO_MEMORY;
 530                 }
 531                 SSVAL(*pparam,0,ec->es->enc_ctx_num);
 532                 *p_param_size = 2;
 533         }
 534
 535         SAFE_FREE(*ppdata);
 536         *ppdata = response.data;
 537         *p_data_size = response.length;
 538         return status;
 539 }
 540
 541 /******************************************************************************
 542  Raw NTLM encryption negotiation. Parameters are in/out.
 543  This function does both steps.
 544 ******************************************************************************/
 545
 546 static NTSTATUS srv_enc_raw_ntlm_auth(connection_struct *conn,
 547                                         unsigned char **ppdata,
 548                                         size_t *p_data_size,
 549                                         unsigned char **pparam,
 550                                         size_t *p_param_size)
 551 {
 552         NTSTATUS status;
 553         DATA_BLOB blob = data_blob_const(*ppdata, *p_data_size);
 554         DATA_BLOB response = data_blob(NULL,0);
 555         struct smb_srv_trans_enc_ctx *ec;
 556
 557         if (!partial_srv_trans_enc_ctx) {
 558                 /* This is the initial step. */
 559                 status = srv_enc_ntlm_negotiate(ppdata, p_data_size, blob, False);
 560                 if (!NT_STATUS_EQUAL(status,NT_STATUS_MORE_PROCESSING_REQUIRED) && !NT_STATUS_IS_OK(status)) {
 561                         srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 562                         return nt_status_squash(status);
 563                 }
 564                 return status;
 565         }
 566
 567         ec = partial_srv_trans_enc_ctx;
 568         if (!ec || !ec->es || ec->auth_ntlmssp_state == NULL || ec->es->smb_enc_type != SMB_TRANS_ENC_NTLM) {
 569                 srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 570                 return NT_STATUS_INVALID_PARAMETER;
 571         }
 572
 573         /* Second step. */
 574         status = auth_ntlmssp_update(partial_srv_trans_enc_ctx->auth_ntlmssp_state, blob, &response);
 575
 576         if (NT_STATUS_IS_OK(status)) {
 577                 /* Return the context we're using for this encryption state. */
 578                 *pparam = SMB_MALLOC(2);
 579                 if (!*pparam) {
 580                         return NT_STATUS_NO_MEMORY;
 581                 }
 582                 SSVAL(*pparam,0,ec->es->enc_ctx_num);
 583                 *p_param_size = 2;
 584         }
 585
 586         /* Return the raw blob. */
 587         SAFE_FREE(*ppdata);
 588         *ppdata = response.data;
 589         *p_data_size = response.length;
 590         return status;
 591 }
 592
 593 /******************************************************************************
 594  Do the SPNEGO encryption negotiation. Parameters are in/out.
 595 ******************************************************************************/
 596
 597 NTSTATUS srv_request_encryption_setup(connection_struct *conn,
 598                                         unsigned char **ppdata,
 599                                         size_t *p_data_size,
 600                                         unsigned char **pparam,
 601                                         size_t *p_param_size)
 602 {
 603         unsigned char *pdata = *ppdata;
 604
 605         SAFE_FREE(*pparam);
 606         *p_param_size = 0;
 607
 608         if (*p_data_size < 1) {
 609                 return NT_STATUS_INVALID_PARAMETER;
 610         }
 611
 612         if (pdata[0] == ASN1_APPLICATION(0)) {
 613                 /* its a negTokenTarg packet */
 614                 return srv_enc_spnego_negotiate(conn, ppdata, p_data_size, pparam, p_param_size);
 615         }
 616
 617         if (pdata[0] == ASN1_CONTEXT(1)) {
 618                 /* It's an auth packet */
 619                 return srv_enc_spnego_ntlm_auth(conn, ppdata, p_data_size, pparam, p_param_size);
 620         }
 621
 622         /* Maybe it's a raw unwrapped auth ? */
 623         if (*p_data_size < 7) {
 624                 return NT_STATUS_INVALID_PARAMETER;
 625         }
 626
 627         if (strncmp((char *)pdata, "NTLMSSP", 7) == 0) {
 628                 return srv_enc_raw_ntlm_auth(conn, ppdata, p_data_size, pparam, p_param_size);
 629         }
 630
 631         DEBUG(1,("srv_request_encryption_setup: Unknown packet\n"));
 632
 633         return NT_STATUS_LOGON_FAILURE;
 634 }
 635
 636 /******************************************************************************
 637  Negotiation was successful - turn on server-side encryption.
 638 ******************************************************************************/
 639
 640 static NTSTATUS check_enc_good(struct smb_srv_trans_enc_ctx *ec)
 641 {
 642         if (!ec || !ec->es) {
 643                 return NT_STATUS_LOGON_FAILURE;
 644         }
 645
 646         if (ec->es->smb_enc_type == SMB_TRANS_ENC_NTLM) {
 647                 if ((ec->es->s.ntlmssp_state->neg_flags & (NTLMSSP_NEGOTIATE_SIGN|NTLMSSP_NEGOTIATE_SEAL)) !=
 648                                 (NTLMSSP_NEGOTIATE_SIGN|NTLMSSP_NEGOTIATE_SEAL)) {
 649                         return NT_STATUS_INVALID_PARAMETER;
 650                 }
 651         }
 652         /* Todo - check gssapi case. */
 653
 654         return NT_STATUS_OK;
 655 }
 656
 657 /******************************************************************************
 658  Negotiation was successful - turn on server-side encryption.
 659 ******************************************************************************/
 660
 661 NTSTATUS srv_encryption_start(connection_struct *conn)
 662 {
 663         NTSTATUS status;
 664
 665         /* Check that we are really doing sign+seal. */
 666         status = check_enc_good(partial_srv_trans_enc_ctx);
 667         if (!NT_STATUS_IS_OK(status)) {
 668                 return status;
 669         }
 670         /* Throw away the context we're using currently (if any). */
 671         srv_free_encryption_context(&srv_trans_enc_ctx);
 672
 673         /* Steal the partial pointer. Deliberate shallow copy. */
 674         srv_trans_enc_ctx = partial_srv_trans_enc_ctx;
 675         srv_trans_enc_ctx->es->enc_on = True;
 676
 677         partial_srv_trans_enc_ctx = NULL;
 678         return NT_STATUS_OK;
 679 }
 680
 681 /******************************************************************************
 682  Shutdown all server contexts.
 683 ******************************************************************************/
 684
 685 void server_encryption_shutdown(void)
 686 {
 687         srv_free_encryption_context(&partial_srv_trans_enc_ctx);
 688         srv_free_encryption_context(&srv_trans_enc_ctx);
 689 }