#include "includes.h"
#ifdef HAVE_KRB5
static BOOL is_our_primary_domain(const char *domain)
{
int role = lp_server_role();
if ((role == ROLE_DOMAIN_MEMBER) && strequal(lp_workgroup(), domain)) {
return True;
} else if (strequal(get_global_sam_name(), domain)) {
return True;
}
return False;
}
#endif
static BOOL ads_dc_name(const char *domain,
const char *realm,
struct in_addr *dc_ip,
fstring srv_name)
{
ADS_STRUCT *ads;
char *sitename;
int i;
if (!realm && strequal(domain, lp_workgroup())) {
realm = lp_realm();
}
sitename = sitename_fetch(realm);
for( i =0 ; i < 3; i++) {
ads = ads_init(realm, domain, NULL);
if (!ads) {
SAFE_FREE(sitename);
return False;
}
DEBUG(4,("ads_dc_name: domain=%s\n", domain));
#ifdef HAVE_ADS
ads->auth.flags |= ADS_AUTH_NO_BIND;
ads_connect(ads);
#endif
if (!ads->config.realm) {
SAFE_FREE(sitename);
ads_destroy(&ads);
return False;
}
if (stored_sitename_changed(realm, sitename)) {
SAFE_FREE(sitename);
sitename = sitename_fetch(realm);
ads_destroy(&ads);
namecache_delete(realm, 0x1C);
namecache_delete(domain, 0x1C);
continue;
}
#ifdef HAVE_KRB5
if (is_our_primary_domain(domain) && (ads->config.flags & ADS_KDC) && ads_closest_dc(ads)) {
create_local_private_krb5_conf_for_domain(realm,
domain,
sitename,
ads->ldap_ip);
}
#endif
break;
}
if (i == 3) {
DEBUG(1,("ads_dc_name: sitename (now \"%s\") keeps changing ???\n",
sitename ? sitename : ""));
SAFE_FREE(sitename);
return False;
}
SAFE_FREE(sitename);
fstrcpy(srv_name, ads->config.ldap_server_name);
strupper_m(srv_name);
*dc_ip = ads->ldap_ip;
ads_destroy(&ads);
DEBUG(4,("ads_dc_name: using server='%s' IP=%s\n",
srv_name, inet_ntoa(*dc_ip)));
return True;
}
static BOOL rpc_dc_name(const char *domain, fstring srv_name, struct in_addr *ip_out)
{
struct ip_service *ip_list = NULL;
struct in_addr dc_ip, exclude_ip;
int count, i;
NTSTATUS result;
zero_ip(&exclude_ip);
if (!NT_STATUS_IS_OK(get_sorted_dc_list(domain, NULL, &ip_list, &count,
False))) {
DEBUG(3, ("Could not look up dc's for domain %s\n", domain));
return False;
}
for (i = 0; i < count; i++) {
if (is_zero_ip(ip_list[i].ip))
continue;
if (name_status_find(domain, 0x1c, 0x20, ip_list[i].ip, srv_name)) {
result = check_negative_conn_cache( domain, srv_name );
if ( NT_STATUS_IS_OK(result) ) {
dc_ip = ip_list[i].ip;
goto done;
}
}
}
SAFE_FREE(ip_list);
return False;
done:
DEBUG(3, ("rpc_dc_name: Returning DC %s (%s) for domain %s\n", srv_name,
inet_ntoa(dc_ip), domain));
*ip_out = dc_ip;
SAFE_FREE(ip_list);
return True;
}
BOOL get_dc_name(const char *domain, const char *realm, fstring srv_name, struct in_addr *ip_out)
{
struct in_addr dc_ip;
BOOL ret;
BOOL our_domain = False;
zero_ip(&dc_ip);
ret = False;
if ( strequal(lp_workgroup(), domain) || strequal(lp_realm(), realm) )
our_domain = True;
if ( (our_domain && lp_security()==SEC_ADS) || realm ) {
ret = ads_dc_name(domain, realm, &dc_ip, srv_name);
}
if (!domain) {
return False;
}
if (!ret) {
ret = rpc_dc_name(domain, srv_name, &dc_ip);
}
*ip_out = dc_ip;
return ret;
}