s4-upgradeprovision: try to fix the detection of @provision record
[Samba/gebeck_regimport.git] / source4 / smb_server / smb / negprot.c
blob0a07ab93e2da82d4bdd2f1bc74e2ef6684d60602
1 /*
2 Unix SMB/CIFS implementation.
3 negprot reply code
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/>.
20 #include "includes.h"
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])
35 NTSTATUS nt_status;
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,
48 smb_conn->lp_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)));
52 return 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)));
58 return nt_status;
61 return NT_STATUS_OK;
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");
78 return;
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");
111 return;
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);
123 int secword=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 (lpcfg_security(req->smb_conn->lp_ctx) != SEC_SHARE)
129 secword |= NEGOTIATE_SECURITY_USER_LEVEL;
131 if (req->smb_conn->negotiate.encrypted_passwords)
132 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
134 req->smb_conn->negotiate.protocol = PROTOCOL_LANMAN1;
136 smbsrv_setup_reply(req, 13, req->smb_conn->negotiate.encrypted_passwords ? 8 : 0);
138 /* SMBlockread, SMBwritelock supported. */
139 SCVAL(req->out.hdr,HDR_FLG,
140 CVAL(req->out.hdr, HDR_FLG) | FLAG_SUPPORT_LOCKREAD);
142 SSVAL(req->out.vwv, VWV(0), choice);
143 SSVAL(req->out.vwv, VWV(1), secword);
144 SSVAL(req->out.vwv, VWV(2), req->smb_conn->negotiate.max_recv);
145 SSVAL(req->out.vwv, VWV(3), lpcfg_maxmux(req->smb_conn->lp_ctx));
146 SSVAL(req->out.vwv, VWV(4), 1);
147 SSVAL(req->out.vwv, VWV(5), raw);
148 SIVAL(req->out.vwv, VWV(6), req->smb_conn->connection->server_id.pid);
149 srv_push_dos_date(req->smb_conn, req->out.vwv, VWV(8), t);
150 SSVAL(req->out.vwv, VWV(10), req->smb_conn->negotiate.zone_offset/60);
151 SIVAL(req->out.vwv, VWV(11), 0); /* reserved */
153 /* Create a token value and add it to the outgoing packet. */
154 if (req->smb_conn->negotiate.encrypted_passwords) {
155 NTSTATUS nt_status;
157 SSVAL(req->out.vwv, VWV(11), 8);
159 nt_status = get_challenge(req->smb_conn, req->out.data);
160 if (!NT_STATUS_IS_OK(nt_status)) {
161 smbsrv_terminate_connection(req->smb_conn, "LANMAN1 get_challenge failed\n");
162 return;
166 if (req->smb_conn->signing.mandatory_signing) {
167 smbsrv_terminate_connection(req->smb_conn,
168 "LANMAN1 does not support SMB signing, and it is mandatory\n");
169 return;
172 smbsrv_send_reply(req);
175 /****************************************************************************
176 Reply for the lanman 2.0 protocol.
177 ****************************************************************************/
178 static void reply_lanman2(struct smbsrv_request *req, uint16_t choice)
180 int raw = (lpcfg_readraw(req->smb_conn->lp_ctx)?1:0) | (lpcfg_writeraw(req->smb_conn->lp_ctx)?2:0);
181 int secword=0;
182 time_t t = req->request_time.tv_sec;
184 req->smb_conn->negotiate.encrypted_passwords = lpcfg_encrypted_passwords(req->smb_conn->lp_ctx);
186 if (lpcfg_security(req->smb_conn->lp_ctx) != SEC_SHARE)
187 secword |= NEGOTIATE_SECURITY_USER_LEVEL;
189 if (req->smb_conn->negotiate.encrypted_passwords)
190 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
192 req->smb_conn->negotiate.protocol = PROTOCOL_LANMAN2;
194 smbsrv_setup_reply(req, 13, 0);
196 SSVAL(req->out.vwv, VWV(0), choice);
197 SSVAL(req->out.vwv, VWV(1), secword);
198 SSVAL(req->out.vwv, VWV(2), req->smb_conn->negotiate.max_recv);
199 SSVAL(req->out.vwv, VWV(3), lpcfg_maxmux(req->smb_conn->lp_ctx));
200 SSVAL(req->out.vwv, VWV(4), 1);
201 SSVAL(req->out.vwv, VWV(5), raw);
202 SIVAL(req->out.vwv, VWV(6), req->smb_conn->connection->server_id.pid);
203 srv_push_dos_date(req->smb_conn, req->out.vwv, VWV(8), t);
204 SSVAL(req->out.vwv, VWV(10), req->smb_conn->negotiate.zone_offset/60);
205 SIVAL(req->out.vwv, VWV(11), 0);
207 /* Create a token value and add it to the outgoing packet. */
208 if (req->smb_conn->negotiate.encrypted_passwords) {
209 SSVAL(req->out.vwv, VWV(11), 8);
210 req_grow_data(req, 8);
211 get_challenge(req->smb_conn, req->out.data);
214 req_push_str(req, NULL, lpcfg_workgroup(req->smb_conn->lp_ctx), -1, STR_TERMINATE);
216 if (req->smb_conn->signing.mandatory_signing) {
217 smbsrv_terminate_connection(req->smb_conn,
218 "LANMAN2 does not support SMB signing, and it is mandatory\n");
219 return;
222 smbsrv_send_reply(req);
225 static void reply_nt1_orig(struct smbsrv_request *req)
227 /* Create a token value and add it to the outgoing packet. */
228 if (req->smb_conn->negotiate.encrypted_passwords) {
229 req_grow_data(req, 8);
230 /* note that we do not send a challenge at all if
231 we are using plaintext */
232 get_challenge(req->smb_conn, req->out.ptr);
233 req->out.ptr += 8;
234 SCVAL(req->out.vwv+1, VWV(16), 8);
236 req_push_str(req, NULL, lpcfg_workgroup(req->smb_conn->lp_ctx), -1, STR_UNICODE|STR_TERMINATE|STR_NOALIGN);
237 req_push_str(req, NULL, lpcfg_netbios_name(req->smb_conn->lp_ctx), -1, STR_UNICODE|STR_TERMINATE|STR_NOALIGN);
238 DEBUG(3,("not using extended security (SPNEGO or NTLMSSP)\n"));
241 /****************************************************************************
242 Reply for the nt protocol.
243 ****************************************************************************/
244 static void reply_nt1(struct smbsrv_request *req, uint16_t choice)
246 /* dual names + lock_and_read + nt SMBs + remote API calls */
247 int capabilities;
248 int secword=0;
249 time_t t = req->request_time.tv_sec;
250 NTTIME nttime;
251 bool negotiate_spnego = false;
252 char *large_test_path;
254 unix_to_nt_time(&nttime, t);
256 capabilities =
257 CAP_NT_FIND | CAP_LOCK_AND_READ |
258 CAP_LEVEL_II_OPLOCKS | CAP_NT_SMBS | CAP_RPC_REMOTE_APIS;
260 req->smb_conn->negotiate.encrypted_passwords = lpcfg_encrypted_passwords(req->smb_conn->lp_ctx);
262 /* do spnego in user level security if the client
263 supports it and we can do encrypted passwords */
265 if (req->smb_conn->negotiate.encrypted_passwords &&
266 (lpcfg_security(req->smb_conn->lp_ctx) != SEC_SHARE) &&
267 lpcfg_use_spnego(req->smb_conn->lp_ctx) &&
268 (req->flags2 & FLAGS2_EXTENDED_SECURITY)) {
269 negotiate_spnego = true;
270 capabilities |= CAP_EXTENDED_SECURITY;
273 if (lpcfg_unix_extensions(req->smb_conn->lp_ctx)) {
274 capabilities |= CAP_UNIX;
277 if (lpcfg_large_readwrite(req->smb_conn->lp_ctx)) {
278 capabilities |= CAP_LARGE_READX | CAP_LARGE_WRITEX | CAP_W2K_SMBS;
281 large_test_path = lpcfg_lock_path(req, req->smb_conn->lp_ctx, "large_test.dat");
282 if (large_file_support(large_test_path)) {
283 capabilities |= CAP_LARGE_FILES;
286 if (lpcfg_readraw(req->smb_conn->lp_ctx) &&
287 lpcfg_writeraw(req->smb_conn->lp_ctx)) {
288 capabilities |= CAP_RAW_MODE;
291 /* allow for disabling unicode */
292 if (lpcfg_unicode(req->smb_conn->lp_ctx)) {
293 capabilities |= CAP_UNICODE;
296 if (lpcfg_nt_status_support(req->smb_conn->lp_ctx)) {
297 capabilities |= CAP_STATUS32;
300 if (lpcfg_host_msdfs(req->smb_conn->lp_ctx)) {
301 capabilities |= CAP_DFS;
304 if (lpcfg_security(req->smb_conn->lp_ctx) != SEC_SHARE) {
305 secword |= NEGOTIATE_SECURITY_USER_LEVEL;
308 if (req->smb_conn->negotiate.encrypted_passwords) {
309 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
312 if (req->smb_conn->signing.allow_smb_signing) {
313 secword |= NEGOTIATE_SECURITY_SIGNATURES_ENABLED;
316 if (req->smb_conn->signing.mandatory_signing) {
317 secword |= NEGOTIATE_SECURITY_SIGNATURES_REQUIRED;
320 req->smb_conn->negotiate.protocol = PROTOCOL_NT1;
322 smbsrv_setup_reply(req, 17, 0);
324 SSVAL(req->out.vwv, VWV(0), choice);
325 SCVAL(req->out.vwv, VWV(1), secword);
327 /* notice the strange +1 on vwv here? That's because
328 this is the one and only SMB packet that is malformed in
329 the specification - all the command words after the secword
330 are offset by 1 byte */
331 SSVAL(req->out.vwv+1, VWV(1), lpcfg_maxmux(req->smb_conn->lp_ctx));
332 SSVAL(req->out.vwv+1, VWV(2), 1); /* num vcs */
333 SIVAL(req->out.vwv+1, VWV(3), req->smb_conn->negotiate.max_recv);
334 SIVAL(req->out.vwv+1, VWV(5), 0x10000); /* raw size. full 64k */
335 SIVAL(req->out.vwv+1, VWV(7), req->smb_conn->connection->server_id.pid); /* session key */
337 SIVAL(req->out.vwv+1, VWV(9), capabilities);
338 push_nttime(req->out.vwv+1, VWV(11), nttime);
339 SSVALS(req->out.vwv+1,VWV(15), req->smb_conn->negotiate.zone_offset/60);
341 if (!negotiate_spnego) {
342 reply_nt1_orig(req);
343 } else {
344 struct cli_credentials *server_credentials;
345 struct gensec_security *gensec_security;
346 DATA_BLOB null_data_blob = data_blob(NULL, 0);
347 DATA_BLOB blob;
348 const char *oid;
349 NTSTATUS nt_status;
351 server_credentials
352 = cli_credentials_init(req);
353 if (!server_credentials) {
354 smbsrv_terminate_connection(req->smb_conn, "Failed to init server credentials\n");
355 return;
358 cli_credentials_set_conf(server_credentials, req->smb_conn->lp_ctx);
359 nt_status = cli_credentials_set_machine_account(server_credentials, req->smb_conn->lp_ctx);
360 if (!NT_STATUS_IS_OK(nt_status)) {
361 DEBUG(10, ("Failed to obtain server credentials, perhaps a standalone server?: %s\n", nt_errstr(nt_status)));
362 talloc_free(server_credentials);
363 server_credentials = NULL;
366 nt_status = samba_server_gensec_start(req,
367 req->smb_conn->connection->event.ctx,
368 req->smb_conn->connection->msg_ctx,
369 req->smb_conn->lp_ctx,
370 server_credentials,
371 "cifs",
372 &gensec_security);
374 if (!NT_STATUS_IS_OK(nt_status)) {
375 DEBUG(0, ("Failed to start GENSEC: %s\n", nt_errstr(nt_status)));
376 smbsrv_terminate_connection(req->smb_conn, "Failed to start GENSEC\n");
377 return;
380 if (req->smb_conn->negotiate.auth_context) {
381 smbsrv_terminate_connection(req->smb_conn, "reply_nt1: is this a secondary negprot? auth_context is non-NULL!\n");
382 return;
384 req->smb_conn->negotiate.server_credentials = talloc_reparent(req, req->smb_conn, server_credentials);
386 gensec_set_target_service(gensec_security, "cifs");
388 gensec_set_credentials(gensec_security, server_credentials);
390 oid = GENSEC_OID_SPNEGO;
391 nt_status = gensec_start_mech_by_oid(gensec_security, oid);
393 if (NT_STATUS_IS_OK(nt_status)) {
394 /* Get and push the proposed OID list into the packets */
395 nt_status = gensec_update(gensec_security, req, null_data_blob, &blob);
397 if (!NT_STATUS_IS_OK(nt_status) && !NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
398 DEBUG(1, ("Failed to get SPNEGO to give us the first token: %s\n", nt_errstr(nt_status)));
402 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
403 DEBUG(3,("using SPNEGO\n"));
404 } else {
405 DEBUG(5, ("Failed to start SPNEGO, falling back to NTLMSSP only: %s\n", nt_errstr(nt_status)));
406 oid = GENSEC_OID_NTLMSSP;
407 nt_status = gensec_start_mech_by_oid(gensec_security, oid);
409 if (!NT_STATUS_IS_OK(nt_status)) {
410 DEBUG(0, ("Failed to start SPNEGO as well as NTLMSSP fallback: %s\n", nt_errstr(nt_status)));
411 reply_nt1_orig(req);
412 return;
414 /* NTLMSSP is a client-first exchange */
415 blob = data_blob(NULL, 0);
416 DEBUG(3,("using raw-NTLMSSP\n"));
419 req->smb_conn->negotiate.oid = oid;
421 req_grow_data(req, blob.length + 16);
422 /* a NOT very random guid, perhaps we should get it
423 * from the credentials (kitchen sink...) */
424 memset(req->out.ptr, '\0', 16);
425 req->out.ptr += 16;
427 memcpy(req->out.ptr, blob.data, blob.length);
428 SCVAL(req->out.vwv+1, VWV(16), blob.length + 16);
429 req->out.ptr += blob.length;
432 smbsrv_send_reply_nosign(req);
435 /****************************************************************************
436 Reply for the SMB2 2.001 protocol
437 ****************************************************************************/
438 static void reply_smb2(struct smbsrv_request *req, uint16_t choice)
440 struct smbsrv_connection *smb_conn = req->smb_conn;
441 NTSTATUS status;
443 talloc_free(smb_conn->sessions.idtree_vuid);
444 ZERO_STRUCT(smb_conn->sessions);
445 talloc_free(smb_conn->smb_tcons.idtree_tid);
446 ZERO_STRUCT(smb_conn->smb_tcons);
447 ZERO_STRUCT(smb_conn->signing);
449 /* reply with a SMB2 packet */
450 status = smbsrv_init_smb2_connection(smb_conn);
451 if (!NT_STATUS_IS_OK(status)) {
452 smbsrv_terminate_connection(smb_conn, nt_errstr(status));
453 talloc_free(req);
454 return;
456 packet_set_callback(smb_conn->packet, smbsrv_recv_smb2_request);
457 smb2srv_reply_smb_negprot(req);
458 req = NULL;
461 /* List of supported protocols, most desired first */
462 static const struct {
463 const char *proto_name;
464 const char *short_name;
465 void (*proto_reply_fn)(struct smbsrv_request *req, uint16_t choice);
466 int protocol_level;
467 } supported_protocols[] = {
468 {"SMB 2.002", "SMB2", reply_smb2, PROTOCOL_SMB2},
469 {"NT LANMAN 1.0", "NT1", reply_nt1, PROTOCOL_NT1},
470 {"NT LM 0.12", "NT1", reply_nt1, PROTOCOL_NT1},
471 {"LANMAN2.1", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
472 {"LM1.2X002", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
473 {"Samba", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
474 {"DOS LM1.2X002", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
475 {"Windows for Workgroups 3.1a", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
476 {"LANMAN1.0", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
477 {"MICROSOFT NETWORKS 3.0", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
478 {"MICROSOFT NETWORKS 1.03", "COREPLUS", reply_coreplus, PROTOCOL_COREPLUS},
479 {"PC NETWORK PROGRAM 1.0", "CORE", reply_corep, PROTOCOL_CORE},
480 {NULL,NULL,NULL,0},
483 /****************************************************************************
484 Reply to a negprot.
485 ****************************************************************************/
487 void smbsrv_reply_negprot(struct smbsrv_request *req)
489 int protocol;
490 uint8_t *p;
491 uint32_t protos_count = 0;
492 char **protos = NULL;
494 if (req->smb_conn->negotiate.done_negprot) {
495 smbsrv_terminate_connection(req->smb_conn, "multiple negprot's are not permitted");
496 return;
498 req->smb_conn->negotiate.done_negprot = true;
500 p = req->in.data;
501 while (true) {
502 size_t len;
504 protos = talloc_realloc(req, protos, char *, protos_count + 1);
505 if (!protos) {
506 smbsrv_terminate_connection(req->smb_conn, nt_errstr(NT_STATUS_NO_MEMORY));
507 return;
509 protos[protos_count] = NULL;
510 len = req_pull_ascii4(&req->in.bufinfo, (const char **)&protos[protos_count], p, STR_ASCII|STR_TERMINATE);
511 p += len;
512 if (len == 0 || !protos[protos_count]) break;
514 DEBUG(5,("Requested protocol [%d][%s]\n", protos_count, protos[protos_count]));
515 protos_count++;
518 /* Check for protocols, most desirable first */
519 for (protocol = 0; supported_protocols[protocol].proto_name; protocol++) {
520 int i;
522 if (supported_protocols[protocol].protocol_level > lpcfg_srv_maxprotocol(req->smb_conn->lp_ctx))
523 continue;
524 if (supported_protocols[protocol].protocol_level < lpcfg_srv_minprotocol(req->smb_conn->lp_ctx))
525 continue;
527 for (i = 0; i < protos_count; i++) {
528 if (strcmp(supported_protocols[protocol].proto_name, protos[i]) != 0) continue;
530 supported_protocols[protocol].proto_reply_fn(req, i);
531 DEBUG(3,("Selected protocol [%d][%s]\n",
532 i, supported_protocols[protocol].proto_name));
533 return;
537 smbsrv_terminate_connection(req->smb_conn, "No protocol supported !");