2 Unix SMB/CIFS implementation.
4 test suite for netlogon PAC operations
6 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2008
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 "torture/torture.h"
24 #include "lib/events/events.h"
25 #include "auth/auth.h"
26 #include "auth/gensec/gensec.h"
27 #include "lib/cmdline/popt_common.h"
28 #include "torture/rpc/rpc.h"
29 #include "torture/rpc/netlogon.h"
30 #include "libcli/auth/libcli_auth.h"
31 #include "librpc/gen_ndr/ndr_netlogon_c.h"
32 #include "librpc/gen_ndr/ndr_krb5pac.h"
33 #include "param/param.h"
34 #include "lib/messaging/irpc.h"
35 #include "cluster/cluster.h"
37 #define TEST_MACHINE_NAME "torturepactest"
39 /* Check to see if we can pass the PAC across to the NETLOGON server for validation */
41 /* Also happens to be a really good one-step verfication of our Kerberos stack */
43 static bool test_PACVerify(struct torture_context *tctx,
44 struct dcerpc_pipe *p,
45 struct cli_credentials *credentials)
49 struct netr_LogonSamLogon r;
51 struct netr_GenericInfo generic;
52 struct netr_Authenticator auth, auth2;
55 struct creds_CredentialState *creds;
56 struct gensec_security *gensec_client_context;
57 struct gensec_security *gensec_server_context;
59 struct messaging_context *msg_server_ctx;
60 DATA_BLOB client_to_server, server_to_client, pac_wrapped, payload;
61 struct PAC_Validate pac_wrapped_struct;
63 enum ndr_err_code ndr_err;
65 struct auth_session_info *session_info;
69 TALLOC_CTX *tmp_ctx = talloc_new(tctx);
71 torture_assert(tctx, tmp_ctx != NULL, "talloc_new() failed");
73 if (!test_SetupCredentials2(p, tctx, NETLOGON_NEG_AUTH2_ADS_FLAGS,
74 credentials, SEC_CHAN_BDC,
79 status = torture_temp_dir(tctx, "PACVerify", &tmp_dir);
80 torture_assert_ntstatus_ok(tctx, status, "torture_temp_dir failed");
82 msg_server_ctx = messaging_init(tctx,
85 lp_iconv_convenience(tctx->lp_ctx),
88 torture_assert(tctx, msg_server_ctx != NULL, "Failed to init messaging context");
90 status = gensec_client_start(tctx, &gensec_client_context, tctx->ev, tctx->lp_ctx);
91 torture_assert_ntstatus_ok(tctx, status, "gensec_client_start (client) failed");
93 status = gensec_set_target_hostname(gensec_client_context, TEST_MACHINE_NAME);
95 status = gensec_set_credentials(gensec_client_context, cmdline_credentials);
96 torture_assert_ntstatus_ok(tctx, status, "gensec_set_credentials (client) failed");
98 status = gensec_start_mech_by_sasl_name(gensec_client_context, "GSSAPI");
99 torture_assert_ntstatus_ok(tctx, status, "gensec_start_mech_by_sasl_name (client) failed");
101 status = gensec_server_start(tctx, tctx->ev, tctx->lp_ctx, msg_server_ctx, &gensec_server_context);
102 torture_assert_ntstatus_ok(tctx, status, "gensec_server_start (server) failed");
104 status = gensec_set_credentials(gensec_server_context, credentials);
105 torture_assert_ntstatus_ok(tctx, status, "gensec_set_credentials (server) failed");
107 status = gensec_start_mech_by_sasl_name(gensec_server_context, "GSSAPI");
108 torture_assert_ntstatus_ok(tctx, status, "gensec_start_mech_by_sasl_name (server) failed");
110 server_to_client = data_blob(NULL, 0);
113 /* Do a client-server update dance */
114 status = gensec_update(gensec_client_context, tmp_ctx, server_to_client, &client_to_server);
115 if (!NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {;
116 torture_assert_ntstatus_ok(tctx, status, "gensec_update (client) failed");
119 if (client_to_server.length == 0) {
123 status = gensec_update(gensec_server_context, tmp_ctx, client_to_server, &server_to_client);
124 if (!NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {;
125 torture_assert_ntstatus_ok(tctx, status, "gensec_update (server) failed");
128 if (server_to_client.length == 0) {
133 /* Extract the PAC using Samba's code */
135 status = gensec_session_info(gensec_server_context, &session_info);
136 torture_assert_ntstatus_ok(tctx, status, "gensec_session_info failed");
138 pac_wrapped_struct.MessageType = 0x3;
139 pac_wrapped_struct.ChecksumLength = session_info->server_info->pac_srv_sig.signature.length;
140 pac_wrapped_struct.SignatureType = session_info->server_info->pac_kdc_sig.type;
141 pac_wrapped_struct.SignatureLength = session_info->server_info->pac_kdc_sig.signature.length;
142 pac_wrapped_struct.ChecksumAndSignature = payload
143 = data_blob_talloc(tmp_ctx, NULL,
144 pac_wrapped_struct.ChecksumLength
145 + pac_wrapped_struct.SignatureLength);
146 memcpy(&payload.data[0],
147 session_info->server_info->pac_srv_sig.signature.data,
148 pac_wrapped_struct.ChecksumLength);
149 memcpy(&payload.data[pac_wrapped_struct.ChecksumLength],
150 session_info->server_info->pac_kdc_sig.signature.data,
151 pac_wrapped_struct.SignatureLength);
153 ndr_err = ndr_push_struct_blob(&pac_wrapped, tmp_ctx, lp_iconv_convenience(tctx->lp_ctx), &pac_wrapped_struct,
154 (ndr_push_flags_fn_t)ndr_push_PAC_Validate);
155 torture_assert(tctx, NDR_ERR_CODE_IS_SUCCESS(ndr_err), "ndr_push_struct_blob of PACValidate structure failed");
158 /* Validate it over the netlogon pipe */
160 generic.identity_info.parameter_control = 0;
161 generic.identity_info.logon_id_high = 0;
162 generic.identity_info.logon_id_low = 0;
163 generic.identity_info.domain_name.string = session_info->server_info->domain_name;
164 generic.identity_info.account_name.string = session_info->server_info->account_name;
165 generic.identity_info.workstation.string = TEST_MACHINE_NAME;
167 generic.package_name.string = "Kerberos";
168 generic.length = pac_wrapped.length;
169 generic.data = pac_wrapped.data;
172 creds_client_authenticator(creds, &auth);
173 r.in.credential = &auth;
174 r.in.return_authenticator = &auth2;
175 r.in.logon_level = NetlogonGenericInformation;
176 r.in.logon.generic = &generic;
177 r.in.server_name = talloc_asprintf(tctx, "\\\\%s", dcerpc_server_name(p));
178 r.in.computer_name = cli_credentials_get_workstation(credentials);
179 r.in.validation_level = NetlogonValidationGenericInfo2;
181 status = dcerpc_netr_LogonSamLogon(p, tctx, &r);
183 torture_assert_ntstatus_ok(tctx, status, "LogonSamLogon failed");
185 torture_assert(tctx, creds_client_check(creds, &r.out.return_authenticator->cred),
186 "Credential chaining failed");
191 struct torture_suite *torture_rpc_remote_pac(TALLOC_CTX *mem_ctx)
193 struct torture_suite *suite = torture_suite_create(mem_ctx, "PAC");
194 struct torture_rpc_tcase *tcase;
196 tcase = torture_suite_add_machine_rpc_iface_tcase(suite, "netlogon",
197 &ndr_table_netlogon, TEST_MACHINE_NAME);
198 torture_rpc_tcase_add_test_creds(tcase, "verify", test_PACVerify);