Clean up provision and rootdse module to hard-code less stuff.
[samba.git] / source4 / dsdb / samdb / ldb_modules / rootdse.c
index e96da829eb908c8178443fe0f4e9100ec6ea14d7..50f333d09572bfd6d70150641f748ff5be174531 100644 (file)
@@ -8,7 +8,7 @@
    
    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 2 of the License, or
+   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,
    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, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
 #include "lib/ldb/include/ldb.h"
 #include "lib/ldb/include/ldb_errors.h"
 #include "lib/ldb/include/ldb_private.h"
-#include "auth/gensec/gensec.h"
 #include "system/time.h"
+#include "dsdb/samdb/samdb.h"
+#include "version.h"
 
 struct private_data {
        int num_controls;
        char **controls;
+       int num_partitions;
+       struct ldb_dn **partitions;
 };
 
 /*
@@ -43,6 +45,11 @@ static int do_attribute(const char * const *attrs, const char *name)
                ldb_attr_in_list(attrs, "*");
 }
 
+static int do_attribute_explicit(const char * const *attrs, const char *name)
+{
+       return attrs != NULL && ldb_attr_in_list(attrs, name);
+}
+
 
 /*
   add dynamically generated attributes to rootDSE result
@@ -50,12 +57,17 @@ static int do_attribute(const char * const *attrs, const char *name)
 static int rootdse_add_dynamic(struct ldb_module *module, struct ldb_message *msg, const char * const *attrs)
 {
        struct private_data *priv = talloc_get_type(module->private_data, struct private_data);
-       struct cli_credentials *server_creds;
+       char **server_sasl;
+       const struct dsdb_schema *schema;
 
-       msg->dn = ldb_dn_explode(msg, "");
+       schema = dsdb_get_schema(module->ldb);
 
-       /* don't return the distinduishedName attribute if any */
+       msg->dn = ldb_dn_new(msg, module->ldb, NULL);
+
+       /* don't return the distinduishedName, cn and name attributes */
        ldb_msg_remove_attr(msg, "distinguishedName");
