2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1994-1998
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 /****************************************************************************
27 Call a remote api on an arbitrary pipe. takes param, data and setup buffers.
28 ****************************************************************************/
29 BOOL cli_api_pipe(struct cli_state *cli, const char *pipe_name,
30 uint16 *setup, uint32 setup_count, uint32 max_setup_count,
31 char *params, uint32 param_count, uint32 max_param_count,
32 char *data, uint32 data_count, uint32 max_data_count,
33 char **rparam, uint32 *rparam_count,
34 char **rdata, uint32 *rdata_count)
36 cli_send_trans(cli, SMBtrans,
39 setup, setup_count, max_setup_count,
40 params, param_count, max_param_count,
41 data, data_count, max_data_count);
43 return (cli_receive_trans(cli, SMBtrans,
44 rparam, (unsigned int *)rparam_count,
45 rdata, (unsigned int *)rdata_count));
48 /****************************************************************************
50 ****************************************************************************/
51 BOOL cli_api(struct cli_state *cli,
52 char *param, int prcnt, int mprcnt,
53 char *data, int drcnt, int mdrcnt,
54 char **rparam, unsigned int *rprcnt,
55 char **rdata, unsigned int *rdrcnt)
57 cli_send_trans(cli,SMBtrans,
58 PIPE_LANMAN, /* Name */
60 NULL,0,0, /* Setup, length, max */
61 param, prcnt, mprcnt, /* Params, length, max */
62 data, drcnt, mdrcnt /* Data, length, max */
65 return (cli_receive_trans(cli,SMBtrans,
71 /****************************************************************************
72 perform a NetWkstaUserLogon
73 ****************************************************************************/
74 BOOL cli_NetWkstaUserLogon(struct cli_state *cli,char *user, char *workstation)
79 unsigned int rdrcnt,rprcnt;
82 memset(param, 0, sizeof(param));
84 /* send a SMBtrans command with api NetWkstaUserLogon */
86 SSVAL(p,0,132); /* api number */
88 pstrcpy_base(p,"OOWb54WrLh",param);
90 pstrcpy_base(p,"WB21BWDWWDDDDDDDzzzD",param);
94 pstrcpy_base(p,user,param);
100 pstrcpy_base(p, workstation, param);
103 SSVAL(p, 0, CLI_BUFFER_SIZE);
105 SSVAL(p, 0, CLI_BUFFER_SIZE);
109 param, PTR_DIFF(p,param),1024, /* param, length, max */
110 NULL, 0, CLI_BUFFER_SIZE, /* data, length, max */
111 &rparam, &rprcnt, /* return params, return size */
112 &rdata, &rdrcnt /* return data, return size */
114 cli->rap_error = rparam? SVAL(rparam,0) : -1;
117 if (cli->rap_error == 0) {
118 DEBUG(4,("NetWkstaUserLogon success\n"));
119 cli->privileges = SVAL(p, 24);
120 /* The cli->eff_name field used to be set here
121 but it wasn't used anywhere else. */
123 DEBUG(1,("NetwkstaUserLogon gave error %d\n", cli->rap_error));
129 return (cli->rap_error == 0);
132 /****************************************************************************
133 call a NetShareEnum - try and browse available connections on a host
134 ****************************************************************************/
135 int cli_RNetShareEnum(struct cli_state *cli, void (*fn)(const char *, uint32, const char *, void *), void *state)
140 unsigned int rdrcnt,rprcnt;
144 /* now send a SMBtrans command with api RNetShareEnum */
146 SSVAL(p,0,0); /* api number */
148 pstrcpy_base(p,"WrLeh",param);
149 p = skip_string(p,1);
150 pstrcpy_base(p,"B13BWz",param);
151 p = skip_string(p,1);
154 * Win2k needs a *smaller* buffer than 0xFFFF here -
155 * it returns "out of server memory" with 0xFFFF !!! JRA.
161 param, PTR_DIFF(p,param), 1024, /* Param, length, maxlen */
162 NULL, 0, 0xFFE0, /* data, length, maxlen - Win2k needs a small buffer here too ! */
163 &rparam, &rprcnt, /* return params, length */
164 &rdata, &rdrcnt)) /* return data, length */
166 int res = rparam? SVAL(rparam,0) : -1;
168 if (res == 0 || res == ERRmoredata) {
169 int converter=SVAL(rparam,2);
172 count=SVAL(rparam,4);
175 for (i=0;i<count;i++,p+=20) {
177 int type = SVAL(p,14);
178 int comment_offset = IVAL(p,16) & 0xFFFF;
179 const char *cmnt = comment_offset?(rdata+comment_offset-converter):"";
182 pull_ascii_pstring(s1, sname);
183 pull_ascii_pstring(s2, cmnt);
185 fn(s1, type, s2, state);
188 DEBUG(4,("NetShareEnum res=%d\n", res));
191 DEBUG(4,("NetShareEnum failed\n"));
201 /****************************************************************************
202 call a NetServerEnum for the specified workgroup and servertype mask. This
203 function then calls the specified callback function for each name returned.
205 The callback function takes 4 arguments: the machine name, the server type,
206 the comment and a state pointer.
207 ****************************************************************************/
208 BOOL cli_NetServerEnum(struct cli_state *cli, char *workgroup, uint32 stype,
209 void (*fn)(const char *, uint32, const char *, void *),
214 unsigned int rdrcnt,rprcnt;
220 errno = 0; /* reset */
222 /* send a SMBtrans command with api NetServerEnum */
224 SSVAL(p,0,0x68); /* api number */
226 pstrcpy_base(p,"WrLehDz", param);
227 p = skip_string(p,1);
229 pstrcpy_base(p,"B16BBDz", param);
231 p = skip_string(p,1);
233 SSVAL(p,2,CLI_BUFFER_SIZE);
238 p += push_ascii(p, workgroup, sizeof(pstring)-PTR_DIFF(p,param)-1, STR_TERMINATE|STR_UPPER);
241 param, PTR_DIFF(p,param), 8, /* params, length, max */
242 NULL, 0, CLI_BUFFER_SIZE, /* data, length, max */
243 &rparam, &rprcnt, /* return params, return size */
244 &rdata, &rdrcnt /* return data, return size */
246 int res = rparam? SVAL(rparam,0) : -1;
248 if (res == 0 || res == ERRmoredata) {
250 int converter=SVAL(rparam,2);
252 count=SVAL(rparam,4);
255 for (i = 0;i < count;i++, p += 26) {
257 int comment_offset = (IVAL(p,22) & 0xFFFF)-converter;
258 const char *cmnt = comment_offset?(rdata+comment_offset):"";
261 if (comment_offset < 0 || comment_offset > (int)rdrcnt) continue;
263 stype = IVAL(p,18) & ~SV_TYPE_LOCAL_LIST_ONLY;
265 pull_ascii_pstring(s1, sname);
266 pull_ascii_pstring(s2, cmnt);
267 fn(s1, stype, s2, state);
276 errno = cli_errno(cli);
279 /* this is a very special case, when the domain master for the
280 work group isn't part of the work group itself, there is something
291 /****************************************************************************
292 Send a SamOEMChangePassword command
293 ****************************************************************************/
294 BOOL cli_oem_change_password(struct cli_state *cli, const char *user, const char *new_password,
295 const char *old_password)
300 unsigned char old_pw_hash[16];
301 unsigned char new_pw_hash[16];
302 unsigned int data_len;
303 unsigned int param_len = 0;
306 unsigned int rprcnt, rdrcnt;
308 if (strlen(user) >= sizeof(fstring)-1) {
309 DEBUG(0,("cli_oem_change_password: user name %s is too long.\n", user));
313 SSVAL(p,0,214); /* SamOEMChangePassword command. */
315 pstrcpy_base(p, "zsT", param);
316 p = skip_string(p,1);
317 pstrcpy_base(p, "B516B16", param);
318 p = skip_string(p,1);
319 pstrcpy_base(p,user, param);
320 p = skip_string(p,1);
324 param_len = PTR_DIFF(p,param);
327 * Get the Lanman hash of the old password, we
328 * use this as the key to make_oem_passwd_hash().
330 E_deshash(old_password, old_pw_hash);
332 encode_pw_buffer(data, new_password, STR_ASCII);
334 #ifdef DEBUG_PASSWORD
335 DEBUG(100,("make_oem_passwd_hash\n"));
336 dump_data(100, data, 516);
338 SamOEMhash( (unsigned char *)data, (unsigned char *)old_pw_hash, 516);
341 * Now place the old password hash in the data.
343 E_deshash(new_password, new_pw_hash);
345 E_old_pw_hash( new_pw_hash, old_pw_hash, (uchar *)&data[516]);
349 if (cli_send_trans(cli,SMBtrans,
350 PIPE_LANMAN, /* name */
351 0,0, /* fid, flags */
352 NULL,0,0, /* setup, length, max */
353 param,param_len,2, /* param, length, max */
354 data,data_len,0 /* data, length, max */
356 DEBUG(0,("cli_oem_change_password: Failed to send password change for user %s\n",
361 if (!cli_receive_trans(cli,SMBtrans,
364 DEBUG(0,("cli_oem_change_password: Failed to recieve reply to password change for user %s\n",
370 cli->rap_error = SVAL(rparam,0);
375 return (cli->rap_error == 0);
379 /****************************************************************************
380 send a qpathinfo call
381 ****************************************************************************/
382 BOOL cli_qpathinfo(struct cli_state *cli, const char *fname,
383 time_t *c_time, time_t *a_time, time_t *m_time,
384 size_t *size, uint16 *mode)
386 unsigned int data_len = 0;
387 unsigned int param_len = 0;
388 unsigned int rparam_len, rdata_len;
389 uint16 setup = TRANSACT2_QPATHINFO;
391 char *rparam=NULL, *rdata=NULL;
394 time_t (*date_fn)(void *);
399 SSVAL(p, 0, SMB_INFO_STANDARD);
401 p += clistr_push(cli, p, fname, sizeof(pstring)-6, STR_TERMINATE);
403 param_len = PTR_DIFF(p, param);
406 ret = (cli_send_trans(cli, SMBtrans2,
408 -1, 0, /* fid, flags */
409 &setup, 1, 0, /* setup, length, max */
410 param, param_len, 10, /* param, length, max */
411 NULL, data_len, cli->max_xmit /* data, length, max */
413 cli_receive_trans(cli, SMBtrans2,
414 &rparam, &rparam_len,
415 &rdata, &rdata_len));
416 if (!cli_is_dos_error(cli)) break;
418 /* we need to work around a Win95 bug - sometimes
419 it gives ERRSRV/ERRerror temprarily */
422 cli_dos_error(cli, &eclass, &ecode);
423 if (eclass != ERRSRV || ecode != ERRerror) break;
426 } while (count-- && ret==False);
428 if (!ret || !rdata || rdata_len < 22) {
433 date_fn = make_unix_date;
435 date_fn = make_unix_date2;
439 *c_time = date_fn(rdata+0);
442 *a_time = date_fn(rdata+4);
445 *m_time = date_fn(rdata+8);
448 *size = IVAL(rdata, 12);
451 *mode = SVAL(rdata,l1_attrFile);
459 /****************************************************************************
460 send a qpathinfo call with the SMB_QUERY_FILE_ALL_INFO info level
461 ****************************************************************************/
462 BOOL cli_qpathinfo2(struct cli_state *cli, const char *fname,
463 time_t *c_time, time_t *a_time, time_t *m_time,
464 time_t *w_time, size_t *size, uint16 *mode,
467 unsigned int data_len = 0;
468 unsigned int param_len = 0;
469 uint16 setup = TRANSACT2_QPATHINFO;
471 char *rparam=NULL, *rdata=NULL;
476 SSVAL(p, 0, SMB_QUERY_FILE_ALL_INFO);
478 p += clistr_push(cli, p, fname, sizeof(pstring)-6, STR_TERMINATE);
480 param_len = PTR_DIFF(p, param);
482 if (!cli_send_trans(cli, SMBtrans2,
484 -1, 0, /* fid, flags */
485 &setup, 1, 0, /* setup, length, max */
486 param, param_len, 10, /* param, length, max */
487 NULL, data_len, cli->max_xmit /* data, length, max */
492 if (!cli_receive_trans(cli, SMBtrans2,
494 &rdata, &data_len)) {
498 if (!rdata || data_len < 22) {
503 *c_time = interpret_long_date(rdata+0) - cli->serverzone;
506 *a_time = interpret_long_date(rdata+8) - cli->serverzone;
509 *m_time = interpret_long_date(rdata+16) - cli->serverzone;
512 *w_time = interpret_long_date(rdata+24) - cli->serverzone;
515 *mode = SVAL(rdata, 32);
518 *size = IVAL(rdata, 48);
521 *ino = IVAL(rdata, 64);
530 /****************************************************************************
531 send a qfileinfo QUERY_FILE_NAME_INFO call
532 ****************************************************************************/
533 BOOL cli_qfilename(struct cli_state *cli, int fnum,
536 unsigned int data_len = 0;
537 unsigned int param_len = 0;
538 uint16 setup = TRANSACT2_QFILEINFO;
540 char *rparam=NULL, *rdata=NULL;
543 memset(param, 0, param_len);
544 SSVAL(param, 0, fnum);
545 SSVAL(param, 2, SMB_QUERY_FILE_NAME_INFO);
547 if (!cli_send_trans(cli, SMBtrans2,
549 -1, 0, /* fid, flags */
550 &setup, 1, 0, /* setup, length, max */
551 param, param_len, 2, /* param, length, max */
552 NULL, data_len, cli->max_xmit /* data, length, max */
557 if (!cli_receive_trans(cli, SMBtrans2,
559 &rdata, &data_len)) {
563 if (!rdata || data_len < 4) {
567 clistr_pull(cli, name, rdata+4, sizeof(pstring), IVAL(rdata, 0), STR_UNICODE);
573 /****************************************************************************
574 send a qfileinfo call
575 ****************************************************************************/
576 BOOL cli_qfileinfo(struct cli_state *cli, int fnum,
577 uint16 *mode, size_t *size,
578 time_t *c_time, time_t *a_time, time_t *m_time,
579 time_t *w_time, SMB_INO_T *ino)
581 unsigned int data_len = 0;
582 unsigned int param_len = 0;
583 uint16 setup = TRANSACT2_QFILEINFO;
585 char *rparam=NULL, *rdata=NULL;
587 /* if its a win95 server then fail this - win95 totally screws it
589 if (cli->win95) return False;
593 memset(param, 0, param_len);
594 SSVAL(param, 0, fnum);
595 SSVAL(param, 2, SMB_QUERY_FILE_ALL_INFO);
597 if (!cli_send_trans(cli, SMBtrans2,
599 -1, 0, /* fid, flags */
600 &setup, 1, 0, /* setup, length, max */
601 param, param_len, 2, /* param, length, max */
602 NULL, data_len, cli->max_xmit /* data, length, max */
607 if (!cli_receive_trans(cli, SMBtrans2,
609 &rdata, &data_len)) {
613 if (!rdata || data_len < 68) {
618 *c_time = interpret_long_date(rdata+0) - cli->serverzone;
621 *a_time = interpret_long_date(rdata+8) - cli->serverzone;
624 *m_time = interpret_long_date(rdata+16) - cli->serverzone;
627 *w_time = interpret_long_date(rdata+24) - cli->serverzone;
630 *mode = SVAL(rdata, 32);
633 *size = IVAL(rdata, 48);
636 *ino = IVAL(rdata, 64);
644 /****************************************************************************
645 send a qfileinfo call
646 ****************************************************************************/
647 BOOL cli_qfileinfo_test(struct cli_state *cli, int fnum, int level, char **poutdata, uint32 *poutlen)
649 unsigned int data_len = 0;
650 unsigned int param_len = 0;
651 uint16 setup = TRANSACT2_QFILEINFO;
653 char *rparam=NULL, *rdata=NULL;
658 /* if its a win95 server then fail this - win95 totally screws it
665 memset(param, 0, param_len);
666 SSVAL(param, 0, fnum);
667 SSVAL(param, 2, level);
669 if (!cli_send_trans(cli, SMBtrans2,
671 -1, 0, /* fid, flags */
672 &setup, 1, 0, /* setup, length, max */
673 param, param_len, 2, /* param, length, max */
674 NULL, data_len, cli->max_xmit /* data, length, max */
679 if (!cli_receive_trans(cli, SMBtrans2,
681 &rdata, &data_len)) {
685 *poutdata = memdup(rdata, data_len);
695 /****************************************************************************
696 send a qpathinfo SMB_QUERY_FILE_ALT_NAME_INFO call
697 ****************************************************************************/
698 NTSTATUS cli_qpathinfo_alt_name(struct cli_state *cli, const char *fname, fstring alt_name)
700 unsigned int data_len = 0;
701 unsigned int param_len = 0;
702 uint16 setup = TRANSACT2_QPATHINFO;
704 char *rparam=NULL, *rdata=NULL;
712 SSVAL(p, 0, SMB_QUERY_FILE_ALT_NAME_INFO);
714 p += clistr_push(cli, p, fname, sizeof(pstring)-6, STR_TERMINATE);
716 param_len = PTR_DIFF(p, param);
719 ret = (cli_send_trans(cli, SMBtrans2,
721 -1, 0, /* fid, flags */
722 &setup, 1, 0, /* setup, length, max */
723 param, param_len, 10, /* param, length, max */
724 NULL, data_len, cli->max_xmit /* data, length, max */
726 cli_receive_trans(cli, SMBtrans2,
729 if (!ret && cli_is_dos_error(cli)) {
730 /* we need to work around a Win95 bug - sometimes
731 it gives ERRSRV/ERRerror temprarily */
734 cli_dos_error(cli, &eclass, &ecode);
735 if (eclass != ERRSRV || ecode != ERRerror) break;
738 } while (count-- && ret==False);
740 if (!ret || !rdata || data_len < 4) {
741 return NT_STATUS_UNSUCCESSFUL;
744 len = IVAL(rdata, 0);
746 if (len > data_len - 4) {
747 return NT_STATUS_INVALID_NETWORK_RESPONSE;
750 clistr_pull(cli, alt_name, rdata+4, sizeof(fstring), len, STR_UNICODE);