?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
We use unsigned now, so use %u.
[Samba/gebeck_regimport.git] / source3 / smbd / ipc.c
blobc8bb0c250522c6a51af5cfa6f35a15675c5cf155
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 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 if (pscnt < tpscnt || dscnt < tdscnt) {
432 /* We need to send an interim response then receive the rest
433 of the parameter/data bytes */
434 outsize = set_message(outbuf,0,0,True);
435 show_msg(outbuf);
436 if (!send_smb(smbd_server_fd(),outbuf))
437 exit_server("reply_trans: send_smb failed.");
438 }
439
440 /* receive the rest of the trans packet */
441 while (pscnt < tpscnt || dscnt < tdscnt) {
442 BOOL ret;
443 unsigned int pcnt,poff,dcnt,doff,pdisp,ddisp;
444
445 ret = receive_next_smb(inbuf,bufsize,SMB_SECONDARY_WAIT);
446
447 if ((ret && (CVAL(inbuf, smb_com) != SMBtranss)) || !ret) {
448 if(ret) {
449 DEBUG(0,("reply_trans: Invalid secondary trans packet\n"));
450 } else {
451 DEBUG(0,("reply_trans: %s in getting secondary trans response.\n",
452 (smb_read_error == READ_ERROR) ? "error" : "timeout" ));
453 }
454 SAFE_FREE(params);
455 SAFE_FREE(data);
456 SAFE_FREE(setup);
457 END_PROFILE(SMBtrans);
458 return(ERROR_DOS(ERRSRV,ERRerror));
459 }
460
461 show_msg(inbuf);
462
463 /* Revise total_params and total_data in case they have changed downwards */
464 if (SVAL(inbuf,smb_vwv0) < tpscnt)
465 tpscnt = SVAL(inbuf,smb_vwv0);
466 if (SVAL(inbuf,smb_vwv1) < tdscnt)
467 tdscnt = SVAL(inbuf,smb_vwv1);
468
469 pcnt = SVAL(inbuf,smb_vwv2);
470 poff = SVAL(inbuf,smb_vwv3);
471 pdisp = SVAL(inbuf,smb_vwv4);
472
473 dcnt = SVAL(inbuf,smb_vwv5);
474 doff = SVAL(inbuf,smb_vwv6);
475 ddisp = SVAL(inbuf,smb_vwv7);
476
477 pscnt += pcnt;
478 dscnt += dcnt;
479
480 if (dscnt > tdscnt || pscnt > tpscnt)
481 goto bad_param;
482
483 if (pcnt) {
484 if (pdisp+pcnt >= tpscnt)
485 goto bad_param;
486 if ((pdisp+pcnt < pdisp) || (pdisp+pcnt < pcnt))
487 goto bad_param;
488 if (smb_base(inbuf) + poff + pcnt >= inbuf + bufsize)
489 goto bad_param;
490 if (params + pdisp < params)
491 goto bad_param;
492
493 memcpy(params+pdisp,smb_base(inbuf)+poff,pcnt);
494 }
495
496 if (dcnt) {
497 if (ddisp+dcnt >= tdscnt)
498 goto bad_param;
499 if ((ddisp+dcnt < ddisp) || (ddisp+dcnt < dcnt))
500 goto bad_param;
501 if (smb_base(inbuf) + doff + dcnt >= inbuf + bufsize)
502 goto bad_param;
503 if (data + ddisp < data)
504 goto bad_param;
505
506 memcpy(data+ddisp,smb_base(inbuf)+doff,dcnt);
507 }
508 }
509
510
511 DEBUG(3,("trans <%s> data=%u params=%u setup=%u\n",
512 name,tdscnt,tpscnt,suwcnt));
513
514 /*
515 * WinCE wierdness....
516 */
517
518 if (name[0] == '\\' && (StrnCaseCmp(&name[1],local_machine, strlen(local_machine)) == 0) &&
519 (name[strlen(local_machine)+1] == '\\'))
520 name_offset = strlen(local_machine)+1;
521
522 if (strnequal(&name[name_offset], "\\PIPE", strlen("\\PIPE"))) {
523 name_offset += strlen("\\PIPE");
524
525 /* Win9x weirdness. When talking to a unicode server Win9x
526 only sends \PIPE instead of \PIPE\ */
527
528 if (name[name_offset] == '\\')
529 name_offset++;
530
531 DEBUG(5,("calling named_pipe\n"));
532 outsize = named_pipe(conn,vuid,outbuf,
533 name+name_offset,setup,data,params,
534 suwcnt,tdscnt,tpscnt,msrcnt,mdrcnt,mprcnt);
535 } else {
536 DEBUG(3,("invalid pipe name\n"));
537 outsize = 0;
538 }
539
540
541 SAFE_FREE(data);
542 SAFE_FREE(params);
543 SAFE_FREE(setup);
544
545 if (close_on_completion)
546 close_cnum(conn,vuid);
547
548 if (one_way) {
549 END_PROFILE(SMBtrans);
550 return(-1);
551 }
552
553 if (outsize == 0) {
554 END_PROFILE(SMBtrans);
555 return(ERROR_DOS(ERRSRV,ERRnosupport));
556 }
557
558 END_PROFILE(SMBtrans);
559 return(outsize);
560
561
562 bad_param:
563
564 DEBUG(0,("reply_trans: invalid trans parameters\n"));
565 SAFE_FREE(data);
566 SAFE_FREE(params);
567 SAFE_FREE(setup);
568 END_PROFILE(SMBtrans);
569 return ERROR_NT(NT_STATUS_INVALID_PARAMETER);
570 }
reg import