2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1992-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 3 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, see <http://www.gnu.org/licenses/>.
21 #include "auth/credentials/credentials.h"
22 #include "auth/gensec/gensec.h"
23 #include "auth/auth.h"
24 #include "smb_server/smb_server.h"
25 #include "libcli/smb2/smb2.h"
26 #include "smb_server/smb2/smb2_server.h"
27 #include "smbd/service_stream.h"
28 #include "lib/stream/packet.h"
29 #include "param/param.h"
32 /* initialise the auth_context for this server and return the cryptkey */
33 static NTSTATUS
get_challenge(struct smbsrv_connection
*smb_conn
, uint8_t buff
[8])
37 /* muliple negprots are not premitted */
38 if (smb_conn
->negotiate
.auth_context
) {
39 DEBUG(3,("get challenge: is this a secondary negprot? auth_context is non-NULL!\n"));
40 return NT_STATUS_FOOBAR
;
43 DEBUG(10, ("get challenge: creating negprot_global_auth_context\n"));
45 nt_status
= auth_context_create(smb_conn
,
46 smb_conn
->connection
->event
.ctx
,
47 smb_conn
->connection
->msg_ctx
,
49 &smb_conn
->negotiate
.auth_context
);
50 if (!NT_STATUS_IS_OK(nt_status
)) {
51 DEBUG(0, ("auth_context_create() returned %s", nt_errstr(nt_status
)));
55 nt_status
= auth_get_challenge(smb_conn
->negotiate
.auth_context
, buff
);
56 if (!NT_STATUS_IS_OK(nt_status
)) {
57 DEBUG(0, ("auth_get_challenge() returned %s", nt_errstr(nt_status
)));
64 /****************************************************************************
65 Reply for the core protocol.
66 ****************************************************************************/
67 static void reply_corep(struct smbsrv_request
*req
, uint16_t choice
)
69 smbsrv_setup_reply(req
, 1, 0);
71 SSVAL(req
->out
.vwv
, VWV(0), choice
);
73 req
->smb_conn
->negotiate
.protocol
= PROTOCOL_CORE
;
75 if (req
->smb_conn
->signing
.mandatory_signing
) {
76 smbsrv_terminate_connection(req
->smb_conn
,
77 "CORE does not support SMB signing, and it is mandatory\n");
81 smbsrv_send_reply(req
);
84 /****************************************************************************
85 Reply for the coreplus protocol.
86 this is quite incomplete - we only fill in a small part of the reply, but as nobody uses
87 this any more it probably doesn't matter
88 ****************************************************************************/
89 static void reply_coreplus(struct smbsrv_request
*req
, uint16_t choice
)
91 uint16_t raw
= (lpcfg_readraw(req
->smb_conn
->lp_ctx
)?1:0) | (lpcfg_writeraw(req
->smb_conn
->lp_ctx
)?2:0);
93 smbsrv_setup_reply(req
, 13, 0);
95 /* Reply, SMBlockread, SMBwritelock supported. */
96 SCVAL(req
->out
.hdr
,HDR_FLG
,
97 CVAL(req
->out
.hdr
, HDR_FLG
) | FLAG_SUPPORT_LOCKREAD
);
99 SSVAL(req
->out
.vwv
, VWV(0), choice
);
100 SSVAL(req
->out
.vwv
, VWV(1), 0x1); /* user level security, don't encrypt */
102 /* tell redirector we support
103 readbraw and writebraw (possibly) */
104 SSVAL(req
->out
.vwv
, VWV(5), raw
);
106 req
->smb_conn
->negotiate
.protocol
= PROTOCOL_COREPLUS
;
108 if (req
->smb_conn
->signing
.mandatory_signing
) {
109 smbsrv_terminate_connection(req
->smb_conn
,
110 "COREPLUS does not support SMB signing, and it is mandatory\n");
114 smbsrv_send_reply(req
);
117 /****************************************************************************
118 Reply for the lanman 1.0 protocol.
119 ****************************************************************************/
120 static void reply_lanman1(struct smbsrv_request
*req
, uint16_t choice
)
122 int raw
= (lpcfg_readraw(req
->smb_conn
->lp_ctx
)?1:0) | (lpcfg_writeraw(req
->smb_conn
->lp_ctx
)?2:0);
124 time_t t
= req
->request_time
.tv_sec
;
126 req
->smb_conn
->negotiate
.encrypted_passwords
= lpcfg_encrypted_passwords(req
->smb_conn
->lp_ctx
);
128 if (req
->smb_conn
->negotiate
.encrypted_passwords
)
129 secword
|= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
;
131 req
->smb_conn
->negotiate
.protocol
= PROTOCOL_LANMAN1
;
133 smbsrv_setup_reply(req
, 13, req
->smb_conn
->negotiate
.encrypted_passwords
? 8 : 0);
135 /* SMBlockread, SMBwritelock supported. */
136 SCVAL(req
->out
.hdr
,HDR_FLG
,
137 CVAL(req
->out
.hdr
, HDR_FLG
) | FLAG_SUPPORT_LOCKREAD
);
139 SSVAL(req
->out
.vwv
, VWV(0), choice
);
140 SSVAL(req
->out
.vwv
, VWV(1), secword
);
141 SSVAL(req
->out
.vwv
, VWV(2), req
->smb_conn
->negotiate
.max_recv
);
142 SSVAL(req
->out
.vwv
, VWV(3), lpcfg_maxmux(req
->smb_conn
->lp_ctx
));
143 SSVAL(req
->out
.vwv
, VWV(4), 1);
144 SSVAL(req
->out
.vwv
, VWV(5), raw
);
145 SIVAL(req
->out
.vwv
, VWV(6), req
->smb_conn
->connection
->server_id
.pid
);
146 srv_push_dos_date(req
->smb_conn
, req
->out
.vwv
, VWV(8), t
);
147 SSVAL(req
->out
.vwv
, VWV(10), req
->smb_conn
->negotiate
.zone_offset
/60);
148 SIVAL(req
->out
.vwv
, VWV(11), 0); /* reserved */
150 /* Create a token value and add it to the outgoing packet. */
151 if (req
->smb_conn
->negotiate
.encrypted_passwords
) {
154 SSVAL(req
->out
.vwv
, VWV(11), 8);
156 nt_status
= get_challenge(req
->smb_conn
, req
->out
.data
);
157 if (!NT_STATUS_IS_OK(nt_status
)) {
158 smbsrv_terminate_connection(req
->smb_conn
, "LANMAN1 get_challenge failed\n");
163 if (req
->smb_conn
->signing
.mandatory_signing
) {
164 smbsrv_terminate_connection(req
->smb_conn
,
165 "LANMAN1 does not support SMB signing, and it is mandatory\n");
169 smbsrv_send_reply(req
);
172 /****************************************************************************
173 Reply for the lanman 2.0 protocol.
174 ****************************************************************************/
175 static void reply_lanman2(struct smbsrv_request
*req
, uint16_t choice
)
177 int raw
= (lpcfg_readraw(req
->smb_conn
->lp_ctx
)?1:0) | (lpcfg_writeraw(req
->smb_conn
->lp_ctx
)?2:0);
179 time_t t
= req
->request_time
.tv_sec
;
181 req
->smb_conn
->negotiate
.encrypted_passwords
= lpcfg_encrypted_passwords(req
->smb_conn
->lp_ctx
);
183 if (req
->smb_conn
->negotiate
.encrypted_passwords
)
184 secword
|= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
;
186 req
->smb_conn
->negotiate
.protocol
= PROTOCOL_LANMAN2
;
188 smbsrv_setup_reply(req
, 13, 0);
190 SSVAL(req
->out
.vwv
, VWV(0), choice
);
191 SSVAL(req
->out
.vwv
, VWV(1), secword
);
192 SSVAL(req
->out
.vwv
, VWV(2), req
->smb_conn
->negotiate
.max_recv
);
193 SSVAL(req
->out
.vwv
, VWV(3), lpcfg_maxmux(req
->smb_conn
->lp_ctx
));
194 SSVAL(req
->out
.vwv
, VWV(4), 1);
195 SSVAL(req
->out
.vwv
, VWV(5), raw
);
196 SIVAL(req
->out
.vwv
, VWV(6), req
->smb_conn
->connection
->server_id
.pid
);
197 srv_push_dos_date(req
->smb_conn
, req
->out
.vwv
, VWV(8), t
);
198 SSVAL(req
->out
.vwv
, VWV(10), req
->smb_conn
->negotiate
.zone_offset
/60);
199 SIVAL(req
->out
.vwv
, VWV(11), 0);
201 /* Create a token value and add it to the outgoing packet. */
202 if (req
->smb_conn
->negotiate
.encrypted_passwords
) {
203 SSVAL(req
->out
.vwv
, VWV(11), 8);
204 req_grow_data(req
, 8);
205 get_challenge(req
->smb_conn
, req
->out
.data
);
208 req_push_str(req
, NULL
, lpcfg_workgroup(req
->smb_conn
->lp_ctx
), -1, STR_TERMINATE
);
210 if (req
->smb_conn
->signing
.mandatory_signing
) {
211 smbsrv_terminate_connection(req
->smb_conn
,
212 "LANMAN2 does not support SMB signing, and it is mandatory\n");
216 smbsrv_send_reply(req
);
219 static void reply_nt1_orig(struct smbsrv_request
*req
)
221 /* Create a token value and add it to the outgoing packet. */
222 if (req
->smb_conn
->negotiate
.encrypted_passwords
) {
223 req_grow_data(req
, 8);
224 /* note that we do not send a challenge at all if
225 we are using plaintext */
226 get_challenge(req
->smb_conn
, req
->out
.ptr
);
228 SCVAL(req
->out
.vwv
+1, VWV(16), 8);
230 req_push_str(req
, NULL
, lpcfg_workgroup(req
->smb_conn
->lp_ctx
), -1, STR_UNICODE
|STR_TERMINATE
|STR_NOALIGN
);
231 req_push_str(req
, NULL
, lpcfg_netbios_name(req
->smb_conn
->lp_ctx
), -1, STR_UNICODE
|STR_TERMINATE
|STR_NOALIGN
);
232 DEBUG(3,("not using extended security (SPNEGO or NTLMSSP)\n"));
235 /****************************************************************************
236 Reply for the nt protocol.
237 ****************************************************************************/
238 static void reply_nt1(struct smbsrv_request
*req
, uint16_t choice
)
240 /* dual names + lock_and_read + nt SMBs + remote API calls */
243 time_t t
= req
->request_time
.tv_sec
;
245 bool negotiate_spnego
= false;
246 char *large_test_path
;
248 unix_to_nt_time(&nttime
, t
);
251 CAP_NT_FIND
| CAP_LOCK_AND_READ
|
252 CAP_LEVEL_II_OPLOCKS
| CAP_NT_SMBS
| CAP_RPC_REMOTE_APIS
;
254 req
->smb_conn
->negotiate
.encrypted_passwords
= lpcfg_encrypted_passwords(req
->smb_conn
->lp_ctx
);
256 /* do spnego in user level security if the client
257 supports it and we can do encrypted passwords */
259 if (req
->smb_conn
->negotiate
.encrypted_passwords
&&
260 lpcfg_use_spnego(req
->smb_conn
->lp_ctx
) &&
261 (req
->flags2
& FLAGS2_EXTENDED_SECURITY
)) {
262 negotiate_spnego
= true;
263 capabilities
|= CAP_EXTENDED_SECURITY
;
266 if (lpcfg_unix_extensions(req
->smb_conn
->lp_ctx
)) {
267 capabilities
|= CAP_UNIX
;
270 if (lpcfg_large_readwrite(req
->smb_conn
->lp_ctx
)) {
271 capabilities
|= CAP_LARGE_READX
| CAP_LARGE_WRITEX
| CAP_W2K_SMBS
;
274 large_test_path
= lpcfg_lock_path(req
, req
->smb_conn
->lp_ctx
, "large_test.dat");
275 if (large_file_support(large_test_path
)) {
276 capabilities
|= CAP_LARGE_FILES
;
279 if (lpcfg_readraw(req
->smb_conn
->lp_ctx
) &&
280 lpcfg_writeraw(req
->smb_conn
->lp_ctx
)) {
281 capabilities
|= CAP_RAW_MODE
;
284 /* allow for disabling unicode */
285 if (lpcfg_unicode(req
->smb_conn
->lp_ctx
)) {
286 capabilities
|= CAP_UNICODE
;
289 if (lpcfg_nt_status_support(req
->smb_conn
->lp_ctx
)) {
290 capabilities
|= CAP_STATUS32
;
293 if (lpcfg_host_msdfs(req
->smb_conn
->lp_ctx
)) {
294 capabilities
|= CAP_DFS
;
297 secword
|= NEGOTIATE_SECURITY_USER_LEVEL
;
299 if (req
->smb_conn
->negotiate
.encrypted_passwords
) {
300 secword
|= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
;
303 if (req
->smb_conn
->signing
.allow_smb_signing
) {
304 secword
|= NEGOTIATE_SECURITY_SIGNATURES_ENABLED
;
307 if (req
->smb_conn
->signing
.mandatory_signing
) {
308 secword
|= NEGOTIATE_SECURITY_SIGNATURES_REQUIRED
;
311 req
->smb_conn
->negotiate
.protocol
= PROTOCOL_NT1
;
313 smbsrv_setup_reply(req
, 17, 0);
315 SSVAL(req
->out
.vwv
, VWV(0), choice
);
316 SCVAL(req
->out
.vwv
, VWV(1), secword
);
318 /* notice the strange +1 on vwv here? That's because
319 this is the one and only SMB packet that is malformed in
320 the specification - all the command words after the secword
321 are offset by 1 byte */
322 SSVAL(req
->out
.vwv
+1, VWV(1), lpcfg_maxmux(req
->smb_conn
->lp_ctx
));
323 SSVAL(req
->out
.vwv
+1, VWV(2), 1); /* num vcs */
324 SIVAL(req
->out
.vwv
+1, VWV(3), req
->smb_conn
->negotiate
.max_recv
);
325 SIVAL(req
->out
.vwv
+1, VWV(5), 0x10000); /* raw size. full 64k */
326 SIVAL(req
->out
.vwv
+1, VWV(7), req
->smb_conn
->connection
->server_id
.pid
); /* session key */
328 SIVAL(req
->out
.vwv
+1, VWV(9), capabilities
);
329 push_nttime(req
->out
.vwv
+1, VWV(11), nttime
);
330 SSVALS(req
->out
.vwv
+1,VWV(15), req
->smb_conn
->negotiate
.zone_offset
/60);
332 if (!negotiate_spnego
) {
335 struct cli_credentials
*server_credentials
;
336 struct gensec_security
*gensec_security
;
337 DATA_BLOB null_data_blob
= data_blob(NULL
, 0);
343 = cli_credentials_init(req
);
344 if (!server_credentials
) {
345 smbsrv_terminate_connection(req
->smb_conn
, "Failed to init server credentials\n");
349 cli_credentials_set_conf(server_credentials
, req
->smb_conn
->lp_ctx
);
350 nt_status
= cli_credentials_set_machine_account(server_credentials
, req
->smb_conn
->lp_ctx
);
351 if (!NT_STATUS_IS_OK(nt_status
)) {
352 DEBUG(10, ("Failed to obtain server credentials, perhaps a standalone server?: %s\n", nt_errstr(nt_status
)));
353 talloc_free(server_credentials
);
354 server_credentials
= NULL
;
357 nt_status
= samba_server_gensec_start(req
,
358 req
->smb_conn
->connection
->event
.ctx
,
359 req
->smb_conn
->connection
->msg_ctx
,
360 req
->smb_conn
->lp_ctx
,
365 if (!NT_STATUS_IS_OK(nt_status
)) {
366 DEBUG(0, ("Failed to start GENSEC: %s\n", nt_errstr(nt_status
)));
367 smbsrv_terminate_connection(req
->smb_conn
, "Failed to start GENSEC\n");
371 if (req
->smb_conn
->negotiate
.auth_context
) {
372 smbsrv_terminate_connection(req
->smb_conn
, "reply_nt1: is this a secondary negprot? auth_context is non-NULL!\n");
375 req
->smb_conn
->negotiate
.server_credentials
= talloc_reparent(req
, req
->smb_conn
, server_credentials
);
377 oid
= GENSEC_OID_SPNEGO
;
378 nt_status
= gensec_start_mech_by_oid(gensec_security
, oid
);
380 if (NT_STATUS_IS_OK(nt_status
)) {
381 /* Get and push the proposed OID list into the packets */
382 nt_status
= gensec_update(gensec_security
, req
, req
->smb_conn
->connection
->event
.ctx
, null_data_blob
, &blob
);
384 if (!NT_STATUS_IS_OK(nt_status
) && !NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
)) {
385 DEBUG(1, ("Failed to get SPNEGO to give us the first token: %s\n", nt_errstr(nt_status
)));
389 if (NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
)) {
390 DEBUG(3,("using SPNEGO\n"));
392 DEBUG(5, ("Failed to start SPNEGO, falling back to NTLMSSP only: %s\n", nt_errstr(nt_status
)));
393 oid
= GENSEC_OID_NTLMSSP
;
394 nt_status
= gensec_start_mech_by_oid(gensec_security
, oid
);
396 if (!NT_STATUS_IS_OK(nt_status
)) {
397 DEBUG(0, ("Failed to start SPNEGO as well as NTLMSSP fallback: %s\n", nt_errstr(nt_status
)));
401 /* NTLMSSP is a client-first exchange */
402 blob
= data_blob(NULL
, 0);
403 DEBUG(3,("using raw-NTLMSSP\n"));
406 req
->smb_conn
->negotiate
.oid
= oid
;
408 req_grow_data(req
, blob
.length
+ 16);
409 /* a NOT very random guid, perhaps we should get it
410 * from the credentials (kitchen sink...) */
411 memset(req
->out
.ptr
, '\0', 16);
414 memcpy(req
->out
.ptr
, blob
.data
, blob
.length
);
415 SCVAL(req
->out
.vwv
+1, VWV(16), blob
.length
+ 16);
416 req
->out
.ptr
+= blob
.length
;
419 smbsrv_send_reply_nosign(req
);
422 /****************************************************************************
423 Reply for the SMB2 2.001 protocol
424 ****************************************************************************/
425 static void reply_smb2(struct smbsrv_request
*req
, uint16_t choice
)
427 struct smbsrv_connection
*smb_conn
= req
->smb_conn
;
430 talloc_free(smb_conn
->sessions
.idtree_vuid
);
431 ZERO_STRUCT(smb_conn
->sessions
);
432 talloc_free(smb_conn
->smb_tcons
.idtree_tid
);
433 ZERO_STRUCT(smb_conn
->smb_tcons
);
434 ZERO_STRUCT(smb_conn
->signing
);
436 /* reply with a SMB2 packet */
437 status
= smbsrv_init_smb2_connection(smb_conn
);
438 if (!NT_STATUS_IS_OK(status
)) {
439 smbsrv_terminate_connection(smb_conn
, nt_errstr(status
));
443 packet_set_callback(smb_conn
->packet
, smbsrv_recv_smb2_request
);
444 smb2srv_reply_smb_negprot(req
);
448 /* List of supported protocols, most desired first */
449 static const struct {
450 const char *proto_name
;
451 const char *short_name
;
452 void (*proto_reply_fn
)(struct smbsrv_request
*req
, uint16_t choice
);
454 } supported_protocols
[] = {
455 {"SMB 2.002", "SMB2", reply_smb2
, PROTOCOL_SMB2_02
},
456 {"NT LANMAN 1.0", "NT1", reply_nt1
, PROTOCOL_NT1
},
457 {"NT LM 0.12", "NT1", reply_nt1
, PROTOCOL_NT1
},
458 {"LANMAN2.1", "LANMAN2", reply_lanman2
, PROTOCOL_LANMAN2
},
459 {"LM1.2X002", "LANMAN2", reply_lanman2
, PROTOCOL_LANMAN2
},
460 {"Samba", "LANMAN2", reply_lanman2
, PROTOCOL_LANMAN2
},
461 {"DOS LM1.2X002", "LANMAN2", reply_lanman2
, PROTOCOL_LANMAN2
},
462 {"Windows for Workgroups 3.1a", "LANMAN1", reply_lanman1
, PROTOCOL_LANMAN1
},
463 {"LANMAN1.0", "LANMAN1", reply_lanman1
, PROTOCOL_LANMAN1
},
464 {"MICROSOFT NETWORKS 3.0", "LANMAN1", reply_lanman1
, PROTOCOL_LANMAN1
},
465 {"MICROSOFT NETWORKS 1.03", "COREPLUS", reply_coreplus
, PROTOCOL_COREPLUS
},
466 {"PC NETWORK PROGRAM 1.0", "CORE", reply_corep
, PROTOCOL_CORE
},
470 /****************************************************************************
472 ****************************************************************************/
474 void smbsrv_reply_negprot(struct smbsrv_request
*req
)
478 uint32_t protos_count
= 0;
479 char **protos
= NULL
;
481 if (req
->smb_conn
->negotiate
.done_negprot
) {
482 smbsrv_terminate_connection(req
->smb_conn
, "multiple negprot's are not permitted");
485 req
->smb_conn
->negotiate
.done_negprot
= true;
491 protos
= talloc_realloc(req
, protos
, char *, protos_count
+ 1);
493 smbsrv_terminate_connection(req
->smb_conn
, nt_errstr(NT_STATUS_NO_MEMORY
));
496 protos
[protos_count
] = NULL
;
497 len
= req_pull_ascii4(&req
->in
.bufinfo
, (const char **)&protos
[protos_count
], p
, STR_ASCII
|STR_TERMINATE
);
499 if (len
== 0 || !protos
[protos_count
]) break;
501 DEBUG(5,("Requested protocol [%d][%s]\n", protos_count
, protos
[protos_count
]));
505 /* Check for protocols, most desirable first */
506 for (protocol
= 0; supported_protocols
[protocol
].proto_name
; protocol
++) {
509 if (supported_protocols
[protocol
].protocol_level
> lpcfg_srv_maxprotocol(req
->smb_conn
->lp_ctx
))
511 if (supported_protocols
[protocol
].protocol_level
< lpcfg_srv_minprotocol(req
->smb_conn
->lp_ctx
))
514 for (i
= 0; i
< protos_count
; i
++) {
515 if (strcmp(supported_protocols
[protocol
].proto_name
, protos
[i
]) != 0) continue;
517 supported_protocols
[protocol
].proto_reply_fn(req
, i
);
518 DEBUG(3,("Selected protocol [%d][%s]\n",
519 i
, supported_protocols
[protocol
].proto_name
));
524 smbsrv_terminate_connection(req
->smb_conn
, "No protocol supported !");