2 Unix SMB/Netbios implementation.
5 Copyright (C) Andrew Tridgell 1994-1998
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.
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.
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.
27 /****************************************************************************
28 Call a remote api on an arbitrary pipe. takes param, data and setup buffers.
29 ****************************************************************************/
30 BOOL
cli_api_pipe(struct cli_state
*cli
, char *pipe_name
,
31 uint16
*setup
, uint32 setup_count
, uint32 max_setup_count
,
32 char *params
, uint32 param_count
, uint32 max_param_count
,
33 char *data
, uint32 data_count
, uint32 max_data_count
,
34 char **rparam
, uint32
*rparam_count
,
35 char **rdata
, uint32
*rdata_count
)
37 cli_send_trans(cli
, SMBtrans
,
40 setup
, setup_count
, max_setup_count
,
41 params
, param_count
, max_param_count
,
42 data
, data_count
, max_data_count
);
44 return (cli_receive_trans(cli
, SMBtrans
,
45 rparam
, (int *)rparam_count
,
46 rdata
, (int *)rdata_count
));
49 /****************************************************************************
51 ****************************************************************************/
52 BOOL
cli_api(struct cli_state
*cli
,
53 char *param
, int prcnt
, int mprcnt
,
54 char *data
, int drcnt
, int mdrcnt
,
55 char **rparam
, int *rprcnt
,
56 char **rdata
, int *rdrcnt
)
58 cli_send_trans(cli
,SMBtrans
,
59 PIPE_LANMAN
, /* Name */
61 NULL
,0,0, /* Setup, length, max */
62 param
, prcnt
, mprcnt
, /* Params, length, max */
63 data
, drcnt
, mdrcnt
/* Data, length, max */
66 return (cli_receive_trans(cli
,SMBtrans
,
72 /****************************************************************************
73 perform a NetWkstaUserLogon
74 ****************************************************************************/
75 BOOL
cli_NetWkstaUserLogon(struct cli_state
*cli
,char *user
, char *workstation
)
83 memset(param
, 0, sizeof(param
));
85 /* send a SMBtrans command with api NetWkstaUserLogon */
87 SSVAL(p
,0,132); /* api number */
89 pstrcpy(p
,"OOWb54WrLh");
91 pstrcpy(p
,"WB21BWDWWDDDDDDDzzzD");
101 pstrcpy(p
, workstation
);
104 SSVAL(p
, 0, CLI_BUFFER_SIZE
);
106 SSVAL(p
, 0, CLI_BUFFER_SIZE
);
110 param
, PTR_DIFF(p
,param
),1024, /* param, length, max */
111 NULL
, 0, CLI_BUFFER_SIZE
, /* data, length, max */
112 &rparam
, &rprcnt
, /* return params, return size */
113 &rdata
, &rdrcnt
/* return data, return size */
115 cli
->rap_error
= rparam
? SVAL(rparam
,0) : -1;
118 if (cli
->rap_error
== 0) {
119 DEBUG(4,("NetWkstaUserLogon success\n"));
120 cli
->privileges
= SVAL(p
, 24);
121 fstrcpy(cli
->eff_name
,p
+2);
123 DEBUG(1,("NetwkstaUserLogon gave error %d\n", cli
->rap_error
));
131 return (cli
->rap_error
== 0);
134 /****************************************************************************
135 call a NetShareEnum - try and browse available connections on a host
136 ****************************************************************************/
137 int cli_RNetShareEnum(struct cli_state
*cli
, void (*fn
)(const char *, uint32
, const char *, void *), void *state
)
146 /* now send a SMBtrans command with api RNetShareEnum */
148 SSVAL(p
,0,0); /* api number */
151 p
= skip_string(p
,1);
153 p
= skip_string(p
,1);
156 * Win2k needs a *smaller* buffer than 0xFFFF here -
157 * it returns "out of server memory" with 0xFFFF !!! JRA.
163 param
, PTR_DIFF(p
,param
), 1024, /* Param, length, maxlen */
164 NULL
, 0, 0xFFE0, /* data, length, maxlen - Win2k needs a small buffer here too ! */
165 &rparam
, &rprcnt
, /* return params, length */
166 &rdata
, &rdrcnt
)) /* return data, length */
168 int res
= rparam
? SVAL(rparam
,0) : -1;
170 if (res
== 0 || res
== ERRmoredata
) {
171 int converter
=SVAL(rparam
,2);
174 count
=SVAL(rparam
,4);
177 for (i
=0;i
<count
;i
++,p
+=20) {
179 int type
= SVAL(p
,14);
180 int comment_offset
= IVAL(p
,16) & 0xFFFF;
181 char *cmnt
= comment_offset
?(rdata
+comment_offset
-converter
):"";
182 dos_to_unix(sname
,True
);
183 dos_to_unix(cmnt
,True
);
184 fn(sname
, type
, cmnt
, state
);
187 DEBUG(4,("NetShareEnum res=%d\n", res
));
190 DEBUG(4,("NetShareEnum failed\n"));
202 /****************************************************************************
203 call a NetServerEnum for the specified workgroup and servertype mask.
204 This function then calls the specified callback function for each name returned.
206 The callback function takes 3 arguments: the machine name, the server type and
208 ****************************************************************************/
209 BOOL
cli_NetServerEnum(struct cli_state
*cli
, char *workgroup
, uint32 stype
,
210 void (*fn
)(const char *, uint32
, const char *, void *),
221 /* send a SMBtrans command with api NetServerEnum */
223 SSVAL(p
,0,0x68); /* api number */
225 pstrcpy(p
,"WrLehDz");
226 p
= skip_string(p
,1);
228 pstrcpy(p
,"B16BBDz");
230 p
= skip_string(p
,1);
232 SSVAL(p
,2,CLI_BUFFER_SIZE
);
237 p
+= clistr_push(cli
, p
, workgroup
, -1,
238 STR_TERMINATE
| STR_CONVERT
| STR_ASCII
);
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 char *cmnt
= comment_offset
?(rdata
+comment_offset
):"";
259 if (comment_offset
< 0 || comment_offset
> rdrcnt
) continue;
261 stype
= IVAL(p
,18) & ~SV_TYPE_LOCAL_LIST_ONLY
;
263 dos_to_unix(sname
, True
);
264 dos_to_unix(cmnt
, True
);
265 fn(sname
, stype
, cmnt
, state
);
280 /****************************************************************************
281 Send a SamOEMChangePassword command
282 ****************************************************************************/
283 BOOL
cli_oem_change_password(struct cli_state
*cli
, const char *user
, const char *new_password
,
284 const char *old_password
)
286 char param
[16+sizeof(fstring
)];
289 fstring upper_case_old_pw
;
290 fstring upper_case_new_pw
;
291 unsigned char old_pw_hash
[16];
292 unsigned char new_pw_hash
[16];
298 pstring dos_new_password
;
300 if (strlen(user
) >= sizeof(fstring
)-1) {
301 DEBUG(0,("cli_oem_change_password: user name %s is too long.\n", user
));
305 SSVAL(p
,0,214); /* SamOEMChangePassword command. */
308 p
= skip_string(p
,1);
309 pstrcpy(p
, "B516B16");
310 p
= skip_string(p
,1);
312 p
= skip_string(p
,1);
316 param_len
= PTR_DIFF(p
,param
);
319 * Get the Lanman hash of the old password, we
320 * use this as the key to make_oem_passwd_hash().
322 memset(upper_case_old_pw
, '\0', sizeof(upper_case_old_pw
));
323 fstrcpy(upper_case_old_pw
, old_password
);
324 unix_to_dos(upper_case_old_pw
,True
);
325 strupper(upper_case_old_pw
);
326 E_P16((uchar
*)upper_case_old_pw
, old_pw_hash
);
328 pstrcpy(dos_new_password
, new_password
);
329 unix_to_dos(dos_new_password
, True
);
331 if (!make_oem_passwd_hash( data
, dos_new_password
, old_pw_hash
, False
))
335 * Now place the old password hash in the data.
337 memset(upper_case_new_pw
, '\0', sizeof(upper_case_new_pw
));
338 fstrcpy(upper_case_new_pw
, new_password
);
339 unix_to_dos(upper_case_new_pw
,True
);
340 strupper(upper_case_new_pw
);
342 E_P16((uchar
*)upper_case_new_pw
, new_pw_hash
);
344 E_old_pw_hash( new_pw_hash
, old_pw_hash
, (uchar
*)&data
[516]);
348 if (cli_send_trans(cli
,SMBtrans
,
349 PIPE_LANMAN
, /* name */
350 0,0, /* fid, flags */
351 NULL
,0,0, /* setup, length, max */
352 param
,param_len
,2, /* param, length, max */
353 data
,data_len
,0 /* data, length, max */
355 DEBUG(0,("cli_oem_change_password: Failed to send password change for user %s\n",
360 if (cli_receive_trans(cli
,SMBtrans
,
364 cli
->rap_error
= SVAL(rparam
,0);
372 return (cli
->rap_error
== 0);
376 /****************************************************************************
377 send a qpathinfo call
378 ****************************************************************************/
379 BOOL
cli_qpathinfo(struct cli_state
*cli
, const char *fname
,
380 time_t *c_time
, time_t *a_time
, time_t *m_time
,
381 size_t *size
, uint16
*mode
)
385 uint16 setup
= TRANSACT2_QPATHINFO
;
387 char *rparam
=NULL
, *rdata
=NULL
;
390 time_t (*date_fn
)(void *);
395 SSVAL(p
, 0, SMB_INFO_STANDARD
);
397 p
+= clistr_push(cli
, p
, fname
, sizeof(pstring
)-6, STR_TERMINATE
| STR_CONVERT
);
399 param_len
= PTR_DIFF(p
, param
);
402 ret
= (cli_send_trans(cli
, SMBtrans2
,
404 -1, 0, /* fid, flags */
405 &setup
, 1, 0, /* setup, length, max */
406 param
, param_len
, 10, /* param, length, max */
407 NULL
, data_len
, cli
->max_xmit
/* data, length, max */
409 cli_receive_trans(cli
, SMBtrans2
,
413 /* we need to work around a Win95 bug - sometimes
414 it gives ERRSRV/ERRerror temprarily */
417 cli_error(cli
, &eclass
, &ecode
, NULL
);
418 if (eclass
!= ERRSRV
|| ecode
!= ERRerror
) break;
421 } while (count
-- && ret
==False
);
423 if (!ret
|| !rdata
|| data_len
< 22) {
428 date_fn
= make_unix_date
;
430 date_fn
= make_unix_date2
;
434 *c_time
= date_fn(rdata
+0);
437 *a_time
= date_fn(rdata
+4);
440 *m_time
= date_fn(rdata
+8);
443 *size
= IVAL(rdata
, 12);
446 *mode
= SVAL(rdata
,l1_attrFile
);
449 if (rdata
) free(rdata
);
450 if (rparam
) free(rparam
);
454 /****************************************************************************
455 send a qpathinfo call with the SMB_QUERY_FILE_ALL_INFO info level
456 ****************************************************************************/
457 BOOL
cli_qpathinfo2(struct cli_state
*cli
, const char *fname
,
458 time_t *c_time
, time_t *a_time
, time_t *m_time
,
459 time_t *w_time
, size_t *size
, uint16
*mode
,
464 uint16 setup
= TRANSACT2_QPATHINFO
;
466 char *rparam
=NULL
, *rdata
=NULL
;
471 SSVAL(p
, 0, SMB_QUERY_FILE_ALL_INFO
);
473 p
+= clistr_push(cli
, p
, fname
, sizeof(pstring
)-6, STR_TERMINATE
| STR_CONVERT
);
475 param_len
= PTR_DIFF(p
, param
);
477 if (!cli_send_trans(cli
, SMBtrans2
,
479 -1, 0, /* fid, flags */
480 &setup
, 1, 0, /* setup, length, max */
481 param
, param_len
, 10, /* param, length, max */
482 NULL
, data_len
, cli
->max_xmit
/* data, length, max */
487 if (!cli_receive_trans(cli
, SMBtrans2
,
489 &rdata
, &data_len
)) {
493 if (!rdata
|| data_len
< 22) {
498 *c_time
= interpret_long_date(rdata
+0) - cli
->serverzone
;
501 *a_time
= interpret_long_date(rdata
+8) - cli
->serverzone
;
504 *m_time
= interpret_long_date(rdata
+16) - cli
->serverzone
;
507 *w_time
= interpret_long_date(rdata
+24) - cli
->serverzone
;
510 *mode
= SVAL(rdata
, 32);
513 *size
= IVAL(rdata
, 48);
516 *ino
= IVAL(rdata
, 64);
519 if (rdata
) free(rdata
);
520 if (rparam
) free(rparam
);
525 /****************************************************************************
526 send a qfileinfo call
527 ****************************************************************************/
528 BOOL
cli_qfileinfo(struct cli_state
*cli
, int fnum
,
529 uint16
*mode
, size_t *size
,
530 time_t *c_time
, time_t *a_time
, time_t *m_time
,
531 time_t *w_time
, SMB_INO_T
*ino
)
535 uint16 setup
= TRANSACT2_QFILEINFO
;
537 char *rparam
=NULL
, *rdata
=NULL
;
539 /* if its a win95 server then fail this - win95 totally screws it
541 if (cli
->win95
) return False
;
545 memset(param
, 0, param_len
);
546 SSVAL(param
, 0, fnum
);
547 SSVAL(param
, 2, SMB_QUERY_FILE_ALL_INFO
);
549 if (!cli_send_trans(cli
, SMBtrans2
,
551 -1, 0, /* fid, flags */
552 &setup
, 1, 0, /* setup, length, max */
553 param
, param_len
, 2, /* param, length, max */
554 NULL
, data_len
, cli
->max_xmit
/* data, length, max */
559 if (!cli_receive_trans(cli
, SMBtrans2
,
561 &rdata
, &data_len
)) {
565 if (!rdata
|| data_len
< 68) {
570 *c_time
= interpret_long_date(rdata
+0) - cli
->serverzone
;
573 *a_time
= interpret_long_date(rdata
+8) - cli
->serverzone
;
576 *m_time
= interpret_long_date(rdata
+16) - cli
->serverzone
;
579 *w_time
= interpret_long_date(rdata
+24) - cli
->serverzone
;
582 *mode
= SVAL(rdata
, 32);
585 *size
= IVAL(rdata
, 48);
588 *ino
= IVAL(rdata
, 64);
591 if (rdata
) free(rdata
);
592 if (rparam
) free(rparam
);