source4/torture/rpc/session_key.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    test suite for lsa rpc operations
   4
   5    Copyright (C) Andrew Tridgell 2003
   6    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21 */
  22
  23 #include "includes.h"
  24 #include "torture/torture.h"
  25 #include "librpc/gen_ndr/ndr_lsa_c.h"
  26
  27 #include "libcli/auth/libcli_auth.h"
  28 #include "torture/rpc/rpc.h"
  29
  30 static void init_lsa_String(struct lsa_String *name, const char *s)
  31 {
  32         name->string = s;
  33 }
  34
  35 static BOOL test_CreateSecret_basic(struct dcerpc_pipe *p,
  36                                     TALLOC_CTX *mem_ctx,
  37                                     struct policy_handle *handle)
  38 {
  39         NTSTATUS status;
  40         struct lsa_CreateSecret r;
  41         struct lsa_SetSecret r3;
  42         struct lsa_QuerySecret r4;
  43         struct policy_handle sec_handle;
  44         struct lsa_Delete d;
  45         struct lsa_DATA_BUF buf1;
  46         struct lsa_DATA_BUF_PTR bufp1;
  47         DATA_BLOB enc_key;
  48         BOOL ret = True;
  49         DATA_BLOB session_key;
  50         NTTIME old_mtime, new_mtime;
  51         DATA_BLOB blob1, blob2;
  52         const char *secret1 = "abcdef12345699qwerty";
  53         char *secret2;
  54         char *secname;
  55
  56         secname = talloc_asprintf(mem_ctx, "torturesecret-%u", (uint_t)random());
  57
  58         printf("Testing CreateSecret of %s\n", secname);
  59
  60         init_lsa_String(&r.in.name, secname);
  61
  62         r.in.handle = handle;
  63         r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
  64         r.out.sec_handle = &sec_handle;
  65
  66         status = dcerpc_lsa_CreateSecret(p, mem_ctx, &r);
  67         if (!NT_STATUS_IS_OK(status)) {
  68                 printf("CreateSecret failed - %s\n", nt_errstr(status));
  69                 return False;
  70         }
  71
  72         status = dcerpc_fetch_session_key(p, &session_key);
  73         if (!NT_STATUS_IS_OK(status)) {
  74                 printf("dcerpc_fetch_session_key failed - %s\n", nt_errstr(status));
  75                 ret = False;
  76         }
  77
  78         enc_key = sess_encrypt_string(secret1, &session_key);
  79
  80         r3.in.sec_handle = &sec_handle;
  81         r3.in.new_val = &buf1;
  82         r3.in.old_val = NULL;
  83         r3.in.new_val->data = enc_key.data;
  84         r3.in.new_val->length = enc_key.length;
  85         r3.in.new_val->size = enc_key.length;
  86
  87         printf("Testing SetSecret\n");
  88
  89         status = dcerpc_lsa_SetSecret(p, mem_ctx, &r3);
  90         if (!NT_STATUS_IS_OK(status)) {
  91                 printf("SetSecret failed - %s\n", nt_errstr(status));
  92                 ret = False;
  93         }
  94
  95         r3.in.sec_handle = &sec_handle;
  96         r3.in.new_val = &buf1;
  97         r3.in.old_val = NULL;
  98         r3.in.new_val->data = enc_key.data;
  99         r3.in.new_val->length = enc_key.length;
 100         r3.in.new_val->size = enc_key.length;
 101
 102         /* break the encrypted data */
 103         enc_key.data[0]++;
 104
 105         printf("Testing SetSecret with broken key\n");
 106
 107         status = dcerpc_lsa_SetSecret(p, mem_ctx, &r3);
 108         if (!NT_STATUS_EQUAL(status, NT_STATUS_UNKNOWN_REVISION)) {
 109                 printf("SetSecret should have failed UNKNOWN_REVISION - %s\n", nt_errstr(status));
 110                 ret = False;
 111         }
 112
 113         data_blob_free(&enc_key);
 114
 115         ZERO_STRUCT(new_mtime);
 116         ZERO_STRUCT(old_mtime);
 117
 118         /* fetch the secret back again */
 119         r4.in.sec_handle = &sec_handle;
 120         r4.in.new_val = &bufp1;
 121         r4.in.new_mtime = &new_mtime;
 122         r4.in.old_val = NULL;
 123         r4.in.old_mtime = NULL;
 124
 125         bufp1.buf = NULL;
 126
 127         printf("Testing QuerySecret\n");
 128         status = dcerpc_lsa_QuerySecret(p, mem_ctx, &r4);
 129         if (!NT_STATUS_IS_OK(status)) {
 130                 printf("QuerySecret failed - %s\n", nt_errstr(status));
 131                 ret = False;
 132         } else {
 133                 if (r4.out.new_val == NULL || r4.out.new_val->buf == NULL) {
 134                         printf("No secret buffer returned\n");
 135                         ret = False;
 136                 } else {
 137                         blob1.data = r4.out.new_val->buf->data;
 138                         blob1.length = r4.out.new_val->buf->size;
 139
 140                         blob2 = data_blob_talloc(mem_ctx, NULL, blob1.length);
 141
 142                         secret2 = sess_decrypt_string(mem_ctx, &blob1, &session_key);
 143
 144                         if (strcmp(secret1, secret2) != 0) {
 145                                 printf("Returned secret '%s' doesn't match '%s'\n",
 146                                        secret2, secret1);
 147                                 ret = False;
 148                         }
 149                 }
 150         }
 151
 152         d.in.handle = &sec_handle;
 153         status = dcerpc_lsa_Delete(p, mem_ctx, &d);
 154         if (!NT_STATUS_IS_OK(status)) {
 155                 printf("delete should have returned OKINVALID_HANDLE - %s\n", nt_errstr(status));
 156                 ret = False;
 157         }
 158         return ret;
 159 }
 160
 161
 162 /* TEST session key correctness by pushing and pulling secrets */
 163
 164 BOOL torture_rpc_lsa_secrets(struct torture_context *torture)
 165 {
 166         NTSTATUS status;
 167         struct dcerpc_pipe *p;
 168         TALLOC_CTX *mem_ctx;
 169         BOOL ret = True;
 170         struct policy_handle *handle;
 171
 172         mem_ctx = talloc_init("torture_rpc_lsa_secrets");
 173
 174         status = torture_rpc_connection(mem_ctx,
 175                                         &p,
 176                                         &dcerpc_table_lsarpc);
 177         if (!NT_STATUS_IS_OK(status)) {
 178                 talloc_free(mem_ctx);
 179                 return False;
 180         }
 181
 182         if (test_lsa_OpenPolicy2(p, mem_ctx, &handle)) {
 183                 if (!handle) {
 184                         printf("OpenPolicy2 failed.  This test cannot run against this server\n");
 185                         ret = False;
 186                 } else if (!test_CreateSecret_basic(p, mem_ctx, handle)) {
 187                         ret = False;
 188                 }
 189         } else {
 190                 return False;
 191         }
 192
 193         talloc_free(mem_ctx);
 194
 195         return ret;
 196 }