+       ldb_msg_remove_attr(msg, "cn");
+       ldb_msg_remove_attr(msg, "name");
 
        if (do_attribute(attrs, "currentTime")) {
                if (ldb_msg_add_steal_string(msg, "currentTime", 
@@ -78,37 +90,126 @@ static int rootdse_add_dynamic(struct ldb_module *module, struct ldb_message *ms
                }
        }
 
-       server_creds = talloc_get_type(ldb_get_opaque(module->ldb, "server_credentials"), 
-                                      struct cli_credentials);
-       if (server_creds && do_attribute(attrs, "supportedSASLMechanisms")) {
-               struct gensec_security_ops **backends = gensec_security_all();
-               enum credentials_use_kerberos use_kerberos
-                       = cli_credentials_get_kerberos_state(server_creds);
-               struct gensec_security_ops **ops
-                       = gensec_use_kerberos_mechs(msg, backends, use_kerberos);
+       if (do_attribute(attrs, "namingContexts")) {
+               int i;
+               for (i = 0; i < priv->num_partitions; i++) {
+                       struct ldb_dn *dn = priv->partitions[i];
+                       if (ldb_msg_add_steal_string(msg, "namingContexts",
+                                                    ldb_dn_alloc_linearized(msg, dn)) != 0) {
+                               goto failed;
+                       }
+               }
+       }
+
+       server_sasl = talloc_get_type(ldb_get_opaque(module->ldb, "supportedSASLMechanims"), 
+                                      char *);
+       if (server_sasl && do_attribute(attrs, "supportedSASLMechanisms")) {
                int i;
-               for (i = 0; ops && ops[i]; i++) {
-                       if (ops[i]->sasl_name) {
-                               char *sasl_name = talloc_strdup(msg, ops[i]->sasl_name);
-                               if (!sasl_name) {
+               for (i = 0; server_sasl && server_sasl[i]; i++) {
+                       char *sasl_name = talloc_strdup(msg, server_sasl[i]);
+                       if (!sasl_name) {
+                               goto failed;
+                       }
+                       if (ldb_msg_add_steal_string(msg, "supportedSASLMechanisms",
+                                                    sasl_name) != 0) {
+                               goto failed;
+                       }
+               }
+       }
+
+       if (do_attribute(attrs, "highestCommittedUSN")) {
+               uint64_t seq_num;
+               int ret = ldb_sequence_number(module->ldb, LDB_SEQ_HIGHEST_SEQ, &seq_num);
+               if (ret == LDB_SUCCESS) {
+                       if (ldb_msg_add_fmt(msg, "highestCommittedUSN", 
+                                           "%llu", (unsigned long long)seq_num) != 0) {
+                               goto failed;
+                       }
+               }
+       }
+
+       if (schema && do_attribute_explicit(attrs, "dsSchemaAttrCount")) {
+               struct dsdb_attribute *cur;
+               uint32_t n = 0;
+
+               for (cur = schema->attributes; cur; cur = cur->next) {
+                       n++;
+               }
+
+               if (ldb_msg_add_fmt(msg, "dsSchemaAttrCount", 
+                                   "%u", n) != 0) {
+                       goto failed;
+               }
+       }
+
+       if (schema && do_attribute_explicit(attrs, "dsSchemaClassCount")) {
+               struct dsdb_class *cur;
+               uint32_t n = 0;
+
+               for (cur = schema->classes; cur; cur = cur->next) {
+                       n++;
+               }
+
+               if (ldb_msg_add_fmt(msg, "dsSchemaClassCount", 
+                                   "%u", n) != 0) {
+                       goto failed;
+               }
+       }
+
+       if (schema && do_attribute_explicit(attrs, "dsSchemaPrefixCount")) {
+               if (ldb_msg_add_fmt(msg, "dsSchemaPrefixCount", 
+                                   "%u", schema->num_prefixes) != 0) {
+                       goto failed;
+               }
+       }
+
+       if (do_attribute_explicit(attrs, "validFSMOs")) {
+               const struct dsdb_schema_fsmo *schema_fsmo;
+               const struct dsdb_naming_fsmo *naming_fsmo;
+               const struct dsdb_pdc_fsmo *pdc_fsmo;
+               const char *dn_str;
+
+               schema_fsmo = talloc_get_type(ldb_get_opaque(module->ldb, "dsdb_schema_fsmo"),
+                                             struct dsdb_schema_fsmo);
+               if (schema_fsmo && schema_fsmo->we_are_master) {
+                       dn_str = ldb_dn_get_linearized(samdb_schema_dn(module->ldb));
+                       if (dn_str && dn_str[0]) {
+                               if (ldb_msg_add_fmt(msg, "validFSMOs", "%s", dn_str) != 0) {
                                        goto failed;
                                }
-                               if (ldb_msg_add_steal_string(msg, "supportedSASLMechanisms",
-                                                            sasl_name) != 0) {
+                       }
+               }
+
+               naming_fsmo = talloc_get_type(ldb_get_opaque(module->ldb, "dsdb_naming_fsmo"),
+                                             struct dsdb_naming_fsmo);
+               if (naming_fsmo && naming_fsmo->we_are_master) {
+                       dn_str = ldb_dn_get_linearized(samdb_partitions_dn(module->ldb, msg));
+                       if (dn_str && dn_str[0]) {
+                               if (ldb_msg_add_fmt(msg, "validFSMOs", "%s", dn_str) != 0) {
+                                       goto failed;
+                               }
+                       }
+               }
+
+               pdc_fsmo = talloc_get_type(ldb_get_opaque(module->ldb, "dsdb_pdc_fsmo"),
+                                          struct dsdb_pdc_fsmo);
+               if (pdc_fsmo && pdc_fsmo->we_are_master) {
+                       dn_str = ldb_dn_get_linearized(samdb_base_dn(module->ldb));
+                       if (dn_str && dn_str[0]) {
+                               if (ldb_msg_add_fmt(msg, "validFSMOs", "%s", dn_str) != 0) {
                                        goto failed;
                                }
                        }
                }
        }
 
-       if (do_attribute(attrs, "highestCommittedUSN")) {
-               if (module->ldb->sequence_number != NULL && 
-                   ldb_msg_add_fmt(msg, "highestCommittedUSN", 
-                                   "%llu", module->ldb->sequence_number(module->ldb)) != 0) {
+       if (schema && do_attribute_explicit(attrs, "vendorVersion")) {
+               if (ldb_msg_add_fmt(msg, "vendorVersion", 
+                                   "%s", SAMBA_VERSION_STRING) != 0) {
                        goto failed;
                }
        }
-       
+
        /* TODO: lots more dynamic attributes should be added here */
 
        return LDB_SUCCESS;
@@ -121,26 +222,30 @@ failed:
   handle search requests
 */
 
-struct rootdse_async_context {
+struct rootdse_context {
        struct ldb_module *module;
        void *up_context;
-       int (*up_callback)(struct ldb_context *, void *, struct ldb_async_result *);
+       int (*up_callback)(struct ldb_context *, void *, struct ldb_reply *);
 
        const char * const * attrs;
 };
 
-static int rootdse_async_callback(struct ldb_context *ldb, void *context, struct ldb_async_result *ares)
+static int rootdse_callback(struct ldb_context *ldb, void *context, struct ldb_reply *ares)
 {
-       struct rootdse_async_context *ac;
+       struct rootdse_context *ac;
 
-       if (!context || !ares) {
-               ldb_set_errstring(ldb, talloc_asprintf(ldb, "NULL Context or Result in callback"));
-               goto error;
-       }
-
-       ac = talloc_get_type(context, struct rootdse_async_context);
+       ac = talloc_get_type(context, struct rootdse_context);
 
        if (ares->type == LDB_REPLY_ENTRY) {
+               /*
+                * if the client explicit asks for the 'netlogon' attribute
+                * the reply_entry needs to be skipped
+                */
+               if (ac->attrs && ldb_attr_in_list(ac->attrs, "netlogon")) {
+                       talloc_free(ares);
+                       return LDB_SUCCESS;
+               }
+
                /* for each record returned post-process to add any dynamic
                   attributes that have been asked for */
                if (rootdse_add_dynamic(ac->module, ares->message, ac->attrs) != LDB_SUCCESS) {
@@ -157,24 +262,24 @@ error:
 
 static int rootdse_search(struct ldb_module *module, struct ldb_request *req)
 {
-       struct rootdse_async_context *ac;
+       struct rootdse_context *ac;
        struct ldb_request *down_req;
        int ret;
 
        /* see if its for the rootDSE */
        if (req->op.search.scope != LDB_SCOPE_BASE ||
-           (req->op.search.base && req->op.search.base->comp_num != 0)) {
+           ( ! ldb_dn_is_null(req->op.search.base))) {
                return ldb_next_request(module, req);
        }
 
-       ac = talloc(req, struct rootdse_async_context);
+       ac = talloc(req, struct rootdse_context);
        if (ac == NULL) {
                return LDB_ERR_OPERATIONS_ERROR;
        }
 
        ac->module = module;
-       ac->up_context = req->async.context;
-       ac->up_callback = req->async.callback;
+       ac->up_context = req->context;
+       ac->up_callback = req->callback;
        ac->attrs = req->op.search.attrs;
 
        down_req = talloc_zero(req, struct ldb_request);
@@ -183,10 +288,10 @@ static int rootdse_search(struct ldb_module *module, struct ldb_request *req)
        }
 
        down_req->operation = req->operation;
-       /* in our db we store the rootDSE with a DN of cn=rootDSE */
-       down_req->op.search.base = ldb_dn_explode(down_req, "cn=rootDSE");
+       /* in our db we store the rootDSE with a DN of @ROOTDSE */
+       down_req->op.search.base = ldb_dn_new(down_req, module->ldb, "@ROOTDSE");
        down_req->op.search.scope = LDB_SCOPE_BASE;
-       down_req->op.search.tree = ldb_parse_tree(down_req, "dn=*");
+       down_req->op.search.tree = ldb_parse_tree(down_req, NULL);
        if (down_req->op.search.base == NULL || down_req->op.search.tree == NULL) {
                ldb_oom(module->ldb);
                talloc_free(down_req);
@@ -195,8 +300,8 @@ static int rootdse_search(struct ldb_module *module, struct ldb_request *req)
        down_req->op.search.attrs = req->op.search.attrs;
        down_req->controls = req->controls;
 
-       down_req->async.context = ac;
-       down_req->async.callback = rootdse_async_callback;
+       down_req->context = ac;
+       down_req->callback = rootdse_callback;
        ldb_set_timeout_from_prev_req(module->ldb, req, down_req);
 
        /* perform the search */
@@ -205,7 +310,7 @@ static int rootdse_search(struct ldb_module *module, struct ldb_request *req)
        /* do not free down_req as the call results may be linked to it,
         * it will be freed when the upper level request get freed */
        if (ret == LDB_SUCCESS) {
-               req->async.handle = down_req->async.handle;
+               req->handle = down_req->handle;
        }
 
        return ret;
@@ -221,7 +326,7 @@ static int rootdse_register_control(struct ldb_module *module, struct ldb_reques
                return LDB_ERR_OPERATIONS_ERROR;
        }
 
-       list[priv->num_controls] = talloc_strdup(list, req->op.reg.oid);
+       list[priv->num_controls] = talloc_strdup(list, req->op.reg_control.oid);
        if (!list[priv->num_controls]) {
                return LDB_ERR_OPERATIONS_ERROR;
        }
@@ -232,13 +337,36 @@ static int rootdse_register_control(struct ldb_module *module, struct ldb_reques
        return LDB_SUCCESS;
 }
  
+static int rootdse_register_partition(struct ldb_module *module, struct ldb_request *req)
+{
+       struct private_data *priv = talloc_get_type(module->private_data, struct private_data);
+       struct ldb_dn **list;
+
+       list = talloc_realloc(priv, priv->partitions, struct ldb_dn *, priv->num_partitions + 1);
+       if (!list) {
+               return LDB_ERR_OPERATIONS_ERROR;
+       }
+
+       list[priv->num_partitions] = ldb_dn_copy(list, req->op.reg_partition.dn);
+       if (!list[priv->num_partitions]) {
+               return LDB_ERR_OPERATIONS_ERROR;
+       }
+
+       priv->num_partitions += 1;
+       priv->partitions = list;
+
+       return LDB_SUCCESS;
+}
 
 static int rootdse_request(struct ldb_module *module, struct ldb_request *req)
 {
        switch (req->operation) {
 
-       case LDB_REQ_REGISTER:
+       case LDB_REQ_REGISTER_CONTROL:
                return rootdse_register_control(module, req);
+       case LDB_REQ_REGISTER_PARTITION:
+               return rootdse_register_partition(module, req);
 
        default:
                break;
@@ -257,20 +385,18 @@ static int rootdse_init(struct ldb_module *module)
 
        data->num_controls = 0;
        data->controls = NULL;
+       data->num_partitions = 0;
+       data->partitions = NULL;
        module->private_data = data;
 
+       ldb_set_default_dns(module->ldb);
+
        return ldb_next_init(module);
 }
 
-static const struct ldb_module_ops rootdse_ops = {
+_PUBLIC_ const struct ldb_module_ops ldb_rootdse_module_ops = {
        .name                   = "rootdse",
        .init_context           = rootdse_init,
        .search                 = rootdse_search,
        .request                = rootdse_request
 };
-
-int rootdse_module_init(void)
-{
-       return ldb_register_module(&rootdse_ops);
-}
-