2 Unix SMB/CIFS implementation.
4 test suite for schannel operations
6 Copyright (C) Andrew Tridgell 2004
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
23 #include "librpc/gen_ndr/ndr_netlogon_c.h"
24 #include "librpc/gen_ndr/ndr_lsa_c.h"
25 #include "librpc/gen_ndr/ndr_samr_c.h"
26 #include "auth/credentials/credentials.h"
27 #include "torture/rpc/torture_rpc.h"
28 #include "lib/cmdline/popt_common.h"
29 #include "../libcli/auth/schannel.h"
30 #include "libcli/auth/libcli_auth.h"
31 #include "libcli/security/security.h"
32 #include "system/filesys.h"
33 #include "param/param.h"
34 #include "librpc/rpc/dcerpc_proto.h"
35 #include "libcli/composite/composite.h"
36 #include "lib/events/events.h"
38 #define TEST_MACHINE_NAME "schannel"
41 try a netlogon SamLogon
43 bool test_netlogon_ex_ops(struct dcerpc_pipe
*p
, struct torture_context
*tctx
,
44 struct cli_credentials
*credentials
,
45 struct netlogon_creds_CredentialState
*creds
)
48 struct netr_LogonSamLogonEx r
;
49 struct netr_NetworkInfo ninfo
;
50 union netr_LogonLevel logon
;
51 union netr_Validation validation
;
52 uint8_t authoritative
= 0;
54 DATA_BLOB names_blob
, chal
, lm_resp
, nt_resp
;
56 int flags
= CLI_CRED_NTLM_AUTH
;
57 struct dcerpc_binding_handle
*b
= p
->binding_handle
;
59 struct netr_UserSessionKey key
;
60 struct netr_LMSessionKey LMSessKey
;
61 uint32_t validation_levels
[] = { 2, 3 };
62 struct netr_SamBaseInfo
*base
;
63 const char *crypto_alg
= "";
64 bool can_do_validation_6
= true;
66 if (lpcfg_client_lanman_auth(tctx
->lp_ctx
)) {
67 flags
|= CLI_CRED_LANMAN_AUTH
;
70 if (lpcfg_client_ntlmv2_auth(tctx
->lp_ctx
)) {
71 flags
|= CLI_CRED_NTLMv2_AUTH
;
74 cli_credentials_get_ntlm_username_domain(cmdline_credentials
, tctx
,
75 &ninfo
.identity_info
.account_name
.string
,
76 &ninfo
.identity_info
.domain_name
.string
);
78 generate_random_buffer(ninfo
.challenge
,
79 sizeof(ninfo
.challenge
));
80 chal
= data_blob_const(ninfo
.challenge
,
81 sizeof(ninfo
.challenge
));
83 names_blob
= NTLMv2_generate_names_blob(tctx
, cli_credentials_get_workstation(credentials
),
84 cli_credentials_get_domain(credentials
));
86 status
= cli_credentials_get_ntlm_response(cmdline_credentials
, tctx
,
92 torture_assert_ntstatus_ok(tctx
, status
,
93 "cli_credentials_get_ntlm_response failed");
95 ninfo
.lm
.data
= lm_resp
.data
;
96 ninfo
.lm
.length
= lm_resp
.length
;
98 ninfo
.nt
.data
= nt_resp
.data
;
99 ninfo
.nt
.length
= nt_resp
.length
;
101 ninfo
.identity_info
.parameter_control
= 0;
102 ninfo
.identity_info
.logon_id_low
= 0;
103 ninfo
.identity_info
.logon_id_high
= 0;
104 ninfo
.identity_info
.workstation
.string
= cli_credentials_get_workstation(credentials
);
106 logon
.network
= &ninfo
;
108 r
.in
.server_name
= talloc_asprintf(tctx
, "\\\\%s", dcerpc_server_name(p
));
109 r
.in
.computer_name
= cli_credentials_get_workstation(credentials
);
110 r
.in
.logon_level
= NetlogonNetworkInformation
;
112 r
.in
.flags
= &_flags
;
113 r
.out
.validation
= &validation
;
114 r
.out
.authoritative
= &authoritative
;
115 r
.out
.flags
= &_flags
;
119 - save usrsession and lmsession key
127 if (creds
->negotiate_flags
& NETLOGON_NEG_SUPPORTS_AES
) {
129 } else if (creds
->negotiate_flags
& NETLOGON_NEG_ARCFOUR
) {
130 crypto_alg
= "ARCFOUR";
134 r
.in
.validation_level
= 6;
136 torture_comment(tctx
,
137 "Testing LogonSamLogonEx with name %s using %s and validation_level: %d\n",
138 ninfo
.identity_info
.account_name
.string
, crypto_alg
,
139 r
.in
.validation_level
);
141 torture_assert_ntstatus_ok(tctx
,
142 dcerpc_netr_LogonSamLogonEx_r(b
, tctx
, &r
),
143 "LogonSamLogonEx failed");
144 if (NT_STATUS_EQUAL(r
.out
.result
, NT_STATUS_INVALID_INFO_CLASS
)) {
145 can_do_validation_6
= false;
147 torture_assert_ntstatus_ok(tctx
, r
.out
.result
,
148 "LogonSamLogonEx failed");
150 key
= r
.out
.validation
->sam6
->base
.key
;
151 LMSessKey
= r
.out
.validation
->sam6
->base
.LMSessKey
;
153 DEBUG(1,("unencrypted session keys from validation_level 6:\n"));
154 dump_data(1, r
.out
.validation
->sam6
->base
.key
.key
, 16);
155 dump_data(1, r
.out
.validation
->sam6
->base
.LMSessKey
.key
, 8);
158 for (i
=0; i
< ARRAY_SIZE(validation_levels
); i
++) {
160 r
.in
.validation_level
= validation_levels
[i
];
162 torture_comment(tctx
,
163 "Testing LogonSamLogonEx with name %s using %s and validation_level: %d\n",
164 ninfo
.identity_info
.account_name
.string
, crypto_alg
,
165 r
.in
.validation_level
);
167 torture_assert_ntstatus_ok(tctx
,
168 dcerpc_netr_LogonSamLogonEx_r(b
, tctx
, &r
),
169 "LogonSamLogonEx failed");
170 torture_assert_ntstatus_ok(tctx
, r
.out
.result
,
171 "LogonSamLogonEx failed");
174 /* when this test is called without creds no point in
175 * testing the session keys */
179 switch (validation_levels
[i
]) {
181 base
= &r
.out
.validation
->sam2
->base
;
184 base
= &r
.out
.validation
->sam3
->base
;
190 DEBUG(1,("encrypted keys validation_level %d:\n",
191 validation_levels
[i
]));
192 dump_data(1, base
->key
.key
, 16);
193 dump_data(1, base
->LMSessKey
.key
, 8);
195 if (creds
->negotiate_flags
& NETLOGON_NEG_SUPPORTS_AES
) {
196 netlogon_creds_aes_decrypt(creds
, base
->key
.key
, 16);
197 netlogon_creds_aes_decrypt(creds
, base
->LMSessKey
.key
, 8);
198 } else if (creds
->negotiate_flags
& NETLOGON_NEG_ARCFOUR
) {
199 netlogon_creds_arcfour_crypt(creds
, base
->key
.key
, 16);
200 netlogon_creds_arcfour_crypt(creds
, base
->LMSessKey
.key
, 8);
203 DEBUG(1,("decryped keys validation_level %d\n",
204 validation_levels
[i
]));
206 dump_data(1, base
->key
.key
, 16);
207 dump_data(1, base
->LMSessKey
.key
, 8);
209 if (!can_do_validation_6
) {
210 /* we cant compare against unencrypted keys */
214 torture_assert_mem_equal(tctx
,
218 "unexpected user session key\n");
219 torture_assert_mem_equal(tctx
,
223 "unexpected LM session key\n");
230 do some samr ops using the schannel connection
232 static bool test_samr_ops(struct torture_context
*tctx
,
233 struct dcerpc_binding_handle
*b
)
235 struct samr_GetDomPwInfo r
;
236 struct samr_PwInfo info
;
237 struct samr_Connect connect_r
;
238 struct samr_OpenDomain opendom
;
240 struct lsa_String name
;
241 struct policy_handle handle
;
242 struct policy_handle domain_handle
;
244 name
.string
= lpcfg_workgroup(tctx
->lp_ctx
);
245 r
.in
.domain_name
= &name
;
248 connect_r
.in
.system_name
= 0;
249 connect_r
.in
.access_mask
= SEC_FLAG_MAXIMUM_ALLOWED
;
250 connect_r
.out
.connect_handle
= &handle
;
252 torture_comment(tctx
, "Testing Connect and OpenDomain on BUILTIN\n");
254 torture_assert_ntstatus_ok(tctx
, dcerpc_samr_Connect_r(b
, tctx
, &connect_r
),
256 if (!NT_STATUS_IS_OK(connect_r
.out
.result
)) {
257 if (NT_STATUS_EQUAL(connect_r
.out
.result
, NT_STATUS_ACCESS_DENIED
)) {
258 torture_comment(tctx
, "Connect failed (expected, schannel mapped to anonymous): %s\n",
259 nt_errstr(connect_r
.out
.result
));
261 torture_comment(tctx
, "Connect failed - %s\n", nt_errstr(connect_r
.out
.result
));
265 opendom
.in
.connect_handle
= &handle
;
266 opendom
.in
.access_mask
= SEC_FLAG_MAXIMUM_ALLOWED
;
267 opendom
.in
.sid
= dom_sid_parse_talloc(tctx
, "S-1-5-32");
268 opendom
.out
.domain_handle
= &domain_handle
;
270 torture_assert_ntstatus_ok(tctx
, dcerpc_samr_OpenDomain_r(b
, tctx
, &opendom
),
271 "OpenDomain failed");
272 if (!NT_STATUS_IS_OK(opendom
.out
.result
)) {
273 torture_comment(tctx
, "OpenDomain failed - %s\n", nt_errstr(opendom
.out
.result
));
278 torture_comment(tctx
, "Testing GetDomPwInfo with name %s\n", r
.in
.domain_name
->string
);
280 /* do several ops to test credential chaining */
282 torture_assert_ntstatus_ok(tctx
, dcerpc_samr_GetDomPwInfo_r(b
, tctx
, &r
),
283 "GetDomPwInfo failed");
284 if (!NT_STATUS_IS_OK(r
.out
.result
)) {
285 if (!NT_STATUS_EQUAL(r
.out
.result
, NT_STATUS_ACCESS_DENIED
)) {
286 torture_comment(tctx
, "GetDomPwInfo op %d failed - %s\n", i
, nt_errstr(r
.out
.result
));
297 do some lsa ops using the schannel connection
299 static bool test_lsa_ops(struct torture_context
*tctx
, struct dcerpc_pipe
*p
)
301 struct lsa_GetUserName r
;
303 struct lsa_String
*account_name_p
= NULL
;
304 struct lsa_String
*authority_name_p
= NULL
;
305 struct dcerpc_binding_handle
*b
= p
->binding_handle
;
307 torture_comment(tctx
, "\nTesting GetUserName\n");
309 r
.in
.system_name
= "\\";
310 r
.in
.account_name
= &account_name_p
;
311 r
.in
.authority_name
= &authority_name_p
;
312 r
.out
.account_name
= &account_name_p
;
314 /* do several ops to test credential chaining and various operations */
315 torture_assert_ntstatus_ok(tctx
, dcerpc_lsa_GetUserName_r(b
, tctx
, &r
),
316 "lsa_GetUserName failed");
318 authority_name_p
= *r
.out
.authority_name
;
320 if (!NT_STATUS_IS_OK(r
.out
.result
)) {
321 torture_comment(tctx
, "GetUserName failed - %s\n", nt_errstr(r
.out
.result
));
324 if (!r
.out
.account_name
) {
328 if (strcmp(account_name_p
->string
, "ANONYMOUS LOGON") != 0) {
329 torture_comment(tctx
, "GetUserName returned wrong user: %s, expected %s\n",
330 account_name_p
->string
, "ANONYMOUS LOGON");
332 if (!torture_setting_bool(tctx
, "samba3", false)) {
336 if (!authority_name_p
|| !authority_name_p
->string
) {
340 if (strcmp(authority_name_p
->string
, "NT AUTHORITY") != 0) {
341 torture_comment(tctx
, "GetUserName returned wrong user: %s, expected %s\n",
342 authority_name_p
->string
, "NT AUTHORITY");
344 if (!torture_setting_bool(tctx
, "samba3", false)) {
355 test a schannel connection with the given flags
357 static bool test_schannel(struct torture_context
*tctx
,
358 uint16_t acct_flags
, uint32_t dcerpc_flags
,
361 struct test_join
*join_ctx
;
363 const char *binding
= torture_setting_string(tctx
, "binding", NULL
);
364 struct dcerpc_binding
*b
;
365 struct dcerpc_pipe
*p
= NULL
;
366 struct dcerpc_pipe
*p_netlogon
= NULL
;
367 struct dcerpc_pipe
*p_netlogon2
= NULL
;
368 struct dcerpc_pipe
*p_netlogon3
= NULL
;
369 struct dcerpc_pipe
*p_samr2
= NULL
;
370 struct dcerpc_pipe
*p_lsa
= NULL
;
371 struct netlogon_creds_CredentialState
*creds
;
372 struct cli_credentials
*credentials
;
373 enum dcerpc_transport_t transport
;
375 join_ctx
= torture_join_domain(tctx
,
376 talloc_asprintf(tctx
, "%s%d", TEST_MACHINE_NAME
, i
),
377 acct_flags
, &credentials
);
378 torture_assert(tctx
, join_ctx
!= NULL
, "Failed to join domain");
380 status
= dcerpc_parse_binding(tctx
, binding
, &b
);
381 torture_assert_ntstatus_ok(tctx
, status
, "Bad binding string");
383 b
->flags
&= ~DCERPC_AUTH_OPTIONS
;
384 b
->flags
|= dcerpc_flags
;
386 status
= dcerpc_pipe_connect_b(tctx
, &p
, b
, &ndr_table_samr
,
387 credentials
, tctx
->ev
, tctx
->lp_ctx
);
388 torture_assert_ntstatus_ok(tctx
, status
,
389 "Failed to connect to samr with schannel");
391 torture_assert(tctx
, test_samr_ops(tctx
, p
->binding_handle
),
392 "Failed to process schannel secured SAMR ops");
394 /* Also test that when we connect to the netlogon pipe, that
395 * the credentials we setup on the first pipe are valid for
398 /* Swap the binding details from SAMR to NETLOGON */
399 status
= dcerpc_epm_map_binding(tctx
, b
, &ndr_table_netlogon
, tctx
->ev
, tctx
->lp_ctx
);
400 torture_assert_ntstatus_ok(tctx
, status
, "epm map");
402 status
= dcerpc_secondary_connection(p
, &p_netlogon
,
404 torture_assert_ntstatus_ok(tctx
, status
, "secondary connection");
406 status
= dcerpc_bind_auth(p_netlogon
, &ndr_table_netlogon
,
407 credentials
, lpcfg_gensec_settings(tctx
, tctx
->lp_ctx
),
408 DCERPC_AUTH_TYPE_SCHANNEL
,
409 dcerpc_auth_level(p
->conn
),
412 torture_assert_ntstatus_ok(tctx
, status
, "bind auth");
414 creds
= cli_credentials_get_netlogon_creds(credentials
);
415 torture_assert(tctx
, (creds
!= NULL
), "schannel creds");
417 /* checks the capabilities */
418 torture_assert(tctx
, test_netlogon_capabilities(p_netlogon
, tctx
, credentials
, creds
),
419 "Failed to process schannel secured capability ops (on fresh connection)");
421 /* do a couple of logins */
422 torture_assert(tctx
, test_netlogon_ops(p_netlogon
, tctx
, credentials
, creds
),
423 "Failed to process schannel secured NETLOGON ops");
425 torture_assert(tctx
, test_netlogon_ex_ops(p_netlogon
, tctx
, credentials
, creds
),
426 "Failed to process schannel secured NETLOGON EX ops");
428 /* we *MUST* use ncacn_np for openpolicy etc. */
429 transport
= b
->transport
;
430 b
->transport
= NCACN_NP
;
432 /* Swap the binding details from SAMR to LSARPC */
433 status
= dcerpc_epm_map_binding(tctx
, b
, &ndr_table_lsarpc
, tctx
->ev
, tctx
->lp_ctx
);
434 torture_assert_ntstatus_ok(tctx
, status
, "epm map");
436 torture_assert_ntstatus_ok(tctx
,
437 dcerpc_pipe_connect_b(tctx
, &p_lsa
, b
, &ndr_table_lsarpc
,
438 credentials
, tctx
->ev
, tctx
->lp_ctx
),
439 "failed to connect lsarpc with schannel");
441 torture_assert(tctx
, test_lsa_ops(tctx
, p_lsa
),
442 "Failed to process schannel secured LSA ops");
447 b
->transport
= transport
;
449 /* we *MUST* use ncacn_ip_tcp for lookupsids3/lookupnames4 */
450 transport
= b
->transport
;
451 b
->transport
= NCACN_IP_TCP
;
453 torture_assert_ntstatus_ok(tctx
,
454 dcerpc_epm_map_binding(tctx
, b
, &ndr_table_lsarpc
, tctx
->ev
, tctx
->lp_ctx
),
455 "failed to call epm map");
457 torture_assert_ntstatus_ok(tctx
,
458 dcerpc_pipe_connect_b(tctx
, &p_lsa
, b
, &ndr_table_lsarpc
,
459 credentials
, tctx
->ev
, tctx
->lp_ctx
),
460 "failed to connect lsarpc with schannel");
463 test_many_LookupSids(p_lsa
, tctx
, NULL
),
464 "LsaLookupSids3 failed!\n");
466 b
->transport
= transport
;
468 /* Drop the socket, we want to start from scratch */
472 /* Now see what we are still allowed to do */
474 status
= dcerpc_parse_binding(tctx
, binding
, &b
);
475 torture_assert_ntstatus_ok(tctx
, status
, "Bad binding string");
477 b
->flags
&= ~DCERPC_AUTH_OPTIONS
;
478 b
->flags
|= dcerpc_flags
;
480 status
= dcerpc_pipe_connect_b(tctx
, &p_samr2
, b
, &ndr_table_samr
,
481 credentials
, tctx
->ev
, tctx
->lp_ctx
);
482 torture_assert_ntstatus_ok(tctx
, status
,
483 "Failed to connect with schannel");
485 /* do a some SAMR operations. We have *not* done a new serverauthenticate */
486 torture_assert (tctx
, test_samr_ops(tctx
, p_samr2
->binding_handle
),
487 "Failed to process schannel secured SAMR ops (on fresh connection)");
489 /* Swap the binding details from SAMR to NETLOGON */
490 status
= dcerpc_epm_map_binding(tctx
, b
, &ndr_table_netlogon
, tctx
->ev
, tctx
->lp_ctx
);
491 torture_assert_ntstatus_ok(tctx
, status
, "epm");
493 status
= dcerpc_secondary_connection(p_samr2
, &p_netlogon2
,
495 torture_assert_ntstatus_ok(tctx
, status
, "secondary connection");
497 /* and now setup an SCHANNEL bind on netlogon */
498 status
= dcerpc_bind_auth(p_netlogon2
, &ndr_table_netlogon
,
499 credentials
, lpcfg_gensec_settings(tctx
, tctx
->lp_ctx
),
500 DCERPC_AUTH_TYPE_SCHANNEL
,
501 dcerpc_auth_level(p_samr2
->conn
),
504 torture_assert_ntstatus_ok(tctx
, status
, "auth failed");
506 /* checks the capabilities */
507 torture_assert(tctx
, test_netlogon_capabilities(p_netlogon2
, tctx
, credentials
, creds
),
508 "Failed to process schannel secured capability ops (on fresh connection)");
510 /* Try the schannel-only SamLogonEx operation */
511 torture_assert(tctx
, test_netlogon_ex_ops(p_netlogon2
, tctx
, credentials
, creds
),
512 "Failed to process schannel secured NETLOGON EX ops (on fresh connection)");
515 /* And the more traditional style, proving that the
516 * credentials chaining state is fully present */
517 torture_assert(tctx
, test_netlogon_ops(p_netlogon2
, tctx
, credentials
, creds
),
518 "Failed to process schannel secured NETLOGON ops (on fresh connection)");
520 /* Drop the socket, we want to start from scratch (again) */
521 talloc_free(p_samr2
);
523 /* We don't want schannel for this test */
524 b
->flags
&= ~DCERPC_AUTH_OPTIONS
;
526 status
= dcerpc_pipe_connect_b(tctx
, &p_netlogon3
, b
, &ndr_table_netlogon
,
527 credentials
, tctx
->ev
, tctx
->lp_ctx
);
528 torture_assert_ntstatus_ok(tctx
, status
, "Failed to connect without schannel");
530 torture_assert(tctx
, !test_netlogon_ex_ops(p_netlogon3
, tctx
, credentials
, creds
),
531 "Processed NOT schannel secured NETLOGON EX ops without SCHANNEL (unsafe)");
533 /* Required because the previous call will mark the current context as having failed */
534 tctx
->last_result
= TORTURE_OK
;
535 tctx
->last_reason
= NULL
;
537 torture_assert(tctx
, test_netlogon_ops(p_netlogon3
, tctx
, credentials
, creds
),
538 "Failed to processed NOT schannel secured NETLOGON ops without new ServerAuth");
540 torture_leave_domain(tctx
, join_ctx
);
547 a schannel test suite
549 bool torture_rpc_schannel(struct torture_context
*torture
)
554 uint32_t dcerpc_flags
;
556 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_AUTO
},
557 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_AUTO
},
558 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_128
},
559 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_128
},
560 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_AES
},
561 { ACB_WSTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_AES
},
562 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_AUTO
},
563 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_AUTO
},
564 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_128
},
565 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_128
},
566 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SIGN
| DCERPC_SCHANNEL_AES
},
567 { ACB_SVRTRUST
, DCERPC_SCHANNEL
| DCERPC_SEAL
| DCERPC_SCHANNEL_AES
}
571 for (i
=0;i
<ARRAY_SIZE(tests
);i
++) {
572 torture_comment(torture
, "Testing with acct_flags=0x%x dcerpc_flags=0x%x \n",
573 tests
[i
].acct_flags
, tests
[i
].dcerpc_flags
);
575 if (!test_schannel(torture
,
576 tests
[i
].acct_flags
, tests
[i
].dcerpc_flags
,
578 torture_comment(torture
, "Failed with acct_flags=0x%x dcerpc_flags=0x%x \n",
579 tests
[i
].acct_flags
, tests
[i
].dcerpc_flags
);
588 test two schannel connections
590 bool torture_rpc_schannel2(struct torture_context
*torture
)
592 struct test_join
*join_ctx
;
594 const char *binding
= torture_setting_string(torture
, "binding", NULL
);
595 struct dcerpc_binding
*b
;
596 struct dcerpc_pipe
*p1
= NULL
, *p2
= NULL
;
597 struct cli_credentials
*credentials1
, *credentials2
;
598 uint32_t dcerpc_flags
= DCERPC_SCHANNEL
| DCERPC_SIGN
;
600 join_ctx
= torture_join_domain(torture
, talloc_asprintf(torture
, "%s2", TEST_MACHINE_NAME
),
601 ACB_WSTRUST
, &credentials1
);
602 torture_assert(torture
, join_ctx
!= NULL
,
603 "Failed to join domain with acct_flags=ACB_WSTRUST");
605 credentials2
= cli_credentials_shallow_copy(torture
, credentials1
);
606 cli_credentials_set_netlogon_creds(credentials1
, NULL
);
607 cli_credentials_set_netlogon_creds(credentials2
, NULL
);
609 status
= dcerpc_parse_binding(torture
, binding
, &b
);
610 torture_assert_ntstatus_ok(torture
, status
, "Bad binding string");
612 b
->flags
&= ~DCERPC_AUTH_OPTIONS
;
613 b
->flags
|= dcerpc_flags
;
615 torture_comment(torture
, "Opening first connection\n");
616 status
= dcerpc_pipe_connect_b(torture
, &p1
, b
, &ndr_table_netlogon
,
617 credentials1
, torture
->ev
, torture
->lp_ctx
);
618 torture_assert_ntstatus_ok(torture
, status
, "Failed to connect with schannel");
620 torture_comment(torture
, "Opening second connection\n");
621 status
= dcerpc_pipe_connect_b(torture
, &p2
, b
, &ndr_table_netlogon
,
622 credentials2
, torture
->ev
, torture
->lp_ctx
);
623 torture_assert_ntstatus_ok(torture
, status
, "Failed to connect with schannel");
625 cli_credentials_set_netlogon_creds(credentials1
, NULL
);
626 cli_credentials_set_netlogon_creds(credentials2
, NULL
);
628 torture_comment(torture
, "Testing logon on pipe1\n");
629 if (!test_netlogon_ex_ops(p1
, torture
, credentials1
, NULL
))
632 torture_comment(torture
, "Testing logon on pipe2\n");
633 if (!test_netlogon_ex_ops(p2
, torture
, credentials2
, NULL
))
636 torture_comment(torture
, "Again on pipe1\n");
637 if (!test_netlogon_ex_ops(p1
, torture
, credentials1
, NULL
))
640 torture_comment(torture
, "Again on pipe2\n");
641 if (!test_netlogon_ex_ops(p2
, torture
, credentials2
, NULL
))
644 torture_leave_domain(torture
, join_ctx
);
648 struct torture_schannel_bench
;
650 struct torture_schannel_bench_conn
{
651 struct torture_schannel_bench
*s
;
653 struct cli_credentials
*wks_creds
;
654 struct dcerpc_pipe
*pipe
;
655 struct netr_LogonSamLogonEx r
;
656 struct netr_NetworkInfo ninfo
;
662 struct torture_schannel_bench
{
663 struct torture_context
*tctx
;
668 struct torture_schannel_bench_conn
*conns
;
669 struct test_join
*join_ctx1
;
670 struct cli_credentials
*wks_creds1
;
671 struct test_join
*join_ctx2
;
672 struct cli_credentials
*wks_creds2
;
673 struct cli_credentials
*user1_creds
;
674 struct cli_credentials
*user2_creds
;
675 struct dcerpc_binding
*b
;
682 static void torture_schannel_bench_connected(struct composite_context
*c
)
684 struct torture_schannel_bench_conn
*conn
=
685 (struct torture_schannel_bench_conn
*)c
->async
.private_data
;
686 struct torture_schannel_bench
*s
= talloc_get_type(conn
->s
,
687 struct torture_schannel_bench
);
689 s
->error
= dcerpc_pipe_connect_b_recv(c
, s
->conns
, &conn
->pipe
);
690 torture_comment(s
->tctx
, "conn[%u]: %s\n", conn
->index
, nt_errstr(s
->error
));
691 if (NT_STATUS_IS_OK(s
->error
)) {
696 static void torture_schannel_bench_recv(struct tevent_req
*subreq
);
698 static bool torture_schannel_bench_start(struct torture_schannel_bench_conn
*conn
)
700 struct torture_schannel_bench
*s
= conn
->s
;
702 DATA_BLOB names_blob
, chal
, lm_resp
, nt_resp
;
703 int flags
= CLI_CRED_NTLM_AUTH
;
704 struct tevent_req
*subreq
;
705 struct cli_credentials
*user_creds
;
707 if (conn
->total
% 2) {
708 user_creds
= s
->user1_creds
;
710 user_creds
= s
->user2_creds
;
713 if (lpcfg_client_lanman_auth(s
->tctx
->lp_ctx
)) {
714 flags
|= CLI_CRED_LANMAN_AUTH
;
717 if (lpcfg_client_ntlmv2_auth(s
->tctx
->lp_ctx
)) {
718 flags
|= CLI_CRED_NTLMv2_AUTH
;
721 talloc_free(conn
->tmp
);
722 conn
->tmp
= talloc_new(s
);
723 ZERO_STRUCT(conn
->ninfo
);
724 ZERO_STRUCT(conn
->r
);
726 cli_credentials_get_ntlm_username_domain(user_creds
, conn
->tmp
,
727 &conn
->ninfo
.identity_info
.account_name
.string
,
728 &conn
->ninfo
.identity_info
.domain_name
.string
);
730 generate_random_buffer(conn
->ninfo
.challenge
,
731 sizeof(conn
->ninfo
.challenge
));
732 chal
= data_blob_const(conn
->ninfo
.challenge
,
733 sizeof(conn
->ninfo
.challenge
));
735 names_blob
= NTLMv2_generate_names_blob(conn
->tmp
,
736 cli_credentials_get_workstation(conn
->wks_creds
),
737 cli_credentials_get_domain(conn
->wks_creds
));
739 status
= cli_credentials_get_ntlm_response(user_creds
, conn
->tmp
,
745 torture_assert_ntstatus_ok(s
->tctx
, status
,
746 "cli_credentials_get_ntlm_response failed");
748 conn
->ninfo
.lm
.data
= lm_resp
.data
;
749 conn
->ninfo
.lm
.length
= lm_resp
.length
;
751 conn
->ninfo
.nt
.data
= nt_resp
.data
;
752 conn
->ninfo
.nt
.length
= nt_resp
.length
;
754 conn
->ninfo
.identity_info
.parameter_control
= 0;
755 conn
->ninfo
.identity_info
.logon_id_low
= 0;
756 conn
->ninfo
.identity_info
.logon_id_high
= 0;
757 conn
->ninfo
.identity_info
.workstation
.string
= cli_credentials_get_workstation(conn
->wks_creds
);
759 conn
->r
.in
.server_name
= talloc_asprintf(conn
->tmp
, "\\\\%s", dcerpc_server_name(conn
->pipe
));
760 conn
->r
.in
.computer_name
= cli_credentials_get_workstation(conn
->wks_creds
);
761 conn
->r
.in
.logon_level
= NetlogonNetworkInformation
;
762 conn
->r
.in
.logon
= talloc(conn
->tmp
, union netr_LogonLevel
);
763 conn
->r
.in
.logon
->network
= &conn
->ninfo
;
764 conn
->r
.in
.flags
= talloc(conn
->tmp
, uint32_t);
765 conn
->r
.in
.validation_level
= 2;
766 conn
->r
.out
.validation
= talloc(conn
->tmp
, union netr_Validation
);
767 conn
->r
.out
.authoritative
= talloc(conn
->tmp
, uint8_t);
768 conn
->r
.out
.flags
= conn
->r
.in
.flags
;
770 subreq
= dcerpc_netr_LogonSamLogonEx_r_send(s
, s
->tctx
->ev
,
771 conn
->pipe
->binding_handle
,
773 torture_assert(s
->tctx
, subreq
, "Failed to setup LogonSamLogonEx request");
775 tevent_req_set_callback(subreq
, torture_schannel_bench_recv
, conn
);
780 static void torture_schannel_bench_recv(struct tevent_req
*subreq
)
783 struct torture_schannel_bench_conn
*conn
=
784 (struct torture_schannel_bench_conn
*)tevent_req_callback_data_void(subreq
);
785 struct torture_schannel_bench
*s
= talloc_get_type(conn
->s
,
786 struct torture_schannel_bench
);
788 s
->error
= dcerpc_netr_LogonSamLogonEx_r_recv(subreq
, subreq
);
790 if (!NT_STATUS_IS_OK(s
->error
)) {
801 ret
= torture_schannel_bench_start(conn
);
803 s
->error
= NT_STATUS_INTERNAL_ERROR
;
808 test multiple schannel connection in parallel
810 bool torture_rpc_schannel_bench1(struct torture_context
*torture
)
814 const char *binding
= torture_setting_string(torture
, "binding", NULL
);
815 struct torture_schannel_bench
*s
;
816 struct timeval start
;
821 s
= talloc_zero(torture
, struct torture_schannel_bench
);
823 s
->progress
= torture_setting_bool(torture
, "progress", true);
824 s
->timelimit
= torture_setting_int(torture
, "timelimit", 10);
825 s
->nprocs
= torture_setting_int(torture
, "nprocs", 4);
826 s
->conns
= talloc_zero_array(s
, struct torture_schannel_bench_conn
, s
->nprocs
);
828 s
->user1_creds
= cli_credentials_shallow_copy(s
, cmdline_credentials
);
829 tmp
= torture_setting_string(s
->tctx
, "extra_user1", NULL
);
831 cli_credentials_parse_string(s
->user1_creds
, tmp
, CRED_SPECIFIED
);
833 s
->user2_creds
= cli_credentials_shallow_copy(s
, cmdline_credentials
);
834 tmp
= torture_setting_string(s
->tctx
, "extra_user2", NULL
);
836 cli_credentials_parse_string(s
->user1_creds
, tmp
, CRED_SPECIFIED
);
839 s
->join_ctx1
= torture_join_domain(s
->tctx
, talloc_asprintf(s
, "%sb", TEST_MACHINE_NAME
),
840 ACB_WSTRUST
, &s
->wks_creds1
);
841 torture_assert(torture
, s
->join_ctx1
!= NULL
,
842 "Failed to join domain with acct_flags=ACB_WSTRUST");
843 s
->join_ctx2
= torture_join_domain(s
->tctx
, talloc_asprintf(s
, "%sc", TEST_MACHINE_NAME
),
844 ACB_WSTRUST
, &s
->wks_creds2
);
845 torture_assert(torture
, s
->join_ctx2
!= NULL
,
846 "Failed to join domain with acct_flags=ACB_WSTRUST");
848 cli_credentials_set_kerberos_state(s
->wks_creds1
, CRED_DONT_USE_KERBEROS
);
849 cli_credentials_set_kerberos_state(s
->wks_creds2
, CRED_DONT_USE_KERBEROS
);
851 for (i
=0; i
< s
->nprocs
; i
++) {
852 struct cli_credentials
*wks
= s
->wks_creds1
;
854 if ((i
% 2) && (torture_setting_bool(torture
, "multijoin", false))) {
859 s
->conns
[i
].index
= i
;
860 s
->conns
[i
].wks_creds
= cli_credentials_shallow_copy(s
->conns
, wks
);
861 cli_credentials_set_netlogon_creds(s
->conns
[i
].wks_creds
, NULL
);
864 status
= dcerpc_parse_binding(s
, binding
, &s
->b
);
865 torture_assert_ntstatus_ok(torture
, status
, "Bad binding string");
866 s
->b
->flags
&= ~DCERPC_AUTH_OPTIONS
;
867 s
->b
->flags
|= DCERPC_SCHANNEL
| DCERPC_SIGN
;
869 torture_comment(torture
, "Opening %d connections in parallel\n", s
->nprocs
);
870 for (i
=0; i
< s
->nprocs
; i
++) {
872 s
->error
= dcerpc_pipe_connect_b(s
->conns
, &s
->conns
[i
].pipe
, s
->b
,
874 s
->conns
[i
].wks_creds
,
875 torture
->ev
, torture
->lp_ctx
);
876 torture_assert_ntstatus_ok(torture
, s
->error
, "Failed to connect with schannel");
879 * This path doesn't work against windows,
880 * because of windows drops the connections
881 * which haven't reached a session setup yet
883 * The same as the reset on zero vc stuff.
885 struct composite_context
*c
;
886 c
= dcerpc_pipe_connect_b_send(s
->conns
, s
->b
,
888 s
->conns
[i
].wks_creds
,
891 torture_assert(torture
, c
!= NULL
, "Failed to setup connect");
892 c
->async
.fn
= torture_schannel_bench_connected
;
893 c
->async
.private_data
= &s
->conns
[i
];
896 while (NT_STATUS_IS_OK(s
->error
) && s
->nprocs
!= s
->nconns
) {
897 int ev_ret
= tevent_loop_once(torture
->ev
);
898 torture_assert(torture
, ev_ret
== 0, "tevent_loop_once failed");
901 torture_assert_ntstatus_ok(torture
, s
->error
, "Failed establish a connect");
904 * Change the workstation password after establishing the netlogon
905 * schannel connections to prove that existing connections are not
906 * affected by a wks pwchange.
910 struct netr_ServerPasswordSet pwset
;
911 char *password
= generate_random_password(s
->join_ctx1
, 8, 255);
912 struct netlogon_creds_CredentialState
*creds_state
;
913 struct dcerpc_pipe
*net_pipe
;
914 struct netr_Authenticator credential
, return_authenticator
;
915 struct samr_Password new_password
;
917 status
= dcerpc_pipe_connect_b(s
, &net_pipe
, s
->b
,
920 torture
->ev
, torture
->lp_ctx
);
922 torture_assert_ntstatus_ok(torture
, status
,
923 "dcerpc_pipe_connect_b failed");
925 pwset
.in
.server_name
= talloc_asprintf(
926 net_pipe
, "\\\\%s", dcerpc_server_name(net_pipe
));
927 pwset
.in
.computer_name
=
928 cli_credentials_get_workstation(s
->wks_creds1
);
929 pwset
.in
.account_name
= talloc_asprintf(
930 net_pipe
, "%s$", pwset
.in
.computer_name
);
931 pwset
.in
.secure_channel_type
= SEC_CHAN_WKSTA
;
932 pwset
.in
.credential
= &credential
;
933 pwset
.in
.new_password
= &new_password
;
934 pwset
.out
.return_authenticator
= &return_authenticator
;
936 E_md4hash(password
, new_password
.hash
);
938 creds_state
= cli_credentials_get_netlogon_creds(
940 netlogon_creds_des_encrypt(creds_state
, &new_password
);
941 netlogon_creds_client_authenticator(creds_state
, &credential
);
943 torture_assert_ntstatus_ok(torture
, dcerpc_netr_ServerPasswordSet_r(net_pipe
->binding_handle
, torture
, &pwset
),
944 "ServerPasswordSet failed");
945 torture_assert_ntstatus_ok(torture
, pwset
.out
.result
,
946 "ServerPasswordSet failed");
948 if (!netlogon_creds_client_check(creds_state
,
949 &pwset
.out
.return_authenticator
->cred
)) {
950 torture_comment(torture
, "Credential chaining failed\n");
953 cli_credentials_set_password(s
->wks_creds1
, password
,
956 talloc_free(net_pipe
);
958 /* Just as a test, connect with the new creds */
960 cli_credentials_set_netlogon_creds(s
->wks_creds1
, NULL
);
962 status
= dcerpc_pipe_connect_b(s
, &net_pipe
, s
->b
,
965 torture
->ev
, torture
->lp_ctx
);
967 torture_assert_ntstatus_ok(torture
, status
,
968 "dcerpc_pipe_connect_b failed");
970 talloc_free(net_pipe
);
973 torture_comment(torture
, "Start looping LogonSamLogonEx on %d connections for %d secs\n",
974 s
->nprocs
, s
->timelimit
);
975 for (i
=0; i
< s
->nprocs
; i
++) {
976 ret
= torture_schannel_bench_start(&s
->conns
[i
]);
977 torture_assert(torture
, ret
, "Failed to setup LogonSamLogonEx");
980 start
= timeval_current();
981 end
= timeval_add(&start
, s
->timelimit
, 0);
983 while (NT_STATUS_IS_OK(s
->error
) && !timeval_expired(&end
)) {
984 int ev_ret
= tevent_loop_once(torture
->ev
);
985 torture_assert(torture
, ev_ret
== 0, "tevent_loop_once failed");
987 torture_assert_ntstatus_ok(torture
, s
->error
, "Failed some request");
989 talloc_free(s
->conns
);
991 for (i
=0; i
< s
->nprocs
; i
++) {
992 s
->total
+= s
->conns
[i
].total
;
995 torture_comment(torture
,
996 "Total ops[%llu] (%u ops/s)\n",
997 (unsigned long long)s
->total
,
998 (unsigned)s
->total
/s
->timelimit
);
1000 torture_leave_domain(torture
, s
->join_ctx1
);
1001 torture_leave_domain(torture
, s
->join_ctx2
);