2 Unix SMB/CIFS implementation.
4 endpoint server for the drsuapi pipe
7 Copyright (C) Stefan Metzmacher 2004
8 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 #include "librpc/gen_ndr/drsuapi.h"
27 #include "rpc_server/common/common.h"
28 #include "lib/ldb/include/ldb_errors.h"
29 #include "system/kerberos.h"
30 #include "auth/kerberos/kerberos.h"
31 #include "libcli/ldap/ldap.h"
32 #include "libcli/security/security.h"
33 #include "librpc/gen_ndr/ndr_misc.h"
34 #include "auth/auth.h"
36 #include "dsdb/samdb/samdb.h"
38 static WERROR DsCrackNameOneFilter(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ctx,
39 struct smb_krb5_context *smb_krb5_context,
40 uint32_t format_flags, uint32_t format_offered, uint32_t format_desired,
41 struct ldb_dn *name_dn, const char *name,
42 const char *domain_filter, const char *result_filter,
43 struct drsuapi_DsNameInfo1 *info1);
44 static WERROR DsCrackNameOneSyntactical(TALLOC_CTX *mem_ctx,
45 uint32_t format_offered, uint32_t format_desired,
46 struct ldb_dn *name_dn, const char *name,
47 struct drsuapi_DsNameInfo1 *info1);
49 static enum drsuapi_DsNameStatus LDB_lookup_spn_alias(krb5_context context, struct ldb_context *ldb_ctx,
51 const char *alias_from,
56 struct ldb_result *res;
57 struct ldb_message_element *spnmappings;
59 struct ldb_dn *service_dn;
62 const char *directory_attrs[] = {
67 tmp_ctx = talloc_new(mem_ctx);
69 return DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
72 service_dn = ldb_dn_new(tmp_ctx, ldb_ctx, "CN=Directory Service,CN=Windows NT,CN=Services,CN=Configuration");
73 if ( ! ldb_dn_add_base(service_dn, samdb_base_dn(ldb_ctx))) {
74 return DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
76 service_dn_str = ldb_dn_linearize(tmp_ctx, service_dn);
77 if ( ! service_dn_str) {
78 return DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
81 ret = ldb_search(ldb_ctx, service_dn, LDB_SCOPE_BASE, "(objectClass=nTDSService)",
82 directory_attrs, &res);
84 if (ret != LDB_SUCCESS) {
85 DEBUG(1, ("ldb_search: dn: %s not found: %s", service_dn_str, ldb_errstring(ldb_ctx)));
86 return DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
87 } else if (res->count != 1) {
89 DEBUG(1, ("ldb_search: dn: %s found %d times!", service_dn_str, res->count));
90 return DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
92 talloc_steal(tmp_ctx, res);
94 spnmappings = ldb_msg_find_element(res->msgs[0], "sPNMappings");
95 if (!spnmappings || spnmappings->num_values == 0) {
96 DEBUG(1, ("ldb_search: dn: %s no sPNMappings attribute", service_dn_str));
98 return DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
101 for (i = 0; i < spnmappings->num_values; i++) {
102 char *mapping, *p, *str;
103 mapping = talloc_strdup(tmp_ctx,
104 (const char *)spnmappings->values[i].data);
106 DEBUG(1, ("LDB_lookup_spn_alias: ldb_search: dn: %s did not have an sPNMapping\n", service_dn_str));
107 talloc_free(tmp_ctx);
108 return DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
111 /* C string manipulation sucks */
113 p = strchr(mapping, '=');
115 DEBUG(1, ("ldb_search: dn: %s sPNMapping malformed: %s\n",
116 service_dn_str, mapping));
117 talloc_free(tmp_ctx);
118 return DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
129 if (strcasecmp(str, alias_from) == 0) {
131 talloc_steal(mem_ctx, mapping);
132 talloc_free(tmp_ctx);
133 return DRSUAPI_DS_NAME_STATUS_OK;
137 DEBUG(4, ("LDB_lookup_spn_alias: no alias for service %s applicable\n", alias_from));
138 talloc_free(tmp_ctx);
139 return DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
142 /* When cracking a ServicePrincipalName, many services may be served
143 * by the host/ servicePrincipalName. The incoming query is for cifs/
144 * but we translate it here, and search on host/. This is done after
145 * the cifs/ entry has been searched for, making this a fallback */
147 static WERROR DsCrackNameSPNAlias(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ctx,
148 struct smb_krb5_context *smb_krb5_context,
149 uint32_t format_flags, uint32_t format_offered, uint32_t format_desired,
150 const char *name, struct drsuapi_DsNameInfo1 *info1)
154 krb5_principal principal;
158 enum drsuapi_DsNameStatus namestatus;
160 /* parse principal */
161 ret = krb5_parse_name_flags(smb_krb5_context->krb5_context,
162 name, KRB5_PRINCIPAL_PARSE_NO_REALM, &principal);
164 DEBUG(2, ("Could not parse principal: %s: %s",
165 name, smb_get_krb5_error_message(smb_krb5_context->krb5_context,
170 /* grab cifs/, http/ etc */
172 /* This is checked for in callers, but be safe */
173 if (principal->name.name_string.len < 2) {
174 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
177 service = principal->name.name_string.val[0];
180 namestatus = LDB_lookup_spn_alias(smb_krb5_context->krb5_context,
182 service, &new_service);
184 if (namestatus != DRSUAPI_DS_NAME_STATUS_OK) {
185 info1->status = namestatus;
190 info1->status = DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
194 /* ooh, very nasty playing around in the Principal... */
195 free(principal->name.name_string.val[0]);
196 principal->name.name_string.val[0] = strdup(new_service);
197 if (!principal->name.name_string.val[0]) {
198 krb5_free_principal(smb_krb5_context->krb5_context, principal);
202 /* reform principal */
203 ret = krb5_unparse_name_flags(smb_krb5_context->krb5_context, principal,
204 KRB5_PRINCIPAL_UNPARSE_NO_REALM, &new_princ);
206 krb5_free_principal(smb_krb5_context->krb5_context, principal);
212 wret = DsCrackNameOneName(sam_ctx, mem_ctx, format_flags, format_offered, format_desired,
218 /* Subcase of CrackNames, for the userPrincipalName */
220 static WERROR DsCrackNameUPN(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ctx,
221 struct smb_krb5_context *smb_krb5_context,
222 uint32_t format_flags, uint32_t format_offered, uint32_t format_desired,
223 const char *name, struct drsuapi_DsNameInfo1 *info1)
226 const char *domain_filter = NULL;
227 const char *result_filter = NULL;
229 krb5_principal principal;
231 char *unparsed_name_short;
233 /* Prevent recursion */
235 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
239 ret = krb5_parse_name_flags(smb_krb5_context->krb5_context, name,
240 KRB5_PRINCIPAL_PARSE_MUST_REALM, &principal);
242 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
246 domain_filter = NULL;
247 realm = krb5_princ_realm(smb_krb5_context->krb5_context, principal);
248 domain_filter = talloc_asprintf(mem_ctx,
249 "(&(&(|(&(dnsRoot=%s)(nETBIOSName=*))(nETBIOSName=%s))(objectclass=crossRef))(ncName=*))",
250 ldb_binary_encode_string(mem_ctx, *realm),
251 ldb_binary_encode_string(mem_ctx, *realm));
252 ret = krb5_unparse_name_flags(smb_krb5_context->krb5_context, principal,
253 KRB5_PRINCIPAL_UNPARSE_NO_REALM, &unparsed_name_short);
254 krb5_free_principal(smb_krb5_context->krb5_context, principal);
257 free(unparsed_name_short);
261 /* This may need to be extended for more userPrincipalName variations */
262 result_filter = talloc_asprintf(mem_ctx, "(&(objectClass=user)(samAccountName=%s))",
263 ldb_binary_encode_string(mem_ctx, unparsed_name_short));
264 if (!result_filter || !domain_filter) {
265 free(unparsed_name_short);
268 status = DsCrackNameOneFilter(sam_ctx, mem_ctx,
270 format_flags, format_offered, format_desired,
271 NULL, unparsed_name_short, domain_filter, result_filter,
273 free(unparsed_name_short);
277 /* Crack a single 'name', from format_offered into format_desired, returning the result in info1 */
279 WERROR DsCrackNameOneName(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ctx,
280 uint32_t format_flags, uint32_t format_offered, uint32_t format_desired,
281 const char *name, struct drsuapi_DsNameInfo1 *info1)
284 const char *domain_filter = NULL;
285 const char *result_filter = NULL;
286 struct ldb_dn *name_dn = NULL;
288 struct smb_krb5_context *smb_krb5_context;
289 ret = smb_krb5_init_context(mem_ctx, &smb_krb5_context);
295 info1->status = DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
296 info1->dns_domain_name = NULL;
297 info1->result_name = NULL;
300 return WERR_INVALID_PARAM;
303 /* TODO: - fill the correct names in all cases!
304 * - handle format_flags
307 /* here we need to set the domain_filter and/or the result_filter */
308 switch (format_offered) {
309 case DRSUAPI_DS_NAME_FORMAT_CANONICAL: {
312 str = talloc_strdup(mem_ctx, name);
313 W_ERROR_HAVE_NO_MEMORY(str);
315 if (strlen(str) == 0 || str[strlen(str)-1] != '/') {
316 info1->status = DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
320 str[strlen(str)-1] = '\0';
322 domain_filter = talloc_asprintf(mem_ctx,
323 "(&(&(&(dnsRoot=%s)(objectclass=crossRef)))(nETBIOSName=*)(ncName=*))",
324 ldb_binary_encode_string(mem_ctx, str));
325 W_ERROR_HAVE_NO_MEMORY(domain_filter);
329 case DRSUAPI_DS_NAME_FORMAT_NT4_ACCOUNT: {
332 const char *account = NULL;
334 domain = talloc_strdup(mem_ctx, name);
335 W_ERROR_HAVE_NO_MEMORY(domain);
337 p = strchr(domain, '\\');
339 /* invalid input format */
340 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
349 domain_filter = talloc_asprintf(mem_ctx,
350 "(&(&(nETBIOSName=%s)(objectclass=crossRef))(ncName=*))",
351 ldb_binary_encode_string(mem_ctx, domain));
352 W_ERROR_HAVE_NO_MEMORY(domain_filter);
354 result_filter = talloc_asprintf(mem_ctx, "(sAMAccountName=%s)",
355 ldb_binary_encode_string(mem_ctx, account));
356 W_ERROR_HAVE_NO_MEMORY(result_filter);
363 /* A LDAP DN as a string */
364 case DRSUAPI_DS_NAME_FORMAT_FQDN_1779: {
365 domain_filter = NULL;
366 name_dn = ldb_dn_new(mem_ctx, sam_ctx, name);
367 if (! ldb_dn_validate(name_dn)) {
368 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
374 /* A GUID as a string */
375 case DRSUAPI_DS_NAME_FORMAT_GUID: {
379 domain_filter = NULL;
381 nt_status = GUID_from_string(name, &guid);
382 if (!NT_STATUS_IS_OK(nt_status)) {
383 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
387 ldap_guid = ldap_encode_ndr_GUID(mem_ctx, &guid);
391 result_filter = talloc_asprintf(mem_ctx, "(objectGUID=%s)",
393 W_ERROR_HAVE_NO_MEMORY(result_filter);
396 case DRSUAPI_DS_NAME_FORMAT_DISPLAY: {
397 domain_filter = NULL;
399 result_filter = talloc_asprintf(mem_ctx, "(|(displayName=%s)(samAccountName=%s))",
400 ldb_binary_encode_string(mem_ctx, name),
401 ldb_binary_encode_string(mem_ctx, name));
402 W_ERROR_HAVE_NO_MEMORY(result_filter);
406 /* A S-1234-5678 style string */
407 case DRSUAPI_DS_NAME_FORMAT_SID_OR_SID_HISTORY: {
408 struct dom_sid *sid = dom_sid_parse_talloc(mem_ctx, name);
411 domain_filter = NULL;
413 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
416 ldap_sid = ldap_encode_ndr_dom_sid(mem_ctx,
421 result_filter = talloc_asprintf(mem_ctx, "(objectSid=%s)",
423 W_ERROR_HAVE_NO_MEMORY(result_filter);
426 case DRSUAPI_DS_NAME_FORMAT_USER_PRINCIPAL: {
427 krb5_principal principal;
429 ret = krb5_parse_name(smb_krb5_context->krb5_context, name, &principal);
431 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
435 domain_filter = NULL;
437 ret = krb5_unparse_name(smb_krb5_context->krb5_context, principal, &unparsed_name);
439 krb5_free_principal(smb_krb5_context->krb5_context, principal);
443 krb5_free_principal(smb_krb5_context->krb5_context, principal);
444 result_filter = talloc_asprintf(mem_ctx, "(&(objectClass=user)(userPrincipalName=%s))",
445 ldb_binary_encode_string(mem_ctx, unparsed_name));
448 W_ERROR_HAVE_NO_MEMORY(result_filter);
451 case DRSUAPI_DS_NAME_FORMAT_SERVICE_PRINCIPAL: {
452 krb5_principal principal;
453 char *unparsed_name_short;
455 ret = krb5_parse_name_flags(smb_krb5_context->krb5_context, name,
456 KRB5_PRINCIPAL_PARSE_NO_REALM, &principal);
458 /* perhaps it's a principal with a realm, so return the right 'domain only' response */
460 ret = krb5_parse_name_flags(smb_krb5_context->krb5_context, name,
461 KRB5_PRINCIPAL_PARSE_MUST_REALM, &principal);
463 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
467 /* This isn't an allocation assignemnt, so it is free'ed with the krb5_free_principal */
468 realm = krb5_princ_realm(smb_krb5_context->krb5_context, principal);
470 info1->dns_domain_name = talloc_strdup(info1, *realm);
471 krb5_free_principal(smb_krb5_context->krb5_context, principal);
473 W_ERROR_HAVE_NO_MEMORY(info1->dns_domain_name);
475 info1->status = DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY;
478 } else if (principal->name.name_string.len < 2) {
479 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
483 domain_filter = NULL;
485 ret = krb5_unparse_name_flags(smb_krb5_context->krb5_context, principal,
486 KRB5_PRINCIPAL_UNPARSE_NO_REALM, &unparsed_name_short);
488 krb5_free_principal(smb_krb5_context->krb5_context, principal);
492 service = principal->name.name_string.val[0];
493 if ((principal->name.name_string.len == 2) && (strcasecmp(service, "host") == 0)) {
494 /* the 'cn' attribute is just the leading part of the name */
496 computer_name = talloc_strndup(mem_ctx, principal->name.name_string.val[1],
497 strcspn(principal->name.name_string.val[1], "."));
498 if (computer_name == NULL) {
502 result_filter = talloc_asprintf(mem_ctx, "(|(&(servicePrincipalName=%s)(objectClass=user))(&(cn=%s)(objectClass=computer)))",
503 ldb_binary_encode_string(mem_ctx, unparsed_name_short),
504 ldb_binary_encode_string(mem_ctx, computer_name));
506 result_filter = talloc_asprintf(mem_ctx, "(&(servicePrincipalName=%s)(objectClass=user))",
507 ldb_binary_encode_string(mem_ctx, unparsed_name_short));
509 krb5_free_principal(smb_krb5_context->krb5_context, principal);
510 free(unparsed_name_short);
511 W_ERROR_HAVE_NO_MEMORY(result_filter);
516 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
522 if (format_flags & DRSUAPI_DS_NAME_FLAG_SYNTACTICAL_ONLY) {
523 return DsCrackNameOneSyntactical(mem_ctx, format_offered, format_desired,
524 name_dn, name, info1);
527 return DsCrackNameOneFilter(sam_ctx, mem_ctx,
529 format_flags, format_offered, format_desired,
531 domain_filter, result_filter,
535 /* Subcase of CrackNames. It is possible to translate a LDAP-style DN
536 * (FQDN_1779) into a canoical name without actually searching the
539 static WERROR DsCrackNameOneSyntactical(TALLOC_CTX *mem_ctx,
540 uint32_t format_offered, uint32_t format_desired,
541 struct ldb_dn *name_dn, const char *name,
542 struct drsuapi_DsNameInfo1 *info1)
545 if (format_offered != DRSUAPI_DS_NAME_FORMAT_FQDN_1779) {
546 info1->status = DRSUAPI_DS_NAME_STATUS_NO_SYNTACTICAL_MAPPING;
550 switch (format_desired) {
551 case DRSUAPI_DS_NAME_FORMAT_CANONICAL:
552 cracked = ldb_dn_canonical_string(mem_ctx, name_dn);
554 case DRSUAPI_DS_NAME_FORMAT_CANONICAL_EX:
555 cracked = ldb_dn_canonical_ex_string(mem_ctx, name_dn);
558 info1->status = DRSUAPI_DS_NAME_STATUS_NO_SYNTACTICAL_MAPPING;
561 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
562 info1->result_name = cracked;
570 /* Given a filter for the domain, and one for the result, perform the
571 * ldb search. The format offered and desired flags change the
572 * behaviours, including what attributes to return.
574 * The smb_krb5_context is required because we use the krb5 libs for principal parsing
577 static WERROR DsCrackNameOneFilter(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ctx,
578 struct smb_krb5_context *smb_krb5_context,
579 uint32_t format_flags, uint32_t format_offered, uint32_t format_desired,
580 struct ldb_dn *name_dn, const char *name,
581 const char *domain_filter, const char *result_filter,
582 struct drsuapi_DsNameInfo1 *info1)
585 struct ldb_message **domain_res = NULL;
586 const char * const *domain_attrs;
587 const char * const *result_attrs;
588 struct ldb_message **result_res = NULL;
589 struct ldb_dn *result_basedn;
590 struct ldb_dn *partitions_basedn = samdb_partitions_dn(sam_ctx, mem_ctx);
592 const char * const _domain_attrs_1779[] = { "ncName", "dnsRoot", NULL};
593 const char * const _result_attrs_null[] = { NULL };
595 const char * const _domain_attrs_canonical[] = { "ncName", "dnsRoot", NULL};
596 const char * const _result_attrs_canonical[] = { "canonicalName", NULL };
598 const char * const _domain_attrs_nt4[] = { "ncName", "dnsRoot", "nETBIOSName", NULL};
599 const char * const _result_attrs_nt4[] = { "sAMAccountName", "objectSid", NULL};
601 const char * const _domain_attrs_guid[] = { "ncName", "dnsRoot", NULL};
602 const char * const _result_attrs_guid[] = { "objectGUID", NULL};
604 const char * const _domain_attrs_display[] = { "ncName", "dnsRoot", NULL};
605 const char * const _result_attrs_display[] = { "displayName", "samAccountName", NULL};
607 /* here we need to set the attrs lists for domain and result lookups */
608 switch (format_desired) {
609 case DRSUAPI_DS_NAME_FORMAT_FQDN_1779:
610 case DRSUAPI_DS_NAME_FORMAT_CANONICAL_EX:
611 domain_attrs = _domain_attrs_1779;
612 result_attrs = _result_attrs_null;
614 case DRSUAPI_DS_NAME_FORMAT_CANONICAL:
615 domain_attrs = _domain_attrs_canonical;
616 result_attrs = _result_attrs_canonical;
618 case DRSUAPI_DS_NAME_FORMAT_NT4_ACCOUNT:
619 domain_attrs = _domain_attrs_nt4;
620 result_attrs = _result_attrs_nt4;
622 case DRSUAPI_DS_NAME_FORMAT_GUID:
623 domain_attrs = _domain_attrs_guid;
624 result_attrs = _result_attrs_guid;
626 case DRSUAPI_DS_NAME_FORMAT_DISPLAY:
627 domain_attrs = _domain_attrs_display;
628 result_attrs = _result_attrs_display;
635 /* if we have a domain_filter look it up and set the result_basedn and the dns_domain_name */
636 ldb_ret = gendb_search(sam_ctx, mem_ctx, partitions_basedn, &domain_res, domain_attrs,
637 "%s", domain_filter);
639 ldb_ret = gendb_search(sam_ctx, mem_ctx, partitions_basedn, &domain_res, domain_attrs,
640 "(ncName=%s)", ldb_dn_linearize(mem_ctx, samdb_base_dn(sam_ctx)));
647 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
650 info1->status = DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
653 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE;
657 info1->dns_domain_name = samdb_result_string(domain_res[0], "dnsRoot", NULL);
658 W_ERROR_HAVE_NO_MEMORY(info1->dns_domain_name);
659 info1->status = DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY;
662 result_basedn = samdb_result_dn(sam_ctx, mem_ctx, domain_res[0], "ncName", NULL);
664 ldb_ret = gendb_search(sam_ctx, mem_ctx, result_basedn, &result_res,
665 result_attrs, "%s", result_filter);
666 } else if (format_offered == DRSUAPI_DS_NAME_FORMAT_FQDN_1779) {
667 ldb_ret = gendb_search_dn(sam_ctx, mem_ctx, name_dn, &result_res,
670 name_dn = samdb_result_dn(sam_ctx, mem_ctx, domain_res[0], "ncName", NULL);
671 ldb_ret = gendb_search_dn(sam_ctx, mem_ctx, name_dn, &result_res,
679 switch (format_offered) {
680 case DRSUAPI_DS_NAME_FORMAT_SERVICE_PRINCIPAL:
681 return DsCrackNameSPNAlias(sam_ctx, mem_ctx,
683 format_flags, format_offered, format_desired,
686 case DRSUAPI_DS_NAME_FORMAT_USER_PRINCIPAL:
687 return DsCrackNameUPN(sam_ctx, mem_ctx, smb_krb5_context,
688 format_flags, format_offered, format_desired,
691 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
694 info1->status = DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR;
697 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE;
701 /* here we can use result_res[0] and domain_res[0] */
702 switch (format_desired) {
703 case DRSUAPI_DS_NAME_FORMAT_FQDN_1779: {
704 info1->result_name = ldb_dn_linearize(mem_ctx, result_res[0]->dn);
705 W_ERROR_HAVE_NO_MEMORY(info1->result_name);
707 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
710 case DRSUAPI_DS_NAME_FORMAT_CANONICAL: {
711 info1->result_name = samdb_result_string(result_res[0], "canonicalName", NULL);
712 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
715 case DRSUAPI_DS_NAME_FORMAT_CANONICAL_EX: {
716 /* Not in the virtual ldb attribute */
717 return DsCrackNameOneSyntactical(mem_ctx,
718 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
719 DRSUAPI_DS_NAME_FORMAT_CANONICAL_EX,
720 result_res[0]->dn, name, info1);
722 case DRSUAPI_DS_NAME_FORMAT_NT4_ACCOUNT: {
723 const struct dom_sid *sid = samdb_result_dom_sid(mem_ctx, result_res[0], "objectSid");
724 const char *_acc = "", *_dom = "";
726 if (!sid || (sid->num_auths < 4) || (sid->num_auths > 5)) {
727 info1->status = DRSUAPI_DS_NAME_STATUS_NO_MAPPING;
731 if (sid->num_auths == 4) {
732 ldb_ret = gendb_search(sam_ctx, mem_ctx, partitions_basedn, &domain_res, domain_attrs,
733 "(ncName=%s)", ldb_dn_linearize(mem_ctx, result_res[0]->dn));
735 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
738 _dom = samdb_result_string(domain_res[0], "nETBIOSName", NULL);
739 W_ERROR_HAVE_NO_MEMORY(_dom);
741 } else if (sid->num_auths == 5) {
742 const char *attrs[] = { NULL };
743 struct ldb_message **domain_res2;
744 struct dom_sid *dom_sid = dom_sid_dup(mem_ctx, sid);
748 dom_sid->num_auths--;
749 ldb_ret = gendb_search(sam_ctx, mem_ctx, NULL, &domain_res, attrs,
750 "(&(objectSid=%s)(objectClass=domain))", ldap_encode_ndr_dom_sid(mem_ctx, dom_sid));
752 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
755 ldb_ret = gendb_search(sam_ctx, mem_ctx, partitions_basedn, &domain_res2, domain_attrs,
756 "(ncName=%s)", ldb_dn_linearize(mem_ctx, domain_res[0]->dn));
758 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
762 _dom = samdb_result_string(domain_res2[0], "nETBIOSName", NULL);
763 W_ERROR_HAVE_NO_MEMORY(_dom);
765 _acc = samdb_result_string(result_res[0], "sAMAccountName", NULL);
766 W_ERROR_HAVE_NO_MEMORY(_acc);
769 info1->result_name = talloc_asprintf(mem_ctx, "%s\\%s", _dom, _acc);
770 W_ERROR_HAVE_NO_MEMORY(info1->result_name);
772 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
775 case DRSUAPI_DS_NAME_FORMAT_GUID: {
778 guid = samdb_result_guid(result_res[0], "objectGUID");
780 info1->result_name = GUID_string2(mem_ctx, &guid);
781 W_ERROR_HAVE_NO_MEMORY(info1->result_name);
783 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
786 case DRSUAPI_DS_NAME_FORMAT_DISPLAY: {
787 info1->result_name = samdb_result_string(result_res[0], "displayName", NULL);
788 if (!info1->result_name) {
789 info1->result_name = samdb_result_string(result_res[0], "sAMAccountName", NULL);
791 if (!info1->result_name) {
792 info1->status = DRSUAPI_DS_NAME_STATUS_NOT_FOUND;
794 info1->status = DRSUAPI_DS_NAME_STATUS_OK;
802 return WERR_INVALID_PARAM;
805 /* Given a user Principal Name (such as foo@bar.com),
806 * return the user and domain DNs. This is used in the KDC to then
807 * return the Keys and evaluate policy */
809 NTSTATUS crack_user_principal_name(struct ldb_context *sam_ctx,
811 const char *user_principal_name,
812 struct ldb_dn **user_dn,
813 struct ldb_dn **domain_dn)
816 struct drsuapi_DsNameInfo1 info1;
817 werr = DsCrackNameOneName(sam_ctx, mem_ctx, 0,
818 DRSUAPI_DS_NAME_FORMAT_USER_PRINCIPAL,
819 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
822 if (!W_ERROR_IS_OK(werr)) {
823 return werror_to_ntstatus(werr);
825 switch (info1.status) {
826 case DRSUAPI_DS_NAME_STATUS_OK:
828 case DRSUAPI_DS_NAME_STATUS_NOT_FOUND:
829 case DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY:
830 case DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE:
831 return NT_STATUS_NO_SUCH_USER;
832 case DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR:
834 return NT_STATUS_UNSUCCESSFUL;
837 *user_dn = ldb_dn_new(mem_ctx, sam_ctx, info1.result_name);
840 werr = DsCrackNameOneName(sam_ctx, mem_ctx, 0,
841 DRSUAPI_DS_NAME_FORMAT_CANONICAL,
842 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
843 talloc_asprintf(mem_ctx, "%s/",
844 info1.dns_domain_name),
846 if (!W_ERROR_IS_OK(werr)) {
847 return werror_to_ntstatus(werr);
849 switch (info1.status) {
850 case DRSUAPI_DS_NAME_STATUS_OK:
852 case DRSUAPI_DS_NAME_STATUS_NOT_FOUND:
853 case DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY:
854 case DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE:
855 return NT_STATUS_NO_SUCH_USER;
856 case DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR:
858 return NT_STATUS_UNSUCCESSFUL;
861 *domain_dn = ldb_dn_new(mem_ctx, sam_ctx, info1.result_name);
868 /* Given a Service Principal Name (such as host/foo.bar.com@BAR.COM),
869 * return the user and domain DNs. This is used in the KDC to then
870 * return the Keys and evaluate policy */
872 NTSTATUS crack_service_principal_name(struct ldb_context *sam_ctx,
874 const char *service_principal_name,
875 struct ldb_dn **user_dn,
876 struct ldb_dn **domain_dn)
879 struct drsuapi_DsNameInfo1 info1;
880 werr = DsCrackNameOneName(sam_ctx, mem_ctx, 0,
881 DRSUAPI_DS_NAME_FORMAT_SERVICE_PRINCIPAL,
882 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
883 service_principal_name,
885 if (!W_ERROR_IS_OK(werr)) {
886 return werror_to_ntstatus(werr);
888 switch (info1.status) {
889 case DRSUAPI_DS_NAME_STATUS_OK:
891 case DRSUAPI_DS_NAME_STATUS_NOT_FOUND:
892 case DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY:
893 case DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE:
894 return NT_STATUS_NO_SUCH_USER;
895 case DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR:
897 return NT_STATUS_UNSUCCESSFUL;
900 *user_dn = ldb_dn_new(mem_ctx, sam_ctx, info1.result_name);
903 werr = DsCrackNameOneName(sam_ctx, mem_ctx, 0,
904 DRSUAPI_DS_NAME_FORMAT_CANONICAL,
905 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
906 talloc_asprintf(mem_ctx, "%s/",
907 info1.dns_domain_name),
909 if (!W_ERROR_IS_OK(werr)) {
910 return werror_to_ntstatus(werr);
912 switch (info1.status) {
913 case DRSUAPI_DS_NAME_STATUS_OK:
915 case DRSUAPI_DS_NAME_STATUS_NOT_FOUND:
916 case DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY:
917 case DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE:
918 return NT_STATUS_NO_SUCH_USER;
919 case DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR:
921 return NT_STATUS_UNSUCCESSFUL;
924 *domain_dn = ldb_dn_new(mem_ctx, sam_ctx, info1.result_name);
931 NTSTATUS crack_dn_to_nt4_name(TALLOC_CTX *mem_ctx,
933 const char **nt4_domain, const char **nt4_account)
936 struct drsuapi_DsNameInfo1 info1;
937 struct ldb_context *ldb;
940 /* Handle anonymous bind */
947 ldb = samdb_connect(mem_ctx, system_session(mem_ctx));
949 return NT_STATUS_INTERNAL_DB_CORRUPTION;
952 werr = DsCrackNameOneName(ldb, mem_ctx, 0,
953 DRSUAPI_DS_NAME_FORMAT_FQDN_1779,
954 DRSUAPI_DS_NAME_FORMAT_NT4_ACCOUNT,
957 if (!W_ERROR_IS_OK(werr)) {
958 return werror_to_ntstatus(werr);
960 switch (info1.status) {
961 case DRSUAPI_DS_NAME_STATUS_OK:
963 case DRSUAPI_DS_NAME_STATUS_NOT_FOUND:
964 case DRSUAPI_DS_NAME_STATUS_DOMAIN_ONLY:
965 case DRSUAPI_DS_NAME_STATUS_NOT_UNIQUE:
966 return NT_STATUS_NO_SUCH_USER;
967 case DRSUAPI_DS_NAME_STATUS_RESOLVE_ERROR:
969 return NT_STATUS_UNSUCCESSFUL;
972 *nt4_domain = talloc_strdup(mem_ctx, info1.result_name);
974 p = strchr(*nt4_domain, '\\');
976 return NT_STATUS_INVALID_PARAMETER;
981 *nt4_account = talloc_strdup(mem_ctx, &p[1]);
984 if (!*nt4_account || !*nt4_domain) {
985 return NT_STATUS_NO_MEMORY;