/* Unix SMB/CIFS implementation. LDAP protocol helper functions for SAMBA Copyright (C) Jean François Micouleau 1998 Copyright (C) Gerald Carter 2001-2003 Copyright (C) Shahms King 2001 Copyright (C) Andrew Bartlett 2002-2003 Copyright (C) Stefan (metze) Metzmacher 2002-2003 Copyright (C) Simo Sorce 2006 This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* TODO: * persistent connections: if using NSS LDAP, many connections are made * however, using only one within Samba would be nice * * Clean up SSL stuff, compile on OpenLDAP 1.x, 2.x, and Netscape SDK * * Other LDAP based login attributes: accountExpires, etc. * (should be the domain of Samba proper, but the sam_password/struct samu * structures don't have fields for some of these attributes) * * SSL is done, but can't get the certificate based authentication to work * against on my test platform (Linux 2.4, OpenLDAP 2.x) */ /* NOTE: this will NOT work against an Active Directory server * due to the fact that the two password fields cannot be retrieved * from a server; recommend using security = domain in this situation * and/or winbind */ #include "includes.h" #undef DBGC_CLASS #define DBGC_CLASS DBGC_PASSDB #include #include /* * Work around versions of the LDAP client libs that don't have the OIDs * defined, or have them defined under the old name. * This functionality is really a factor of the server, not the client * */ #if defined(LDAP_EXOP_X_MODIFY_PASSWD) && !defined(LDAP_EXOP_MODIFY_PASSWD) #define LDAP_EXOP_MODIFY_PASSWD LDAP_EXOP_X_MODIFY_PASSWD #elif !defined(LDAP_EXOP_MODIFY_PASSWD) #define LDAP_EXOP_MODIFY_PASSWD "1.3.6.1.4.1.4203.1.11.1" #endif #if defined(LDAP_EXOP_X_MODIFY_PASSWD_ID) && !defined(LDAP_EXOP_MODIFY_PASSWD_ID) #define LDAP_TAG_EXOP_MODIFY_PASSWD_ID LDAP_EXOP_X_MODIFY_PASSWD_ID #elif !defined(LDAP_EXOP_MODIFY_PASSWD_ID) #define LDAP_TAG_EXOP_MODIFY_PASSWD_ID ((ber_tag_t) 0x80U) #endif #if defined(LDAP_EXOP_X_MODIFY_PASSWD_NEW) && !defined(LDAP_EXOP_MODIFY_PASSWD_NEW) #define LDAP_TAG_EXOP_MODIFY_PASSWD_NEW LDAP_EXOP_X_MODIFY_PASSWD_NEW #elif !defined(LDAP_EXOP_MODIFY_PASSWD_NEW) #define LDAP_TAG_EXOP_MODIFY_PASSWD_NEW ((ber_tag_t) 0x82U) #endif #include "smbldap.h" /********************************************************************** Simple helper function to make stuff better readable **********************************************************************/ static LDAP *priv2ld(struct ldapsam_privates *priv) { return priv->smbldap_state->ldap_struct; } /********************************************************************** Get the attribute name given a user schame version. **********************************************************************/ static const char* get_userattr_key2string( int schema_ver, int key ) { switch ( schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: return get_attr_key2string( attrib_map_v22, key ); case SCHEMAVER_SAMBASAMACCOUNT: return get_attr_key2string( attrib_map_v30, key ); default: DEBUG(0,("get_userattr_key2string: unknown schema version specified\n")); break; } return NULL; } /********************************************************************** Return the list of attribute names given a user schema version. **********************************************************************/ const char** get_userattr_list( TALLOC_CTX *mem_ctx, int schema_ver ) { switch ( schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: return get_attr_list( mem_ctx, attrib_map_v22 ); case SCHEMAVER_SAMBASAMACCOUNT: return get_attr_list( mem_ctx, attrib_map_v30 ); default: DEBUG(0,("get_userattr_list: unknown schema version specified!\n")); break; } return NULL; } /************************************************************************** Return the list of attribute names to delete given a user schema version. **************************************************************************/ static const char** get_userattr_delete_list( TALLOC_CTX *mem_ctx, int schema_ver ) { switch ( schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: return get_attr_list( mem_ctx, attrib_map_to_delete_v22 ); case SCHEMAVER_SAMBASAMACCOUNT: return get_attr_list( mem_ctx, attrib_map_to_delete_v30 ); default: DEBUG(0,("get_userattr_delete_list: unknown schema version specified!\n")); break; } return NULL; } /******************************************************************* Generate the LDAP search filter for the objectclass based on the version of the schema we are using. ******************************************************************/ static const char* get_objclass_filter( int schema_ver ) { fstring objclass_filter; char *result; switch( schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: fstr_sprintf( objclass_filter, "(objectclass=%s)", LDAP_OBJ_SAMBAACCOUNT ); break; case SCHEMAVER_SAMBASAMACCOUNT: fstr_sprintf( objclass_filter, "(objectclass=%s)", LDAP_OBJ_SAMBASAMACCOUNT ); break; default: DEBUG(0,("get_objclass_filter: Invalid schema version specified!\n")); objclass_filter[0] = '\0'; break; } result = talloc_strdup(talloc_tos(), objclass_filter); SMB_ASSERT(result != NULL); return result; } /***************************************************************** Scan a sequence number off OpenLDAP's syncrepl contextCSN ******************************************************************/ static NTSTATUS ldapsam_get_seq_num(struct pdb_methods *my_methods, time_t *seq_num) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; NTSTATUS ntstatus = NT_STATUS_UNSUCCESSFUL; LDAPMessage *msg = NULL; LDAPMessage *entry = NULL; TALLOC_CTX *mem_ctx; char **values = NULL; int rc, num_result, num_values, rid; char *suffix = NULL; char *tok; const char *p; const char **attrs; /* Unfortunatly there is no proper way to detect syncrepl-support in * smbldap_connect_system(). The syncrepl OIDs are submitted for publication * but do not show up in the root-DSE yet. Neither we can query the * subschema-context for the syncProviderSubentry or syncConsumerSubentry * objectclass. Currently we require lp_ldap_suffix() to show up as * namingContext. - Guenther */ if (!lp_parm_bool(-1, "ldapsam", "syncrepl_seqnum", False)) { return ntstatus; } if (!seq_num) { DEBUG(3,("ldapsam_get_seq_num: no sequence_number\n")); return ntstatus; } if (!smbldap_has_naming_context(ldap_state->smbldap_state->ldap_struct, lp_ldap_suffix())) { DEBUG(3,("ldapsam_get_seq_num: DIT not configured to hold %s " "as top-level namingContext\n", lp_ldap_suffix())); return ntstatus; } mem_ctx = talloc_init("ldapsam_get_seq_num"); if (mem_ctx == NULL) return NT_STATUS_NO_MEMORY; if ((attrs = TALLOC_ARRAY(mem_ctx, const char *, 2)) == NULL) { ntstatus = NT_STATUS_NO_MEMORY; goto done; } /* if we got a syncrepl-rid (up to three digits long) we speak with a consumer */ rid = lp_parm_int(-1, "ldapsam", "syncrepl_rid", -1); if (rid > 0) { /* consumer syncreplCookie: */ /* csn=20050126161620Z#0000001#00#00000 */ attrs[0] = talloc_strdup(mem_ctx, "syncreplCookie"); attrs[1] = NULL; suffix = talloc_asprintf(mem_ctx, "cn=syncrepl%d,%s", rid, lp_ldap_suffix()); if (!suffix) { ntstatus = NT_STATUS_NO_MEMORY; goto done; } } else { /* provider contextCSN */ /* 20050126161620Z#000009#00#000000 */ attrs[0] = talloc_strdup(mem_ctx, "contextCSN"); attrs[1] = NULL; suffix = talloc_asprintf(mem_ctx, "cn=ldapsync,%s", lp_ldap_suffix()); if (!suffix) { ntstatus = NT_STATUS_NO_MEMORY; goto done; } } rc = smbldap_search(ldap_state->smbldap_state, suffix, LDAP_SCOPE_BASE, "(objectclass=*)", attrs, 0, &msg); if (rc != LDAP_SUCCESS) { goto done; } num_result = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, msg); if (num_result != 1) { DEBUG(3,("ldapsam_get_seq_num: Expected one entry, got %d\n", num_result)); goto done; } entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, msg); if (entry == NULL) { DEBUG(3,("ldapsam_get_seq_num: Could not retrieve entry\n")); goto done; } values = ldap_get_values(ldap_state->smbldap_state->ldap_struct, entry, attrs[0]); if (values == NULL) { DEBUG(3,("ldapsam_get_seq_num: no values\n")); goto done; } num_values = ldap_count_values(values); if (num_values == 0) { DEBUG(3,("ldapsam_get_seq_num: not a single value\n")); goto done; } p = values[0]; if (!next_token_talloc(mem_ctx, &p, &tok, "#")) { DEBUG(0,("ldapsam_get_seq_num: failed to parse sequence number\n")); goto done; } p = tok; if (!strncmp(p, "csn=", strlen("csn="))) p += strlen("csn="); DEBUG(10,("ldapsam_get_seq_num: got %s: %s\n", attrs[0], p)); *seq_num = generalized_to_unix_time(p); /* very basic sanity check */ if (*seq_num <= 0) { DEBUG(3,("ldapsam_get_seq_num: invalid sequence number: %d\n", (int)*seq_num)); goto done; } ntstatus = NT_STATUS_OK; done: if (values != NULL) ldap_value_free(values); if (msg != NULL) ldap_msgfree(msg); if (mem_ctx) talloc_destroy(mem_ctx); return ntstatus; } /******************************************************************* Run the search by name. ******************************************************************/ int ldapsam_search_suffix_by_name(struct ldapsam_privates *ldap_state, const char *user, LDAPMessage ** result, const char **attr) { char *filter = NULL; char *escape_user = escape_ldap_string_alloc(user); int ret = -1; if (!escape_user) { return LDAP_NO_MEMORY; } /* * in the filter expression, replace %u with the real name * so in ldap filter, %u MUST exist :-) */ filter = talloc_asprintf(talloc_tos(), "(&%s%s)", "(uid=%u)", get_objclass_filter(ldap_state->schema_ver)); if (!filter) { SAFE_FREE(escape_user); return LDAP_NO_MEMORY; } /* * have to use this here because $ is filtered out * in string_sub */ filter = talloc_all_string_sub(talloc_tos(), filter, "%u", escape_user); SAFE_FREE(escape_user); if (!filter) { return LDAP_NO_MEMORY; } ret = smbldap_search_suffix(ldap_state->smbldap_state, filter, attr, result); TALLOC_FREE(filter); return ret; } /******************************************************************* Run the search by rid. ******************************************************************/ static int ldapsam_search_suffix_by_rid (struct ldapsam_privates *ldap_state, uint32 rid, LDAPMessage ** result, const char **attr) { char *filter = NULL; int rc; filter = talloc_asprintf(talloc_tos(), "(&(rid=%i)%s)", rid, get_objclass_filter(ldap_state->schema_ver)); if (!filter) { return LDAP_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, attr, result); TALLOC_FREE(filter); return rc; } /******************************************************************* Run the search by SID. ******************************************************************/ static int ldapsam_search_suffix_by_sid (struct ldapsam_privates *ldap_state, const DOM_SID *sid, LDAPMessage ** result, const char **attr) { char *filter = NULL; int rc; fstring sid_string; filter = talloc_asprintf(talloc_tos(), "(&(%s=%s)%s)", get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), sid_to_fstring(sid_string, sid), get_objclass_filter(ldap_state->schema_ver)); if (!filter) { return LDAP_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, attr, result); TALLOC_FREE(filter); return rc; } /******************************************************************* Delete complete object or objectclass and attrs from object found in search_result depending on lp_ldap_delete_dn ******************************************************************/ static int ldapsam_delete_entry(struct ldapsam_privates *priv, TALLOC_CTX *mem_ctx, LDAPMessage *entry, const char *objectclass, const char **attrs) { LDAPMod **mods = NULL; char *name; const char *dn; BerElement *ptr = NULL; dn = smbldap_talloc_dn(mem_ctx, priv2ld(priv), entry); if (dn == NULL) { return LDAP_NO_MEMORY; } if (lp_ldap_delete_dn()) { return smbldap_delete(priv->smbldap_state, dn); } /* Ok, delete only the SAM attributes */ for (name = ldap_first_attribute(priv2ld(priv), entry, &ptr); name != NULL; name = ldap_next_attribute(priv2ld(priv), entry, ptr)) { const char **attrib; /* We are only allowed to delete the attributes that really exist. */ for (attrib = attrs; *attrib != NULL; attrib++) { if (strequal(*attrib, name)) { DEBUG(10, ("ldapsam_delete_entry: deleting " "attribute %s\n", name)); smbldap_set_mod(&mods, LDAP_MOD_DELETE, name, NULL); } } ldap_memfree(name); } if (ptr != NULL) { ber_free(ptr, 0); } smbldap_set_mod(&mods, LDAP_MOD_DELETE, "objectClass", objectclass); talloc_autofree_ldapmod(mem_ctx, mods); return smbldap_modify(priv->smbldap_state, dn, mods); } static time_t ldapsam_get_entry_timestamp( struct ldapsam_privates *ldap_state, LDAPMessage * entry) { char *temp; struct tm tm; temp = smbldap_talloc_single_attribute(ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver,LDAP_ATTR_MOD_TIMESTAMP), talloc_tos()); if (!temp) { return (time_t) 0; } if ( !strptime(temp, "%Y%m%d%H%M%SZ", &tm)) { DEBUG(2,("ldapsam_get_entry_timestamp: strptime failed on: %s\n", (char*)temp)); TALLOC_FREE(temp); return (time_t) 0; } TALLOC_FREE(temp); tzset(); return timegm(&tm); } /********************************************************************** Initialize struct samu from an LDAP query. (Based on init_sam_from_buffer in pdb_tdb.c) *********************************************************************/ static bool init_sam_from_ldap(struct ldapsam_privates *ldap_state, struct samu * sampass, LDAPMessage * entry) { time_t logon_time, logoff_time, kickoff_time, pass_last_set_time, pass_can_change_time, pass_must_change_time, ldap_entry_time, bad_password_time; char *username = NULL, *domain = NULL, *nt_username = NULL, *fullname = NULL, *homedir = NULL, *dir_drive = NULL, *logon_script = NULL, *profile_path = NULL, *acct_desc = NULL, *workstations = NULL, *munged_dial = NULL; uint32 user_rid; uint8 smblmpwd[LM_HASH_LEN], smbntpwd[NT_HASH_LEN]; bool use_samba_attrs = True; uint32 acct_ctrl = 0; uint16 logon_divs; uint16 bad_password_count = 0, logon_count = 0; uint32 hours_len; uint8 hours[MAX_HOURS_LEN]; char *temp = NULL; LOGIN_CACHE *cache_entry = NULL; uint32 pwHistLen; bool expand_explicit = lp_passdb_expand_explicit(); bool ret = false; TALLOC_CTX *ctx = talloc_init("init_sam_from_ldap"); if (!ctx) { return false; } if (sampass == NULL || ldap_state == NULL || entry == NULL) { DEBUG(0, ("init_sam_from_ldap: NULL parameters found!\n")); goto fn_exit; } if (priv2ld(ldap_state) == NULL) { DEBUG(0, ("init_sam_from_ldap: ldap_state->smbldap_state->" "ldap_struct is NULL!\n")); goto fn_exit; } if (!(username = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "uid", ctx))) { DEBUG(1, ("init_sam_from_ldap: No uid attribute found for " "this user!\n")); goto fn_exit; } DEBUG(2, ("init_sam_from_ldap: Entry found for user: %s\n", username)); nt_username = talloc_strdup(ctx, username); if (!nt_username) { goto fn_exit; } domain = talloc_strdup(ctx, ldap_state->domain_name); if (!domain) { goto fn_exit; } pdb_set_username(sampass, username, PDB_SET); pdb_set_domain(sampass, domain, PDB_DEFAULT); pdb_set_nt_username(sampass, nt_username, PDB_SET); /* deal with different attributes between the schema first */ if ( ldap_state->schema_ver == SCHEMAVER_SAMBASAMACCOUNT ) { if ((temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), ctx))!=NULL) { pdb_set_user_sid_from_string(sampass, temp, PDB_SET); } } else { if ((temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_RID), ctx))!=NULL) { user_rid = (uint32)atol(temp); pdb_set_user_sid_from_rid(sampass, user_rid, PDB_SET); } } if (pdb_get_init_flags(sampass,PDB_USERSID) == PDB_DEFAULT) { DEBUG(1, ("init_sam_from_ldap: no %s or %s attribute found for this user %s\n", get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_RID), username)); return False; } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_LAST_SET), ctx); if (temp) { pass_last_set_time = (time_t) atol(temp); pdb_set_pass_last_set_time(sampass, pass_last_set_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_TIME), ctx); if (temp) { logon_time = (time_t) atol(temp); pdb_set_logon_time(sampass, logon_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGOFF_TIME), ctx); if (temp) { logoff_time = (time_t) atol(temp); pdb_set_logoff_time(sampass, logoff_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_KICKOFF_TIME), ctx); if (temp) { kickoff_time = (time_t) atol(temp); pdb_set_kickoff_time(sampass, kickoff_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_CAN_CHANGE), ctx); if (temp) { pass_can_change_time = (time_t) atol(temp); pdb_set_pass_can_change_time(sampass, pass_can_change_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_MUST_CHANGE), ctx); if (temp) { pass_must_change_time = (time_t) atol(temp); pdb_set_pass_must_change_time(sampass, pass_must_change_time, PDB_SET); } /* recommend that 'gecos' and 'displayName' should refer to the same * attribute OID. userFullName depreciated, only used by Samba * primary rules of LDAP: don't make a new attribute when one is already defined * that fits your needs; using cn then displayName rather than 'userFullName' */ fullname = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_DISPLAY_NAME), ctx); if (fullname) { pdb_set_fullname(sampass, fullname, PDB_SET); } else { fullname = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_CN), ctx); if (fullname) { pdb_set_fullname(sampass, fullname, PDB_SET); } } dir_drive = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_HOME_DRIVE), ctx); if (dir_drive) { pdb_set_dir_drive(sampass, dir_drive, PDB_SET); } else { pdb_set_dir_drive( sampass, lp_logon_drive(), PDB_DEFAULT ); } homedir = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_HOME_PATH), ctx); if (homedir) { if (expand_explicit) { homedir = talloc_sub_basic(ctx, username, domain, homedir); if (!homedir) { goto fn_exit; } } pdb_set_homedir(sampass, homedir, PDB_SET); } else { pdb_set_homedir(sampass, talloc_sub_basic(ctx, username, domain, lp_logon_home()), PDB_DEFAULT); } logon_script = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_SCRIPT), ctx); if (logon_script) { if (expand_explicit) { logon_script = talloc_sub_basic(ctx, username, domain, logon_script); if (!logon_script) { goto fn_exit; } } pdb_set_logon_script(sampass, logon_script, PDB_SET); } else { pdb_set_logon_script(sampass, talloc_sub_basic(ctx, username, domain, lp_logon_script()), PDB_DEFAULT ); } profile_path = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PROFILE_PATH), ctx); if (profile_path) { if (expand_explicit) { profile_path = talloc_sub_basic(ctx, username, domain, profile_path); if (!profile_path) { goto fn_exit; } } pdb_set_profile_path(sampass, profile_path, PDB_SET); } else { pdb_set_profile_path(sampass, talloc_sub_basic(ctx, username, domain, lp_logon_path()), PDB_DEFAULT ); } acct_desc = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_DESC), ctx); if (acct_desc) { pdb_set_acct_desc(sampass, acct_desc, PDB_SET); } workstations = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_WKS), ctx); if (workstations) { pdb_set_workstations(sampass, workstations, PDB_SET); } munged_dial = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_MUNGED_DIAL), ctx); if (munged_dial) { pdb_set_munged_dial(sampass, munged_dial, PDB_SET); } /* FIXME: hours stuff should be cleaner */ logon_divs = 168; hours_len = 21; memset(hours, 0xff, hours_len); if (ldap_state->is_nds_ldap) { char *user_dn; size_t pwd_len; char clear_text_pw[512]; /* Make call to Novell eDirectory ldap extension to get clear text password. NOTE: This will only work if we have an SSL connection to eDirectory. */ user_dn = smbldap_get_dn(ldap_state->smbldap_state->ldap_struct, entry); if (user_dn != NULL) { DEBUG(3, ("init_sam_from_ldap: smbldap_get_dn(%s) returned '%s'\n", username, user_dn)); pwd_len = sizeof(clear_text_pw); if (pdb_nds_get_password(ldap_state->smbldap_state, user_dn, &pwd_len, clear_text_pw) == LDAP_SUCCESS) { nt_lm_owf_gen(clear_text_pw, smbntpwd, smblmpwd); if (!pdb_set_lanman_passwd(sampass, smblmpwd, PDB_SET)) { SAFE_FREE(user_dn); return False; } ZERO_STRUCT(smblmpwd); if (!pdb_set_nt_passwd(sampass, smbntpwd, PDB_SET)) { SAFE_FREE(user_dn); return False; } ZERO_STRUCT(smbntpwd); use_samba_attrs = False; } SAFE_FREE(user_dn); } else { DEBUG(0, ("init_sam_from_ldap: failed to get user_dn for '%s'\n", username)); } } if (use_samba_attrs) { temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LMPW), ctx); if (temp) { pdb_gethexpwd(temp, smblmpwd); memset((char *)temp, '\0', strlen(temp)+1); if (!pdb_set_lanman_passwd(sampass, smblmpwd, PDB_SET)) { goto fn_exit; } ZERO_STRUCT(smblmpwd); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_NTPW), ctx); if (temp) { pdb_gethexpwd(temp, smbntpwd); memset((char *)temp, '\0', strlen(temp)+1); if (!pdb_set_nt_passwd(sampass, smbntpwd, PDB_SET)) { goto fn_exit; } ZERO_STRUCT(smbntpwd); } } pwHistLen = 0; pdb_get_account_policy(AP_PASSWORD_HISTORY, &pwHistLen); if (pwHistLen > 0){ uint8 *pwhist = NULL; int i; char *history_string = TALLOC_ARRAY(ctx, char, MAX_PW_HISTORY_LEN*64); if (!history_string) { goto fn_exit; } pwHistLen = MIN(pwHistLen, MAX_PW_HISTORY_LEN); if ((pwhist = TALLOC_ARRAY(ctx, uint8, pwHistLen * PW_HISTORY_ENTRY_LEN)) == NULL){ DEBUG(0, ("init_sam_from_ldap: talloc failed!\n")); goto fn_exit; } memset(pwhist, '\0', pwHistLen * PW_HISTORY_ENTRY_LEN); if (smbldap_get_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_HISTORY), history_string, MAX_PW_HISTORY_LEN*64)) { bool hex_failed = false; for (i = 0; i < pwHistLen; i++){ /* Get the 16 byte salt. */ if (!pdb_gethexpwd(&history_string[i*64], &pwhist[i*PW_HISTORY_ENTRY_LEN])) { hex_failed = true; break; } /* Get the 16 byte MD5 hash of salt+passwd. */ if (!pdb_gethexpwd(&history_string[(i*64)+32], &pwhist[(i*PW_HISTORY_ENTRY_LEN)+ PW_HISTORY_SALT_LEN])) { hex_failed = True; break; } } if (hex_failed) { DEBUG(0,("init_sam_from_ldap: Failed to get password history for user %s\n", username)); memset(pwhist, '\0', pwHistLen * PW_HISTORY_ENTRY_LEN); } } if (!pdb_set_pw_history(sampass, pwhist, pwHistLen, PDB_SET)){ goto fn_exit; } } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_ACB_INFO), ctx); if (temp) { acct_ctrl = pdb_decode_acct_ctrl(temp); if (acct_ctrl == 0) { acct_ctrl |= ACB_NORMAL; } pdb_set_acct_ctrl(sampass, acct_ctrl, PDB_SET); } else { acct_ctrl |= ACB_NORMAL; } pdb_set_hours_len(sampass, hours_len, PDB_SET); pdb_set_logon_divs(sampass, logon_divs, PDB_SET); temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_BAD_PASSWORD_COUNT), ctx); if (temp) { bad_password_count = (uint32) atol(temp); pdb_set_bad_password_count(sampass, bad_password_count, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_BAD_PASSWORD_TIME), ctx); if (temp) { bad_password_time = (time_t) atol(temp); pdb_set_bad_password_time(sampass, bad_password_time, PDB_SET); } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_COUNT), ctx); if (temp) { logon_count = (uint32) atol(temp); pdb_set_logon_count(sampass, logon_count, PDB_SET); } /* pdb_set_unknown_6(sampass, unknown6, PDB_SET); */ temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_HOURS), ctx); if (temp) { pdb_gethexhours(temp, hours); memset((char *)temp, '\0', strlen(temp) +1); pdb_set_hours(sampass, hours, PDB_SET); ZERO_STRUCT(hours); } if (lp_parm_bool(-1, "ldapsam", "trusted", False)) { temp = smbldap_talloc_single_attribute( priv2ld(ldap_state), entry, "uidNumber", ctx); if (temp) { /* We've got a uid, feed the cache */ uid_t uid = strtoul(temp, NULL, 10); store_uid_sid_cache(pdb_get_user_sid(sampass), uid); } } /* check the timestamp of the cache vs ldap entry */ if (!(ldap_entry_time = ldapsam_get_entry_timestamp(ldap_state, entry))) { ret = true; goto fn_exit; } /* see if we have newer updates */ if (!(cache_entry = login_cache_read(sampass))) { DEBUG (9, ("No cache entry, bad count = %u, bad time = %u\n", (unsigned int)pdb_get_bad_password_count(sampass), (unsigned int)pdb_get_bad_password_time(sampass))); ret = true; goto fn_exit; } DEBUG(7, ("ldap time is %u, cache time is %u, bad time = %u\n", (unsigned int)ldap_entry_time, (unsigned int)cache_entry->entry_timestamp, (unsigned int)cache_entry->bad_password_time)); if (ldap_entry_time > cache_entry->entry_timestamp) { /* cache is older than directory , so we need to delete the entry but allow the fields to be written out */ login_cache_delentry(sampass); } else { /* read cache in */ pdb_set_acct_ctrl(sampass, pdb_get_acct_ctrl(sampass) | (cache_entry->acct_ctrl & ACB_AUTOLOCK), PDB_SET); pdb_set_bad_password_count(sampass, cache_entry->bad_password_count, PDB_SET); pdb_set_bad_password_time(sampass, cache_entry->bad_password_time, PDB_SET); } ret = true; fn_exit: TALLOC_FREE(ctx); SAFE_FREE(cache_entry); return ret; } /********************************************************************** Initialize the ldap db from a struct samu. Called on update. (Based on init_buffer_from_sam in pdb_tdb.c) *********************************************************************/ static bool init_ldap_from_sam (struct ldapsam_privates *ldap_state, LDAPMessage *existing, LDAPMod *** mods, struct samu * sampass, bool (*need_update)(const struct samu *, enum pdb_elements)) { char *temp = NULL; uint32 rid; if (mods == NULL || sampass == NULL) { DEBUG(0, ("init_ldap_from_sam: NULL parameters found!\n")); return False; } *mods = NULL; /* * took out adding "objectclass: sambaAccount" * do this on a per-mod basis */ if (need_update(sampass, PDB_USERNAME)) { smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, "uid", pdb_get_username(sampass)); if (ldap_state->is_nds_ldap) { smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, "cn", pdb_get_username(sampass)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, "sn", pdb_get_username(sampass)); } } DEBUG(2, ("init_ldap_from_sam: Setting entry for user: %s\n", pdb_get_username(sampass))); /* only update the RID if we actually need to */ if (need_update(sampass, PDB_USERSID)) { fstring sid_string; const DOM_SID *user_sid = pdb_get_user_sid(sampass); switch ( ldap_state->schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: if (!sid_peek_check_rid(&ldap_state->domain_sid, user_sid, &rid)) { DEBUG(1, ("init_ldap_from_sam: User's SID (%s) is not for this domain (%s), cannot add to LDAP!\n", sid_string_dbg(user_sid), sid_string_dbg( &ldap_state->domain_sid))); return False; } if (asprintf(&temp, "%i", rid) < 0) { return false; } smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_RID), temp); SAFE_FREE(temp); break; case SCHEMAVER_SAMBASAMACCOUNT: smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), sid_to_fstring(sid_string, user_sid)); break; default: DEBUG(0,("init_ldap_from_sam: unknown schema version specified\n")); break; } } /* we don't need to store the primary group RID - so leaving it 'free' to hang off the unix primary group makes life easier */ if (need_update(sampass, PDB_GROUPSID)) { fstring sid_string; const DOM_SID *group_sid = pdb_get_group_sid(sampass); switch ( ldap_state->schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: if (!sid_peek_check_rid(&ldap_state->domain_sid, group_sid, &rid)) { DEBUG(1, ("init_ldap_from_sam: User's Primary Group SID (%s) is not for this domain (%s), cannot add to LDAP!\n", sid_string_dbg(group_sid), sid_string_dbg( &ldap_state->domain_sid))); return False; } if (asprintf(&temp, "%i", rid) < 0) { return false; } smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PRIMARY_GROUP_RID), temp); SAFE_FREE(temp); break; case SCHEMAVER_SAMBASAMACCOUNT: smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PRIMARY_GROUP_SID), sid_to_fstring(sid_string, group_sid)); break; default: DEBUG(0,("init_ldap_from_sam: unknown schema version specified\n")); break; } } /* displayName, cn, and gecos should all be the same * most easily accomplished by giving them the same OID * gecos isn't set here b/c it should be handled by the * add-user script * We change displayName only and fall back to cn if * it does not exist. */ if (need_update(sampass, PDB_FULLNAME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_DISPLAY_NAME), pdb_get_fullname(sampass)); if (need_update(sampass, PDB_ACCTDESC)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_DESC), pdb_get_acct_desc(sampass)); if (need_update(sampass, PDB_WORKSTATIONS)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_WKS), pdb_get_workstations(sampass)); if (need_update(sampass, PDB_MUNGEDDIAL)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_MUNGED_DIAL), pdb_get_munged_dial(sampass)); if (need_update(sampass, PDB_SMBHOME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_HOME_PATH), pdb_get_homedir(sampass)); if (need_update(sampass, PDB_DRIVE)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_HOME_DRIVE), pdb_get_dir_drive(sampass)); if (need_update(sampass, PDB_LOGONSCRIPT)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_SCRIPT), pdb_get_logon_script(sampass)); if (need_update(sampass, PDB_PROFILE)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PROFILE_PATH), pdb_get_profile_path(sampass)); if (asprintf(&temp, "%li", pdb_get_logon_time(sampass)) < 0) { return false; } if (need_update(sampass, PDB_LOGONTIME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_TIME), temp); SAFE_FREE(temp); if (asprintf(&temp, "%li", pdb_get_logoff_time(sampass)) < 0) { return false; } if (need_update(sampass, PDB_LOGOFFTIME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGOFF_TIME), temp); SAFE_FREE(temp); if (asprintf(&temp, "%li", pdb_get_kickoff_time(sampass)) < 0) { return false; } if (need_update(sampass, PDB_KICKOFFTIME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_KICKOFF_TIME), temp); SAFE_FREE(temp); if (asprintf(&temp, "%li", pdb_get_pass_can_change_time_noncalc(sampass)) < 0) { return false; } if (need_update(sampass, PDB_CANCHANGETIME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_CAN_CHANGE), temp); SAFE_FREE(temp); if (asprintf(&temp, "%li", pdb_get_pass_must_change_time(sampass)) < 0) { return false; } if (need_update(sampass, PDB_MUSTCHANGETIME)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_MUST_CHANGE), temp); SAFE_FREE(temp); if ((pdb_get_acct_ctrl(sampass)&(ACB_WSTRUST|ACB_SVRTRUST|ACB_DOMTRUST)) || (lp_ldap_passwd_sync()!=LDAP_PASSWD_SYNC_ONLY)) { if (need_update(sampass, PDB_LMPASSWD)) { const uchar *lm_pw = pdb_get_lanman_passwd(sampass); if (lm_pw) { char pwstr[34]; pdb_sethexpwd(pwstr, lm_pw, pdb_get_acct_ctrl(sampass)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LMPW), pwstr); } else { smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LMPW), NULL); } } if (need_update(sampass, PDB_NTPASSWD)) { const uchar *nt_pw = pdb_get_nt_passwd(sampass); if (nt_pw) { char pwstr[34]; pdb_sethexpwd(pwstr, nt_pw, pdb_get_acct_ctrl(sampass)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_NTPW), pwstr); } else { smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_NTPW), NULL); } } if (need_update(sampass, PDB_PWHISTORY)) { char *pwstr = NULL; uint32 pwHistLen = 0; pdb_get_account_policy(AP_PASSWORD_HISTORY, &pwHistLen); pwstr = SMB_MALLOC_ARRAY(char, 1024); if (!pwstr) { return false; } if (pwHistLen == 0) { /* Remove any password history from the LDAP store. */ memset(pwstr, '0', 64); /* NOTE !!!! '0' *NOT '\0' */ pwstr[64] = '\0'; } else { int i; uint32 currHistLen = 0; const uint8 *pwhist = pdb_get_pw_history(sampass, &currHistLen); if (pwhist != NULL) { /* We can only store (1024-1/64 password history entries. */ pwHistLen = MIN(pwHistLen, ((1024-1)/64)); for (i=0; i< pwHistLen && i < currHistLen; i++) { /* Store the salt. */ pdb_sethexpwd(&pwstr[i*64], &pwhist[i*PW_HISTORY_ENTRY_LEN], 0); /* Followed by the md5 hash of salt + md4 hash */ pdb_sethexpwd(&pwstr[(i*64)+32], &pwhist[(i*PW_HISTORY_ENTRY_LEN)+PW_HISTORY_SALT_LEN], 0); DEBUG(100, ("pwstr=%s\n", pwstr)); } } } smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_HISTORY), pwstr); SAFE_FREE(pwstr); } if (need_update(sampass, PDB_PASSLASTSET)) { if (asprintf(&temp, "%li", pdb_get_pass_last_set_time(sampass)) < 0) { return false; } smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_PWD_LAST_SET), temp); SAFE_FREE(temp); } } if (need_update(sampass, PDB_HOURS)) { const uint8 *hours = pdb_get_hours(sampass); if (hours) { char hourstr[44]; pdb_sethexhours(hourstr, hours); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_LOGON_HOURS), hourstr); } } if (need_update(sampass, PDB_ACCTCTRL)) smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_ACB_INFO), pdb_encode_acct_ctrl (pdb_get_acct_ctrl(sampass), NEW_PW_FORMAT_SPACE_PADDED_LEN)); /* password lockout cache: - If we are now autolocking or clearing, we write to ldap - If we are clearing, we delete the cache entry - If the count is > 0, we update the cache This even means when autolocking, we cache, just in case the update doesn't work, and we have to cache the autolock flag */ if (need_update(sampass, PDB_BAD_PASSWORD_COUNT)) /* && need_update(sampass, PDB_BAD_PASSWORD_TIME)) */ { uint16 badcount = pdb_get_bad_password_count(sampass); time_t badtime = pdb_get_bad_password_time(sampass); uint32 pol; pdb_get_account_policy(AP_BAD_ATTEMPT_LOCKOUT, &pol); DEBUG(3, ("updating bad password fields, policy=%u, count=%u, time=%u\n", (unsigned int)pol, (unsigned int)badcount, (unsigned int)badtime)); if ((badcount >= pol) || (badcount == 0)) { DEBUG(7, ("making mods to update ldap, count=%u, time=%u\n", (unsigned int)badcount, (unsigned int)badtime)); if (asprintf(&temp, "%li", (long)badcount) < 0) { return false; } smbldap_make_mod( ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string( ldap_state->schema_ver, LDAP_ATTR_BAD_PASSWORD_COUNT), temp); SAFE_FREE(temp); if (asprintf(&temp, "%li", badtime) < 0) { return false; } smbldap_make_mod( ldap_state->smbldap_state->ldap_struct, existing, mods, get_userattr_key2string( ldap_state->schema_ver, LDAP_ATTR_BAD_PASSWORD_TIME), temp); SAFE_FREE(temp); } if (badcount == 0) { DEBUG(7, ("bad password count is reset, deleting login cache entry for %s\n", pdb_get_nt_username(sampass))); login_cache_delentry(sampass); } else { LOGIN_CACHE cache_entry; cache_entry.entry_timestamp = time(NULL); cache_entry.acct_ctrl = pdb_get_acct_ctrl(sampass); cache_entry.bad_password_count = badcount; cache_entry.bad_password_time = badtime; DEBUG(7, ("Updating bad password count and time in login cache\n")); login_cache_write(sampass, cache_entry); } } return True; } /********************************************************************** End enumeration of the LDAP password list. *********************************************************************/ static void ldapsam_endsampwent(struct pdb_methods *my_methods) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; if (ldap_state->result) { ldap_msgfree(ldap_state->result); ldap_state->result = NULL; } } static void append_attr(TALLOC_CTX *mem_ctx, const char ***attr_list, const char *new_attr) { int i; if (new_attr == NULL) { return; } for (i=0; (*attr_list)[i] != NULL; i++) { ; } (*attr_list) = TALLOC_REALLOC_ARRAY(mem_ctx, (*attr_list), const char *, i+2); SMB_ASSERT((*attr_list) != NULL); (*attr_list)[i] = talloc_strdup((*attr_list), new_attr); (*attr_list)[i+1] = NULL; } /********************************************************************** Get struct samu entry from LDAP by username. *********************************************************************/ static NTSTATUS ldapsam_getsampwnam(struct pdb_methods *my_methods, struct samu *user, const char *sname) { NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; const char ** attr_list; int rc; attr_list = get_userattr_list( user, ldap_state->schema_ver ); append_attr(user, &attr_list, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_MOD_TIMESTAMP)); append_attr(user, &attr_list, "uidNumber"); rc = ldapsam_search_suffix_by_name(ldap_state, sname, &result, attr_list); TALLOC_FREE( attr_list ); if ( rc != LDAP_SUCCESS ) return NT_STATUS_NO_SUCH_USER; count = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (count < 1) { DEBUG(4, ("ldapsam_getsampwnam: Unable to locate user [%s] count=%d\n", sname, count)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } else if (count > 1) { DEBUG(1, ("ldapsam_getsampwnam: Duplicate entries for this user [%s] Failing. count=%d\n", sname, count)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); if (entry) { if (!init_sam_from_ldap(ldap_state, user, entry)) { DEBUG(1,("ldapsam_getsampwnam: init_sam_from_ldap failed for user '%s'!\n", sname)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } pdb_set_backend_private_data(user, result, NULL, my_methods, PDB_CHANGED); talloc_autofree_ldapmsg(user, result); ret = NT_STATUS_OK; } else { ldap_msgfree(result); } return ret; } static int ldapsam_get_ldap_user_by_sid(struct ldapsam_privates *ldap_state, const DOM_SID *sid, LDAPMessage **result) { int rc = -1; const char ** attr_list; uint32 rid; switch ( ldap_state->schema_ver ) { case SCHEMAVER_SAMBASAMACCOUNT: { TALLOC_CTX *tmp_ctx = talloc_new(NULL); if (tmp_ctx == NULL) { return LDAP_NO_MEMORY; } attr_list = get_userattr_list(tmp_ctx, ldap_state->schema_ver); append_attr(tmp_ctx, &attr_list, get_userattr_key2string( ldap_state->schema_ver, LDAP_ATTR_MOD_TIMESTAMP)); append_attr(tmp_ctx, &attr_list, "uidNumber"); rc = ldapsam_search_suffix_by_sid(ldap_state, sid, result, attr_list); TALLOC_FREE(tmp_ctx); if ( rc != LDAP_SUCCESS ) return rc; break; } case SCHEMAVER_SAMBAACCOUNT: if (!sid_peek_check_rid(&ldap_state->domain_sid, sid, &rid)) { return rc; } attr_list = get_userattr_list(NULL, ldap_state->schema_ver); rc = ldapsam_search_suffix_by_rid(ldap_state, rid, result, attr_list ); TALLOC_FREE( attr_list ); if ( rc != LDAP_SUCCESS ) return rc; break; } return rc; } /********************************************************************** Get struct samu entry from LDAP by SID. *********************************************************************/ static NTSTATUS ldapsam_getsampwsid(struct pdb_methods *my_methods, struct samu * user, const DOM_SID *sid) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; int rc; rc = ldapsam_get_ldap_user_by_sid(ldap_state, sid, &result); if (rc != LDAP_SUCCESS) return NT_STATUS_NO_SUCH_USER; count = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (count < 1) { DEBUG(4, ("ldapsam_getsampwsid: Unable to locate SID [%s] " "count=%d\n", sid_string_dbg(sid), count)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } else if (count > 1) { DEBUG(1, ("ldapsam_getsampwsid: More than one user with SID " "[%s]. Failing. count=%d\n", sid_string_dbg(sid), count)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); if (!entry) { ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } if (!init_sam_from_ldap(ldap_state, user, entry)) { DEBUG(1,("ldapsam_getsampwsid: init_sam_from_ldap failed!\n")); ldap_msgfree(result); return NT_STATUS_NO_SUCH_USER; } pdb_set_backend_private_data(user, result, NULL, my_methods, PDB_CHANGED); talloc_autofree_ldapmsg(user, result); return NT_STATUS_OK; } /******************************************************************** Do the actual modification - also change a plaintext passord if it it set. **********************************************************************/ static NTSTATUS ldapsam_modify_entry(struct pdb_methods *my_methods, struct samu *newpwd, char *dn, LDAPMod **mods, int ldap_op, bool (*need_update)(const struct samu *, enum pdb_elements)) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; int rc; if (!newpwd || !dn) { return NT_STATUS_INVALID_PARAMETER; } if (!mods) { DEBUG(5,("ldapsam_modify_entry: mods is empty: nothing to modify\n")); /* may be password change below however */ } else { switch(ldap_op) { case LDAP_MOD_ADD: if (ldap_state->is_nds_ldap) { smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectclass", "inetOrgPerson"); } else { smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectclass", LDAP_OBJ_ACCOUNT); } rc = smbldap_add(ldap_state->smbldap_state, dn, mods); break; case LDAP_MOD_REPLACE: rc = smbldap_modify(ldap_state->smbldap_state, dn ,mods); break; default: DEBUG(0,("ldapsam_modify_entry: Wrong LDAP operation type: %d!\n", ldap_op)); return NT_STATUS_INVALID_PARAMETER; } if (rc!=LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } } if (!(pdb_get_acct_ctrl(newpwd)&(ACB_WSTRUST|ACB_SVRTRUST|ACB_DOMTRUST)) && (lp_ldap_passwd_sync() != LDAP_PASSWD_SYNC_OFF) && need_update(newpwd, PDB_PLAINTEXT_PW) && (pdb_get_plaintext_passwd(newpwd)!=NULL)) { BerElement *ber; struct berval *bv; char *retoid = NULL; struct berval *retdata = NULL; char *utf8_password; char *utf8_dn; if (!ldap_state->is_nds_ldap) { if (!smbldap_has_extension(ldap_state->smbldap_state->ldap_struct, LDAP_EXOP_MODIFY_PASSWD)) { DEBUG(2, ("ldap password change requested, but LDAP " "server does not support it -- ignoring\n")); return NT_STATUS_OK; } } if (push_utf8_allocate(&utf8_password, pdb_get_plaintext_passwd(newpwd)) == (size_t)-1) { return NT_STATUS_NO_MEMORY; } if (push_utf8_allocate(&utf8_dn, dn) == (size_t)-1) { SAFE_FREE(utf8_password); return NT_STATUS_NO_MEMORY; } if ((ber = ber_alloc_t(LBER_USE_DER))==NULL) { DEBUG(0,("ber_alloc_t returns NULL\n")); SAFE_FREE(utf8_password); SAFE_FREE(utf8_dn); return NT_STATUS_UNSUCCESSFUL; } ber_printf (ber, "{"); ber_printf (ber, "ts", LDAP_TAG_EXOP_MODIFY_PASSWD_ID, utf8_dn); ber_printf (ber, "ts", LDAP_TAG_EXOP_MODIFY_PASSWD_NEW, utf8_password); ber_printf (ber, "n}"); if ((rc = ber_flatten (ber, &bv))<0) { DEBUG(0,("ldapsam_modify_entry: ber_flatten returns a value <0\n")); ber_free(ber,1); SAFE_FREE(utf8_dn); SAFE_FREE(utf8_password); return NT_STATUS_UNSUCCESSFUL; } SAFE_FREE(utf8_dn); SAFE_FREE(utf8_password); ber_free(ber, 1); if (!ldap_state->is_nds_ldap) { rc = smbldap_extended_operation(ldap_state->smbldap_state, LDAP_EXOP_MODIFY_PASSWD, bv, NULL, NULL, &retoid, &retdata); } else { rc = pdb_nds_set_password(ldap_state->smbldap_state, dn, pdb_get_plaintext_passwd(newpwd)); } if (rc != LDAP_SUCCESS) { char *ld_error = NULL; if (rc == LDAP_OBJECT_CLASS_VIOLATION) { DEBUG(3, ("Could not set userPassword " "attribute due to an objectClass " "violation -- ignoring\n")); ber_bvfree(bv); return NT_STATUS_OK; } ldap_get_option(ldap_state->smbldap_state->ldap_struct, LDAP_OPT_ERROR_STRING, &ld_error); DEBUG(0,("ldapsam_modify_entry: LDAP Password could not be changed for user %s: %s\n\t%s\n", pdb_get_username(newpwd), ldap_err2string(rc), ld_error?ld_error:"unknown")); SAFE_FREE(ld_error); ber_bvfree(bv); #if defined(LDAP_CONSTRAINT_VIOLATION) if (rc == LDAP_CONSTRAINT_VIOLATION) return NT_STATUS_PASSWORD_RESTRICTION; #endif return NT_STATUS_UNSUCCESSFUL; } else { DEBUG(3,("ldapsam_modify_entry: LDAP Password changed for user %s\n",pdb_get_username(newpwd))); #ifdef DEBUG_PASSWORD DEBUG(100,("ldapsam_modify_entry: LDAP Password changed to %s\n",pdb_get_plaintext_passwd(newpwd))); #endif if (retdata) ber_bvfree(retdata); if (retoid) ldap_memfree(retoid); } ber_bvfree(bv); } return NT_STATUS_OK; } /********************************************************************** Delete entry from LDAP for username. *********************************************************************/ static NTSTATUS ldapsam_delete_sam_account(struct pdb_methods *my_methods, struct samu * sam_acct) { struct ldapsam_privates *priv = (struct ldapsam_privates *)my_methods->private_data; const char *sname; int rc; LDAPMessage *msg, *entry; NTSTATUS result = NT_STATUS_NO_MEMORY; const char **attr_list; TALLOC_CTX *mem_ctx; if (!sam_acct) { DEBUG(0, ("ldapsam_delete_sam_account: sam_acct was NULL!\n")); return NT_STATUS_INVALID_PARAMETER; } sname = pdb_get_username(sam_acct); DEBUG(3, ("ldapsam_delete_sam_account: Deleting user %s from " "LDAP.\n", sname)); mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); goto done; } attr_list = get_userattr_delete_list(mem_ctx, priv->schema_ver ); if (attr_list == NULL) { goto done; } rc = ldapsam_search_suffix_by_name(priv, sname, &msg, attr_list); if ((rc != LDAP_SUCCESS) || (ldap_count_entries(priv2ld(priv), msg) != 1) || ((entry = ldap_first_entry(priv2ld(priv), msg)) == NULL)) { DEBUG(5, ("Could not find user %s\n", sname)); result = NT_STATUS_NO_SUCH_USER; goto done; } rc = ldapsam_delete_entry( priv, mem_ctx, entry, priv->schema_ver == SCHEMAVER_SAMBASAMACCOUNT ? LDAP_OBJ_SAMBASAMACCOUNT : LDAP_OBJ_SAMBAACCOUNT, attr_list); result = (rc == LDAP_SUCCESS) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED; done: TALLOC_FREE(mem_ctx); return result; } /********************************************************************** Helper function to determine for update_sam_account whether we need LDAP modification. *********************************************************************/ static bool element_is_changed(const struct samu *sampass, enum pdb_elements element) { return IS_SAM_CHANGED(sampass, element); } /********************************************************************** Update struct samu. *********************************************************************/ static NTSTATUS ldapsam_update_sam_account(struct pdb_methods *my_methods, struct samu * newpwd) { NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; int rc = 0; char *dn; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; LDAPMod **mods = NULL; const char **attr_list; result = (LDAPMessage *)pdb_get_backend_private_data(newpwd, my_methods); if (!result) { attr_list = get_userattr_list(NULL, ldap_state->schema_ver); if (pdb_get_username(newpwd) == NULL) { return NT_STATUS_INVALID_PARAMETER; } rc = ldapsam_search_suffix_by_name(ldap_state, pdb_get_username(newpwd), &result, attr_list ); TALLOC_FREE( attr_list ); if (rc != LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } pdb_set_backend_private_data(newpwd, result, NULL, my_methods, PDB_CHANGED); talloc_autofree_ldapmsg(newpwd, result); } if (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result) == 0) { DEBUG(0, ("ldapsam_update_sam_account: No user to modify!\n")); return NT_STATUS_UNSUCCESSFUL; } entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); dn = smbldap_get_dn(ldap_state->smbldap_state->ldap_struct, entry); if (!dn) { return NT_STATUS_UNSUCCESSFUL; } DEBUG(4, ("ldapsam_update_sam_account: user %s to be modified has dn: %s\n", pdb_get_username(newpwd), dn)); if (!init_ldap_from_sam(ldap_state, entry, &mods, newpwd, element_is_changed)) { DEBUG(0, ("ldapsam_update_sam_account: init_ldap_from_sam failed!\n")); SAFE_FREE(dn); if (mods != NULL) ldap_mods_free(mods,True); return NT_STATUS_UNSUCCESSFUL; } if (mods == NULL) { DEBUG(4,("ldapsam_update_sam_account: mods is empty: nothing to update for user: %s\n", pdb_get_username(newpwd))); SAFE_FREE(dn); return NT_STATUS_OK; } ret = ldapsam_modify_entry(my_methods,newpwd,dn,mods,LDAP_MOD_REPLACE, element_is_changed); ldap_mods_free(mods,True); SAFE_FREE(dn); /* * We need to set the backend private data to NULL here. For example * setuserinfo level 25 does a pdb_update_sam_account twice on the * same one, and with the explicit delete / add logic for attribute * values the second time we would use the wrong "old" value which * does not exist in LDAP anymore. Thus the LDAP server would refuse * the update. * The existing LDAPMessage is still being auto-freed by the * destructor. */ pdb_set_backend_private_data(newpwd, NULL, NULL, my_methods, PDB_CHANGED); if (!NT_STATUS_IS_OK(ret)) { return ret; } DEBUG(2, ("ldapsam_update_sam_account: successfully modified uid = %s in the LDAP database\n", pdb_get_username(newpwd))); return NT_STATUS_OK; } /*************************************************************************** Renames a struct samu - The "rename user script" has full responsibility for changing everything ***************************************************************************/ static NTSTATUS ldapsam_rename_sam_account(struct pdb_methods *my_methods, struct samu *old_acct, const char *newname) { const char *oldname; int rc; char *rename_script = NULL; fstring oldname_lower, newname_lower; if (!old_acct) { DEBUG(0, ("ldapsam_rename_sam_account: old_acct was NULL!\n")); return NT_STATUS_INVALID_PARAMETER; } if (!newname) { DEBUG(0, ("ldapsam_rename_sam_account: newname was NULL!\n")); return NT_STATUS_INVALID_PARAMETER; } oldname = pdb_get_username(old_acct); /* rename the posix user */ rename_script = SMB_STRDUP(lp_renameuser_script()); if (rename_script == NULL) { return NT_STATUS_NO_MEMORY; } if (!(*rename_script)) { SAFE_FREE(rename_script); return NT_STATUS_ACCESS_DENIED; } DEBUG (3, ("ldapsam_rename_sam_account: Renaming user %s to %s.\n", oldname, newname)); /* We have to allow the account name to end with a '$'. Also, follow the semantics in _samr_create_user() and lower case the posix name but preserve the case in passdb */ fstrcpy( oldname_lower, oldname ); strlower_m( oldname_lower ); fstrcpy( newname_lower, newname ); strlower_m( newname_lower ); rename_script = realloc_string_sub2(rename_script, "%unew", newname_lower, true, true); if (rename_script) { return NT_STATUS_NO_MEMORY; } rename_script = realloc_string_sub2(rename_script, "%uold", oldname_lower, true, true); rc = smbrun(rename_script, NULL); DEBUG(rc ? 0 : 3,("Running the command `%s' gave %d\n", rename_script, rc)); SAFE_FREE(rename_script); if (rc == 0) { smb_nscd_flush_user_cache(); } if (rc) return NT_STATUS_UNSUCCESSFUL; return NT_STATUS_OK; } /********************************************************************** Helper function to determine for update_sam_account whether we need LDAP modification. *********************************************************************/ static bool element_is_set_or_changed(const struct samu *sampass, enum pdb_elements element) { return (IS_SAM_SET(sampass, element) || IS_SAM_CHANGED(sampass, element)); } /********************************************************************** Add struct samu to LDAP. *********************************************************************/ static NTSTATUS ldapsam_add_sam_account(struct pdb_methods *my_methods, struct samu * newpwd) { NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; int rc; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; LDAPMod **mods = NULL; int ldap_op = LDAP_MOD_REPLACE; uint32 num_result; const char **attr_list; char *escape_user = NULL; const char *username = pdb_get_username(newpwd); const DOM_SID *sid = pdb_get_user_sid(newpwd); char *filter = NULL; char *dn = NULL; NTSTATUS status = NT_STATUS_UNSUCCESSFUL; TALLOC_CTX *ctx = talloc_init("ldapsam_add_sam_account"); if (!ctx) { return NT_STATUS_NO_MEMORY; } if (!username || !*username) { DEBUG(0, ("ldapsam_add_sam_account: Cannot add user without a username!\n")); status = NT_STATUS_INVALID_PARAMETER; goto fn_exit; } /* free this list after the second search or in case we exit on failure */ attr_list = get_userattr_list(ctx, ldap_state->schema_ver); rc = ldapsam_search_suffix_by_name (ldap_state, username, &result, attr_list); if (rc != LDAP_SUCCESS) { goto fn_exit; } if (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result) != 0) { DEBUG(0,("ldapsam_add_sam_account: User '%s' already in the base, with samba attributes\n", username)); goto fn_exit; } ldap_msgfree(result); result = NULL; if (element_is_set_or_changed(newpwd, PDB_USERSID)) { rc = ldapsam_get_ldap_user_by_sid(ldap_state, sid, &result); if (rc == LDAP_SUCCESS) { if (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result) != 0) { DEBUG(0,("ldapsam_add_sam_account: SID '%s' " "already in the base, with samba " "attributes\n", sid_string_dbg(sid))); goto fn_exit; } ldap_msgfree(result); result = NULL; } } /* does the entry already exist but without a samba attributes? we need to return the samba attributes here */ escape_user = escape_ldap_string_alloc( username ); filter = talloc_strdup(attr_list, "(uid=%u)"); if (!filter) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } filter = talloc_all_string_sub(attr_list, filter, "%u", escape_user); if (!filter) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } SAFE_FREE(escape_user); rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, attr_list, &result); if ( rc != LDAP_SUCCESS ) { goto fn_exit; } num_result = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (num_result > 1) { DEBUG (0, ("ldapsam_add_sam_account: More than one user with that uid exists: bailing out!\n")); goto fn_exit; } /* Check if we need to update an existing entry */ if (num_result == 1) { char *tmp; DEBUG(3,("ldapsam_add_sam_account: User exists without samba attributes: adding them\n")); ldap_op = LDAP_MOD_REPLACE; entry = ldap_first_entry (ldap_state->smbldap_state->ldap_struct, result); tmp = smbldap_get_dn(ldap_state->smbldap_state->ldap_struct, entry); if (!tmp) { goto fn_exit; } dn = talloc_asprintf(ctx, "%s", tmp); SAFE_FREE(tmp); if (!dn) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } } else if (ldap_state->schema_ver == SCHEMAVER_SAMBASAMACCOUNT) { /* There might be a SID for this account already - say an idmap entry */ filter = talloc_asprintf(ctx, "(&(%s=%s)(|(objectClass=%s)(objectClass=%s)))", get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), sid_string_talloc(ctx, sid), LDAP_OBJ_IDMAP_ENTRY, LDAP_OBJ_SID_ENTRY); if (!filter) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } /* free old result before doing a new search */ if (result != NULL) { ldap_msgfree(result); result = NULL; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, attr_list, &result); if ( rc != LDAP_SUCCESS ) { goto fn_exit; } num_result = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (num_result > 1) { DEBUG (0, ("ldapsam_add_sam_account: More than one user with specified Sid exists: bailing out!\n")); goto fn_exit; } /* Check if we need to update an existing entry */ if (num_result == 1) { char *tmp; DEBUG(3,("ldapsam_add_sam_account: User exists without samba attributes: adding them\n")); ldap_op = LDAP_MOD_REPLACE; entry = ldap_first_entry (ldap_state->smbldap_state->ldap_struct, result); tmp = smbldap_get_dn (ldap_state->smbldap_state->ldap_struct, entry); if (!tmp) { goto fn_exit; } dn = talloc_asprintf(ctx, "%s", tmp); SAFE_FREE(tmp); if (!dn) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } } } if (num_result == 0) { char *escape_username; /* Check if we need to add an entry */ DEBUG(3,("ldapsam_add_sam_account: Adding new user\n")); ldap_op = LDAP_MOD_ADD; escape_username = escape_rdn_val_string_alloc(username); if (!escape_username) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } if (username[strlen(username)-1] == '$') { dn = talloc_asprintf(ctx, "uid=%s,%s", escape_username, lp_ldap_machine_suffix()); } else { dn = talloc_asprintf(ctx, "uid=%s,%s", escape_username, lp_ldap_user_suffix()); } SAFE_FREE(escape_username); if (!dn) { status = NT_STATUS_NO_MEMORY; goto fn_exit; } } if (!init_ldap_from_sam(ldap_state, entry, &mods, newpwd, element_is_set_or_changed)) { DEBUG(0, ("ldapsam_add_sam_account: init_ldap_from_sam failed!\n")); if (mods != NULL) { ldap_mods_free(mods, true); } goto fn_exit; } if (mods == NULL) { DEBUG(0,("ldapsam_add_sam_account: mods is empty: nothing to add for user: %s\n",pdb_get_username(newpwd))); goto fn_exit; } switch ( ldap_state->schema_ver ) { case SCHEMAVER_SAMBAACCOUNT: smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectclass", LDAP_OBJ_SAMBAACCOUNT); break; case SCHEMAVER_SAMBASAMACCOUNT: smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectclass", LDAP_OBJ_SAMBASAMACCOUNT); break; default: DEBUG(0,("ldapsam_add_sam_account: invalid schema version specified\n")); break; } ret = ldapsam_modify_entry(my_methods,newpwd,dn,mods,ldap_op, element_is_set_or_changed); if (!NT_STATUS_IS_OK(ret)) { DEBUG(0,("ldapsam_add_sam_account: failed to modify/add user with uid = %s (dn = %s)\n", pdb_get_username(newpwd),dn)); ldap_mods_free(mods, true); goto fn_exit; } DEBUG(2,("ldapsam_add_sam_account: added: uid == %s in the LDAP database\n", pdb_get_username(newpwd))); ldap_mods_free(mods, true); status = NT_STATUS_OK; fn_exit: TALLOC_FREE(ctx); SAFE_FREE(escape_user); if (result) { ldap_msgfree(result); } return status; } /********************************************************************** *********************************************************************/ static int ldapsam_search_one_group (struct ldapsam_privates *ldap_state, const char *filter, LDAPMessage ** result) { int scope = LDAP_SCOPE_SUBTREE; int rc; const char **attr_list; attr_list = get_attr_list(NULL, groupmap_attr_list); rc = smbldap_search(ldap_state->smbldap_state, lp_ldap_group_suffix (), scope, filter, attr_list, 0, result); TALLOC_FREE(attr_list); return rc; } /********************************************************************** *********************************************************************/ static bool init_group_from_ldap(struct ldapsam_privates *ldap_state, GROUP_MAP *map, LDAPMessage *entry) { char *temp = NULL; TALLOC_CTX *ctx = talloc_init("init_group_from_ldap"); if (ldap_state == NULL || map == NULL || entry == NULL || ldap_state->smbldap_state->ldap_struct == NULL) { DEBUG(0, ("init_group_from_ldap: NULL parameters found!\n")); TALLOC_FREE(ctx); return false; } temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_GIDNUMBER), ctx); if (!temp) { DEBUG(0, ("init_group_from_ldap: Mandatory attribute %s not found\n", get_attr_key2string( groupmap_attr_list, LDAP_ATTR_GIDNUMBER))); TALLOC_FREE(ctx); return false; } DEBUG(2, ("init_group_from_ldap: Entry found for group: %s\n", temp)); map->gid = (gid_t)atol(temp); TALLOC_FREE(temp); temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_GROUP_SID), ctx); if (!temp) { DEBUG(0, ("init_group_from_ldap: Mandatory attribute %s not found\n", get_attr_key2string( groupmap_attr_list, LDAP_ATTR_GROUP_SID))); TALLOC_FREE(ctx); return false; } if (!string_to_sid(&map->sid, temp)) { DEBUG(1, ("SID string [%s] could not be read as a valid SID\n", temp)); TALLOC_FREE(ctx); return false; } TALLOC_FREE(temp); temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_GROUP_TYPE), ctx); if (!temp) { DEBUG(0, ("init_group_from_ldap: Mandatory attribute %s not found\n", get_attr_key2string( groupmap_attr_list, LDAP_ATTR_GROUP_TYPE))); TALLOC_FREE(ctx); return false; } map->sid_name_use = (enum lsa_SidType)atol(temp); if ((map->sid_name_use < SID_NAME_USER) || (map->sid_name_use > SID_NAME_UNKNOWN)) { DEBUG(0, ("init_group_from_ldap: Unknown Group type: %d\n", map->sid_name_use)); TALLOC_FREE(ctx); return false; } TALLOC_FREE(temp); temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_DISPLAY_NAME), ctx); if (!temp) { temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_CN), ctx); if (!temp) { DEBUG(0, ("init_group_from_ldap: Attributes cn not found either \ for gidNumber(%lu)\n",(unsigned long)map->gid)); TALLOC_FREE(ctx); return false; } } fstrcpy(map->nt_name, temp); TALLOC_FREE(temp); temp = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_DESC), ctx); if (!temp) { temp = talloc_strdup(ctx, ""); if (!temp) { TALLOC_FREE(ctx); return false; } } fstrcpy(map->comment, temp); if (lp_parm_bool(-1, "ldapsam", "trusted", false)) { store_gid_sid_cache(&map->sid, map->gid); } TALLOC_FREE(ctx); return true; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_getgroup(struct pdb_methods *methods, const char *filter, GROUP_MAP *map) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; if (ldapsam_search_one_group(ldap_state, filter, &result) != LDAP_SUCCESS) { return NT_STATUS_NO_SUCH_GROUP; } count = ldap_count_entries(priv2ld(ldap_state), result); if (count < 1) { DEBUG(4, ("ldapsam_getgroup: Did not find group, filter was " "%s\n", filter)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_GROUP; } if (count > 1) { DEBUG(1, ("ldapsam_getgroup: Duplicate entries for filter %s: " "count=%d\n", filter, count)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_GROUP; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } if (!init_group_from_ldap(ldap_state, map, entry)) { DEBUG(1, ("ldapsam_getgroup: init_group_from_ldap failed for " "group filter %s\n", filter)); ldap_msgfree(result); return NT_STATUS_NO_SUCH_GROUP; } ldap_msgfree(result); return NT_STATUS_OK; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_getgrsid(struct pdb_methods *methods, GROUP_MAP *map, DOM_SID sid) { char *filter = NULL; NTSTATUS status; fstring tmp; if (asprintf(&filter, "(&(objectClass=%s)(%s=%s))", LDAP_OBJ_GROUPMAP, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_GROUP_SID), sid_to_fstring(tmp, &sid)) < 0) { return NT_STATUS_NO_MEMORY; } status = ldapsam_getgroup(methods, filter, map); SAFE_FREE(filter); return status; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_getgrgid(struct pdb_methods *methods, GROUP_MAP *map, gid_t gid) { char *filter = NULL; NTSTATUS status; if (asprintf(&filter, "(&(objectClass=%s)(%s=%lu))", LDAP_OBJ_GROUPMAP, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_GIDNUMBER), (unsigned long)gid) < 0) { return NT_STATUS_NO_MEMORY; } status = ldapsam_getgroup(methods, filter, map); SAFE_FREE(filter); return status; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_getgrnam(struct pdb_methods *methods, GROUP_MAP *map, const char *name) { char *filter = NULL; char *escape_name = escape_ldap_string_alloc(name); NTSTATUS status; if (!escape_name) { return NT_STATUS_NO_MEMORY; } if (asprintf(&filter, "(&(objectClass=%s)(|(%s=%s)(%s=%s)))", LDAP_OBJ_GROUPMAP, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_DISPLAY_NAME), escape_name, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_CN), escape_name) < 0) { SAFE_FREE(escape_name); return NT_STATUS_NO_MEMORY; } SAFE_FREE(escape_name); status = ldapsam_getgroup(methods, filter, map); SAFE_FREE(filter); return status; } static bool ldapsam_extract_rid_from_entry(LDAP *ldap_struct, LDAPMessage *entry, const DOM_SID *domain_sid, uint32 *rid) { fstring str; DOM_SID sid; if (!smbldap_get_single_attribute(ldap_struct, entry, "sambaSID", str, sizeof(str)-1)) { DEBUG(10, ("Could not find sambaSID attribute\n")); return False; } if (!string_to_sid(&sid, str)) { DEBUG(10, ("Could not convert string %s to sid\n", str)); return False; } if (sid_compare_domain(&sid, domain_sid) != 0) { DEBUG(10, ("SID %s is not in expected domain %s\n", str, sid_string_dbg(domain_sid))); return False; } if (!sid_peek_rid(&sid, rid)) { DEBUG(10, ("Could not peek into RID\n")); return False; } return True; } static NTSTATUS ldapsam_enum_group_members(struct pdb_methods *methods, TALLOC_CTX *mem_ctx, const DOM_SID *group, uint32 **pp_member_rids, size_t *p_num_members) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; struct smbldap_state *conn = ldap_state->smbldap_state; const char *id_attrs[] = { "memberUid", "gidNumber", NULL }; const char *sid_attrs[] = { "sambaSID", NULL }; NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; LDAPMessage *result = NULL; LDAPMessage *entry; char *filter; char **values = NULL; char **memberuid; char *gidstr; int rc, count; *pp_member_rids = NULL; *p_num_members = 0; filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)" "(objectClass=%s)" "(sambaSID=%s))", LDAP_OBJ_POSIXGROUP, LDAP_OBJ_GROUPMAP, sid_string_talloc(mem_ctx, group)); if (filter == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search(conn, lp_ldap_group_suffix(), LDAP_SCOPE_SUBTREE, filter, id_attrs, 0, &result); if (rc != LDAP_SUCCESS) goto done; talloc_autofree_ldapmsg(mem_ctx, result); count = ldap_count_entries(conn->ldap_struct, result); if (count > 1) { DEBUG(1, ("Found more than one groupmap entry for %s\n", sid_string_dbg(group))); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } if (count == 0) { ret = NT_STATUS_NO_SUCH_GROUP; goto done; } entry = ldap_first_entry(conn->ldap_struct, result); if (entry == NULL) goto done; gidstr = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "gidNumber", mem_ctx); if (!gidstr) { DEBUG (0, ("ldapsam_enum_group_members: Unable to find the group's gid!\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } values = ldap_get_values(conn->ldap_struct, entry, "memberUid"); if (values) { filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)(|", LDAP_OBJ_SAMBASAMACCOUNT); if (filter == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } for (memberuid = values; *memberuid != NULL; memberuid += 1) { char *escape_memberuid; escape_memberuid = escape_ldap_string_alloc(*memberuid); if (escape_memberuid == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } filter = talloc_asprintf_append_buffer(filter, "(uid=%s)", escape_memberuid); if (filter == NULL) { SAFE_FREE(escape_memberuid); ret = NT_STATUS_NO_MEMORY; goto done; } SAFE_FREE(escape_memberuid); } filter = talloc_asprintf_append_buffer(filter, "))"); if (filter == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search(conn, lp_ldap_suffix(), LDAP_SCOPE_SUBTREE, filter, sid_attrs, 0, &result); if (rc != LDAP_SUCCESS) goto done; count = ldap_count_entries(conn->ldap_struct, result); DEBUG(10,("ldapsam_enum_group_members: found %d accounts\n", count)); talloc_autofree_ldapmsg(mem_ctx, result); for (entry = ldap_first_entry(conn->ldap_struct, result); entry != NULL; entry = ldap_next_entry(conn->ldap_struct, entry)) { char *sidstr; DOM_SID sid; uint32 rid; sidstr = smbldap_talloc_single_attribute(conn->ldap_struct, entry, "sambaSID", mem_ctx); if (!sidstr) { DEBUG(0, ("Severe DB error, sambaSamAccount can't miss " "the sambaSID attribute\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } if (!string_to_sid(&sid, sidstr)) goto done; if (!sid_check_is_in_our_domain(&sid)) { DEBUG(0, ("Inconsistent SAM -- group member uid not " "in our domain\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } sid_peek_rid(&sid, &rid); if (!add_rid_to_array_unique(mem_ctx, rid, pp_member_rids, p_num_members)) { ret = NT_STATUS_NO_MEMORY; goto done; } } } filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)" "(gidNumber=%s))", LDAP_OBJ_SAMBASAMACCOUNT, gidstr); rc = smbldap_search(conn, lp_ldap_suffix(), LDAP_SCOPE_SUBTREE, filter, sid_attrs, 0, &result); if (rc != LDAP_SUCCESS) goto done; talloc_autofree_ldapmsg(mem_ctx, result); for (entry = ldap_first_entry(conn->ldap_struct, result); entry != NULL; entry = ldap_next_entry(conn->ldap_struct, entry)) { uint32 rid; if (!ldapsam_extract_rid_from_entry(conn->ldap_struct, entry, get_global_sam_sid(), &rid)) { DEBUG(0, ("Severe DB error, sambaSamAccount can't miss " "the sambaSID attribute\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } if (!add_rid_to_array_unique(mem_ctx, rid, pp_member_rids, p_num_members)) { ret = NT_STATUS_NO_MEMORY; goto done; } } ret = NT_STATUS_OK; done: if (values) ldap_value_free(values); return ret; } static NTSTATUS ldapsam_enum_group_memberships(struct pdb_methods *methods, TALLOC_CTX *mem_ctx, struct samu *user, DOM_SID **pp_sids, gid_t **pp_gids, size_t *p_num_groups) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; struct smbldap_state *conn = ldap_state->smbldap_state; char *filter; const char *attrs[] = { "gidNumber", "sambaSID", NULL }; char *escape_name; int rc, count; LDAPMessage *result = NULL; LDAPMessage *entry; NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; size_t num_sids, num_gids; char *gidstr; gid_t primary_gid = -1; *pp_sids = NULL; num_sids = 0; if (pdb_get_username(user) == NULL) { return NT_STATUS_INVALID_PARAMETER; } escape_name = escape_ldap_string_alloc(pdb_get_username(user)); if (escape_name == NULL) return NT_STATUS_NO_MEMORY; /* retrieve the users primary gid */ filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)(uid=%s))", LDAP_OBJ_SAMBASAMACCOUNT, escape_name); if (filter == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search(conn, lp_ldap_suffix(), LDAP_SCOPE_SUBTREE, filter, attrs, 0, &result); if (rc != LDAP_SUCCESS) goto done; talloc_autofree_ldapmsg(mem_ctx, result); count = ldap_count_entries(priv2ld(ldap_state), result); switch (count) { case 0: DEBUG(1, ("User account [%s] not found!\n", pdb_get_username(user))); ret = NT_STATUS_NO_SUCH_USER; goto done; case 1: entry = ldap_first_entry(priv2ld(ldap_state), result); gidstr = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "gidNumber", mem_ctx); if (!gidstr) { DEBUG (1, ("Unable to find the member's gid!\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } primary_gid = strtoul(gidstr, NULL, 10); break; default: DEBUG(1, ("found more than one account with the same user name ?!\n")); ret = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)(|(memberUid=%s)(gidNumber=%d)))", LDAP_OBJ_POSIXGROUP, escape_name, primary_gid); if (filter == NULL) { ret = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search(conn, lp_ldap_group_suffix(), LDAP_SCOPE_SUBTREE, filter, attrs, 0, &result); if (rc != LDAP_SUCCESS) goto done; talloc_autofree_ldapmsg(mem_ctx, result); num_gids = 0; *pp_gids = NULL; num_sids = 0; *pp_sids = NULL; /* We need to add the primary group as the first gid/sid */ if (!add_gid_to_array_unique(mem_ctx, primary_gid, pp_gids, &num_gids)) { ret = NT_STATUS_NO_MEMORY; goto done; } /* This sid will be replaced later */ ret = add_sid_to_array_unique(mem_ctx, &global_sid_NULL, pp_sids, &num_sids); if (!NT_STATUS_IS_OK(ret)) { goto done; } for (entry = ldap_first_entry(conn->ldap_struct, result); entry != NULL; entry = ldap_next_entry(conn->ldap_struct, entry)) { fstring str; DOM_SID sid; gid_t gid; char *end; if (!smbldap_get_single_attribute(conn->ldap_struct, entry, "sambaSID", str, sizeof(str)-1)) continue; if (!string_to_sid(&sid, str)) goto done; if (!smbldap_get_single_attribute(conn->ldap_struct, entry, "gidNumber", str, sizeof(str)-1)) continue; gid = strtoul(str, &end, 10); if (PTR_DIFF(end, str) != strlen(str)) goto done; if (gid == primary_gid) { sid_copy(&(*pp_sids)[0], &sid); } else { if (!add_gid_to_array_unique(mem_ctx, gid, pp_gids, &num_gids)) { ret = NT_STATUS_NO_MEMORY; goto done; } ret = add_sid_to_array_unique(mem_ctx, &sid, pp_sids, &num_sids); if (!NT_STATUS_IS_OK(ret)) { goto done; } } } if (sid_compare(&global_sid_NULL, &(*pp_sids)[0]) == 0) { DEBUG(3, ("primary group of [%s] not found\n", pdb_get_username(user))); goto done; } *p_num_groups = num_sids; ret = NT_STATUS_OK; done: SAFE_FREE(escape_name); return ret; } /********************************************************************** * Augment a posixGroup object with a sambaGroupMapping domgroup *********************************************************************/ static NTSTATUS ldapsam_map_posixgroup(TALLOC_CTX *mem_ctx, struct ldapsam_privates *ldap_state, GROUP_MAP *map) { const char *filter, *dn; LDAPMessage *msg, *entry; LDAPMod **mods; int rc; filter = talloc_asprintf(mem_ctx, "(&(objectClass=posixGroup)(gidNumber=%u))", map->gid); if (filter == NULL) { return NT_STATUS_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, get_attr_list(mem_ctx, groupmap_attr_list), &msg); talloc_autofree_ldapmsg(mem_ctx, msg); if ((rc != LDAP_SUCCESS) || (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, msg) != 1) || ((entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, msg)) == NULL)) { return NT_STATUS_NO_SUCH_GROUP; } dn = smbldap_talloc_dn(mem_ctx, ldap_state->smbldap_state->ldap_struct, entry); if (dn == NULL) { return NT_STATUS_NO_MEMORY; } mods = NULL; smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", "sambaGroupMapping"); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "sambaSid", sid_string_talloc(mem_ctx, &map->sid)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "sambaGroupType", talloc_asprintf(mem_ctx, "%d", map->sid_name_use)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "displayName", map->nt_name); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "description", map->comment); talloc_autofree_ldapmod(mem_ctx, mods); rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); if (rc != LDAP_SUCCESS) { return NT_STATUS_ACCESS_DENIED; } return NT_STATUS_OK; } static NTSTATUS ldapsam_add_group_mapping_entry(struct pdb_methods *methods, GROUP_MAP *map) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *msg = NULL; LDAPMod **mods = NULL; const char *attrs[] = { NULL }; char *filter; char *dn; TALLOC_CTX *mem_ctx; NTSTATUS result; DOM_SID sid; int rc; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); return NT_STATUS_NO_MEMORY; } filter = talloc_asprintf(mem_ctx, "(sambaSid=%s)", sid_string_talloc(mem_ctx, &map->sid)); if (filter == NULL) { result = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search(ldap_state->smbldap_state, lp_ldap_suffix(), LDAP_SCOPE_SUBTREE, filter, attrs, True, &msg); talloc_autofree_ldapmsg(mem_ctx, msg); if ((rc == LDAP_SUCCESS) && (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, msg) > 0)) { DEBUG(3, ("SID %s already present in LDAP, refusing to add " "group mapping entry\n", sid_string_dbg(&map->sid))); result = NT_STATUS_GROUP_EXISTS; goto done; } switch (map->sid_name_use) { case SID_NAME_DOM_GRP: /* To map a domain group we need to have a posix group to attach to. */ result = ldapsam_map_posixgroup(mem_ctx, ldap_state, map); goto done; break; case SID_NAME_ALIAS: if (!sid_check_is_in_our_domain(&map->sid) && !sid_check_is_in_builtin(&map->sid) ) { DEBUG(3, ("Refusing to map sid %s as an alias, not in our domain\n", sid_string_dbg(&map->sid))); result = NT_STATUS_INVALID_PARAMETER; goto done; } break; default: DEBUG(3, ("Got invalid use '%s' for mapping\n", sid_type_lookup(map->sid_name_use))); result = NT_STATUS_INVALID_PARAMETER; goto done; } /* Domain groups have been mapped in a separate routine, we have to * create an alias now */ if (map->gid == -1) { DEBUG(10, ("Refusing to map gid==-1\n")); result = NT_STATUS_INVALID_PARAMETER; goto done; } if (pdb_gid_to_sid(map->gid, &sid)) { DEBUG(3, ("Gid %d is already mapped to SID %s, refusing to " "add\n", map->gid, sid_string_dbg(&sid))); result = NT_STATUS_GROUP_EXISTS; goto done; } /* Ok, enough checks done. It's still racy to go ahead now, but that's * the best we can get out of LDAP. */ dn = talloc_asprintf(mem_ctx, "sambaSid=%s,%s", sid_string_talloc(mem_ctx, &map->sid), lp_ldap_group_suffix()); if (dn == NULL) { result = NT_STATUS_NO_MEMORY; goto done; } mods = NULL; smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "objectClass", "sambaSidEntry"); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "objectClass", "sambaGroupMapping"); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "sambaSid", sid_string_talloc(mem_ctx, &map->sid)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "sambaGroupType", talloc_asprintf(mem_ctx, "%d", map->sid_name_use)); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "displayName", map->nt_name); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "description", map->comment); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, NULL, &mods, "gidNumber", talloc_asprintf(mem_ctx, "%u", map->gid)); talloc_autofree_ldapmod(mem_ctx, mods); rc = smbldap_add(ldap_state->smbldap_state, dn, mods); result = (rc == LDAP_SUCCESS) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED; done: TALLOC_FREE(mem_ctx); return result; } /********************************************************************** * Update a group mapping entry. We're quite strict about what can be changed: * Only the description and displayname may be changed. It simply does not * make any sense to change the SID, gid or the type in a mapping. *********************************************************************/ static NTSTATUS ldapsam_update_group_mapping_entry(struct pdb_methods *methods, GROUP_MAP *map) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; int rc; const char *filter, *dn; LDAPMessage *msg = NULL; LDAPMessage *entry = NULL; LDAPMod **mods = NULL; TALLOC_CTX *mem_ctx; NTSTATUS result; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); return NT_STATUS_NO_MEMORY; } /* Make 100% sure that sid, gid and type are not changed by looking up * exactly the values we're given in LDAP. */ filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)" "(sambaSid=%s)(gidNumber=%u)" "(sambaGroupType=%d))", LDAP_OBJ_GROUPMAP, sid_string_talloc(mem_ctx, &map->sid), map->gid, map->sid_name_use); if (filter == NULL) { result = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, get_attr_list(mem_ctx, groupmap_attr_list), &msg); talloc_autofree_ldapmsg(mem_ctx, msg); if ((rc != LDAP_SUCCESS) || (ldap_count_entries(ldap_state->smbldap_state->ldap_struct, msg) != 1) || ((entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, msg)) == NULL)) { result = NT_STATUS_NO_SUCH_GROUP; goto done; } dn = smbldap_talloc_dn(mem_ctx, ldap_state->smbldap_state->ldap_struct, entry); if (dn == NULL) { result = NT_STATUS_NO_MEMORY; goto done; } mods = NULL; smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "displayName", map->nt_name); smbldap_make_mod(ldap_state->smbldap_state->ldap_struct, entry, &mods, "description", map->comment); talloc_autofree_ldapmod(mem_ctx, mods); if (mods == NULL) { DEBUG(4, ("ldapsam_update_group_mapping_entry: mods is empty: " "nothing to do\n")); result = NT_STATUS_OK; goto done; } rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); if (rc != LDAP_SUCCESS) { result = NT_STATUS_ACCESS_DENIED; goto done; } DEBUG(2, ("ldapsam_update_group_mapping_entry: successfully modified " "group %lu in LDAP\n", (unsigned long)map->gid)); result = NT_STATUS_OK; done: TALLOC_FREE(mem_ctx); return result; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_delete_group_mapping_entry(struct pdb_methods *methods, DOM_SID sid) { struct ldapsam_privates *priv = (struct ldapsam_privates *)methods->private_data; LDAPMessage *msg, *entry; int rc; NTSTATUS result; TALLOC_CTX *mem_ctx; char *filter; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); return NT_STATUS_NO_MEMORY; } filter = talloc_asprintf(mem_ctx, "(&(objectClass=%s)(%s=%s))", LDAP_OBJ_GROUPMAP, LDAP_ATTRIBUTE_SID, sid_string_talloc(mem_ctx, &sid)); if (filter == NULL) { result = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_search_suffix(priv->smbldap_state, filter, get_attr_list(mem_ctx, groupmap_attr_list), &msg); talloc_autofree_ldapmsg(mem_ctx, msg); if ((rc != LDAP_SUCCESS) || (ldap_count_entries(priv2ld(priv), msg) != 1) || ((entry = ldap_first_entry(priv2ld(priv), msg)) == NULL)) { result = NT_STATUS_NO_SUCH_GROUP; goto done; } rc = ldapsam_delete_entry(priv, mem_ctx, entry, LDAP_OBJ_GROUPMAP, get_attr_list(mem_ctx, groupmap_attr_list_to_delete)); if ((rc == LDAP_NAMING_VIOLATION) || (rc == LDAP_OBJECT_CLASS_VIOLATION)) { const char *attrs[] = { "sambaGroupType", "description", "displayName", "sambaSIDList", NULL }; /* Second try. Don't delete the sambaSID attribute, this is for "old" entries that are tacked on a winbind sambaIdmapEntry. */ rc = ldapsam_delete_entry(priv, mem_ctx, entry, LDAP_OBJ_GROUPMAP, attrs); } if ((rc == LDAP_NAMING_VIOLATION) || (rc == LDAP_OBJECT_CLASS_VIOLATION)) { const char *attrs[] = { "sambaGroupType", "description", "displayName", "sambaSIDList", "gidNumber", NULL }; /* Third try. This is a post-3.0.21 alias (containing only * sambaSidEntry and sambaGroupMapping classes), we also have * to delete the gidNumber attribute, only the sambaSidEntry * remains */ rc = ldapsam_delete_entry(priv, mem_ctx, entry, LDAP_OBJ_GROUPMAP, attrs); } result = (rc == LDAP_SUCCESS) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL; done: TALLOC_FREE(mem_ctx); return result; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_setsamgrent(struct pdb_methods *my_methods, bool update) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; char *filter = NULL; int rc; const char **attr_list; filter = talloc_asprintf(NULL, "(objectclass=%s)", LDAP_OBJ_GROUPMAP); if (!filter) { return NT_STATUS_NO_MEMORY; } attr_list = get_attr_list( NULL, groupmap_attr_list ); rc = smbldap_search(ldap_state->smbldap_state, lp_ldap_group_suffix(), LDAP_SCOPE_SUBTREE, filter, attr_list, 0, &ldap_state->result); TALLOC_FREE(attr_list); if (rc != LDAP_SUCCESS) { DEBUG(0, ("ldapsam_setsamgrent: LDAP search failed: %s\n", ldap_err2string(rc))); DEBUG(3, ("ldapsam_setsamgrent: Query was: %s, %s\n", lp_ldap_group_suffix(), filter)); ldap_msgfree(ldap_state->result); ldap_state->result = NULL; TALLOC_FREE(filter); return NT_STATUS_UNSUCCESSFUL; } TALLOC_FREE(filter); DEBUG(2, ("ldapsam_setsamgrent: %d entries in the base!\n", ldap_count_entries(ldap_state->smbldap_state->ldap_struct, ldap_state->result))); ldap_state->entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, ldap_state->result); ldap_state->index = 0; return NT_STATUS_OK; } /********************************************************************** *********************************************************************/ static void ldapsam_endsamgrent(struct pdb_methods *my_methods) { ldapsam_endsampwent(my_methods); } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_getsamgrent(struct pdb_methods *my_methods, GROUP_MAP *map) { NTSTATUS ret = NT_STATUS_UNSUCCESSFUL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; bool bret = False; while (!bret) { if (!ldap_state->entry) return ret; ldap_state->index++; bret = init_group_from_ldap(ldap_state, map, ldap_state->entry); ldap_state->entry = ldap_next_entry(ldap_state->smbldap_state->ldap_struct, ldap_state->entry); } return NT_STATUS_OK; } /********************************************************************** *********************************************************************/ static NTSTATUS ldapsam_enum_group_mapping(struct pdb_methods *methods, const DOM_SID *domsid, enum lsa_SidType sid_name_use, GROUP_MAP **pp_rmap, size_t *p_num_entries, bool unix_only) { GROUP_MAP map; size_t entries = 0; *p_num_entries = 0; *pp_rmap = NULL; if (!NT_STATUS_IS_OK(ldapsam_setsamgrent(methods, False))) { DEBUG(0, ("ldapsam_enum_group_mapping: Unable to open " "passdb\n")); return NT_STATUS_ACCESS_DENIED; } while (NT_STATUS_IS_OK(ldapsam_getsamgrent(methods, &map))) { if (sid_name_use != SID_NAME_UNKNOWN && sid_name_use != map.sid_name_use) { DEBUG(11,("ldapsam_enum_group_mapping: group %s is " "not of the requested type\n", map.nt_name)); continue; } if (unix_only==ENUM_ONLY_MAPPED && map.gid==-1) { DEBUG(11,("ldapsam_enum_group_mapping: group %s is " "non mapped\n", map.nt_name)); continue; } (*pp_rmap)=SMB_REALLOC_ARRAY((*pp_rmap), GROUP_MAP, entries+1); if (!(*pp_rmap)) { DEBUG(0,("ldapsam_enum_group_mapping: Unable to " "enlarge group map!\n")); return NT_STATUS_UNSUCCESSFUL; } (*pp_rmap)[entries] = map; entries += 1; } ldapsam_endsamgrent(methods); *p_num_entries = entries; return NT_STATUS_OK; } static NTSTATUS ldapsam_modify_aliasmem(struct pdb_methods *methods, const DOM_SID *alias, const DOM_SID *member, int modop) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; char *dn = NULL; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; LDAPMod **mods = NULL; int rc; enum lsa_SidType type = SID_NAME_USE_NONE; fstring tmp; char *filter = NULL; if (sid_check_is_in_builtin(alias)) { type = SID_NAME_ALIAS; } if (sid_check_is_in_our_domain(alias)) { type = SID_NAME_ALIAS; } if (type == SID_NAME_USE_NONE) { DEBUG(5, ("SID %s is neither in builtin nor in our domain!\n", sid_string_dbg(alias))); return NT_STATUS_NO_SUCH_ALIAS; } if (asprintf(&filter, "(&(objectClass=%s)(sambaSid=%s)(sambaGroupType=%d))", LDAP_OBJ_GROUPMAP, sid_to_fstring(tmp, alias), type) < 0) { return NT_STATUS_NO_MEMORY; } if (ldapsam_search_one_group(ldap_state, filter, &result) != LDAP_SUCCESS) { SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } count = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (count < 1) { DEBUG(4, ("ldapsam_modify_aliasmem: Did not find alias\n")); ldap_msgfree(result); SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } if (count > 1) { DEBUG(1, ("ldapsam_modify_aliasmem: Duplicate entries for " "filter %s: count=%d\n", filter, count)); ldap_msgfree(result); SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } SAFE_FREE(filter); entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); if (!entry) { ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } dn = smbldap_get_dn(ldap_state->smbldap_state->ldap_struct, entry); if (!dn) { ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } smbldap_set_mod(&mods, modop, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_SID_LIST), sid_to_fstring(tmp, member)); rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); ldap_mods_free(mods, True); ldap_msgfree(result); SAFE_FREE(dn); if (rc == LDAP_TYPE_OR_VALUE_EXISTS) { return NT_STATUS_MEMBER_IN_ALIAS; } if (rc == LDAP_NO_SUCH_ATTRIBUTE) { return NT_STATUS_MEMBER_NOT_IN_ALIAS; } if (rc != LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } return NT_STATUS_OK; } static NTSTATUS ldapsam_add_aliasmem(struct pdb_methods *methods, const DOM_SID *alias, const DOM_SID *member) { return ldapsam_modify_aliasmem(methods, alias, member, LDAP_MOD_ADD); } static NTSTATUS ldapsam_del_aliasmem(struct pdb_methods *methods, const DOM_SID *alias, const DOM_SID *member) { return ldapsam_modify_aliasmem(methods, alias, member, LDAP_MOD_DELETE); } static NTSTATUS ldapsam_enum_aliasmem(struct pdb_methods *methods, const DOM_SID *alias, DOM_SID **pp_members, size_t *p_num_members) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; char **values = NULL; int i; char *filter = NULL; size_t num_members = 0; enum lsa_SidType type = SID_NAME_USE_NONE; fstring tmp; *pp_members = NULL; *p_num_members = 0; if (sid_check_is_in_builtin(alias)) { type = SID_NAME_ALIAS; } if (sid_check_is_in_our_domain(alias)) { type = SID_NAME_ALIAS; } if (type == SID_NAME_USE_NONE) { DEBUG(5, ("SID %s is neither in builtin nor in our domain!\n", sid_string_dbg(alias))); return NT_STATUS_NO_SUCH_ALIAS; } if (asprintf(&filter, "(&(objectClass=%s)(sambaSid=%s)(sambaGroupType=%d))", LDAP_OBJ_GROUPMAP, sid_to_fstring(tmp, alias), type) < 0) { return NT_STATUS_NO_MEMORY; } if (ldapsam_search_one_group(ldap_state, filter, &result) != LDAP_SUCCESS) { SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } count = ldap_count_entries(ldap_state->smbldap_state->ldap_struct, result); if (count < 1) { DEBUG(4, ("ldapsam_enum_aliasmem: Did not find alias\n")); ldap_msgfree(result); SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } if (count > 1) { DEBUG(1, ("ldapsam_enum_aliasmem: Duplicate entries for " "filter %s: count=%d\n", filter, count)); ldap_msgfree(result); SAFE_FREE(filter); return NT_STATUS_NO_SUCH_ALIAS; } SAFE_FREE(filter); entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); if (!entry) { ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } values = ldap_get_values(ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string(groupmap_attr_list, LDAP_ATTR_SID_LIST)); if (values == NULL) { ldap_msgfree(result); return NT_STATUS_OK; } count = ldap_count_values(values); for (i=0; iprivate_data; LDAP *ldap_struct; const char *attrs[] = { LDAP_ATTRIBUTE_SID, NULL }; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int i; int rc; char *filter; enum lsa_SidType type = SID_NAME_USE_NONE; if (sid_check_is_builtin(domain_sid)) { type = SID_NAME_ALIAS; } if (sid_check_is_domain(domain_sid)) { type = SID_NAME_ALIAS; } if (type == SID_NAME_USE_NONE) { DEBUG(5, ("SID %s is neither builtin nor domain!\n", sid_string_dbg(domain_sid))); return NT_STATUS_UNSUCCESSFUL; } filter = talloc_asprintf(mem_ctx, "(&(|(objectclass=%s)(sambaGroupType=%d))(|", LDAP_OBJ_GROUPMAP, type); for (i=0; ismbldap_state, lp_ldap_group_suffix(), LDAP_SCOPE_SUBTREE, filter, attrs, 0, &result); if (rc != LDAP_SUCCESS) return NT_STATUS_UNSUCCESSFUL; ldap_struct = ldap_state->smbldap_state->ldap_struct; for (entry = ldap_first_entry(ldap_struct, result); entry != NULL; entry = ldap_next_entry(ldap_struct, entry)) { fstring sid_str; DOM_SID sid; uint32 rid; if (!smbldap_get_single_attribute(ldap_struct, entry, LDAP_ATTRIBUTE_SID, sid_str, sizeof(sid_str)-1)) continue; if (!string_to_sid(&sid, sid_str)) continue; if (!sid_peek_check_rid(domain_sid, &sid, &rid)) continue; if (!add_rid_to_array_unique(mem_ctx, rid, pp_alias_rids, p_num_alias_rids)) { ldap_msgfree(result); return NT_STATUS_NO_MEMORY; } } ldap_msgfree(result); return NT_STATUS_OK; } static NTSTATUS ldapsam_set_account_policy_in_ldap(struct pdb_methods *methods, int policy_index, uint32 value) { NTSTATUS ntstatus = NT_STATUS_UNSUCCESSFUL; int rc; LDAPMod **mods = NULL; fstring value_string; const char *policy_attr = NULL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; DEBUG(10,("ldapsam_set_account_policy_in_ldap\n")); if (!ldap_state->domain_dn) { return NT_STATUS_INVALID_PARAMETER; } policy_attr = get_account_policy_attr(policy_index); if (policy_attr == NULL) { DEBUG(0,("ldapsam_set_account_policy_in_ldap: invalid " "policy\n")); return ntstatus; } slprintf(value_string, sizeof(value_string) - 1, "%i", value); smbldap_set_mod(&mods, LDAP_MOD_REPLACE, policy_attr, value_string); rc = smbldap_modify(ldap_state->smbldap_state, ldap_state->domain_dn, mods); ldap_mods_free(mods, True); if (rc != LDAP_SUCCESS) { return ntstatus; } if (!cache_account_policy_set(policy_index, value)) { DEBUG(0,("ldapsam_set_account_policy_in_ldap: failed to " "update local tdb cache\n")); return ntstatus; } return NT_STATUS_OK; } static NTSTATUS ldapsam_set_account_policy(struct pdb_methods *methods, int policy_index, uint32 value) { return ldapsam_set_account_policy_in_ldap(methods, policy_index, value); } static NTSTATUS ldapsam_get_account_policy_from_ldap(struct pdb_methods *methods, int policy_index, uint32 *value) { NTSTATUS ntstatus = NT_STATUS_UNSUCCESSFUL; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int count; int rc; char **vals = NULL; const char *policy_attr = NULL; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; const char *attrs[2]; DEBUG(10,("ldapsam_get_account_policy_from_ldap\n")); if (!ldap_state->domain_dn) { return NT_STATUS_INVALID_PARAMETER; } policy_attr = get_account_policy_attr(policy_index); if (!policy_attr) { DEBUG(0,("ldapsam_get_account_policy_from_ldap: invalid " "policy index: %d\n", policy_index)); return ntstatus; } attrs[0] = policy_attr; attrs[1] = NULL; rc = smbldap_search(ldap_state->smbldap_state, ldap_state->domain_dn, LDAP_SCOPE_BASE, "(objectclass=*)", attrs, 0, &result); if (rc != LDAP_SUCCESS) { return ntstatus; } count = ldap_count_entries(priv2ld(ldap_state), result); if (count < 1) { goto out; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (entry == NULL) { goto out; } vals = ldap_get_values(priv2ld(ldap_state), entry, policy_attr); if (vals == NULL) { goto out; } *value = (uint32)atol(vals[0]); ntstatus = NT_STATUS_OK; out: if (vals) ldap_value_free(vals); ldap_msgfree(result); return ntstatus; } /* wrapper around ldapsam_get_account_policy_from_ldap(), handles tdb as cache - if user hasn't decided to use account policies inside LDAP just reuse the old tdb values - if there is a valid cache entry, return that - if there is an LDAP entry, update cache and return - otherwise set to default, update cache and return Guenther */ static NTSTATUS ldapsam_get_account_policy(struct pdb_methods *methods, int policy_index, uint32 *value) { NTSTATUS ntstatus = NT_STATUS_UNSUCCESSFUL; if (cache_account_policy_get(policy_index, value)) { DEBUG(11,("ldapsam_get_account_policy: got valid value from " "cache\n")); return NT_STATUS_OK; } ntstatus = ldapsam_get_account_policy_from_ldap(methods, policy_index, value); if (NT_STATUS_IS_OK(ntstatus)) { goto update_cache; } DEBUG(10,("ldapsam_get_account_policy: failed to retrieve from " "ldap\n")); #if 0 /* should we automagically migrate old tdb value here ? */ if (account_policy_get(policy_index, value)) goto update_ldap; DEBUG(10,("ldapsam_get_account_policy: no tdb for %d, trying " "default\n", policy_index)); #endif if (!account_policy_get_default(policy_index, value)) { return ntstatus; } /* update_ldap: */ ntstatus = ldapsam_set_account_policy(methods, policy_index, *value); if (!NT_STATUS_IS_OK(ntstatus)) { return ntstatus; } update_cache: if (!cache_account_policy_set(policy_index, *value)) { DEBUG(0,("ldapsam_get_account_policy: failed to update local " "tdb as a cache\n")); return NT_STATUS_UNSUCCESSFUL; } return NT_STATUS_OK; } static NTSTATUS ldapsam_lookup_rids(struct pdb_methods *methods, const DOM_SID *domain_sid, int num_rids, uint32 *rids, const char **names, enum lsa_SidType *attrs) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *msg = NULL; LDAPMessage *entry; char *allsids = NULL; int i, rc, num_mapped; NTSTATUS result = NT_STATUS_NO_MEMORY; TALLOC_CTX *mem_ctx; LDAP *ld; bool is_builtin; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); goto done; } if (!sid_check_is_builtin(domain_sid) && !sid_check_is_domain(domain_sid)) { result = NT_STATUS_INVALID_PARAMETER; goto done; } for (i=0; ismbldap_state, lp_ldap_user_suffix(), LDAP_SCOPE_SUBTREE, filter, ldap_attrs, 0, &msg); talloc_autofree_ldapmsg(mem_ctx, msg); } if (rc != LDAP_SUCCESS) goto done; ld = ldap_state->smbldap_state->ldap_struct; num_mapped = 0; for (entry = ldap_first_entry(ld, msg); entry != NULL; entry = ldap_next_entry(ld, entry)) { uint32 rid; int rid_index; const char *name; if (!ldapsam_extract_rid_from_entry(ld, entry, domain_sid, &rid)) { DEBUG(2, ("Could not find sid from ldap entry\n")); continue; } name = smbldap_talloc_single_attribute(ld, entry, "uid", names); if (name == NULL) { DEBUG(2, ("Could not retrieve uid attribute\n")); continue; } for (rid_index = 0; rid_index < num_rids; rid_index++) { if (rid == rids[rid_index]) break; } if (rid_index == num_rids) { DEBUG(2, ("Got a RID not asked for: %d\n", rid)); continue; } attrs[rid_index] = SID_NAME_USER; names[rid_index] = name; num_mapped += 1; } if (num_mapped == num_rids) { /* No need to look for groups anymore -- we're done */ result = NT_STATUS_OK; goto done; } /* Same game for groups */ { char *filter; const char *ldap_attrs[] = { "cn", "displayName", "sambaSid", "sambaGroupType", NULL }; filter = talloc_asprintf( mem_ctx, "(&(objectClass=%s)(|%s))", LDAP_OBJ_GROUPMAP, allsids); if (filter == NULL) { goto done; } rc = smbldap_search(ldap_state->smbldap_state, lp_ldap_group_suffix(), LDAP_SCOPE_SUBTREE, filter, ldap_attrs, 0, &msg); talloc_autofree_ldapmsg(mem_ctx, msg); } if (rc != LDAP_SUCCESS) goto done; /* ldap_struct might have changed due to a reconnect */ ld = ldap_state->smbldap_state->ldap_struct; /* For consistency checks, we already checked we're only domain or builtin */ is_builtin = sid_check_is_builtin(domain_sid); for (entry = ldap_first_entry(ld, msg); entry != NULL; entry = ldap_next_entry(ld, entry)) { uint32 rid; int rid_index; const char *attr; enum lsa_SidType type; const char *dn = smbldap_talloc_dn(mem_ctx, ld, entry); attr = smbldap_talloc_single_attribute(ld, entry, "sambaGroupType", mem_ctx); if (attr == NULL) { DEBUG(2, ("Could not extract type from ldap entry %s\n", dn)); continue; } type = (enum lsa_SidType)atol(attr); /* Consistency checks */ if ((is_builtin && (type != SID_NAME_ALIAS)) || (!is_builtin && ((type != SID_NAME_ALIAS) && (type != SID_NAME_DOM_GRP)))) { DEBUG(2, ("Rejecting invalid group mapping entry %s\n", dn)); } if (!ldapsam_extract_rid_from_entry(ld, entry, domain_sid, &rid)) { DEBUG(2, ("Could not find sid from ldap entry %s\n", dn)); continue; } attr = smbldap_talloc_single_attribute(ld, entry, "displayName", names); if (attr == NULL) { DEBUG(10, ("Could not retrieve 'displayName' attribute from %s\n", dn)); attr = smbldap_talloc_single_attribute(ld, entry, "cn", names); } if (attr == NULL) { DEBUG(2, ("Could not retrieve naming attribute from %s\n", dn)); continue; } for (rid_index = 0; rid_index < num_rids; rid_index++) { if (rid == rids[rid_index]) break; } if (rid_index == num_rids) { DEBUG(2, ("Got a RID not asked for: %d\n", rid)); continue; } attrs[rid_index] = type; names[rid_index] = attr; num_mapped += 1; } result = NT_STATUS_NONE_MAPPED; if (num_mapped > 0) result = (num_mapped == num_rids) ? NT_STATUS_OK : STATUS_SOME_UNMAPPED; done: TALLOC_FREE(mem_ctx); return result; } static char *get_ldap_filter(TALLOC_CTX *mem_ctx, const char *username) { char *filter = NULL; char *escaped = NULL; char *result = NULL; asprintf(&filter, "(&%s(objectclass=sambaSamAccount))", "(uid=%u)"); if (filter == NULL) goto done; escaped = escape_ldap_string_alloc(username); if (escaped == NULL) goto done; result = talloc_string_sub(mem_ctx, filter, "%u", username); done: SAFE_FREE(filter); SAFE_FREE(escaped); return result; } const char **talloc_attrs(TALLOC_CTX *mem_ctx, ...) { int i, num = 0; va_list ap; const char **result; va_start(ap, mem_ctx); while (va_arg(ap, const char *) != NULL) num += 1; va_end(ap); if ((result = TALLOC_ARRAY(mem_ctx, const char *, num+1)) == NULL) { return NULL; } va_start(ap, mem_ctx); for (i=0; iprivate_data; LDAP *ld; int rc = LDAP_OPERATIONS_ERROR; state->entries = NULL; if (state->connection->paged_results) { rc = smbldap_search_paged(state->connection, state->base, state->scope, state->filter, state->attrs, state->attrsonly, lp_ldap_page_size(), &state->entries, &state->pagedresults_cookie); } if ((rc != LDAP_SUCCESS) || (state->entries == NULL)) { if (state->entries != NULL) { /* Left over from unsuccessful paged attempt */ ldap_msgfree(state->entries); state->entries = NULL; } rc = smbldap_search(state->connection, state->base, state->scope, state->filter, state->attrs, state->attrsonly, &state->entries); if ((rc != LDAP_SUCCESS) || (state->entries == NULL)) return False; /* Ok, the server was lying. It told us it could do paged * searches when it could not. */ state->connection->paged_results = False; } ld = state->connection->ldap_struct; if ( ld == NULL) { DEBUG(5, ("Don't have an LDAP connection right after a " "search\n")); return False; } state->current_entry = ldap_first_entry(ld, state->entries); if (state->current_entry == NULL) { ldap_msgfree(state->entries); state->entries = NULL; } return True; } static bool ldapsam_search_nextpage(struct pdb_search *search) { struct ldap_search_state *state = (struct ldap_search_state *)search->private_data; int rc; if (!state->connection->paged_results) { /* There is no next page when there are no paged results */ return False; } rc = smbldap_search_paged(state->connection, state->base, state->scope, state->filter, state->attrs, state->attrsonly, lp_ldap_page_size(), &state->entries, &state->pagedresults_cookie); if ((rc != LDAP_SUCCESS) || (state->entries == NULL)) return False; state->current_entry = ldap_first_entry(state->connection->ldap_struct, state->entries); if (state->current_entry == NULL) { ldap_msgfree(state->entries); state->entries = NULL; } return True; } static bool ldapsam_search_next_entry(struct pdb_search *search, struct samr_displayentry *entry) { struct ldap_search_state *state = (struct ldap_search_state *)search->private_data; bool result; retry: if ((state->entries == NULL) && (state->pagedresults_cookie == NULL)) return False; if ((state->entries == NULL) && !ldapsam_search_nextpage(search)) return False; result = state->ldap2displayentry(state, search->mem_ctx, state->connection->ldap_struct, state->current_entry, entry); if (!result) { char *dn; dn = ldap_get_dn(state->connection->ldap_struct, state->current_entry); DEBUG(5, ("Skipping entry %s\n", dn != NULL ? dn : "")); if (dn != NULL) ldap_memfree(dn); } state->current_entry = ldap_next_entry(state->connection->ldap_struct, state->current_entry); if (state->current_entry == NULL) { ldap_msgfree(state->entries); state->entries = NULL; } if (!result) goto retry; return True; } static void ldapsam_search_end(struct pdb_search *search) { struct ldap_search_state *state = (struct ldap_search_state *)search->private_data; int rc; if (state->pagedresults_cookie == NULL) return; if (state->entries != NULL) ldap_msgfree(state->entries); state->entries = NULL; state->current_entry = NULL; if (!state->connection->paged_results) return; /* Tell the LDAP server we're not interested in the rest anymore. */ rc = smbldap_search_paged(state->connection, state->base, state->scope, state->filter, state->attrs, state->attrsonly, 0, &state->entries, &state->pagedresults_cookie); if (rc != LDAP_SUCCESS) DEBUG(5, ("Could not end search properly\n")); return; } static bool ldapuser2displayentry(struct ldap_search_state *state, TALLOC_CTX *mem_ctx, LDAP *ld, LDAPMessage *entry, struct samr_displayentry *result) { char **vals; DOM_SID sid; uint32 acct_flags; vals = ldap_get_values(ld, entry, "sambaAcctFlags"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(5, ("\"sambaAcctFlags\" not found\n")); return False; } acct_flags = pdb_decode_acct_ctrl(vals[0]); ldap_value_free(vals); if ((state->acct_flags != 0) && ((state->acct_flags & acct_flags) == 0)) return False; result->acct_flags = acct_flags; result->account_name = ""; result->fullname = ""; result->description = ""; vals = ldap_get_values(ld, entry, "uid"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(5, ("\"uid\" not found\n")); return False; } pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->account_name), vals[0]); ldap_value_free(vals); vals = ldap_get_values(ld, entry, "displayName"); if ((vals == NULL) || (vals[0] == NULL)) DEBUG(8, ("\"displayName\" not found\n")); else pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->fullname), vals[0]); ldap_value_free(vals); vals = ldap_get_values(ld, entry, "description"); if ((vals == NULL) || (vals[0] == NULL)) DEBUG(8, ("\"description\" not found\n")); else pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->description), vals[0]); ldap_value_free(vals); if ((result->account_name == NULL) || (result->fullname == NULL) || (result->description == NULL)) { DEBUG(0, ("talloc failed\n")); return False; } vals = ldap_get_values(ld, entry, "sambaSid"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(0, ("\"objectSid\" not found\n")); return False; } if (!string_to_sid(&sid, vals[0])) { DEBUG(0, ("Could not convert %s to SID\n", vals[0])); ldap_value_free(vals); return False; } ldap_value_free(vals); if (!sid_peek_check_rid(get_global_sam_sid(), &sid, &result->rid)) { DEBUG(0, ("sid %s does not belong to our domain\n", sid_string_dbg(&sid))); return False; } return True; } static bool ldapsam_search_users(struct pdb_methods *methods, struct pdb_search *search, uint32 acct_flags) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; struct ldap_search_state *state; state = TALLOC_P(search->mem_ctx, struct ldap_search_state); if (state == NULL) { DEBUG(0, ("talloc failed\n")); return False; } state->connection = ldap_state->smbldap_state; if ((acct_flags != 0) && ((acct_flags & ACB_NORMAL) != 0)) state->base = lp_ldap_user_suffix(); else if ((acct_flags != 0) && ((acct_flags & (ACB_WSTRUST|ACB_SVRTRUST|ACB_DOMTRUST)) != 0)) state->base = lp_ldap_machine_suffix(); else state->base = lp_ldap_suffix(); state->acct_flags = acct_flags; state->base = talloc_strdup(search->mem_ctx, state->base); state->scope = LDAP_SCOPE_SUBTREE; state->filter = get_ldap_filter(search->mem_ctx, "*"); state->attrs = talloc_attrs(search->mem_ctx, "uid", "sambaSid", "displayName", "description", "sambaAcctFlags", NULL); state->attrsonly = 0; state->pagedresults_cookie = NULL; state->entries = NULL; state->ldap2displayentry = ldapuser2displayentry; if ((state->filter == NULL) || (state->attrs == NULL)) { DEBUG(0, ("talloc failed\n")); return False; } search->private_data = state; search->next_entry = ldapsam_search_next_entry; search->search_end = ldapsam_search_end; return ldapsam_search_firstpage(search); } static bool ldapgroup2displayentry(struct ldap_search_state *state, TALLOC_CTX *mem_ctx, LDAP *ld, LDAPMessage *entry, struct samr_displayentry *result) { char **vals; DOM_SID sid; uint16 group_type; result->account_name = ""; result->fullname = ""; result->description = ""; vals = ldap_get_values(ld, entry, "sambaGroupType"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(5, ("\"sambaGroupType\" not found\n")); if (vals != NULL) { ldap_value_free(vals); } return False; } group_type = atoi(vals[0]); if ((state->group_type != 0) && ((state->group_type != group_type))) { ldap_value_free(vals); return False; } ldap_value_free(vals); /* display name is the NT group name */ vals = ldap_get_values(ld, entry, "displayName"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(8, ("\"displayName\" not found\n")); /* fallback to the 'cn' attribute */ vals = ldap_get_values(ld, entry, "cn"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(5, ("\"cn\" not found\n")); return False; } pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->account_name), vals[0]); } else { pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->account_name), vals[0]); } ldap_value_free(vals); vals = ldap_get_values(ld, entry, "description"); if ((vals == NULL) || (vals[0] == NULL)) DEBUG(8, ("\"description\" not found\n")); else pull_utf8_talloc(mem_ctx, CONST_DISCARD(char **, &result->description), vals[0]); ldap_value_free(vals); if ((result->account_name == NULL) || (result->fullname == NULL) || (result->description == NULL)) { DEBUG(0, ("talloc failed\n")); return False; } vals = ldap_get_values(ld, entry, "sambaSid"); if ((vals == NULL) || (vals[0] == NULL)) { DEBUG(0, ("\"objectSid\" not found\n")); if (vals != NULL) { ldap_value_free(vals); } return False; } if (!string_to_sid(&sid, vals[0])) { DEBUG(0, ("Could not convert %s to SID\n", vals[0])); return False; } ldap_value_free(vals); switch (group_type) { case SID_NAME_DOM_GRP: case SID_NAME_ALIAS: if (!sid_peek_check_rid(get_global_sam_sid(), &sid, &result->rid) && !sid_peek_check_rid(&global_sid_Builtin, &sid, &result->rid)) { DEBUG(0, ("%s is not in our domain\n", sid_string_dbg(&sid))); return False; } break; default: DEBUG(0,("unkown group type: %d\n", group_type)); return False; } return True; } static bool ldapsam_search_grouptype(struct pdb_methods *methods, struct pdb_search *search, const DOM_SID *sid, enum lsa_SidType type) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; struct ldap_search_state *state; fstring tmp; state = TALLOC_P(search->mem_ctx, struct ldap_search_state); if (state == NULL) { DEBUG(0, ("talloc failed\n")); return False; } state->connection = ldap_state->smbldap_state; state->base = talloc_strdup(search->mem_ctx, lp_ldap_group_suffix()); state->connection = ldap_state->smbldap_state; state->scope = LDAP_SCOPE_SUBTREE; state->filter = talloc_asprintf(search->mem_ctx, "(&(objectclass=sambaGroupMapping)" "(sambaGroupType=%d)(sambaSID=%s*))", type, sid_to_fstring(tmp, sid)); state->attrs = talloc_attrs(search->mem_ctx, "cn", "sambaSid", "displayName", "description", "sambaGroupType", NULL); state->attrsonly = 0; state->pagedresults_cookie = NULL; state->entries = NULL; state->group_type = type; state->ldap2displayentry = ldapgroup2displayentry; if ((state->filter == NULL) || (state->attrs == NULL)) { DEBUG(0, ("talloc failed\n")); return False; } search->private_data = state; search->next_entry = ldapsam_search_next_entry; search->search_end = ldapsam_search_end; return ldapsam_search_firstpage(search); } static bool ldapsam_search_groups(struct pdb_methods *methods, struct pdb_search *search) { return ldapsam_search_grouptype(methods, search, get_global_sam_sid(), SID_NAME_DOM_GRP); } static bool ldapsam_search_aliases(struct pdb_methods *methods, struct pdb_search *search, const DOM_SID *sid) { return ldapsam_search_grouptype(methods, search, sid, SID_NAME_ALIAS); } static bool ldapsam_rid_algorithm(struct pdb_methods *methods) { return False; } static NTSTATUS ldapsam_get_new_rid(struct ldapsam_privates *priv, uint32 *rid) { struct smbldap_state *smbldap_state = priv->smbldap_state; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; LDAPMod **mods = NULL; NTSTATUS status; char *value; int rc; uint32 nextRid = 0; const char *dn; TALLOC_CTX *mem_ctx; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); return NT_STATUS_NO_MEMORY; } status = smbldap_search_domain_info(smbldap_state, &result, get_global_sam_name(), False); if (!NT_STATUS_IS_OK(status)) { DEBUG(3, ("Could not get domain info: %s\n", nt_errstr(status))); goto done; } talloc_autofree_ldapmsg(mem_ctx, result); entry = ldap_first_entry(priv2ld(priv), result); if (entry == NULL) { DEBUG(0, ("Could not get domain info entry\n")); status = NT_STATUS_INTERNAL_DB_CORRUPTION; goto done; } /* Find the largest of the three attributes "sambaNextRid", "sambaNextGroupRid" and "sambaNextUserRid". I gave up on the concept of differentiating between user and group rids, and will use only "sambaNextRid" in the future. But for compatibility reasons I look if others have chosen different strategies -- VL */ value = smbldap_talloc_single_attribute(priv2ld(priv), entry, "sambaNextRid", mem_ctx); if (value != NULL) { uint32 tmp = (uint32)strtoul(value, NULL, 10); nextRid = MAX(nextRid, tmp); } value = smbldap_talloc_single_attribute(priv2ld(priv), entry, "sambaNextUserRid", mem_ctx); if (value != NULL) { uint32 tmp = (uint32)strtoul(value, NULL, 10); nextRid = MAX(nextRid, tmp); } value = smbldap_talloc_single_attribute(priv2ld(priv), entry, "sambaNextGroupRid", mem_ctx); if (value != NULL) { uint32 tmp = (uint32)strtoul(value, NULL, 10); nextRid = MAX(nextRid, tmp); } if (nextRid == 0) { nextRid = BASE_RID-1; } nextRid += 1; smbldap_make_mod(priv2ld(priv), entry, &mods, "sambaNextRid", talloc_asprintf(mem_ctx, "%d", nextRid)); talloc_autofree_ldapmod(mem_ctx, mods); if ((dn = smbldap_talloc_dn(mem_ctx, priv2ld(priv), entry)) == NULL) { status = NT_STATUS_NO_MEMORY; goto done; } rc = smbldap_modify(smbldap_state, dn, mods); /* ACCESS_DENIED is used as a placeholder for "the modify failed, * please retry" */ status = (rc == LDAP_SUCCESS) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED; done: if (NT_STATUS_IS_OK(status)) { *rid = nextRid; } TALLOC_FREE(mem_ctx); return status; } static NTSTATUS ldapsam_new_rid_internal(struct pdb_methods *methods, uint32 *rid) { int i; for (i=0; i<10; i++) { NTSTATUS result = ldapsam_get_new_rid( (struct ldapsam_privates *)methods->private_data, rid); if (NT_STATUS_IS_OK(result)) { return result; } if (!NT_STATUS_EQUAL(result, NT_STATUS_ACCESS_DENIED)) { return result; } /* The ldap update failed (maybe a race condition), retry */ } /* Tried 10 times, fail. */ return NT_STATUS_ACCESS_DENIED; } static bool ldapsam_new_rid(struct pdb_methods *methods, uint32 *rid) { NTSTATUS result = ldapsam_new_rid_internal(methods, rid); return NT_STATUS_IS_OK(result) ? True : False; } static bool ldapsam_sid_to_id(struct pdb_methods *methods, const DOM_SID *sid, union unid_t *id, enum lsa_SidType *type) { struct ldapsam_privates *priv = (struct ldapsam_privates *)methods->private_data; char *filter; const char *attrs[] = { "sambaGroupType", "gidNumber", "uidNumber", NULL }; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; bool ret = False; char *value; int rc; TALLOC_CTX *mem_ctx; mem_ctx = talloc_new(NULL); if (mem_ctx == NULL) { DEBUG(0, ("talloc_new failed\n")); return False; } filter = talloc_asprintf(mem_ctx, "(&(sambaSid=%s)" "(|(objectClass=%s)(objectClass=%s)))", sid_string_talloc(mem_ctx, sid), LDAP_OBJ_GROUPMAP, LDAP_OBJ_SAMBASAMACCOUNT); if (filter == NULL) { DEBUG(5, ("talloc_asprintf failed\n")); goto done; } rc = smbldap_search_suffix(priv->smbldap_state, filter, attrs, &result); if (rc != LDAP_SUCCESS) { goto done; } talloc_autofree_ldapmsg(mem_ctx, result); if (ldap_count_entries(priv2ld(priv), result) != 1) { DEBUG(10, ("Got %d entries, expected one\n", ldap_count_entries(priv2ld(priv), result))); goto done; } entry = ldap_first_entry(priv2ld(priv), result); value = smbldap_talloc_single_attribute(priv2ld(priv), entry, "sambaGroupType", mem_ctx); if (value != NULL) { const char *gid_str; /* It's a group */ gid_str = smbldap_talloc_single_attribute( priv2ld(priv), entry, "gidNumber", mem_ctx); if (gid_str == NULL) { DEBUG(1, ("%s has sambaGroupType but no gidNumber\n", smbldap_talloc_dn(mem_ctx, priv2ld(priv), entry))); goto done; } id->gid = strtoul(gid_str, NULL, 10); *type = (enum lsa_SidType)strtoul(value, NULL, 10); ret = True; goto done; } /* It must be a user */ value = smbldap_talloc_single_attribute(priv2ld(priv), entry, "uidNumber", mem_ctx); if (value == NULL) { DEBUG(1, ("Could not find uidNumber in %s\n", smbldap_talloc_dn(mem_ctx, priv2ld(priv), entry))); goto done; } id->uid = strtoul(value, NULL, 10); *type = SID_NAME_USER; ret = True; done: TALLOC_FREE(mem_ctx); return ret; } /* * The following functions is called only if * ldapsam:trusted and ldapsam:editposix are * set to true */ /* * ldapsam_create_user creates a new * posixAccount and sambaSamAccount object * in the ldap users subtree * * The uid is allocated by winbindd. */ static NTSTATUS ldapsam_create_user(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, const char *name, uint32 acb_info, uint32 *rid) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *entry = NULL; LDAPMessage *result = NULL; uint32 num_result; bool is_machine = False; bool add_posix = False; LDAPMod **mods = NULL; struct samu *user; char *filter; char *username; char *homedir; char *gidstr; char *uidstr; char *shell; const char *dn = NULL; DOM_SID group_sid; DOM_SID user_sid; gid_t gid = -1; uid_t uid = -1; NTSTATUS ret; int rc; if (((acb_info & ACB_NORMAL) && name[strlen(name)-1] == '$') || acb_info & ACB_WSTRUST || acb_info & ACB_SVRTRUST || acb_info & ACB_DOMTRUST) { is_machine = True; } username = escape_ldap_string_alloc(name); filter = talloc_asprintf(tmp_ctx, "(&(uid=%s)(objectClass=%s))", username, LDAP_OBJ_POSIXACCOUNT); SAFE_FREE(username); rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_create_user: ldap search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result > 1) { DEBUG (0, ("ldapsam_create_user: More than one user with name [%s] ?!\n", name)); return NT_STATUS_INTERNAL_DB_CORRUPTION; } if (num_result == 1) { char *tmp; /* check if it is just a posix account. * or if there is a sid attached to this entry */ entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } tmp = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaSID", tmp_ctx); if (tmp) { DEBUG (1, ("ldapsam_create_user: The user [%s] already exist!\n", name)); return NT_STATUS_USER_EXISTS; } /* it is just a posix account, retrieve the dn for later use */ dn = smbldap_talloc_dn(tmp_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_create_user: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } } if (num_result == 0) { add_posix = True; } /* Create the basic samu structure and generate the mods for the ldap commit */ if (!NT_STATUS_IS_OK((ret = ldapsam_new_rid_internal(my_methods, rid)))) { DEBUG(1, ("ldapsam_create_user: Could not allocate a new RID\n")); return ret; } sid_compose(&user_sid, get_global_sam_sid(), *rid); user = samu_new(tmp_ctx); if (!user) { DEBUG(1,("ldapsam_create_user: Unable to allocate user struct\n")); return NT_STATUS_NO_MEMORY; } if (!pdb_set_username(user, name, PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } if (!pdb_set_domain(user, get_global_sam_name(), PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } if (is_machine) { if (acb_info & ACB_NORMAL) { if (!pdb_set_acct_ctrl(user, ACB_WSTRUST, PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } } else { if (!pdb_set_acct_ctrl(user, acb_info, PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } } } else { if (!pdb_set_acct_ctrl(user, ACB_NORMAL | ACB_DISABLED, PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } } if (!pdb_set_user_sid(user, &user_sid, PDB_SET)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } if (!init_ldap_from_sam(ldap_state, NULL, &mods, user, element_is_set_or_changed)) { DEBUG(1,("ldapsam_create_user: Unable to fill user structs\n")); return NT_STATUS_UNSUCCESSFUL; } if (ldap_state->schema_ver != SCHEMAVER_SAMBASAMACCOUNT) { DEBUG(1,("ldapsam_create_user: Unsupported schema version\n")); } smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", LDAP_OBJ_SAMBASAMACCOUNT); if (add_posix) { char *escape_name; DEBUG(3,("ldapsam_create_user: Creating new posix user\n")); /* retrieve the Domain Users group gid */ if (!sid_compose(&group_sid, get_global_sam_sid(), DOMAIN_GROUP_RID_USERS) || !sid_to_gid(&group_sid, &gid)) { DEBUG (0, ("ldapsam_create_user: Unable to get the Domain Users gid: bailing out!\n")); return NT_STATUS_INVALID_PRIMARY_GROUP; } /* lets allocate a new userid for this user */ if (!winbind_allocate_uid(&uid)) { DEBUG (0, ("ldapsam_create_user: Unable to allocate a new user id: bailing out!\n")); return NT_STATUS_UNSUCCESSFUL; } if (is_machine) { /* TODO: choose a more appropriate default for machines */ homedir = talloc_sub_specified(tmp_ctx, lp_template_homedir(), "SMB_workstations_home", ldap_state->domain_name, uid, gid); shell = talloc_strdup(tmp_ctx, "/bin/false"); } else { homedir = talloc_sub_specified(tmp_ctx, lp_template_homedir(), name, ldap_state->domain_name, uid, gid); shell = talloc_sub_specified(tmp_ctx, lp_template_shell(), name, ldap_state->domain_name, uid, gid); } uidstr = talloc_asprintf(tmp_ctx, "%d", uid); gidstr = talloc_asprintf(tmp_ctx, "%d", gid); escape_name = escape_rdn_val_string_alloc(name); if (!escape_name) { DEBUG (0, ("ldapsam_create_user: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } if (is_machine) { dn = talloc_asprintf(tmp_ctx, "uid=%s,%s", escape_name, lp_ldap_machine_suffix ()); } else { dn = talloc_asprintf(tmp_ctx, "uid=%s,%s", escape_name, lp_ldap_user_suffix ()); } SAFE_FREE(escape_name); if (!homedir || !shell || !uidstr || !gidstr || !dn) { DEBUG (0, ("ldapsam_create_user: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", LDAP_OBJ_ACCOUNT); smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", LDAP_OBJ_POSIXACCOUNT); smbldap_set_mod(&mods, LDAP_MOD_ADD, "cn", name); smbldap_set_mod(&mods, LDAP_MOD_ADD, "uidNumber", uidstr); smbldap_set_mod(&mods, LDAP_MOD_ADD, "gidNumber", gidstr); smbldap_set_mod(&mods, LDAP_MOD_ADD, "homeDirectory", homedir); smbldap_set_mod(&mods, LDAP_MOD_ADD, "loginShell", shell); } talloc_autofree_ldapmod(tmp_ctx, mods); if (add_posix) { rc = smbldap_add(ldap_state->smbldap_state, dn, mods); } else { rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); } if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_create_user: failed to create a new user [%s] (dn = %s)\n", name ,dn)); return NT_STATUS_UNSUCCESSFUL; } DEBUG(2,("ldapsam_create_user: added account [%s] in the LDAP database\n", name)); flush_pwnam_cache(); return NT_STATUS_OK; } static NTSTATUS ldapsam_delete_user(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, struct samu *sam_acct) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int num_result; const char *dn; char *filter; int rc; DEBUG(0,("ldapsam_delete_user: Attempt to delete user [%s]\n", pdb_get_username(sam_acct))); filter = talloc_asprintf(tmp_ctx, "(&(uid=%s)" "(objectClass=%s)" "(objectClass=%s))", pdb_get_username(sam_acct), LDAP_OBJ_POSIXACCOUNT, LDAP_OBJ_SAMBASAMACCOUNT); if (filter == NULL) { return NT_STATUS_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_delete_user: user search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result == 0) { DEBUG(0,("ldapsam_delete_user: user not found!\n")); return NT_STATUS_NO_SUCH_USER; } if (num_result > 1) { DEBUG (0, ("ldapsam_delete_user: More than one user with name [%s] ?!\n", pdb_get_username(sam_acct))); return NT_STATUS_INTERNAL_DB_CORRUPTION; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } /* it is just a posix account, retrieve the dn for later use */ dn = smbldap_talloc_dn(tmp_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_delete_user: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } rc = smbldap_delete(ldap_state->smbldap_state, dn); if (rc != LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } flush_pwnam_cache(); return NT_STATUS_OK; } /* * ldapsam_create_group creates a new * posixGroup and sambaGroupMapping object * in the ldap groups subtree * * The gid is allocated by winbindd. */ static NTSTATUS ldapsam_create_dom_group(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, const char *name, uint32 *rid) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; NTSTATUS ret; LDAPMessage *entry = NULL; LDAPMessage *result = NULL; uint32 num_result; bool is_new_entry = False; LDAPMod **mods = NULL; char *filter; char *groupsidstr; char *groupname; char *grouptype; char *gidstr; const char *dn = NULL; DOM_SID group_sid; gid_t gid = -1; int rc; groupname = escape_ldap_string_alloc(name); filter = talloc_asprintf(tmp_ctx, "(&(cn=%s)(objectClass=%s))", groupname, LDAP_OBJ_POSIXGROUP); SAFE_FREE(groupname); rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_create_group: ldap search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result > 1) { DEBUG (0, ("ldapsam_create_group: There exists more than one group with name [%s]: bailing out!\n", name)); return NT_STATUS_INTERNAL_DB_CORRUPTION; } if (num_result == 1) { char *tmp; /* check if it is just a posix group. * or if there is a sid attached to this entry */ entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } tmp = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaSID", tmp_ctx); if (tmp) { DEBUG (1, ("ldapsam_create_group: The group [%s] already exist!\n", name)); return NT_STATUS_GROUP_EXISTS; } /* it is just a posix group, retrieve the gid and the dn for later use */ tmp = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "gidNumber", tmp_ctx); if (!tmp) { DEBUG (1, ("ldapsam_create_group: Couldn't retrieve the gidNumber for [%s]?!?!\n", name)); return NT_STATUS_INTERNAL_DB_CORRUPTION; } gid = strtoul(tmp, NULL, 10); dn = smbldap_talloc_dn(tmp_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_create_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } } if (num_result == 0) { char *escape_name; DEBUG(3,("ldapsam_create_user: Creating new posix group\n")); is_new_entry = True; /* lets allocate a new groupid for this group */ if (!winbind_allocate_gid(&gid)) { DEBUG (0, ("ldapsam_create_group: Unable to allocate a new group id: bailing out!\n")); return NT_STATUS_UNSUCCESSFUL; } gidstr = talloc_asprintf(tmp_ctx, "%d", gid); escape_name = escape_rdn_val_string_alloc(name); if (!escape_name) { DEBUG (0, ("ldapsam_create_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } dn = talloc_asprintf(tmp_ctx, "cn=%s,%s", escape_name, lp_ldap_group_suffix()); SAFE_FREE(escape_name); if (!gidstr || !dn) { DEBUG (0, ("ldapsam_create_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectclass", LDAP_OBJ_POSIXGROUP); smbldap_set_mod(&mods, LDAP_MOD_ADD, "cn", name); smbldap_set_mod(&mods, LDAP_MOD_ADD, "gidNumber", gidstr); } if (!NT_STATUS_IS_OK((ret = ldapsam_new_rid_internal(my_methods, rid)))) { DEBUG(1, ("ldapsam_create_group: Could not allocate a new RID\n")); return ret; } sid_compose(&group_sid, get_global_sam_sid(), *rid); groupsidstr = talloc_strdup(tmp_ctx, sid_string_talloc(tmp_ctx, &group_sid)); grouptype = talloc_asprintf(tmp_ctx, "%d", SID_NAME_DOM_GRP); if (!groupsidstr || !grouptype) { DEBUG(0,("ldapsam_create_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", LDAP_OBJ_GROUPMAP); smbldap_set_mod(&mods, LDAP_MOD_ADD, "sambaSid", groupsidstr); smbldap_set_mod(&mods, LDAP_MOD_ADD, "sambaGroupType", grouptype); smbldap_set_mod(&mods, LDAP_MOD_ADD, "displayName", name); talloc_autofree_ldapmod(tmp_ctx, mods); if (is_new_entry) { rc = smbldap_add(ldap_state->smbldap_state, dn, mods); #if 0 if (rc == LDAP_OBJECT_CLASS_VIOLATION) { /* This call may fail with rfc2307bis schema */ /* Retry adding a structural class */ smbldap_set_mod(&mods, LDAP_MOD_ADD, "objectClass", "????"); rc = smbldap_add(ldap_state->smbldap_state, dn, mods); } #endif } else { rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); } if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_create_group: failed to create a new group [%s] (dn = %s)\n", name ,dn)); return NT_STATUS_UNSUCCESSFUL; } DEBUG(2,("ldapsam_create_group: added group [%s] in the LDAP database\n", name)); return NT_STATUS_OK; } static NTSTATUS ldapsam_delete_dom_group(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, uint32 rid) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; int num_result; const char *dn; char *gidstr; char *filter; DOM_SID group_sid; int rc; /* get the group sid */ sid_compose(&group_sid, get_global_sam_sid(), rid); filter = talloc_asprintf(tmp_ctx, "(&(sambaSID=%s)" "(objectClass=%s)" "(objectClass=%s))", sid_string_talloc(tmp_ctx, &group_sid), LDAP_OBJ_POSIXGROUP, LDAP_OBJ_GROUPMAP); if (filter == NULL) { return NT_STATUS_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(1,("ldapsam_delete_dom_group: group search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result == 0) { DEBUG(1,("ldapsam_delete_dom_group: group not found!\n")); return NT_STATUS_NO_SUCH_GROUP; } if (num_result > 1) { DEBUG (0, ("ldapsam_delete_dom_group: More than one group with the same SID ?!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } /* here it is, retrieve the dn for later use */ dn = smbldap_talloc_dn(tmp_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_delete_dom_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } gidstr = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "gidNumber", tmp_ctx); if (!gidstr) { DEBUG (0, ("ldapsam_delete_dom_group: Unable to find the group's gid!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } /* check no user have this group marked as primary group */ filter = talloc_asprintf(tmp_ctx, "(&(gidNumber=%s)" "(objectClass=%s)" "(objectClass=%s))", gidstr, LDAP_OBJ_POSIXACCOUNT, LDAP_OBJ_SAMBASAMACCOUNT); rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(1,("ldapsam_delete_dom_group: accounts search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result != 0) { DEBUG(3,("ldapsam_delete_dom_group: Can't delete group, it is a primary group for %d users\n", num_result)); return NT_STATUS_MEMBERS_PRIMARY_GROUP; } rc = smbldap_delete(ldap_state->smbldap_state, dn); if (rc != LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } return NT_STATUS_OK; } static NTSTATUS ldapsam_change_groupmem(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, uint32 group_rid, uint32 member_rid, int modop) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *entry = NULL; LDAPMessage *result = NULL; uint32 num_result; LDAPMod **mods = NULL; char *filter; char *uidstr; const char *dn = NULL; DOM_SID group_sid; DOM_SID member_sid; int rc; switch (modop) { case LDAP_MOD_ADD: DEBUG(1,("ldapsam_change_groupmem: add new member(rid=%d) to a domain group(rid=%d)", member_rid, group_rid)); break; case LDAP_MOD_DELETE: DEBUG(1,("ldapsam_change_groupmem: delete member(rid=%d) from a domain group(rid=%d)", member_rid, group_rid)); break; default: return NT_STATUS_UNSUCCESSFUL; } /* get member sid */ sid_compose(&member_sid, get_global_sam_sid(), member_rid); /* get the group sid */ sid_compose(&group_sid, get_global_sam_sid(), group_rid); filter = talloc_asprintf(tmp_ctx, "(&(sambaSID=%s)" "(objectClass=%s)" "(objectClass=%s))", sid_string_talloc(tmp_ctx, &member_sid), LDAP_OBJ_POSIXACCOUNT, LDAP_OBJ_SAMBASAMACCOUNT); if (filter == NULL) { return NT_STATUS_NO_MEMORY; } /* get the member uid */ rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(1,("ldapsam_change_groupmem: member search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result == 0) { DEBUG(1,("ldapsam_change_groupmem: member not found!\n")); return NT_STATUS_NO_SUCH_MEMBER; } if (num_result > 1) { DEBUG (0, ("ldapsam_change_groupmem: More than one account with the same SID ?!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } if (modop == LDAP_MOD_DELETE) { /* check if we are trying to remove the member from his primary group */ char *gidstr; gid_t user_gid, group_gid; gidstr = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "gidNumber", tmp_ctx); if (!gidstr) { DEBUG (0, ("ldapsam_change_groupmem: Unable to find the member's gid!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } user_gid = strtoul(gidstr, NULL, 10); if (!sid_to_gid(&group_sid, &group_gid)) { DEBUG (0, ("ldapsam_change_groupmem: Unable to get group gid from SID!\n")); return NT_STATUS_UNSUCCESSFUL; } if (user_gid == group_gid) { DEBUG (3, ("ldapsam_change_groupmem: can't remove user from its own primary group!\n")); return NT_STATUS_MEMBERS_PRIMARY_GROUP; } } /* here it is, retrieve the uid for later use */ uidstr = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "uid", tmp_ctx); if (!uidstr) { DEBUG (0, ("ldapsam_change_groupmem: Unable to find the member's name!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } filter = talloc_asprintf(tmp_ctx, "(&(sambaSID=%s)" "(objectClass=%s)" "(objectClass=%s))", sid_string_talloc(tmp_ctx, &group_sid), LDAP_OBJ_POSIXGROUP, LDAP_OBJ_GROUPMAP); /* get the group */ rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(1,("ldapsam_change_groupmem: group search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(tmp_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result == 0) { DEBUG(1,("ldapsam_change_groupmem: group not found!\n")); return NT_STATUS_NO_SUCH_GROUP; } if (num_result > 1) { DEBUG (0, ("ldapsam_change_groupmem: More than one group with the same SID ?!\n")); return NT_STATUS_INTERNAL_DB_CORRUPTION; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } /* here it is, retrieve the dn for later use */ dn = smbldap_talloc_dn(tmp_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_change_groupmem: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } smbldap_set_mod(&mods, modop, "memberUid", uidstr); talloc_autofree_ldapmod(tmp_ctx, mods); rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); if (rc != LDAP_SUCCESS) { if (rc == LDAP_TYPE_OR_VALUE_EXISTS && modop == LDAP_MOD_ADD) { DEBUG(1,("ldapsam_change_groupmem: member is already in group, add failed!\n")); return NT_STATUS_MEMBER_IN_GROUP; } if (rc == LDAP_NO_SUCH_ATTRIBUTE && modop == LDAP_MOD_DELETE) { DEBUG(1,("ldapsam_change_groupmem: member is not in group, delete failed!\n")); return NT_STATUS_MEMBER_NOT_IN_GROUP; } return NT_STATUS_UNSUCCESSFUL; } return NT_STATUS_OK; } static NTSTATUS ldapsam_add_groupmem(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, uint32 group_rid, uint32 member_rid) { return ldapsam_change_groupmem(my_methods, tmp_ctx, group_rid, member_rid, LDAP_MOD_ADD); } static NTSTATUS ldapsam_del_groupmem(struct pdb_methods *my_methods, TALLOC_CTX *tmp_ctx, uint32 group_rid, uint32 member_rid) { return ldapsam_change_groupmem(my_methods, tmp_ctx, group_rid, member_rid, LDAP_MOD_DELETE); } static NTSTATUS ldapsam_set_primary_group(struct pdb_methods *my_methods, TALLOC_CTX *mem_ctx, struct samu *sampass) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)my_methods->private_data; LDAPMessage *entry = NULL; LDAPMessage *result = NULL; uint32 num_result; LDAPMod **mods = NULL; char *filter; char *escape_username; char *gidstr; const char *dn = NULL; gid_t gid; int rc; DEBUG(0,("ldapsam_set_primary_group: Attempt to set primary group for user [%s]\n", pdb_get_username(sampass))); if (!sid_to_gid(pdb_get_group_sid(sampass), &gid)) { DEBUG(0,("ldapsam_set_primary_group: failed to retieve gid from user's group SID!\n")); return NT_STATUS_UNSUCCESSFUL; } gidstr = talloc_asprintf(mem_ctx, "%d", gid); if (!gidstr) { DEBUG(0,("ldapsam_set_primary_group: Out of Memory!\n")); return NT_STATUS_NO_MEMORY; } escape_username = escape_ldap_string_alloc(pdb_get_username(sampass)); if (escape_username== NULL) { return NT_STATUS_NO_MEMORY; } filter = talloc_asprintf(mem_ctx, "(&(uid=%s)" "(objectClass=%s)" "(objectClass=%s))", escape_username, LDAP_OBJ_POSIXACCOUNT, LDAP_OBJ_SAMBASAMACCOUNT); SAFE_FREE(escape_username); if (filter == NULL) { return NT_STATUS_NO_MEMORY; } rc = smbldap_search_suffix(ldap_state->smbldap_state, filter, NULL, &result); if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_set_primary_group: user search failed!\n")); return NT_STATUS_UNSUCCESSFUL; } talloc_autofree_ldapmsg(mem_ctx, result); num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result == 0) { DEBUG(0,("ldapsam_set_primary_group: user not found!\n")); return NT_STATUS_NO_SUCH_USER; } if (num_result > 1) { DEBUG (0, ("ldapsam_set_primary_group: More than one user with name [%s] ?!\n", pdb_get_username(sampass))); return NT_STATUS_INTERNAL_DB_CORRUPTION; } entry = ldap_first_entry(priv2ld(ldap_state), result); if (!entry) { return NT_STATUS_UNSUCCESSFUL; } /* retrieve the dn for later use */ dn = smbldap_talloc_dn(mem_ctx, priv2ld(ldap_state), entry); if (!dn) { DEBUG(0,("ldapsam_set_primary_group: Out of memory!\n")); return NT_STATUS_NO_MEMORY; } /* remove the old one, and add the new one, this way we do not risk races */ smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "gidNumber", gidstr); if (mods == NULL) { return NT_STATUS_OK; } rc = smbldap_modify(ldap_state->smbldap_state, dn, mods); if (rc != LDAP_SUCCESS) { DEBUG(0,("ldapsam_set_primary_group: failed to modify [%s] primary group to [%s]\n", pdb_get_username(sampass), gidstr)); return NT_STATUS_UNSUCCESSFUL; } flush_pwnam_cache(); return NT_STATUS_OK; } /********************************************************************** trusted domains functions *********************************************************************/ static char *trusteddom_dn(struct ldapsam_privates *ldap_state, const char *domain) { return talloc_asprintf(talloc_tos(), "sambaDomainName=%s,%s", domain, ldap_state->domain_dn); } static bool get_trusteddom_pw_int(struct ldapsam_privates *ldap_state, const char *domain, LDAPMessage **entry) { int rc; char *filter; int scope = LDAP_SCOPE_SUBTREE; const char **attrs = NULL; /* NULL: get all attrs */ int attrsonly = 0; /* 0: return values too */ LDAPMessage *result = NULL; char *trusted_dn; uint32 num_result; filter = talloc_asprintf(talloc_tos(), "(&(objectClass=%s)(sambaDomainName=%s))", LDAP_OBJ_TRUSTDOM_PASSWORD, domain); trusted_dn = trusteddom_dn(ldap_state, domain); if (trusted_dn == NULL) { return False; } rc = smbldap_search(ldap_state->smbldap_state, trusted_dn, scope, filter, attrs, attrsonly, &result); if (rc == LDAP_NO_SUCH_OBJECT) { *entry = NULL; return True; } if (rc != LDAP_SUCCESS) { return False; } num_result = ldap_count_entries(priv2ld(ldap_state), result); if (num_result > 1) { DEBUG(1, ("ldapsam_get_trusteddom_pw: more than one " "sambaTrustedDomainPassword object for domain '%s'" "?!\n", domain)); return False; } if (num_result == 0) { DEBUG(1, ("ldapsam_get_trusteddom_pw: no " "sambaTrustedDomainPassword object for domain %s.\n", domain)); *entry = NULL; } else { *entry = ldap_first_entry(priv2ld(ldap_state), result); } return True; } static bool ldapsam_get_trusteddom_pw(struct pdb_methods *methods, const char *domain, char** pwd, DOM_SID *sid, time_t *pass_last_set_time) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *entry = NULL; DEBUG(10, ("ldapsam_get_trusteddom_pw called for domain %s\n", domain)); if (!get_trusteddom_pw_int(ldap_state, domain, &entry) || (entry == NULL)) { return False; } /* password */ if (pwd != NULL) { char *pwd_str; pwd_str = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaClearTextPassword", talloc_tos()); if (pwd_str == NULL) { return False; } /* trusteddom_pw routines do not use talloc yet... */ *pwd = SMB_STRDUP(pwd_str); if (*pwd == NULL) { return False; } } /* last change time */ if (pass_last_set_time != NULL) { char *time_str; time_str = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaPwdLastSet", talloc_tos()); if (time_str == NULL) { return False; } *pass_last_set_time = (time_t)atol(time_str); } /* domain sid */ if (sid != NULL) { char *sid_str; DOM_SID *dom_sid; sid_str = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaSID", talloc_tos()); if (sid_str == NULL) { return False; } dom_sid = string_sid_talloc(talloc_tos(), sid_str); if (dom_sid == NULL) { return False; } sid_copy(sid, dom_sid); } return True; } static bool ldapsam_set_trusteddom_pw(struct pdb_methods *methods, const char* domain, const char* pwd, const DOM_SID *sid) { struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *entry = NULL; LDAPMod **mods = NULL; char *prev_pwd = NULL; char *trusted_dn = NULL; int rc; DEBUG(10, ("ldapsam_set_trusteddom_pw called for domain %s\n", domain)); /* * get the current entry (if there is one) in order to put the * current password into the previous password attribute */ if (!get_trusteddom_pw_int(ldap_state, domain, &entry)) { return False; } mods = NULL; smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "objectClass", "sambaTrustedDomainPassword"); smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "sambaDomainName", domain); smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "sambaSID", sid_string_tos(sid)); smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "sambaPwdLastSet", talloc_asprintf(talloc_tos(), "%li", time(NULL))); smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "sambaClearTextPassword", pwd); if (entry != NULL) { prev_pwd = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaClearTextPassword", talloc_tos()); if (prev_pwd != NULL) { smbldap_make_mod(priv2ld(ldap_state), entry, &mods, "sambaPreviousClearTextPassword", prev_pwd); } } trusted_dn = trusteddom_dn(ldap_state, domain); if (trusted_dn == NULL) { return False; } if (entry == NULL) { rc = smbldap_add(ldap_state->smbldap_state, trusted_dn, mods); } else { rc = smbldap_modify(ldap_state->smbldap_state, trusted_dn, mods); } if (rc != LDAP_SUCCESS) { DEBUG(1, ("error writing trusted domain password!\n")); return False; } return True; } static bool ldapsam_del_trusteddom_pw(struct pdb_methods *methods, const char *domain) { int rc; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; LDAPMessage *entry = NULL; const char *trusted_dn; if (!get_trusteddom_pw_int(ldap_state, domain, &entry)) { return False; } if (entry == NULL) { DEBUG(5, ("ldapsam_del_trusteddom_pw: no such trusted domain: " "%s\n", domain)); return True; } trusted_dn = smbldap_talloc_dn(talloc_tos(), priv2ld(ldap_state), entry); if (trusted_dn == NULL) { DEBUG(0,("ldapsam_del_trusteddom_pw: Out of memory!\n")); return False; } rc = smbldap_delete(ldap_state->smbldap_state, trusted_dn); if (rc != LDAP_SUCCESS) { return False; } return True; } static NTSTATUS ldapsam_enum_trusteddoms(struct pdb_methods *methods, TALLOC_CTX *mem_ctx, uint32 *num_domains, struct trustdom_info ***domains) { int rc; struct ldapsam_privates *ldap_state = (struct ldapsam_privates *)methods->private_data; char *filter; int scope = LDAP_SCOPE_SUBTREE; const char *attrs[] = { "sambaDomainName", "sambaSID", NULL }; int attrsonly = 0; /* 0: return values too */ LDAPMessage *result = NULL; LDAPMessage *entry = NULL; filter = talloc_asprintf(talloc_tos(), "(objectClass=%s)", LDAP_OBJ_TRUSTDOM_PASSWORD); rc = smbldap_search(ldap_state->smbldap_state, ldap_state->domain_dn, scope, filter, attrs, attrsonly, &result); if (rc != LDAP_SUCCESS) { return NT_STATUS_UNSUCCESSFUL; } *num_domains = 0; if (!(*domains = TALLOC_ARRAY(mem_ctx, struct trustdom_info *, 1))) { DEBUG(1, ("talloc failed\n")); return NT_STATUS_NO_MEMORY; } for (entry = ldap_first_entry(priv2ld(ldap_state), result); entry != NULL; entry = ldap_next_entry(priv2ld(ldap_state), entry)) { char *dom_name, *dom_sid_str; struct trustdom_info *dom_info; dom_info = TALLOC_P(*domains, struct trustdom_info); if (dom_info == NULL) { DEBUG(1, ("talloc failed\n")); return NT_STATUS_NO_MEMORY; } dom_name = smbldap_talloc_single_attribute(priv2ld(ldap_state), entry, "sambaDomainName", talloc_tos()); if (dom_name == NULL) { DEBUG(1, ("talloc failed\n")); return NT_STATUS_NO_MEMORY; } dom_info->name = dom_name; dom_sid_str = smbldap_talloc_single_attribute( priv2ld(ldap_state), entry, "sambaSID", talloc_tos()); if (dom_sid_str == NULL) { DEBUG(1, ("talloc failed\n")); return NT_STATUS_NO_MEMORY; } if (!string_to_sid(&dom_info->sid, dom_sid_str)) { DEBUG(1, ("Error calling string_to_sid on SID %s\n", dom_sid_str)); return NT_STATUS_UNSUCCESSFUL; } ADD_TO_ARRAY(*domains, struct trustdom_info *, dom_info, domains, num_domains); if (*domains == NULL) { DEBUG(1, ("talloc failed\n")); return NT_STATUS_NO_MEMORY; } } DEBUG(5, ("ldapsam_enum_trusteddoms: got %d domains\n", *num_domains)); return NT_STATUS_OK; } /********************************************************************** Housekeeping *********************************************************************/ static void free_private_data(void **vp) { struct ldapsam_privates **ldap_state = (struct ldapsam_privates **)vp; smbldap_free_struct(&(*ldap_state)->smbldap_state); if ((*ldap_state)->result != NULL) { ldap_msgfree((*ldap_state)->result); (*ldap_state)->result = NULL; } if ((*ldap_state)->domain_dn != NULL) { SAFE_FREE((*ldap_state)->domain_dn); } *ldap_state = NULL; /* No need to free any further, as it is talloc()ed */ } /********************************************************************* Intitalise the parts of the pdb_methods structure that are common to all pdb_ldap modes *********************************************************************/ static NTSTATUS pdb_init_ldapsam_common(struct pdb_methods **pdb_method, const char *location) { NTSTATUS nt_status; struct ldapsam_privates *ldap_state; if (!NT_STATUS_IS_OK(nt_status = make_pdb_method( pdb_method ))) { return nt_status; } (*pdb_method)->name = "ldapsam"; (*pdb_method)->getsampwnam = ldapsam_getsampwnam; (*pdb_method)->getsampwsid = ldapsam_getsampwsid; (*pdb_method)->add_sam_account = ldapsam_add_sam_account; (*pdb_method)->update_sam_account = ldapsam_update_sam_account; (*pdb_method)->delete_sam_account = ldapsam_delete_sam_account; (*pdb_method)->rename_sam_account = ldapsam_rename_sam_account; (*pdb_method)->getgrsid = ldapsam_getgrsid; (*pdb_method)->getgrgid = ldapsam_getgrgid; (*pdb_method)->getgrnam = ldapsam_getgrnam; (*pdb_method)->add_group_mapping_entry = ldapsam_add_group_mapping_entry; (*pdb_method)->update_group_mapping_entry = ldapsam_update_group_mapping_entry; (*pdb_method)->delete_group_mapping_entry = ldapsam_delete_group_mapping_entry; (*pdb_method)->enum_group_mapping = ldapsam_enum_group_mapping; (*pdb_method)->get_account_policy = ldapsam_get_account_policy; (*pdb_method)->set_account_policy = ldapsam_set_account_policy; (*pdb_method)->get_seq_num = ldapsam_get_seq_num; (*pdb_method)->rid_algorithm = ldapsam_rid_algorithm; (*pdb_method)->new_rid = ldapsam_new_rid; (*pdb_method)->get_trusteddom_pw = ldapsam_get_trusteddom_pw; (*pdb_method)->set_trusteddom_pw = ldapsam_set_trusteddom_pw; (*pdb_method)->del_trusteddom_pw = ldapsam_del_trusteddom_pw; (*pdb_method)->enum_trusteddoms = ldapsam_enum_trusteddoms; /* TODO: Setup private data and free */ if ( !(ldap_state = TALLOC_ZERO_P(*pdb_method, struct ldapsam_privates)) ) { DEBUG(0, ("pdb_init_ldapsam_common: talloc() failed for ldapsam private_data!\n")); return NT_STATUS_NO_MEMORY; } nt_status = smbldap_init(*pdb_method, pdb_get_event_context(), location, &ldap_state->smbldap_state); if ( !NT_STATUS_IS_OK(nt_status) ) { return nt_status; } if ( !(ldap_state->domain_name = talloc_strdup(*pdb_method, get_global_sam_name()) ) ) { return NT_STATUS_NO_MEMORY; } (*pdb_method)->private_data = ldap_state; (*pdb_method)->free_private_data = free_private_data; return NT_STATUS_OK; } /********************************************************************** Initialise the 'compat' mode for pdb_ldap *********************************************************************/ NTSTATUS pdb_init_ldapsam_compat(struct pdb_methods **pdb_method, const char *location) { NTSTATUS nt_status; struct ldapsam_privates *ldap_state; char *uri = talloc_strdup( NULL, location ); trim_char( uri, '\"', '\"' ); nt_status = pdb_init_ldapsam_common( pdb_method, uri ); if ( uri ) TALLOC_FREE( uri ); if ( !NT_STATUS_IS_OK(nt_status) ) { return nt_status; } (*pdb_method)->name = "ldapsam_compat"; ldap_state = (struct ldapsam_privates *)((*pdb_method)->private_data); ldap_state->schema_ver = SCHEMAVER_SAMBAACCOUNT; sid_copy(&ldap_state->domain_sid, get_global_sam_sid()); return NT_STATUS_OK; } /********************************************************************** Initialise the normal mode for pdb_ldap *********************************************************************/ NTSTATUS pdb_init_ldapsam(struct pdb_methods **pdb_method, const char *location) { NTSTATUS nt_status; struct ldapsam_privates *ldap_state = NULL; uint32 alg_rid_base; char *alg_rid_base_string = NULL; LDAPMessage *result = NULL; LDAPMessage *entry = NULL; DOM_SID ldap_domain_sid; DOM_SID secrets_domain_sid; char *domain_sid_string = NULL; char *dn = NULL; char *uri = talloc_strdup( NULL, location ); trim_char( uri, '\"', '\"' ); nt_status = pdb_init_ldapsam_common(pdb_method, uri); if (uri) { TALLOC_FREE(uri); } if (!NT_STATUS_IS_OK(nt_status)) { return nt_status; } (*pdb_method)->name = "ldapsam"; (*pdb_method)->add_aliasmem = ldapsam_add_aliasmem; (*pdb_method)->del_aliasmem = ldapsam_del_aliasmem; (*pdb_method)->enum_aliasmem = ldapsam_enum_aliasmem; (*pdb_method)->enum_alias_memberships = ldapsam_alias_memberships; (*pdb_method)->search_users = ldapsam_search_users; (*pdb_method)->search_groups = ldapsam_search_groups; (*pdb_method)->search_aliases = ldapsam_search_aliases; if (lp_parm_bool(-1, "ldapsam", "trusted", False)) { (*pdb_method)->enum_group_members = ldapsam_enum_group_members; (*pdb_method)->enum_group_memberships = ldapsam_enum_group_memberships; (*pdb_method)->lookup_rids = ldapsam_lookup_rids; (*pdb_method)->sid_to_id = ldapsam_sid_to_id; if (lp_parm_bool(-1, "ldapsam", "editposix", False)) { (*pdb_method)->create_user = ldapsam_create_user; (*pdb_method)->delete_user = ldapsam_delete_user; (*pdb_method)->create_dom_group = ldapsam_create_dom_group; (*pdb_method)->delete_dom_group = ldapsam_delete_dom_group; (*pdb_method)->add_groupmem = ldapsam_add_groupmem; (*pdb_method)->del_groupmem = ldapsam_del_groupmem; (*pdb_method)->set_unix_primary_group = ldapsam_set_primary_group; } } ldap_state = (struct ldapsam_privates *)((*pdb_method)->private_data); ldap_state->schema_ver = SCHEMAVER_SAMBASAMACCOUNT; /* Try to setup the Domain Name, Domain SID, algorithmic rid base */ nt_status = smbldap_search_domain_info(ldap_state->smbldap_state, &result, ldap_state->domain_name, True); if ( !NT_STATUS_IS_OK(nt_status) ) { DEBUG(2, ("pdb_init_ldapsam: WARNING: Could not get domain " "info, nor add one to the domain\n")); DEBUGADD(2, ("pdb_init_ldapsam: Continuing on regardless, " "will be unable to allocate new users/groups, " "and will risk BDCs having inconsistant SIDs\n")); sid_copy(&ldap_state->domain_sid, get_global_sam_sid()); return NT_STATUS_OK; } /* Given that the above might fail, everything below this must be * optional */ entry = ldap_first_entry(ldap_state->smbldap_state->ldap_struct, result); if (!entry) { DEBUG(0, ("pdb_init_ldapsam: Could not get domain info " "entry\n")); ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } dn = smbldap_get_dn(ldap_state->smbldap_state->ldap_struct, entry); if (!dn) { ldap_msgfree(result); return NT_STATUS_UNSUCCESSFUL; } ldap_state->domain_dn = smb_xstrdup(dn); ldap_memfree(dn); domain_sid_string = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_userattr_key2string(ldap_state->schema_ver, LDAP_ATTR_USER_SID), talloc_tos()); if (domain_sid_string) { bool found_sid; if (!string_to_sid(&ldap_domain_sid, domain_sid_string)) { DEBUG(1, ("pdb_init_ldapsam: SID [%s] could not be " "read as a valid SID\n", domain_sid_string)); ldap_msgfree(result); TALLOC_FREE(domain_sid_string); return NT_STATUS_INVALID_PARAMETER; } found_sid = secrets_fetch_domain_sid(ldap_state->domain_name, &secrets_domain_sid); if (!found_sid || !sid_equal(&secrets_domain_sid, &ldap_domain_sid)) { DEBUG(1, ("pdb_init_ldapsam: Resetting SID for domain " "%s based on pdb_ldap results %s -> %s\n", ldap_state->domain_name, sid_string_dbg(&secrets_domain_sid), sid_string_dbg(&ldap_domain_sid))); /* reset secrets.tdb sid */ secrets_store_domain_sid(ldap_state->domain_name, &ldap_domain_sid); DEBUG(1, ("New global sam SID: %s\n", sid_string_dbg(get_global_sam_sid()))); } sid_copy(&ldap_state->domain_sid, &ldap_domain_sid); TALLOC_FREE(domain_sid_string); } alg_rid_base_string = smbldap_talloc_single_attribute( ldap_state->smbldap_state->ldap_struct, entry, get_attr_key2string( dominfo_attr_list, LDAP_ATTR_ALGORITHMIC_RID_BASE ), talloc_tos()); if (alg_rid_base_string) { alg_rid_base = (uint32)atol(alg_rid_base_string); if (alg_rid_base != algorithmic_rid_base()) { DEBUG(0, ("The value of 'algorithmic RID base' has " "changed since the LDAP\n" "database was initialised. Aborting. \n")); ldap_msgfree(result); TALLOC_FREE(alg_rid_base_string); return NT_STATUS_UNSUCCESSFUL; } TALLOC_FREE(alg_rid_base_string); } ldap_msgfree(result); return NT_STATUS_OK; } NTSTATUS pdb_ldap_init(void) { NTSTATUS nt_status; if (!NT_STATUS_IS_OK(nt_status = smb_register_passdb(PASSDB_INTERFACE_VERSION, "ldapsam", pdb_init_ldapsam))) return nt_status; if (!NT_STATUS_IS_OK(nt_status = smb_register_passdb(PASSDB_INTERFACE_VERSION, "ldapsam_compat", pdb_init_ldapsam_compat))) return nt_status; /* Let pdb_nds register backends */ pdb_nds_init(); return NT_STATUS_OK; }