param: replace P_OCTAL variable setting with s3 version which uses sscanf
[Samba.git] / source4 / smb_server / smb / negprot.c
blob339fa7a9e35986d58e9aa5ff26cf9bfd411c0416
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;
92 if (lpcfg_async_smb_echo_handler(req->smb_conn->lp_ctx)) {
93 raw = 0;
94 } else {
95 raw = (lpcfg_read_raw(req->smb_conn->lp_ctx)?1:0) |
96 (lpcfg_write_raw(req->smb_conn->lp_ctx)?2:0);
99 smbsrv_setup_reply(req, 13, 0);
101 /* Reply, SMBlockread, SMBwritelock supported. */
102 SCVAL(req->out.hdr,HDR_FLG,
103 CVAL(req->out.hdr, HDR_FLG) | FLAG_SUPPORT_LOCKREAD);
105 SSVAL(req->out.vwv, VWV(0), choice);
106 SSVAL(req->out.vwv, VWV(1), 0x1); /* user level security, don't encrypt */
108 /* tell redirector we support
109 readbraw and writebraw (possibly) */
110 SSVAL(req->out.vwv, VWV(5), raw);
112 req->smb_conn->negotiate.protocol = PROTOCOL_COREPLUS;
114 if (req->smb_conn->signing.mandatory_signing) {
115 smbsrv_terminate_connection(req->smb_conn,
116 "COREPLUS does not support SMB signing, and it is mandatory\n");
117 return;
120 smbsrv_send_reply(req);
123 /****************************************************************************
124 Reply for the lanman 1.0 protocol.
125 ****************************************************************************/
126 static void reply_lanman1(struct smbsrv_request *req, uint16_t choice)
128 int secword=0;
129 time_t t = req->request_time.tv_sec;
130 uint16_t raw;
132 if (lpcfg_async_smb_echo_handler(req->smb_conn->lp_ctx)) {
133 raw = 0;
134 } else {
135 raw = (lpcfg_read_raw(req->smb_conn->lp_ctx)?1:0) |
136 (lpcfg_write_raw(req->smb_conn->lp_ctx)?2:0);
139 req->smb_conn->negotiate.encrypted_passwords = lpcfg_encrypt_passwords(req->smb_conn->lp_ctx);
141 if (req->smb_conn->negotiate.encrypted_passwords)
142 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
144 req->smb_conn->negotiate.protocol = PROTOCOL_LANMAN1;
146 smbsrv_setup_reply(req, 13, req->smb_conn->negotiate.encrypted_passwords ? 8 : 0);
148 /* SMBlockread, SMBwritelock supported. */
149 SCVAL(req->out.hdr,HDR_FLG,
150 CVAL(req->out.hdr, HDR_FLG) | FLAG_SUPPORT_LOCKREAD);
152 SSVAL(req->out.vwv, VWV(0), choice);
153 SSVAL(req->out.vwv, VWV(1), secword);
154 SSVAL(req->out.vwv, VWV(2), req->smb_conn->negotiate.max_recv);
155 SSVAL(req->out.vwv, VWV(3), lpcfg_max_mux(req->smb_conn->lp_ctx));
156 SSVAL(req->out.vwv, VWV(4), 1);
157 SSVAL(req->out.vwv, VWV(5), raw);
158 SIVAL(req->out.vwv, VWV(6), req->smb_conn->connection->server_id.pid);
159 srv_push_dos_date(req->smb_conn, req->out.vwv, VWV(8), t);
160 SSVAL(req->out.vwv, VWV(10), req->smb_conn->negotiate.zone_offset/60);
161 SIVAL(req->out.vwv, VWV(11), 0); /* reserved */
163 /* Create a token value and add it to the outgoing packet. */
164 if (req->smb_conn->negotiate.encrypted_passwords) {
165 NTSTATUS nt_status;
167 SSVAL(req->out.vwv, VWV(11), 8);
169 nt_status = get_challenge(req->smb_conn, req->out.data);
170 if (!NT_STATUS_IS_OK(nt_status)) {
171 smbsrv_terminate_connection(req->smb_conn, "LANMAN1 get_challenge failed\n");
172 return;
176 if (req->smb_conn->signing.mandatory_signing) {
177 smbsrv_terminate_connection(req->smb_conn,
178 "LANMAN1 does not support SMB signing, and it is mandatory\n");
179 return;
182 smbsrv_send_reply(req);
185 /****************************************************************************
186 Reply for the lanman 2.0 protocol.
187 ****************************************************************************/
188 static void reply_lanman2(struct smbsrv_request *req, uint16_t choice)
190 int secword=0;
191 time_t t = req->request_time.tv_sec;
192 uint16_t raw;
193 if (lpcfg_async_smb_echo_handler(req->smb_conn->lp_ctx)) {
194 raw = 0;
195 } else {
196 raw = (lpcfg_read_raw(req->smb_conn->lp_ctx)?1:0) |
197 (lpcfg_write_raw(req->smb_conn->lp_ctx)?2:0);
200 req->smb_conn->negotiate.encrypted_passwords = lpcfg_encrypt_passwords(req->smb_conn->lp_ctx);
202 if (req->smb_conn->negotiate.encrypted_passwords)
203 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
205 req->smb_conn->negotiate.protocol = PROTOCOL_LANMAN2;
207 smbsrv_setup_reply(req, 13, 0);
209 SSVAL(req->out.vwv, VWV(0), choice);
210 SSVAL(req->out.vwv, VWV(1), secword);
211 SSVAL(req->out.vwv, VWV(2), req->smb_conn->negotiate.max_recv);
212 SSVAL(req->out.vwv, VWV(3), lpcfg_max_mux(req->smb_conn->lp_ctx));
213 SSVAL(req->out.vwv, VWV(4), 1);
214 SSVAL(req->out.vwv, VWV(5), raw);
215 SIVAL(req->out.vwv, VWV(6), req->smb_conn->connection->server_id.pid);
216 srv_push_dos_date(req->smb_conn, req->out.vwv, VWV(8), t);
217 SSVAL(req->out.vwv, VWV(10), req->smb_conn->negotiate.zone_offset/60);
218 SIVAL(req->out.vwv, VWV(11), 0);
220 /* Create a token value and add it to the outgoing packet. */
221 if (req->smb_conn->negotiate.encrypted_passwords) {
222 SSVAL(req->out.vwv, VWV(11), 8);
223 req_grow_data(req, 8);
224 get_challenge(req->smb_conn, req->out.data);
227 req_push_str(req, NULL, lpcfg_workgroup(req->smb_conn->lp_ctx), -1, STR_TERMINATE);
229 if (req->smb_conn->signing.mandatory_signing) {
230 smbsrv_terminate_connection(req->smb_conn,
231 "LANMAN2 does not support SMB signing, and it is mandatory\n");
232 return;
235 smbsrv_send_reply(req);
238 static void reply_nt1_orig(struct smbsrv_request *req)
240 /* Create a token value and add it to the outgoing packet. */
241 if (req->smb_conn->negotiate.encrypted_passwords) {
242 req_grow_data(req, 8);
243 /* note that we do not send a challenge at all if
244 we are using plaintext */
245 get_challenge(req->smb_conn, req->out.ptr);
246 req->out.ptr += 8;
247 SCVAL(req->out.vwv+1, VWV(16), 8);
249 req_push_str(req, NULL, lpcfg_workgroup(req->smb_conn->lp_ctx), -1, STR_UNICODE|STR_TERMINATE|STR_NOALIGN);
250 req_push_str(req, NULL, lpcfg_netbios_name(req->smb_conn->lp_ctx), -1, STR_UNICODE|STR_TERMINATE|STR_NOALIGN);
251 DEBUG(3,("not using extended security (SPNEGO or NTLMSSP)\n"));
254 /****************************************************************************
255 Reply for the nt protocol.
256 ****************************************************************************/
257 static void reply_nt1(struct smbsrv_request *req, uint16_t choice)
259 /* dual names + lock_and_read + nt SMBs + remote API calls */
260 int capabilities;
261 int secword=0;
262 time_t t = req->request_time.tv_sec;
263 NTTIME nttime;
264 bool negotiate_spnego = false;
265 char *large_test_path;
267 unix_to_nt_time(&nttime, t);
269 capabilities =
270 CAP_NT_FIND | CAP_LOCK_AND_READ |
271 CAP_LEVEL_II_OPLOCKS | CAP_NT_SMBS | CAP_RPC_REMOTE_APIS;
273 req->smb_conn->negotiate.encrypted_passwords = lpcfg_encrypt_passwords(req->smb_conn->lp_ctx);
275 /* do spnego in user level security if the client
276 supports it and we can do encrypted passwords */
278 if (req->smb_conn->negotiate.encrypted_passwords &&
279 lpcfg_use_spnego(req->smb_conn->lp_ctx) &&
280 (req->flags2 & FLAGS2_EXTENDED_SECURITY)) {
281 negotiate_spnego = true;
282 capabilities |= CAP_EXTENDED_SECURITY;
285 if (lpcfg_large_readwrite(req->smb_conn->lp_ctx)) {
286 capabilities |= CAP_LARGE_READX | CAP_LARGE_WRITEX | CAP_W2K_SMBS;
289 large_test_path = lpcfg_lock_path(req, req->smb_conn->lp_ctx, "large_test.dat");
290 if (large_file_support(large_test_path)) {
291 capabilities |= CAP_LARGE_FILES;
294 if (!lpcfg_async_smb_echo_handler(req->smb_conn->lp_ctx) &&
295 lpcfg_read_raw(req->smb_conn->lp_ctx) &&
296 lpcfg_write_raw(req->smb_conn->lp_ctx)) {
297 capabilities |= CAP_RAW_MODE;
300 /* allow for disabling unicode */
301 if (lpcfg_unicode(req->smb_conn->lp_ctx)) {
302 capabilities |= CAP_UNICODE;
305 if (lpcfg_nt_status_support(req->smb_conn->lp_ctx)) {
306 capabilities |= CAP_STATUS32;
309 if (lpcfg_host_msdfs(req->smb_conn->lp_ctx)) {
310 capabilities |= CAP_DFS;
313 secword |= NEGOTIATE_SECURITY_USER_LEVEL;
315 if (req->smb_conn->negotiate.encrypted_passwords) {
316 secword |= NEGOTIATE_SECURITY_CHALLENGE_RESPONSE;
319 if (req->smb_conn->signing.allow_smb_signing) {
320 secword |= NEGOTIATE_SECURITY_SIGNATURES_ENABLED;
323 if (req->smb_conn->signing.mandatory_signing) {
324 secword |= NEGOTIATE_SECURITY_SIGNATURES_REQUIRED;
327 req->smb_conn->negotiate.protocol = PROTOCOL_NT1;
329 smbsrv_setup_reply(req, 17, 0);
331 SSVAL(req->out.vwv, VWV(0), choice);
332 SCVAL(req->out.vwv, VWV(1), secword);
334 /* notice the strange +1 on vwv here? That's because
335 this is the one and only SMB packet that is malformed in
336 the specification - all the command words after the secword
337 are offset by 1 byte */
338 SSVAL(req->out.vwv+1, VWV(1), lpcfg_max_mux(req->smb_conn->lp_ctx));
339 SSVAL(req->out.vwv+1, VWV(2), 1); /* num vcs */
340 SIVAL(req->out.vwv+1, VWV(3), req->smb_conn->negotiate.max_recv);
341 SIVAL(req->out.vwv+1, VWV(5), 0x10000); /* raw size. full 64k */
342 SIVAL(req->out.vwv+1, VWV(7), req->smb_conn->connection->server_id.pid); /* session key */
344 SIVAL(req->out.vwv+1, VWV(9), capabilities);
345 push_nttime(req->out.vwv+1, VWV(11), nttime);
346 SSVALS(req->out.vwv+1,VWV(15), req->smb_conn->negotiate.zone_offset/60);
348 if (!negotiate_spnego) {
349 reply_nt1_orig(req);
350 } else {
351 struct cli_credentials *server_credentials;
352 struct gensec_security *gensec_security;
353 DATA_BLOB null_data_blob = data_blob(NULL, 0);
354 DATA_BLOB blob;
355 const char *oid;
356 NTSTATUS nt_status;
358 server_credentials
359 = cli_credentials_init(req);
360 if (!server_credentials) {
361 smbsrv_terminate_connection(req->smb_conn, "Failed to init server credentials\n");
362 return;
365 cli_credentials_set_conf(server_credentials, req->smb_conn->lp_ctx);
366 nt_status = cli_credentials_set_machine_account(server_credentials, req->smb_conn->lp_ctx);
367 if (!NT_STATUS_IS_OK(nt_status)) {
368 DEBUG(10, ("Failed to obtain server credentials, perhaps a standalone server?: %s\n", nt_errstr(nt_status)));
369 talloc_free(server_credentials);
370 server_credentials = NULL;
373 nt_status = samba_server_gensec_start(req,
374 req->smb_conn->connection->event.ctx,
375 req->smb_conn->connection->msg_ctx,
376 req->smb_conn->lp_ctx,
377 server_credentials,
378 "cifs",
379 &gensec_security);
381 if (!NT_STATUS_IS_OK(nt_status)) {
382 DEBUG(0, ("Failed to start GENSEC: %s\n", nt_errstr(nt_status)));
383 smbsrv_terminate_connection(req->smb_conn, "Failed to start GENSEC\n");
384 return;
387 if (req->smb_conn->negotiate.auth_context) {
388 smbsrv_terminate_connection(req->smb_conn, "reply_nt1: is this a secondary negprot? auth_context is non-NULL!\n");
389 return;
391 req->smb_conn->negotiate.server_credentials = talloc_reparent(req, req->smb_conn, server_credentials);
393 oid = GENSEC_OID_SPNEGO;
394 nt_status = gensec_start_mech_by_oid(gensec_security, oid);
396 if (NT_STATUS_IS_OK(nt_status)) {
397 /* Get and push the proposed OID list into the packets */
398 nt_status = gensec_update_ev(gensec_security, req, req->smb_conn->connection->event.ctx, null_data_blob, &blob);
400 if (!NT_STATUS_IS_OK(nt_status) && !NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
401 DEBUG(1, ("Failed to get SPNEGO to give us the first token: %s\n", nt_errstr(nt_status)));
405 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
406 DEBUG(3,("using SPNEGO\n"));
407 } else {
408 DEBUG(5, ("Failed to start SPNEGO, falling back to NTLMSSP only: %s\n", nt_errstr(nt_status)));
409 oid = GENSEC_OID_NTLMSSP;
410 nt_status = gensec_start_mech_by_oid(gensec_security, oid);
412 if (!NT_STATUS_IS_OK(nt_status)) {
413 DEBUG(0, ("Failed to start SPNEGO as well as NTLMSSP fallback: %s\n", nt_errstr(nt_status)));
414 reply_nt1_orig(req);
415 return;
417 /* NTLMSSP is a client-first exchange */
418 blob = data_blob(NULL, 0);
419 DEBUG(3,("using raw-NTLMSSP\n"));
422 req->smb_conn->negotiate.oid = oid;
424 req_grow_data(req, blob.length + 16);
425 /* a NOT very random guid, perhaps we should get it
426 * from the credentials (kitchen sink...) */
427 memset(req->out.ptr, '\0', 16);
428 req->out.ptr += 16;
430 memcpy(req->out.ptr, blob.data, blob.length);
431 SCVAL(req->out.vwv+1, VWV(16), blob.length + 16);
432 req->out.ptr += blob.length;
435 smbsrv_send_reply_nosign(req);
438 /****************************************************************************
439 Reply for the SMB2 2.001 protocol
440 ****************************************************************************/
441 static void reply_smb2(struct smbsrv_request *req, uint16_t choice)
443 struct smbsrv_connection *smb_conn = req->smb_conn;
444 NTSTATUS status;
446 talloc_free(smb_conn->sessions.idtree_vuid);
447 ZERO_STRUCT(smb_conn->sessions);
448 talloc_free(smb_conn->smb_tcons.idtree_tid);
449 ZERO_STRUCT(smb_conn->smb_tcons);
450 ZERO_STRUCT(smb_conn->signing);
452 /* reply with a SMB2 packet */
453 status = smbsrv_init_smb2_connection(smb_conn);
454 if (!NT_STATUS_IS_OK(status)) {
455 smbsrv_terminate_connection(smb_conn, nt_errstr(status));
456 talloc_free(req);
457 return;
459 packet_set_callback(smb_conn->packet, smbsrv_recv_smb2_request);
460 smb2srv_reply_smb_negprot(req);
461 req = NULL;
464 /* List of supported protocols, most desired first */
465 static const struct {
466 const char *proto_name;
467 const char *short_name;
468 void (*proto_reply_fn)(struct smbsrv_request *req, uint16_t choice);
469 int protocol_level;
470 } supported_protocols[] = {
471 {"SMB 2.002", "SMB2", reply_smb2, PROTOCOL_SMB2_02},
472 {"NT LANMAN 1.0", "NT1", reply_nt1, PROTOCOL_NT1},
473 {"NT LM 0.12", "NT1", reply_nt1, PROTOCOL_NT1},
474 {"LANMAN2.1", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
475 {"LM1.2X002", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
476 {"Samba", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
477 {"DOS LM1.2X002", "LANMAN2", reply_lanman2, PROTOCOL_LANMAN2},
478 {"Windows for Workgroups 3.1a", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
479 {"LANMAN1.0", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
480 {"MICROSOFT NETWORKS 3.0", "LANMAN1", reply_lanman1, PROTOCOL_LANMAN1},
481 {"MICROSOFT NETWORKS 1.03", "COREPLUS", reply_coreplus, PROTOCOL_COREPLUS},
482 {"PC NETWORK PROGRAM 1.0", "CORE", reply_corep, PROTOCOL_CORE},
483 {NULL,NULL,NULL,0},
486 /****************************************************************************
487 Reply to a negprot.
488 ****************************************************************************/
490 void smbsrv_reply_negprot(struct smbsrv_request *req)
492 int protocol;
493 uint8_t *p;
494 uint32_t protos_count = 0;
495 const char **protos = NULL;
497 if (req->smb_conn->negotiate.done_negprot) {
498 smbsrv_terminate_connection(req->smb_conn, "multiple negprot's are not permitted");
499 return;
501 req->smb_conn->negotiate.done_negprot = true;
503 p = req->in.data;
504 while (true) {
505 size_t len;
507 protos = talloc_realloc(req, protos, const char *, protos_count + 1);
508 if (!protos) {
509 smbsrv_terminate_connection(req->smb_conn, nt_errstr(NT_STATUS_NO_MEMORY));
510 return;
512 protos[protos_count] = NULL;
513 len = req_pull_ascii4(&req->in.bufinfo, &protos[protos_count], p, STR_ASCII|STR_TERMINATE);
514 p += len;
515 if (len == 0 || !protos[protos_count]) break;
517 DEBUG(5,("Requested protocol [%d][%s]\n", protos_count, protos[protos_count]));
518 protos_count++;
521 /* Check for protocols, most desirable first */
522 for (protocol = 0; supported_protocols[protocol].proto_name; protocol++) {
523 int i;
525 if (supported_protocols[protocol].protocol_level > lpcfg_server_max_protocol(req->smb_conn->lp_ctx))
526 continue;
527 if (supported_protocols[protocol].protocol_level < lpcfg_server_min_protocol(req->smb_conn->lp_ctx))
528 continue;
530 for (i = 0; i < protos_count; i++) {
531 if (strcmp(supported_protocols[protocol].proto_name, protos[i]) != 0) continue;
533 supported_protocols[protocol].proto_reply_fn(req, i);
534 DEBUG(3,("Selected protocol [%d][%s]\n",
535 i, supported_protocols[protocol].proto_name));
536 return;
540 smbsrv_terminate_connection(req->smb_conn, "No protocol supported !");