libcli/smb/smb2_create_blob.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    SMB2 Create Context Blob handling
   5
   6    Copyright (C) Andrew Tridgell 2005
   7    Copyright (C) Stefan Metzmacher 2008-2009
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 3 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  21 */
  22
  23 #include "includes.h"
  24 #include "../libcli/smb/smb_common.h"
  25
  26 static size_t smb2_create_blob_padding(uint32_t offset, size_t n)
  27 {
  28         if ((offset & (n-1)) == 0) return 0;
  29         return n - (offset & (n-1));
  30 }
  31
  32 /*
  33   parse a set of SMB2 create blobs
  34 */
  35 NTSTATUS smb2_create_blob_parse(TALLOC_CTX *mem_ctx, const DATA_BLOB buffer,
  36                                 struct smb2_create_blobs *blobs)
  37 {
  38         const uint8_t *data = buffer.data;
  39         uint32_t remaining = buffer.length;
  40
  41         while (remaining > 0) {
  42                 uint32_t next;
  43                 uint32_t name_offset, name_length;
  44                 uint32_t data_offset;
  45                 uint32_t data_length;
  46                 char *tag;
  47                 DATA_BLOB b;
  48                 NTSTATUS status;
  49
  50                 if (remaining < 16) {
  51                         return NT_STATUS_INVALID_PARAMETER;
  52                 }
  53                 next        = IVAL(data, 0);
  54                 name_offset = SVAL(data, 4);
  55                 name_length = SVAL(data, 6);
  56 #if 0
  57                 reserved    = SVAL(data, 8);
  58 #endif
  59                 data_offset = SVAL(data, 10);
  60                 data_length = IVAL(data, 12);
  61
  62                 if ((next & 0x7) != 0 ||
  63                     next > remaining ||
  64                     name_offset != 16 ||
  65                     name_length < 4 ||
  66                     name_offset + name_length > remaining ||
  67                     (data_offset & 0x7) != 0 ||
  68                     (data_offset && (data_offset < name_offset + name_length)) ||
  69                     (data_offset > remaining) ||
  70                     (data_offset + (uint64_t)data_length > remaining)) {
  71                         return NT_STATUS_INVALID_PARAMETER;
  72                 }
  73
  74                 tag = talloc_strndup(mem_ctx, (const char *)data + name_offset, name_length);
  75                 if (tag == NULL) {
  76                         return NT_STATUS_NO_MEMORY;
  77                 }
  78
  79                 b = data_blob_const(data+data_offset, data_length);
  80                 status = smb2_create_blob_add(mem_ctx, blobs, tag, b);
  81                 if (!NT_STATUS_IS_OK(status)) {
  82                         return status;
  83                 }
  84
  85                 talloc_free(tag);
  86
  87                 if (next == 0) break;
  88
  89                 remaining -= next;
  90                 data += next;
  91
  92                 if (remaining < 16) {
  93                         return NT_STATUS_INVALID_PARAMETER;
  94                 }
  95         }
  96
  97         return NT_STATUS_OK;
  98 }
  99
 100
 101 /*
 102   add a blob to a smb2_create attribute blob
 103 */
 104 static NTSTATUS smb2_create_blob_push_one(TALLOC_CTX *mem_ctx, DATA_BLOB *buffer,
 105                                           const struct smb2_create_blob *blob,
 106                                           bool last)
 107 {
 108         uint32_t ofs = buffer->length;
 109         size_t tag_length = strlen(blob->tag);
 110         size_t blob_offset = 0;
 111         size_t blob_pad = 0;
 112         size_t next_offset = 0;
 113         size_t next_pad = 0;
 114         bool ok;
 115
 116         blob_offset = 0x14 + tag_length;
 117         blob_pad = smb2_create_blob_padding(blob_offset, 8);
 118         next_offset = blob_offset + blob_pad + blob->data.length;
 119         if (!last) {
 120                 next_pad = smb2_create_blob_padding(next_offset, 8);
 121         }
 122
 123         ok = data_blob_realloc(mem_ctx, buffer,
 124                                buffer->length + next_offset + next_pad);
 125         if (!ok) {
 126                 return NT_STATUS_NO_MEMORY;
 127         }
 128
 129         if (last) {
 130                 SIVAL(buffer->data, ofs+0x00, 0);
 131         } else {
 132                 SIVAL(buffer->data, ofs+0x00, next_offset + next_pad);
 133         }
 134         SSVAL(buffer->data, ofs+0x04, 0x10); /* offset of tag */
 135         SIVAL(buffer->data, ofs+0x06, tag_length); /* tag length */
 136         SSVAL(buffer->data, ofs+0x0A, blob_offset + blob_pad); /* offset of data */
 137         SIVAL(buffer->data, ofs+0x0C, blob->data.length);
 138         memcpy(buffer->data+ofs+0x10, blob->tag, tag_length);
 139         if (blob_pad > 0) {
 140                 memset(buffer->data+ofs+blob_offset, 0, blob_pad);
 141                 blob_offset += blob_pad;
 142         }
 143         memcpy(buffer->data+ofs+blob_offset, blob->data.data, blob->data.length);
 144         if (next_pad > 0) {
 145                 memset(buffer->data+ofs+next_offset, 0, next_pad);
 146                 next_offset += next_pad;
 147         }
 148
 149         return NT_STATUS_OK;
 150 }
 151
 152
 153 /*
 154   create a buffer of a set of create blobs
 155 */
 156 NTSTATUS smb2_create_blob_push(TALLOC_CTX *mem_ctx, DATA_BLOB *buffer,
 157                                const struct smb2_create_blobs blobs)
 158 {
 159         int i;
 160         NTSTATUS status;
 161
 162         *buffer = data_blob(NULL, 0);
 163         for (i=0; i < blobs.num_blobs; i++) {
 164                 bool last = false;
 165                 const struct smb2_create_blob *c;
 166
 167                 if ((i + 1) == blobs.num_blobs) {
 168                         last = true;
 169                 }
 170
 171                 c = &blobs.blobs[i];
 172                 status = smb2_create_blob_push_one(mem_ctx, buffer, c, last);
 173                 if (!NT_STATUS_IS_OK(status)) {
 174                         return status;
 175                 }
 176         }
 177         return NT_STATUS_OK;
 178 }
 179
 180
 181 NTSTATUS smb2_create_blob_add(TALLOC_CTX *mem_ctx, struct smb2_create_blobs *b,
 182                               const char *tag, DATA_BLOB data)
 183 {
 184         struct smb2_create_blob *array;
 185
 186         array = talloc_realloc(mem_ctx, b->blobs,
 187                                struct smb2_create_blob,
 188                                b->num_blobs + 1);
 189         NT_STATUS_HAVE_NO_MEMORY(array);
 190         b->blobs = array;
 191
 192         b->blobs[b->num_blobs].tag = talloc_strdup(b->blobs, tag);
 193         NT_STATUS_HAVE_NO_MEMORY(b->blobs[b->num_blobs].tag);
 194
 195         if (data.data) {
 196                 b->blobs[b->num_blobs].data = data_blob_talloc(b->blobs,
 197                                                                data.data,
 198                                                                data.length);
 199                 NT_STATUS_HAVE_NO_MEMORY(b->blobs[b->num_blobs].data.data);
 200         } else {
 201                 b->blobs[b->num_blobs].data = data_blob_null;
 202         }
 203
 204         b->num_blobs += 1;
 205
 206         return NT_STATUS_OK;
 207 }
 208
 209 /*
 210  * return the first blob with the given tag
 211  */
 212 struct smb2_create_blob *smb2_create_blob_find(const struct smb2_create_blobs *b,
 213                                                const char *tag)
 214 {
 215         uint32_t i;
 216
 217         for (i=0; i < b->num_blobs; i++) {
 218                 if (strcmp(b->blobs[i].tag, tag) == 0) {
 219                         return &b->blobs[i];
 220                 }
 221         }
 222
 223         return NULL;
 224 }