s4:dsdb/common/util - Indentation fixes
[ira/wip.git] / source4 / dsdb / common / util.c
index 82f5b6ed1d46a56940800c66e0939776572414d6..189cb4ec8278d3ff3cb676ef7faaa4bdbab6c7a0 100644 (file)
@@ -6,17 +6,17 @@
    Copyright (C) Volker Lendecke 2004
    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2006
    Copyright (C) Jelmer Vernooij <jelmer@samba.org> 2007
-   
+
    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 <http://www.gnu.org/licenses/>.
 */
@@ -31,7 +31,7 @@
 #include "libcli/security/security.h"
 #include "librpc/gen_ndr/ndr_security.h"
 #include "librpc/gen_ndr/ndr_misc.h"
-#include "dsdb/common/flags.h"
+#include "../libds/common/flags.h"
 #include "dsdb/common/proto.h"
 #include "libcli/ldap/ldap_ndr.h"
 #include "param/param.h"
@@ -106,7 +106,6 @@ const char *samdb_search_string_v(struct ldb_context *sam_ldb,
 
        return samdb_result_string(res[0], attr_name, NULL);
 }
-                                
 
 /*
   search the sam for a single string attribute in exactly 1 record
@@ -436,6 +435,22 @@ NTTIME samdb_result_nttime(struct ldb_message *msg, const char *attr, NTTIME def
        return ldb_msg_find_attr_as_uint64(msg, attr, default_value);
 }
 
+/*
+ * Windows stores 0 for lastLogoff.
+ * But when a MS DC return the lastLogoff (as Logoff Time)
+ * it returns 0x7FFFFFFFFFFFFFFF, not returning this value in this case
+ * cause windows 2008 and newer version to fail for SMB requests
+ */
+NTTIME samdb_result_last_logoff(struct ldb_message *msg)
+{
+       NTTIME ret = ldb_msg_find_attr_as_uint64(msg, "lastLogoff",0);
+
+       if (ret == 0)
+               ret = 0x7FFFFFFFFFFFFFFFULL;
+
+       return ret;
+}
+
 /*
  * Windows uses both 0 and 9223372036854775807 (0x7FFFFFFFFFFFFFFFULL) to
  * indicate an account doesn't expire.
@@ -530,7 +545,7 @@ NTTIME samdb_result_force_password_change(struct ldb_context *sam_ldb,
 /*
   pull a samr_Password structutre from a result set. 
 */
