source4/libcli/raw/rawtrans.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    raw trans/trans2/nttrans operations
   4
   5    Copyright (C) James Myers 2003 <myersjj@samba.org>
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 */
  21
  22 #include "includes.h"
  23
  24
  25 /*
  26   check out of bounds for incoming data
  27 */
  28 static BOOL raw_trans_oob(struct cli_request *req,
  29                           uint_t offset, uint_t count)
  30 {
  31         char *ptr;
  32
  33         if (count == 0) {
  34                 return False;
  35         }
  36
  37         ptr = req->in.hdr + offset;
  38
  39         /* be careful with wraparound! */
  40         if (ptr < req->in.data ||
  41             ptr >= req->in.data + req->in.data_size ||
  42             count > req->in.data_size ||
  43             ptr + count > req->in.data + req->in.data_size) {
  44                 return True;
  45         }
  46         return False;
  47 }
  48
  49 /****************************************************************************
  50   receive a SMB trans or trans2 response allocating the necessary memory
  51   ****************************************************************************/
  52 NTSTATUS smb_raw_trans2_recv(struct cli_request *req,
  53                              TALLOC_CTX *mem_ctx,
  54                              struct smb_trans2 *parms)
  55 {
  56         int total_data=0;
  57         int total_param=0;
  58         char *tdata;
  59         char *tparam;
  60
  61         parms->out.data.length = 0;
  62         parms->out.data.data = NULL;
  63         parms->out.params.length = 0;
  64         parms->out.params.data = NULL;
  65
  66         if (!cli_request_receive(req)) {
  67                 req->status = NT_STATUS_UNSUCCESSFUL;
  68                 return cli_request_destroy(req);
  69         }
  70
  71         /*
  72          * An NT RPC pipe call can return ERRDOS, ERRmoredata
  73          * to a trans call. This is not an error and should not
  74          * be treated as such.
  75          */
  76         if (NT_STATUS_IS_ERR(req->status)) {
  77                 return cli_request_destroy(req);
  78         }
  79
  80         CLI_CHECK_MIN_WCT(req, 10);
  81
  82         /* parse out the lengths */
  83         total_data = SVAL(req->in.vwv, VWV(1));
  84         total_param = SVAL(req->in.vwv, VWV(0));
  85
  86         /* allocate it */
  87         if (total_data != 0) {
  88                 tdata = talloc_realloc(mem_ctx, parms->out.data.data,total_data);
  89                 if (!tdata) {
  90                         DEBUG(0,("smb_raw_receive_trans: failed to enlarge data buffer to %d bytes\n", total_data));
  91                         req->status = NT_STATUS_NO_MEMORY;
  92                         return cli_request_destroy(req);
  93                 }
  94                 parms->out.data.data = tdata;
  95         }
  96
  97         if (total_param != 0) {
  98                 tparam = talloc_realloc(mem_ctx, parms->out.params.data,total_param);
  99                 if (!tparam) {
 100                         DEBUG(0,("smb_raw_receive_trans: failed to enlarge param buffer to %d bytes\n", total_param));
 101                         req->status = NT_STATUS_NO_MEMORY;
 102                         return cli_request_destroy(req);
 103                 }
 104                 parms->out.params.data = tparam;
 105         }
 106
 107         parms->out.setup_count = SVAL(req->in.vwv, VWV(9));
 108         CLI_CHECK_WCT(req, 10 + parms->out.setup_count);
 109
 110         if (parms->out.setup_count > 0) {
 111                 int i;
 112                 parms->out.setup = talloc(mem_ctx, 2 * parms->out.setup_count);
 113                 if (!parms->out.setup) {
 114                         req->status = NT_STATUS_NO_MEMORY;
 115                         return cli_request_destroy(req);
 116                 }
 117                 for (i=0;i<parms->out.setup_count;i++) {
 118                         parms->out.setup[i] = SVAL(req->in.vwv, VWV(10+i));
 119                 }
 120         }
 121
 122         while (1)  {
 123                 uint16 param_count, param_ofs, param_disp;
 124                 uint16 data_count, data_ofs, data_disp;
 125                 uint16 total_data2, total_param2;
 126
 127                 /* parse out the total lengths again - they can shrink! */
 128                 total_data2 = SVAL(req->in.vwv, VWV(1));
 129                 total_param2 = SVAL(req->in.vwv, VWV(0));
 130
 131                 if (total_data2 > total_data ||
 132                     total_param2 > total_param) {
 133                         /* they must *only* shrink */
 134                         DEBUG(1,("smb_raw_receive_trans: data/params expanded!\n"));
 135                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 136                         return cli_request_destroy(req);
 137                 }
 138
 139                 total_data = total_data2;
 140                 total_param = total_param2;
 141
 142                 /* parse params for this lump */
 143                 param_count = SVAL(req->in.vwv, VWV(3));
 144                 param_ofs   = SVAL(req->in.vwv, VWV(4));
 145                 param_disp  = SVAL(req->in.vwv, VWV(5));
 146
 147                 data_count = SVAL(req->in.vwv, VWV(6));
 148                 data_ofs   = SVAL(req->in.vwv, VWV(7));
 149                 data_disp  = SVAL(req->in.vwv, VWV(8));
 150
 151                 if (data_count + data_disp > total_data ||
 152                     param_count + param_disp > total_param) {
 153                         DEBUG(1,("smb_raw_receive_trans: Buffer overflow\n"));
 154                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 155                         return cli_request_destroy(req);
 156                 }
 157
 158                 /* check the server isn't being nasty */
 159                 if (raw_trans_oob(req, param_ofs, param_count) ||
 160                     raw_trans_oob(req, data_ofs, data_count)) {
 161                         DEBUG(1,("smb_raw_receive_trans: out of bounds parameters!\n"));
 162                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 163                         return cli_request_destroy(req);
 164                 }
 165
 166                 if (data_count) {
 167                         memcpy(parms->out.data.data + data_disp,
 168                                req->in.hdr + data_ofs,
 169                                data_count);
 170                 }
 171
 172                 if (param_count) {
 173                         memcpy(parms->out.params.data + param_disp,
 174                                req->in.hdr + param_ofs,
 175                                param_count);
 176                 }
 177
 178                 parms->out.data.length += data_count;
 179                 parms->out.params.length += param_count;
 180
 181                 if (total_data <= parms->out.data.length && total_param <= parms->out.params.length)
 182                         break;
 183
 184                 /* to receive more requests we need to mark this request as not received */
 185                 req->in.buffer = NULL;
 186
 187                 if (!cli_request_receive(req)) {
 188                         req->status = NT_STATUS_UNSUCCESSFUL;
 189                         return cli_request_destroy(req);
 190                 }
 191         }
 192
 193 failed:
 194         return cli_request_destroy(req);
 195 }
 196
 197
 198 /****************************************************************************
 199  trans2 raw async interface - only BLOBs used in this interface.
 200 note that this doesn't yet support multi-part requests
 201 ****************************************************************************/
 202 struct cli_request *smb_raw_trans2_send(struct cli_tree *tree,
 203                                         struct smb_trans2 *parms)
 204 {
 205         uint8 command = SMBtrans2;
 206         int wct = 14 + parms->in.setup_count;
 207         struct cli_request *req;
 208         char *outdata,*outparam;
 209         int i;
 210         const int padding = 3;
 211
 212         req = cli_request_setup(tree, command, wct, padding);
 213         if (!req) {
 214                 return NULL;
 215         }
 216
 217         /* fill in SMB parameters */
 218         outparam = req->out.data + padding;
 219         outdata = outparam + parms->in.params.length;
 220
 221         /* make sure we don't leak data via the padding */
 222         memset(req->out.data, 0, padding);
 223
 224         /* primary request */
 225         SSVAL(req->out.vwv,VWV(0),parms->in.params.length);
 226         SSVAL(req->out.vwv,VWV(1),parms->in.data.length);
 227         SSVAL(req->out.vwv,VWV(2),parms->in.max_param);
 228         SSVAL(req->out.vwv,VWV(3),parms->in.max_data);
 229         SSVAL(req->out.vwv,VWV(4),parms->in.max_setup);
 230         SSVAL(req->out.vwv,VWV(5),parms->in.flags);
 231         SIVAL(req->out.vwv,VWV(6),parms->in.timeout);
 232         SSVAL(req->out.vwv,VWV(8),0); /* reserved */
 233         SSVAL(req->out.vwv,VWV(9),parms->in.params.length);
 234         SSVAL(req->out.vwv,VWV(10),PTR_DIFF(outparam,req->out.hdr));
 235         SSVAL(req->out.vwv,VWV(11),parms->in.data.length);
 236         SSVAL(req->out.vwv,VWV(12),PTR_DIFF(outdata,req->out.hdr));
 237         SSVAL(req->out.vwv,VWV(13),parms->in.setup_count);
 238         for (i=0;i<parms->in.setup_count;i++)   {
 239                 SSVAL(req->out.vwv,VWV(14)+i*2,parms->in.setup[i]);
 240         }
 241         if (parms->in.params.data)      {
 242                 cli_req_append_blob(req, &parms->in.params);
 243         }
 244         if (parms->in.data.data) {
 245                 cli_req_append_blob(req, &parms->in.data);
 246         }
 247
 248         if (!cli_request_send(req)) {
 249                 cli_request_destroy(req);
 250                 return NULL;
 251         }
 252
 253         return req;
 254 }
 255
 256 /*
 257   trans2 synchronous blob interface
 258 */
 259 NTSTATUS smb_raw_trans2(struct cli_tree *tree,
 260                         TALLOC_CTX *mem_ctx,
 261                         struct smb_trans2 *parms)
 262 {
 263         struct cli_request *req;
 264         req = smb_raw_trans2_send(tree, parms);
 265         if (!req) return NT_STATUS_UNSUCCESSFUL;
 266         return smb_raw_trans2_recv(req, mem_ctx, parms);
 267 }
 268
 269
 270 /****************************************************************************
 271   receive a SMB nttrans response allocating the necessary memory
 272   ****************************************************************************/
 273 NTSTATUS smb_raw_nttrans_recv(struct cli_request *req,
 274                               TALLOC_CTX *mem_ctx,
 275                               struct smb_nttrans *parms)
 276 {
 277         uint32 total_data, recvd_data=0;
 278         uint32 total_param, recvd_param=0;
 279
 280         if (!cli_request_receive(req) ||
 281             cli_request_is_error(req)) {
 282                 return cli_request_destroy(req);
 283         }
 284
 285         /* sanity check */
 286         if (CVAL(req->in.hdr, HDR_COM) != SMBnttrans) {
 287                 DEBUG(0,("smb_raw_receive_nttrans: Expected %s response, got command 0x%02x\n",
 288                          "SMBnttrans",
 289                          CVAL(req->in.hdr,HDR_COM)));
 290                 req->status = NT_STATUS_UNSUCCESSFUL;
 291                 return cli_request_destroy(req);
 292         }
 293
 294         CLI_CHECK_MIN_WCT(req, 18);
 295
 296         /* parse out the lengths */
 297         total_param = IVAL(req->in.vwv, 3);
 298         total_data  = IVAL(req->in.vwv, 7);
 299
 300         parms->out.data = data_blob_talloc(mem_ctx, NULL, total_data);
 301         parms->out.params = data_blob_talloc(mem_ctx, NULL, total_param);
 302
 303         if (parms->out.data.length != total_data ||
 304             parms->out.params.length != total_param) {
 305                 req->status = NT_STATUS_NO_MEMORY;
 306                 return cli_request_destroy(req);
 307         }
 308
 309         parms->out.setup_count = CVAL(req->in.vwv, 35);
 310         CLI_CHECK_WCT(req, 18 + parms->out.setup_count);
 311
 312         if (parms->out.setup_count > 0) {
 313                 int i;
 314                 parms->out.setup = talloc(mem_ctx, 2 * parms->out.setup_count);
 315                 if (!parms->out.setup) {
 316                         req->status = NT_STATUS_NO_MEMORY;
 317                         return cli_request_destroy(req);
 318                 }
 319                 for (i=0;i<parms->out.setup_count;i++) {
 320                         parms->out.setup[i] = SVAL(req->in.vwv, VWV(18+i));
 321                 }
 322         }
 323
 324         while (recvd_data < total_data ||
 325                recvd_param < total_param)  {
 326                 uint32 param_count, param_ofs, param_disp;
 327                 uint32 data_count, data_ofs, data_disp;
 328                 uint32 total_data2, total_param2;
 329
 330                 /* parse out the total lengths again - they can shrink! */
 331                 total_param2 = IVAL(req->in.vwv, 3);
 332                 total_data2  = IVAL(req->in.vwv, 7);
 333
 334                 if (total_data2 > total_data ||
 335                     total_param2 > total_param) {
 336                         /* they must *only* shrink */
 337                         DEBUG(1,("smb_raw_receive_nttrans: data/params expanded!\n"));
 338                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 339                         return cli_request_destroy(req);
 340                 }
 341
 342                 total_data = total_data2;
 343                 total_param = total_param2;
 344                 parms->out.data.length = total_data;
 345                 parms->out.params.length = total_param;
 346
 347                 /* parse params for this lump */
 348                 param_count = IVAL(req->in.vwv, 11);
 349                 param_ofs   = IVAL(req->in.vwv, 15);
 350                 param_disp  = IVAL(req->in.vwv, 19);
 351
 352                 data_count = IVAL(req->in.vwv, 23);
 353                 data_ofs   = IVAL(req->in.vwv, 27);
 354                 data_disp  = IVAL(req->in.vwv, 31);
 355
 356                 if (data_count + data_disp > total_data ||
 357                     param_count + param_disp > total_param) {
 358                         DEBUG(1,("smb_raw_receive_nttrans: Buffer overflow\n"));
 359                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 360                         return cli_request_destroy(req);
 361                 }
 362
 363                 /* check the server isn't being nasty */
 364                 if (raw_trans_oob(req, param_ofs, param_count) ||
 365                     raw_trans_oob(req, data_ofs, data_count)) {
 366                         DEBUG(1,("smb_raw_receive_nttrans: out of bounds parameters!\n"));
 367                         req->status = NT_STATUS_BUFFER_TOO_SMALL;
 368                         return cli_request_destroy(req);
 369                 }
 370
 371                 if (data_count) {
 372                         memcpy(parms->out.data.data + data_disp,
 373                                req->in.hdr + data_ofs,
 374                                data_count);
 375                 }
 376
 377                 if (param_count) {
 378                         memcpy(parms->out.params.data + param_disp,
 379                                req->in.hdr + param_ofs,
 380                                param_count);
 381                 }
 382
 383                 recvd_param += param_count;
 384                 recvd_data += data_count;
 385
 386                 if (recvd_data >= total_data &&
 387                     recvd_param >= total_param) {
 388                         break;
 389                 }
 390
 391                 if (!cli_request_receive(req) ||
 392                     cli_request_is_error(req)) {
 393                         return cli_request_destroy(req);
 394                 }
 395
 396                 /* sanity check */
 397                 if (CVAL(req->in.hdr, HDR_COM) != SMBnttrans) {
 398                         DEBUG(0,("smb_raw_receive_nttrans: Expected nttranss, got command 0x%02x\n",
 399                                  CVAL(req->in.hdr, HDR_COM)));
 400                         req->status = NT_STATUS_UNSUCCESSFUL;
 401                         return cli_request_destroy(req);
 402                 }
 403         }
 404
 405 failed:
 406         return cli_request_destroy(req);
 407 }
 408
 409
 410 /****************************************************************************
 411  nttrans raw - only BLOBs used in this interface.
 412  at the moment we only handle a single primary request
 413 ****************************************************************************/
 414 struct cli_request *smb_raw_nttrans_send(struct cli_tree *tree,
 415                                          struct smb_nttrans *parms)
 416 {
 417         struct cli_request *req;
 418         char *outdata, *outparam;
 419         int i;
 420         int align = 0;
 421
 422         /* only align if there are parameters or data */
 423         if (parms->in.params.length || parms->in.data.length) {
 424                 align = 3;
 425         }
 426
 427         req = cli_request_setup(tree, SMBnttrans,
 428                                 19 + parms->in.setup_count,
 429                                 align +
 430                                 parms->in.params.length +
 431                                 parms->in.data.length);
 432         if (!req) {
 433                 return NULL;
 434         }
 435
 436         /* fill in SMB parameters */
 437         outparam = req->out.data + align;
 438         outdata = outparam + parms->in.params.length;
 439
 440         SCVAL(req->out.vwv,  0, parms->in.max_setup);
 441         SSVAL(req->out.vwv,  1, 0); /* reserved */
 442         SIVAL(req->out.vwv,  3, parms->in.params.length);
 443         SIVAL(req->out.vwv,  7, parms->in.data.length);
 444         SIVAL(req->out.vwv, 11, parms->in.max_param);
 445         SIVAL(req->out.vwv, 15, parms->in.max_data);
 446         SIVAL(req->out.vwv, 19, parms->in.params.length);
 447         SIVAL(req->out.vwv, 23, PTR_DIFF(outparam,req->out.hdr));
 448         SIVAL(req->out.vwv, 27, parms->in.data.length);
 449         SIVAL(req->out.vwv, 31, PTR_DIFF(outdata,req->out.hdr));
 450         SCVAL(req->out.vwv, 35, parms->in.setup_count);
 451         SSVAL(req->out.vwv, 36, parms->in.function);
 452         for (i=0;i<parms->in.setup_count;i++) {
 453                 SSVAL(req->out.vwv,VWV(19+i),parms->in.setup[i]);
 454         }
 455         if (parms->in.params.length) {
 456                 memcpy(outparam, parms->in.params.data, parms->in.params.length);
 457         }
 458         if (parms->in.data.length) {
 459                 memcpy(outparam, parms->in.data.data, parms->in.data.length);
 460         }
 461
 462         if (!cli_request_send(req)) {
 463                 cli_request_destroy(req);
 464                 return NULL;
 465         }
 466
 467         return req;
 468 }
 469
 470
 471 /****************************************************************************
 472   receive a SMB nttrans response allocating the necessary memory
 473   ****************************************************************************/
 474 NTSTATUS smb_raw_nttrans(struct cli_tree *tree,
 475                          TALLOC_CTX *mem_ctx,
 476                          struct smb_nttrans *parms)
 477 {
 478         struct cli_request *req;
 479
 480         req = smb_raw_nttrans_send(tree, parms);
 481         if (!req) {
 482                 return NT_STATUS_UNSUCCESSFUL;
 483         }
 484
 485         return smb_raw_nttrans_recv(req, mem_ctx, parms);
 486 }