source3/smbd/ipc.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Inter-process communication and named pipe handling
   4    Copyright (C) Andrew Tridgell 1992-1998
   5
   6    SMB Version handling
   7    Copyright (C) John H Terpstra 1995-1998
   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 2 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, write to the Free Software
  21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22    */
  23 /*
  24    This file handles the named pipe and mailslot calls
  25    in the SMBtrans protocol
  26    */
  27
  28 #include "includes.h"
  29
  30 extern int max_send;
  31
  32 extern fstring local_machine;
  33
  34 #define NERR_notsupported 50
  35
  36 extern int smb_read_error;
  37
  38 /*******************************************************************
  39  copies parameters and data, as needed, into the smb buffer
  40
  41  *both* the data and params sections should be aligned.  this
  42  is fudged in the rpc pipes by
  43  at present, only the data section is.  this may be a possible
  44  cause of some of the ipc problems being experienced.  lkcl26dec97
  45
  46  ******************************************************************/
  47
  48 static void copy_trans_params_and_data(char *outbuf, int align,
  49                                 char *rparam, int param_offset, int param_len,
  50                                 char *rdata, int data_offset, int data_len)
  51 {
  52         char *copy_into = smb_buf(outbuf)+1;
  53
  54         if(param_len < 0)
  55                 param_len = 0;
  56
  57         if(data_len < 0)
  58                 data_len = 0;
  59
  60         DEBUG(5,("copy_trans_params_and_data: params[%d..%d] data[%d..%d]\n",
  61                         param_offset, param_offset + param_len,
  62                         data_offset , data_offset  + data_len));
  63
  64         if (param_len)
  65                 memcpy(copy_into, &rparam[param_offset], param_len);
  66
  67         copy_into += param_len + align;
  68
  69         if (data_len )
  70                 memcpy(copy_into, &rdata[data_offset], data_len);
  71 }
  72
  73 /****************************************************************************
  74  Send a trans reply.
  75  ****************************************************************************/
  76
  77 void send_trans_reply(char *outbuf,
  78                                 char *rparam, int rparam_len,
  79                                 char *rdata, int rdata_len,
  80                                 BOOL buffer_too_large)
  81 {
  82         int this_ldata,this_lparam;
  83         int tot_data_sent = 0;
  84         int tot_param_sent = 0;
  85         int align;
  86
  87         int ldata  = rdata  ? rdata_len : 0;
  88         int lparam = rparam ? rparam_len : 0;
  89
  90         if (buffer_too_large)
  91                 DEBUG(5,("send_trans_reply: buffer %d too large\n", ldata ));
  92
  93         this_lparam = MIN(lparam,max_send - 500); /* hack */
  94         this_ldata  = MIN(ldata,max_send - (500+this_lparam));
  95
  96         align = ((this_lparam)%4);
  97
  98         if (buffer_too_large) {
  99                 ERROR_NT(STATUS_BUFFER_OVERFLOW);
 100         }
 101
 102         set_message(outbuf,10,1+align+this_ldata+this_lparam,True);
 103
 104         copy_trans_params_and_data(outbuf, align,
 105                                                                 rparam, tot_param_sent, this_lparam,
 106                                                                 rdata, tot_data_sent, this_ldata);
 107
 108         SSVAL(outbuf,smb_vwv0,lparam);
 109         SSVAL(outbuf,smb_vwv1,ldata);
 110         SSVAL(outbuf,smb_vwv3,this_lparam);
 111         SSVAL(outbuf,smb_vwv4,smb_offset(smb_buf(outbuf)+1,outbuf));
 112         SSVAL(outbuf,smb_vwv5,0);
 113         SSVAL(outbuf,smb_vwv6,this_ldata);
 114         SSVAL(outbuf,smb_vwv7,smb_offset(smb_buf(outbuf)+1+this_lparam+align,outbuf));
 115         SSVAL(outbuf,smb_vwv8,0);
 116         SSVAL(outbuf,smb_vwv9,0);
 117
 118         show_msg(outbuf);
 119         if (!send_smb(smbd_server_fd(),outbuf))
 120                 exit_server("send_trans_reply: send_smb failed.");
 121
 122         tot_data_sent = this_ldata;
 123         tot_param_sent = this_lparam;
 124
 125         while (tot_data_sent < ldata || tot_param_sent < lparam)
 126         {
 127                 this_lparam = MIN(lparam-tot_param_sent, max_send - 500); /* hack */
 128                 this_ldata  = MIN(ldata -tot_data_sent, max_send - (500+this_lparam));
 129
 130                 if(this_lparam < 0)
 131                         this_lparam = 0;
 132
 133                 if(this_ldata < 0)
 134                         this_ldata = 0;
 135
 136                 align = (this_lparam%4);
 137
 138                 set_message(outbuf,10,1+this_ldata+this_lparam+align,False);
 139
 140                 copy_trans_params_and_data(outbuf, align,
 141                                            rparam, tot_param_sent, this_lparam,
 142                                            rdata, tot_data_sent, this_ldata);
 143
 144                 SSVAL(outbuf,smb_vwv3,this_lparam);
 145                 SSVAL(outbuf,smb_vwv4,smb_offset(smb_buf(outbuf)+1,outbuf));
 146                 SSVAL(outbuf,smb_vwv5,tot_param_sent);
 147                 SSVAL(outbuf,smb_vwv6,this_ldata);
 148                 SSVAL(outbuf,smb_vwv7,smb_offset(smb_buf(outbuf)+1+this_lparam+align,outbuf));
 149                 SSVAL(outbuf,smb_vwv8,tot_data_sent);
 150                 SSVAL(outbuf,smb_vwv9,0);
 151
 152                 show_msg(outbuf);
 153                 if (!send_smb(smbd_server_fd(),outbuf))
 154                         exit_server("send_trans_reply: send_smb failed.");
 155
 156                 tot_data_sent  += this_ldata;
 157                 tot_param_sent += this_lparam;
 158         }
 159 }
 160
 161 /****************************************************************************
 162  Start the first part of an RPC reply which began with an SMBtrans request.
 163 ****************************************************************************/
 164
 165 static BOOL api_rpc_trans_reply(char *outbuf, smb_np_struct *p)
 166 {
 167         BOOL is_data_outstanding;
 168         char *rdata = malloc(p->max_trans_reply);
 169         int data_len;
 170
 171         if(rdata == NULL) {
 172                 DEBUG(0,("api_rpc_trans_reply: malloc fail.\n"));
 173                 return False;
 174         }
 175
 176         if((data_len = read_from_pipe( p, rdata, p->max_trans_reply,
 177                                         &is_data_outstanding)) < 0) {
 178                 SAFE_FREE(rdata);
 179                 return False;
 180         }
 181
 182         send_trans_reply(outbuf, NULL, 0, rdata, data_len, is_data_outstanding);
 183
 184         SAFE_FREE(rdata);
 185         return True;
 186 }
 187
 188 /****************************************************************************
 189  WaitNamedPipeHandleState
 190 ****************************************************************************/
 191
 192 static BOOL api_WNPHS(char *outbuf, smb_np_struct *p, char *param, int param_len)
 193 {
 194         uint16 priority;
 195
 196         if (!param || param_len < 2)
 197                 return False;
 198
 199         priority = SVAL(param,0);
 200         DEBUG(4,("WaitNamedPipeHandleState priority %x\n", priority));
 201
 202         if (wait_rpc_pipe_hnd_state(p, priority)) {
 203                 /* now send the reply */
 204                 send_trans_reply(outbuf, NULL, 0, NULL, 0, False);
 205                 return True;
 206         }
 207         return False;
 208 }
 209
 210
 211 /****************************************************************************
 212  SetNamedPipeHandleState
 213 ****************************************************************************/
 214
 215 static BOOL api_SNPHS(char *outbuf, smb_np_struct *p, char *param, int param_len)
 216 {
 217         uint16 id;
 218
 219         if (!param || param_len < 2)
 220                 return False;
 221
 222         id = SVAL(param,0);
 223         DEBUG(4,("SetNamedPipeHandleState to code %x\n", id));
 224
 225         if (set_rpc_pipe_hnd_state(p, id)) {
 226                 /* now send the reply */
 227                 send_trans_reply(outbuf, NULL, 0, NULL, 0, False);
 228                 return True;
 229         }
 230         return False;
 231 }
 232
 233
 234 /****************************************************************************
 235  When no reply is generated, indicate unsupported.
 236  ****************************************************************************/
 237
 238 static BOOL api_no_reply(char *outbuf, int max_rdata_len)
 239 {
 240         char rparam[4];
 241
 242         /* unsupported */
 243         SSVAL(rparam,0,NERR_notsupported);
 244         SSVAL(rparam,2,0); /* converter word */
 245
 246         DEBUG(3,("Unsupported API fd command\n"));
 247
 248         /* now send the reply */
 249         send_trans_reply(outbuf, rparam, 4, NULL, 0, False);
 250
 251         return -1;
 252 }
 253
 254 /****************************************************************************
 255  Handle remote api calls delivered to a named pipe already opened.
 256  ****************************************************************************/
 257
 258 static int api_fd_reply(connection_struct *conn,uint16 vuid,char *outbuf,
 259                         uint16 *setup,char *data,char *params,
 260                         int suwcnt,int tdscnt,int tpscnt,int mdrcnt,int mprcnt)
 261 {
 262         BOOL reply = False;
 263         smb_np_struct *p = NULL;
 264         int pnum;
 265         int subcommand;
 266
 267         DEBUG(5,("api_fd_reply\n"));
 268
 269         /* First find out the name of this file. */
 270         if (suwcnt != 2) {
 271                 DEBUG(0,("Unexpected named pipe transaction.\n"));
 272                 return(-1);
 273         }
 274
 275         /* Get the file handle and hence the file name. */
 276         /*
 277          * NB. The setup array has already been transformed
 278          * via SVAL and so is in gost byte order.
 279          */
 280         pnum = ((int)setup[1]) & 0xFFFF;
 281         subcommand = ((int)setup[0]) & 0xFFFF;
 282
 283         if(!(p = get_rpc_pipe(pnum))) {
 284                 DEBUG(1,("api_fd_reply: INVALID PIPE HANDLE: %x\n", pnum));
 285                 return api_no_reply(outbuf, mdrcnt);
 286         }
 287
 288         DEBUG(3,("Got API command 0x%x on pipe \"%s\" (pnum %x)", subcommand, p->name, pnum));
 289
 290         /* record maximum data length that can be transmitted in an SMBtrans */
 291         p->max_trans_reply = mdrcnt;
 292
 293         DEBUG(10,("api_fd_reply: p:%p max_trans_reply: %d\n", p, p->max_trans_reply));
 294
 295         switch (subcommand) {
 296         case TRANSACT_DCERPCCMD:
 297                 /* dce/rpc command */
 298                 reply = write_to_pipe(p, data, tdscnt);
 299                 if (reply)
 300                         reply = api_rpc_trans_reply(outbuf, p);
 301                 break;
 302         case TRANSACT_WAITNAMEDPIPEHANDLESTATE:
 303                 /* Wait Named Pipe Handle state */
 304                 reply = api_WNPHS(outbuf, p, params, tpscnt);
 305                 break;
 306         case TRANSACT_SETNAMEDPIPEHANDLESTATE:
 307                 /* Set Named Pipe Handle state */
 308                 reply = api_SNPHS(outbuf, p, params, tpscnt);
 309                 break;
 310         }
 311
 312         if (!reply)
 313                 return api_no_reply(outbuf, mdrcnt);
 314
 315         return -1;
 316 }
 317
 318 /****************************************************************************
 319   handle named pipe commands
 320   ****************************************************************************/
 321 static int named_pipe(connection_struct *conn,uint16 vuid, char *outbuf,char *name,
 322                       uint16 *setup,char *data,char *params,
 323                       int suwcnt,int tdscnt,int tpscnt,
 324                       int msrcnt,int mdrcnt,int mprcnt)
 325 {
 326         DEBUG(3,("named pipe command on <%s> name\n", name));
 327
 328         if (strequal(name,"LANMAN"))
 329                 return api_reply(conn,vuid,outbuf,data,params,tdscnt,tpscnt,mdrcnt,mprcnt);
 330
 331         if (strequal(name,"WKSSVC") ||
 332             strequal(name,"SRVSVC") ||
 333             strequal(name,"WINREG") ||
 334             strequal(name,"SAMR") ||
 335             strequal(name,"LSARPC"))
 336         {
 337                 DEBUG(4,("named pipe command from Win95 (wow!)\n"));
 338                 return api_fd_reply(conn,vuid,outbuf,setup,data,params,suwcnt,tdscnt,tpscnt,mdrcnt,mprcnt);
 339         }
 340
 341         if (strlen(name) < 1)
 342                 return api_fd_reply(conn,vuid,outbuf,setup,data,params,suwcnt,tdscnt,tpscnt,mdrcnt,mprcnt);
 343
 344         if (setup)
 345                 DEBUG(3,("unknown named pipe: setup 0x%X setup1=%d\n", (int)setup[0],(int)setup[1]));
 346
 347         return 0;
 348 }
 349
 350
 351 /****************************************************************************
 352  Reply to a SMBtrans.
 353  ****************************************************************************/
 354
 355 int reply_trans(connection_struct *conn, char *inbuf,char *outbuf, int size, int bufsize)
 356 {
 357         fstring name;
 358         int name_offset = 0;
 359         char *data=NULL,*params=NULL;
 360         uint16 *setup=NULL;
 361         int outsize = 0;
 362         uint16 vuid = SVAL(inbuf,smb_uid);
 363         unsigned int tpscnt = SVAL(inbuf,smb_vwv0);
 364         unsigned int tdscnt = SVAL(inbuf,smb_vwv1);
 365         unsigned int mprcnt = SVAL(inbuf,smb_vwv2);
 366         unsigned int mdrcnt = SVAL(inbuf,smb_vwv3);
 367         unsigned int msrcnt = CVAL(inbuf,smb_vwv4);
 368         BOOL close_on_completion = BITSETW(inbuf+smb_vwv5,0);
 369         BOOL one_way = BITSETW(inbuf+smb_vwv5,1);
 370         unsigned int pscnt = SVAL(inbuf,smb_vwv9);
 371         unsigned int psoff = SVAL(inbuf,smb_vwv10);
 372         unsigned int dscnt = SVAL(inbuf,smb_vwv11);
 373         unsigned int dsoff = SVAL(inbuf,smb_vwv12);
 374         unsigned int suwcnt = CVAL(inbuf,smb_vwv13);
 375         START_PROFILE(SMBtrans);
 376
 377         memset(name, '\0',sizeof(name));
 378         srvstr_pull_buf(inbuf, name, smb_buf(inbuf), sizeof(name), STR_TERMINATE);
 379
 380         if (dscnt > tdscnt || pscnt > tpscnt)
 381                 goto bad_param;
 382
 383         if (tdscnt)  {
 384                 if((data = (char *)malloc(tdscnt)) == NULL) {
 385                         DEBUG(0,("reply_trans: data malloc fail for %u bytes !\n", tdscnt));
 386                         END_PROFILE(SMBtrans);
 387                         return(ERROR_DOS(ERRDOS,ERRnomem));
 388                 }
 389                 if ((dsoff+dscnt < dsoff) || (dsoff+dscnt < dscnt))
 390                         goto bad_param;
 391                 if (smb_base(inbuf)+dsoff+dscnt > inbuf + size)
 392                         goto bad_param;
 393
 394                 memcpy(data,smb_base(inbuf)+dsoff,dscnt);
 395         }
 396
 397         if (tpscnt) {
 398                 if((params = (char *)malloc(tpscnt)) == NULL) {
 399                         DEBUG(0,("reply_trans: param malloc fail for %u bytes !\n", tpscnt));
 400                         SAFE_FREE(data);
 401                         END_PROFILE(SMBtrans);
 402                         return(ERROR_DOS(ERRDOS,ERRnomem));
 403                 }
 404                 if ((psoff+pscnt < psoff) || (psoff+pscnt < pscnt))
 405                          goto bad_param;
 406                 if (smb_base(inbuf)+psoff+pscnt > inbuf + size)
 407                         goto bad_param;
 408
 409                 memcpy(params,smb_base(inbuf)+psoff,pscnt);
 410         }
 411
 412         if (suwcnt) {
 413                 unsigned int i;
 414                 if((setup = (uint16 *)malloc(suwcnt*sizeof(uint16))) == NULL) {
 415                         DEBUG(0,("reply_trans: setup malloc fail for %u bytes !\n", (unsigned int)(suwcnt * sizeof(uint16))));
 416                         SAFE_FREE(data);
 417                         SAFE_FREE(params);
 418                         END_PROFILE(SMBtrans);
 419                         return(ERROR_DOS(ERRDOS,ERRnomem));
 420                 }
 421                 if (inbuf+smb_vwv14+(suwcnt*SIZEOFWORD) > inbuf + size)
 422                         goto bad_param;
 423                 if ((smb_vwv14+(suwcnt*SIZEOFWORD) < smb_vwv14) || (smb_vwv14+(suwcnt*SIZEOFWORD) < (suwcnt*SIZEOFWORD)))
 424                         goto bad_param;
 425
 426                 for (i=0;i<suwcnt;i++)
 427                         setup[i] = SVAL(inbuf,smb_vwv14+i*SIZEOFWORD);
 428         }
 429
 430
 431         srv_signing_trans_start(SVAL(inbuf,smb_mid));
 432
 433         if (pscnt < tpscnt || dscnt < tdscnt) {
 434                 /* We need to send an interim response then receive the rest
 435                    of the parameter/data bytes */
 436                 outsize = set_message(outbuf,0,0,True);
 437                 show_msg(outbuf);
 438                 if (!send_smb(smbd_server_fd(),outbuf))
 439                         exit_server("reply_trans: send_smb failed.");
 440         }
 441
 442         /* receive the rest of the trans packet */
 443         while (pscnt < tpscnt || dscnt < tdscnt) {
 444                 BOOL ret;
 445                 unsigned int pcnt,poff,dcnt,doff,pdisp,ddisp;
 446
 447                 ret = receive_next_smb(inbuf,bufsize,SMB_SECONDARY_WAIT);
 448
 449                 if ((ret && (CVAL(inbuf, smb_com) != SMBtranss)) || !ret) {
 450                         if(ret) {
 451                                 DEBUG(0,("reply_trans: Invalid secondary trans packet\n"));
 452                         } else {
 453                                 DEBUG(0,("reply_trans: %s in getting secondary trans response.\n",
 454                                          (smb_read_error == READ_ERROR) ? "error" : "timeout" ));
 455                         }
 456                         SAFE_FREE(params);
 457                         SAFE_FREE(data);
 458                         SAFE_FREE(setup);
 459                         END_PROFILE(SMBtrans);
 460                         srv_signing_trans_stop();
 461                         return(ERROR_DOS(ERRSRV,ERRerror));
 462                 }
 463
 464                 show_msg(inbuf);
 465
 466                 /* Revise total_params and total_data in case they have changed downwards */
 467                 if (SVAL(inbuf,smb_vwv0) < tpscnt)
 468                         tpscnt = SVAL(inbuf,smb_vwv0);
 469                 if (SVAL(inbuf,smb_vwv1) < tdscnt)
 470                         tdscnt = SVAL(inbuf,smb_vwv1);
 471
 472                 pcnt = SVAL(inbuf,smb_vwv2);
 473                 poff = SVAL(inbuf,smb_vwv3);
 474                 pdisp = SVAL(inbuf,smb_vwv4);
 475
 476                 dcnt = SVAL(inbuf,smb_vwv5);
 477                 doff = SVAL(inbuf,smb_vwv6);
 478                 ddisp = SVAL(inbuf,smb_vwv7);
 479
 480                 pscnt += pcnt;
 481                 dscnt += dcnt;
 482
 483                 if (dscnt > tdscnt || pscnt > tpscnt)
 484                         goto bad_param;
 485
 486                 if (pcnt) {
 487                         if (pdisp+pcnt >= tpscnt)
 488                                 goto bad_param;
 489                         if ((pdisp+pcnt < pdisp) || (pdisp+pcnt < pcnt))
 490                                  goto bad_param;
 491                         if (smb_base(inbuf) + poff + pcnt >= inbuf + bufsize)
 492                                 goto bad_param;
 493                         if (params + pdisp < params)
 494                                 goto bad_param;
 495
 496                         memcpy(params+pdisp,smb_base(inbuf)+poff,pcnt);
 497                 }
 498
 499                 if (dcnt) {
 500                         if (ddisp+dcnt >= tdscnt)
 501                                 goto bad_param;
 502                         if ((ddisp+dcnt < ddisp) || (ddisp+dcnt < dcnt))
 503                                 goto bad_param;
 504                         if (smb_base(inbuf) + doff + dcnt >= inbuf + bufsize)
 505                                 goto bad_param;
 506                         if (data + ddisp < data)
 507                                 goto bad_param;
 508
 509                         memcpy(data+ddisp,smb_base(inbuf)+doff,dcnt);
 510                 }
 511         }
 512
 513         DEBUG(3,("trans <%s> data=%u params=%u setup=%u\n",
 514                  name,tdscnt,tpscnt,suwcnt));
 515
 516         /*
 517          * WinCE wierdness....
 518          */
 519
 520         if (name[0] == '\\' && (StrnCaseCmp(&name[1],local_machine, strlen(local_machine)) == 0) &&
 521                         (name[strlen(local_machine)+1] == '\\'))
 522                 name_offset = strlen(local_machine)+1;
 523
 524         if (strnequal(&name[name_offset], "\\PIPE", strlen("\\PIPE"))) {
 525                 name_offset += strlen("\\PIPE");
 526
 527                 /* Win9x weirdness.  When talking to a unicode server Win9x
 528                    only sends \PIPE instead of \PIPE\ */
 529
 530                 if (name[name_offset] == '\\')
 531                         name_offset++;
 532
 533                 DEBUG(5,("calling named_pipe\n"));
 534                 outsize = named_pipe(conn,vuid,outbuf,
 535                                      name+name_offset,setup,data,params,
 536                                      suwcnt,tdscnt,tpscnt,msrcnt,mdrcnt,mprcnt);
 537         } else {
 538                 DEBUG(3,("invalid pipe name\n"));
 539                 outsize = 0;
 540         }
 541
 542
 543         SAFE_FREE(data);
 544         SAFE_FREE(params);
 545         SAFE_FREE(setup);
 546
 547         srv_signing_trans_stop();
 548
 549         if (close_on_completion)
 550                 close_cnum(conn,vuid);
 551
 552         if (one_way) {
 553                 END_PROFILE(SMBtrans);
 554                 return(-1);
 555         }
 556
 557         if (outsize == 0) {
 558                 END_PROFILE(SMBtrans);
 559                 return(ERROR_DOS(ERRSRV,ERRnosupport));
 560         }
 561
 562         END_PROFILE(SMBtrans);
 563         return(outsize);
 564
 565
 566   bad_param:
 567
 568         srv_signing_trans_stop();
 569         DEBUG(0,("reply_trans: invalid trans parameters\n"));
 570         SAFE_FREE(data);
 571         SAFE_FREE(params);
 572         SAFE_FREE(setup);
 573         END_PROFILE(SMBtrans);
 574         return ERROR_NT(NT_STATUS_INVALID_PARAMETER);
 575 }