-struct samr_Password *samdb_result_hash(TALLOC_CTX *mem_ctx, struct ldb_message *msg, const char *attr)
+struct samr_Password *samdb_result_hash(TALLOC_CTX *mem_ctx, const struct ldb_message *msg, const char *attr)
 {
        struct samr_Password *hash = NULL;
        const struct ldb_val *val = ldb_msg_find_ldb_val(msg, attr);
@@ -544,7 +559,7 @@ struct samr_Password *samdb_result_hash(TALLOC_CTX *mem_ctx, struct ldb_message
 /*
   pull an array of samr_Password structutres from a result set. 
 */
-uint_t samdb_result_hashes(TALLOC_CTX *mem_ctx, struct ldb_message *msg, 
+uint_t samdb_result_hashes(TALLOC_CTX *mem_ctx, const struct ldb_message *msg, 
                           const char *attr, struct samr_Password **hashes)
 {
        uint_t count = 0;
@@ -641,13 +656,13 @@ uint32_t samdb_result_acct_flags(struct ldb_context *sam_ctx, TALLOC_CTX *mem_ct
                                 struct ldb_message *msg, struct ldb_dn *domain_dn)
 {
        uint32_t userAccountControl = ldb_msg_find_attr_as_uint(msg, "userAccountControl", 0);
-       uint32_t acct_flags = samdb_uf2acb(userAccountControl); 
+       uint32_t acct_flags = ds_uf2acb(userAccountControl);
        NTTIME must_change_time;
        NTTIME now;
-       
+
        must_change_time = samdb_result_force_password_change(sam_ctx, mem_ctx, 
                                                              domain_dn, msg);
-       
+
        /* Test account expire time */
        unix_to_nt_time(&now, time(NULL));
        /* check for expired password */
@@ -722,7 +737,7 @@ int samdb_find_or_add_attribute(struct ldb_context *ldb, struct ldb_message *msg
        if (el) {
                return LDB_SUCCESS;
        }
-               
+
        return samdb_msg_add_string(ldb, msg, msg, name, set_value);
 }
 
@@ -903,7 +918,7 @@ int samdb_msg_add_hashes(TALLOC_CTX *mem_ctx, struct ldb_message *msg,
 int samdb_msg_add_acct_flags(struct ldb_context *sam_ldb, TALLOC_CTX *mem_ctx, struct ldb_message *msg,
                             const char *attr_name, uint32_t v)
 {
-       return samdb_msg_add_uint(sam_ldb, mem_ctx, msg, attr_name, samdb_acb2uf(v));
+       return samdb_msg_add_uint(sam_ldb, mem_ctx, msg, attr_name, ds_acb2uf(v));
 }
 
 /*
@@ -1070,7 +1085,7 @@ const struct dom_sid *samdb_domain_sid(struct ldb_context *ldb)
        if (ret != LDB_SUCCESS) {
                goto failed;
        }
-       
+
        if (res->count != 1) {
                goto failed;
        }
@@ -1165,7 +1180,7 @@ struct ldb_dn *samdb_ntds_settings_dn(struct ldb_context *ldb)
        int ret;
        struct ldb_result *root_res;
        struct ldb_dn *settings_dn;
-       
+
        /* see if we have a cached copy */
        settings_dn = (struct ldb_dn *)ldb_get_opaque(ldb, "cache.settings_dn");
        if (settings_dn) {
@@ -1176,7 +1191,6 @@ struct ldb_dn *samdb_ntds_settings_dn(struct ldb_context *ldb)
        if (tmp_ctx == NULL) {
                goto failed;
        }
-       
 
        ret = ldb_search(ldb, tmp_ctx, &root_res, ldb_dn_new(tmp_ctx, ldb, ""), LDB_SCOPE_BASE, root_attrs, NULL);
        if (ret) {
@@ -1217,7 +1231,7 @@ const struct GUID *samdb_ntds_invocation_id(struct ldb_context *ldb)
        int ret;
        struct ldb_result *res;
        struct GUID *invocation_id;
-       
+
        /* see if we have a cached copy */
        invocation_id = (struct GUID *)ldb_get_opaque(ldb, "cache.invocation_id");
        if (invocation_id) {
@@ -1310,7 +1324,7 @@ const struct GUID *samdb_ntds_objectGUID(struct ldb_context *ldb)
        int ret;
        struct ldb_result *res;
        struct GUID *ntds_guid;
-       
+
        /* see if we have a cached copy */
        ntds_guid = (struct GUID *)ldb_get_opaque(ldb, "cache.ntds_guid");
        if (ntds_guid) {
@@ -1359,7 +1373,7 @@ bool samdb_set_ntds_objectGUID(struct ldb_context *ldb, const struct GUID *ntds_
        TALLOC_CTX *tmp_ctx;
        struct GUID *ntds_guid_new;
        struct GUID *ntds_guid_old;
-       
+
        /* see if we have a cached copy */
        ntds_guid_old = (struct GUID *)ldb_get_opaque(ldb, "cache.ntds_guid");
 
@@ -1513,7 +1527,7 @@ int samdb_search_for_parent_domain(struct ldb_context *ldb, TALLOC_CTX *mem_ctx,
 
        local_ctx = talloc_new(mem_ctx);
        if (local_ctx == NULL) return LDB_ERR_OPERATIONS_ERROR;
-       
+
        while ((sdn = ldb_dn_get_parent(local_ctx, sdn))) {
                ret = ldb_search(ldb, local_ctx, &res, sdn, LDB_SCOPE_BASE, attrs,
                                 "(|(|(objectClass=domain)(objectClass=builtinDomain))(objectClass=samba4LocalDomain))");
@@ -1546,15 +1560,6 @@ int samdb_search_for_parent_domain(struct ldb_context *ldb, TALLOC_CTX *mem_ctx,
        return ret;
 }
 
-/*
-  check that a password is sufficiently complex
-*/
-static bool samdb_password_complexity_ok(const char *pass)
-{
-       return check_password_quality(pass);
-}
-
-
 
 /*
   set the user password using plaintext, obeying any user or domain
@@ -1658,6 +1663,11 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
        minPwdLength =     samdb_result_uint(res[0],   "minPwdLength", 0);
        minPwdAge =        samdb_result_int64(res[0],  "minPwdAge", 0);
 
+       if (userAccountControl & UF_PASSWD_NOTREQD) {
+               /* see [MS-ADTS] 2.2.15 */
+               minPwdLength = 0;
+       }
+
        if (_dominfo) {
                struct samr_DomInfo1 *dominfo;
                /* on failure we need to fill in the reject reasons */
@@ -1675,7 +1685,7 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
 
        if (restrictions && new_password) {
                char *new_pass;
-               
+
                /* check the various password restrictions */
                if (restrictions && minPwdLength > utf16_len_n(new_password->data, new_password->length) / 2) {
                        if (reject_reason) {
@@ -1686,30 +1696,29 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
 
                /* Create the NT hash */
                mdfour(local_ntNewHash.hash, new_password->data, new_password->length);
-               
+
                ntNewHash = &local_ntNewHash;
 
                /* Only check complexity if we can convert it at all.  Assuming unconvertable passwords are 'strong' */
-               if (convert_string_talloc_convenience(mem_ctx, lp_iconv_convenience(ldb_get_opaque(ctx, "loadparm")), 
-                                         CH_UTF16, CH_UNIX, 
-                                         new_password->data, new_password->length, 
-                                         (void **)&new_pass, false) != -1) {
-                       
-                       
+               if (convert_string_talloc_convenience(mem_ctx,
+                         lp_iconv_convenience(ldb_get_opaque(ctx, "loadparm")),
+                         CH_UTF16, CH_UNIX,
+                         new_password->data, new_password->length,
+                         (void **)&new_pass, NULL, false)) {
+
                        /* possibly check password complexity */
-                       if (restrictions && pwdProperties & DOMAIN_PASSWORD_COMPLEX &&
-                           !samdb_password_complexity_ok(new_pass)) {
+                       if (restrictions && (pwdProperties & DOMAIN_PASSWORD_COMPLEX) &&
+                           !check_password_quality(new_pass)) {
                                if (reject_reason) {
                                        *reject_reason = SAMR_REJECT_COMPLEXITY;
                                }
                                return NT_STATUS_PASSWORD_RESTRICTION;
                        }
-                       
+
                        /* compute the new lm hashes (for checking history - case insenitivly!) */
                        if (E_deshash(new_pass, local_lmNewHash.hash)) {
                                lmNewHash = &local_lmNewHash;
                        }
-                       
                }
        }
 
@@ -1721,7 +1730,7 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
                        }
                        return NT_STATUS_PASSWORD_RESTRICTION;
                }
-               
+
                /* can this user change password? */
                if (userAccountControl & UF_PASSWD_CANT_CHANGE) {
                        if (reject_reason) {
@@ -1729,7 +1738,7 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
                        }
                        return NT_STATUS_PASSWORD_RESTRICTION;
                }
-               
+
                /* yes, this is a minus. The ages are in negative 100nsec units! */
                if (pwdLastSet - minPwdAge > now_nt) {
                        if (reject_reason) {
@@ -1753,11 +1762,11 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
                                return NT_STATUS_PASSWORD_RESTRICTION;
                        }
                }
-               
+
                /* check the password history */
                sambaLMPwdHistory_len = MIN(sambaLMPwdHistory_len, pwdHistoryLength);
                sambaNTPwdHistory_len = MIN(sambaNTPwdHistory_len, pwdHistoryLength);
-               
+
                for (i=0; lmNewHash && i<sambaLMPwdHistory_len;i++) {
                        if (memcmp(lmNewHash->hash, sambaLMPwdHistory[i].hash, 16) == 0) {
                                if (reject_reason) {
@@ -1794,7 +1803,7 @@ NTSTATUS samdb_set_password(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
                } else {
                        CHECK_RET(samdb_msg_add_delete(ctx, mem_ctx, mod, "dBCSPwd"));
                }
-               
+
                if (ntNewHash) {
                        CHECK_RET(samdb_msg_add_hash(ctx, mem_ctx, mod, "unicodePwd", ntNewHash));
                } else {
@@ -1866,7 +1875,7 @@ NTSTATUS samdb_set_password_sid(struct ldb_context *ctx, TALLOC_CTX *mem_ctx,
                ldb_transaction_cancel(ctx);
                return nt_status;
        }
-       
+
        /* modify the samdb record */
        ret = samdb_replace(ctx, mem_ctx, msg);
        if (ret != 0) {
@@ -1893,42 +1902,42 @@ NTSTATUS samdb_create_foreign_security_principal(struct ldb_context *sam_ctx, TA
        struct ldb_dn *basedn;
        const char *sidstr;
        int ret;
-       
+
        sidstr = dom_sid_string(mem_ctx, sid);
        NT_STATUS_HAVE_NO_MEMORY(sidstr);
-       
+
        /* We might have to create a ForeignSecurityPrincipal, even if this user
         * is in our own domain */
-       
+
        msg = ldb_msg_new(mem_ctx);
        if (msg == NULL) {
                return NT_STATUS_NO_MEMORY;
        }
-       
+
        /* TODO: Hmmm. This feels wrong. How do I find the base dn to
         * put the ForeignSecurityPrincipals? d_state->domain_dn does
         * not work, this is wrong for the Builtin domain, there's no
         * cn=For...,cn=Builtin,dc={BASEDN}.  -- vl
         */
-       
+
        basedn = samdb_search_dn(sam_ctx, mem_ctx, NULL,
                                 "(&(objectClass=container)(cn=ForeignSecurityPrincipals))");
-       
+
        if (basedn == NULL) {
                DEBUG(0, ("Failed to find DN for "
                          "ForeignSecurityPrincipal container\n"));
                return NT_STATUS_INTERNAL_DB_CORRUPTION;
        }
-       
+
        /* add core elements to the ldb_message for the alias */
        msg->dn = ldb_dn_copy(mem_ctx, basedn);
        if ( ! ldb_dn_add_child_fmt(msg->dn, "CN=%s", sidstr))
                return NT_STATUS_NO_MEMORY;
-       
+
        samdb_msg_add_string(sam_ctx, mem_ctx, msg,
                             "objectClass",
                             "foreignSecurityPrincipal");
-       
+
        /* create the alias */
        ret = ldb_add(sam_ctx, msg);
        if (ret != 0) {
@@ -1954,11 +1963,11 @@ struct ldb_dn *samdb_dns_domain_to_dn(struct ldb_context *ldb, TALLOC_CTX *mem_c
        const char *binary_encoded;
        const char **split_realm;
        struct ldb_dn *dn;
-       
+
        if (!tmp_ctx) {
                return NULL;
        }
-       
+
        split_realm = (const char **)str_list_make(tmp_ctx, dns_domain, ".");
        if (!split_realm) {
                talloc_free(tmp_ctx);
@@ -2007,7 +2016,7 @@ struct ldb_dn *samdb_domain_to_dn(struct ldb_context *ldb, TALLOC_CTX *mem_ctx,
        if (ret_domain != 0) {
                return NULL;
        }
-       
+
        if (res_domain_ref->count == 0) {
                ret_domain = ldb_search(ldb, mem_ctx,
                                                &res_domain_ref, 
@@ -2018,19 +2027,117 @@ struct ldb_dn *samdb_domain_to_dn(struct ldb_context *ldb, TALLOC_CTX *mem_ctx,
                if (ret_domain != 0) {
                        return NULL;
                }
-       
+
                if (res_domain_ref->count == 1) {
                        return res_domain_ref->msgs[0]->dn;
                }
                return NULL;
        }
-       
+
        if (res_domain_ref->count > 1) {
                DEBUG(0,("Found %d records matching domain [%s]\n", 
                         ret_domain, domain_name));
                return NULL;
        }
-       
+
        return samdb_result_dn(ldb, mem_ctx, res_domain_ref->msgs[0], "nCName", NULL);
 
 }
+
+
+/*
+  use a GUID to find a DN
+ */
+int dsdb_find_dn_by_guid(struct ldb_context *ldb, 
+                        TALLOC_CTX *mem_ctx,
+                        const char *guid_str, struct ldb_dn **dn)
+{
+       int ret;
+       struct ldb_result *res;
+       const char *attrs[] = { NULL };
+       struct ldb_request *search_req;
+       char *expression;
+       struct ldb_search_options_control *options;
+
+       expression = talloc_asprintf(mem_ctx, "objectGUID=%s", guid_str);
+       if (!expression) {
+               DEBUG(0, (__location__ ": out of memory\n"));
+               return LDB_ERR_OPERATIONS_ERROR;
+       }
+
+       res = talloc_zero(mem_ctx, struct ldb_result);
+       if (!res) {
+               DEBUG(0, (__location__ ": out of memory\n"));
+               return LDB_ERR_OPERATIONS_ERROR;
+       }
+
+       ret = ldb_build_search_req(&search_req, ldb, mem_ctx,
+                                  ldb_get_default_basedn(ldb),
+                                  LDB_SCOPE_SUBTREE,
+                                  expression, attrs,
+                                  NULL,
+                                  res, ldb_search_default_callback,
+                                  NULL);
+       if (ret != LDB_SUCCESS) {
+               return ret;
+       }
+
+       /* we need to cope with cross-partition links, so search for
+          the GUID over all partitions */
+       options = talloc(search_req, struct ldb_search_options_control);
+       if (options == NULL) {
+               DEBUG(0, (__location__ ": out of memory\n"));
+               return LDB_ERR_OPERATIONS_ERROR;
+       }
+       options->search_options = LDB_SEARCH_OPTION_PHANTOM_ROOT;
+
+       ret = ldb_request_add_control(search_req,
+                                     LDB_CONTROL_SEARCH_OPTIONS_OID,
+                                     true, options);
+       if (ret != LDB_SUCCESS) {
+               return ret;
+       }
+
+       ret = ldb_request(ldb, search_req);
+       if (ret != LDB_SUCCESS) {
+               return ret;
+       }
+
+       ret = ldb_wait(search_req->handle, LDB_WAIT_ALL);
+       if (ret != LDB_SUCCESS) {
+               return ret;
+       }
+
+       /* this really should be exactly 1, but there is a bug in the
+          partitions module that can return two here with the
+          search_options control set */
+       if (res->count < 1) {
+               return LDB_ERR_NO_SUCH_OBJECT;
+       }
+
+       *dn = res->msgs[0]->dn;
+
+       return LDB_SUCCESS;
+}
+
+
+/*
+  use a DN to find a GUID
+ */
+int dsdb_find_guid_by_dn(struct ldb_context *ldb, 
+                        struct ldb_dn *dn, struct GUID *guid)
+{
+       int ret;
+       struct ldb_result *res;
+       const char *attrs[] = { "objectGUID", NULL };
+       TALLOC_CTX *tmp_ctx = talloc_new(ldb);
+
+       ret = ldb_search(ldb, tmp_ctx, &res, dn, LDB_SCOPE_BASE, attrs, NULL);
+       if (ret != LDB_SUCCESS) {
+               talloc_free(tmp_ctx);
+               return ret;
+       }
+       *guid = samdb_result_guid(res->msgs[0], "objectGUID");
+       talloc_free(tmp_ctx);
+       return LDB_SUCCESS;
+}