Fix the mess with ldb includes.
[metze/samba/wip.git] / source4 / lib / ldb / common / ldb_match.c
index b6f5f5a18d226feee4555a2b1be8bee6cd8f77e9..c622701d308c1c2807ab0c8e5a30085399343bb4 100644 (file)
@@ -11,7 +11,7 @@
    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
-   version 2 of the License, or (at your option) any later version.
+   version 3 of the License, or (at your option) any later version.
 
    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -19,8 +19,7 @@
    Lesser General Public License for more details.
 
    You should have received a copy of the GNU Lesser General Public
-   License along with this library; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+   License along with this library; if not, see <http://www.gnu.org/licenses/>.
 */
 
 /*
  *  Author: Andrew Tridgell
  */
 
-#include "includes.h"
-#include "ldb/include/ldb.h"
-#include "ldb/include/ldb_private.h"
-
+#include "ldb_private.h"
 
 /*
   check if the scope matches in a search result
 */
 static int ldb_match_scope(struct ldb_context *ldb,
-                          const char *base_str,
-                          const char *dn_str,
+                          struct ldb_dn *base,
+                          struct ldb_dn *dn,
                           enum ldb_scope scope)
 {
-       struct ldb_dn *base;
-       struct ldb_dn *dn;
        int ret = 0;
 
-       if (base_str == NULL) {
+       if (base == NULL || dn == NULL) {
                return 1;
        }
 
-       base = ldb_dn_explode_casefold(ldb, base_str);
-       if (base == NULL) return 0;
-
-       dn = ldb_dn_explode_casefold(ldb, dn_str);
-       if (dn == NULL) {
-               talloc_free(base);
-               return 0;
-       }
-
        switch (scope) {
        case LDB_SCOPE_BASE:
-               if (ldb_dn_compare(ldb, base, dn) == 0) {
+               if (ldb_dn_compare(base, dn) == 0) {
                        ret = 1;
                }
                break;
 
        case LDB_SCOPE_ONELEVEL:
-               if (dn->comp_num == (base->comp_num + 1)) {
-                       if (ldb_dn_compare_base(ldb, base, dn) == 0) {
+               if (ldb_dn_get_comp_num(dn) == (ldb_dn_get_comp_num(base) + 1)) {
+                       if (ldb_dn_compare_base(base, dn) == 0) {
                                ret = 1;
                        }
                }
@@ -80,14 +65,12 @@ static int ldb_match_scope(struct ldb_context *ldb,
                
        case LDB_SCOPE_SUBTREE:
        default:
-               if (ldb_dn_compare_base(ldb, base, dn) == 0) {
+               if (ldb_dn_compare_base(base, dn) == 0) {
                        ret = 1;
                }
                break;
        }
 
-       talloc_free(base);
-       talloc_free(dn);
        return ret;
 }
 
@@ -96,13 +79,11 @@ static int ldb_match_scope(struct ldb_context *ldb,
   match if node is present
 */
 static int ldb_match_present(struct ldb_context *ldb, 
-                           struct ldb_message *msg,
-                           struct ldb_parse_tree *tree,
-                           const char *base,
-                           enum ldb_scope scope)
+                            const struct ldb_message *msg,
+                            const struct ldb_parse_tree *tree,
+                            enum ldb_scope scope)
 {
-
-       if (ldb_attr_cmp(tree->u.present.attr, "dn") == 0) {
+       if (ldb_attr_dn(tree->u.present.attr) == 0) {
                return 1;
        }
 
@@ -114,15 +95,14 @@ static int ldb_match_present(struct ldb_context *ldb,
 }
 
 static int ldb_match_comparison(struct ldb_context *ldb, 
-                               struct ldb_message *msg,
-                               struct ldb_parse_tree *tree,
-                               const char *base,
+                               const struct ldb_message *msg,
+                               const struct ldb_parse_tree *tree,
                                enum ldb_scope scope,
                                enum ldb_parse_op comp_op)
 {
        unsigned int i;
        struct ldb_message_element *el;
-       const struct ldb_attrib_handler *h;
+       const struct ldb_schema_attribute *a;
        int ret;
 
        /* FIXME: APPROX comparison not handled yet */
@@ -133,10 +113,10 @@ static int ldb_match_comparison(struct ldb_context *ldb,
                return 0;
        }
 
-       h = ldb_attrib_handler(ldb, el->name);
+       a = ldb_schema_attribute_by_name(ldb, el->name);
 
        for (i = 0; i < el->num_values; i++) {
-               ret = h->comparison_fn(ldb, ldb, &el->values[i], &tree->u.comparison.value);
+               ret = a->syntax->comparison_fn(ldb, ldb, &el->values[i], &tree->u.comparison.value);
 
                if (ret == 0) {
                        return 1;
@@ -156,31 +136,24 @@ static int ldb_match_comparison(struct ldb_context *ldb,
   match a simple leaf node
 */
 static int ldb_match_equality(struct ldb_context *ldb, 
-                             struct ldb_message *msg,
-                             struct ldb_parse_tree *tree,
-                             const char *base,
+                             const struct ldb_message *msg,
+                             const struct ldb_parse_tree *tree,
                              enum ldb_scope scope)
 {
        unsigned int i;
        struct ldb_message_element *el;
-       const struct ldb_attrib_handler *h;
-       struct ldb_dn *msgdn, *valuedn;
+       const struct ldb_schema_attribute *a;
+       struct ldb_dn *valuedn;
        int ret;
 
-       if (ldb_attr_cmp(tree->u.equality.attr, "dn") == 0) {
-
-               msgdn = ldb_dn_explode_casefold(ldb, msg->dn);
-               if (msgdn == NULL) return 0;
-
-               valuedn = ldb_dn_explode_casefold(ldb, tree->u.equality.value.data);
+       if (ldb_attr_dn(tree->u.equality.attr) == 0) {
+               valuedn = ldb_dn_from_ldb_val(ldb, ldb, &tree->u.equality.value);
                if (valuedn == NULL) {
-                       talloc_free(msgdn);
                        return 0;
                }
 
-               ret = ldb_dn_compare(ldb, msgdn, valuedn);
+               ret = ldb_dn_compare(msg->dn, valuedn);
 
-               talloc_free(msgdn);
                talloc_free(valuedn);
 
                if (ret == 0) return 1;
@@ -194,11 +167,11 @@ static int ldb_match_equality(struct ldb_context *ldb,
                return 0;
        }
 
-       h = ldb_attrib_handler(ldb, el->name);
+       a = ldb_schema_attribute_by_name(ldb, el->name);
 
        for (i=0;i<el->num_values;i++) {
-               if (h->comparison_fn(ldb, ldb, &tree->u.equality.value, 
-                                    &el->values[i]) == 0) {
+               if (a->syntax->comparison_fn(ldb, ldb, &tree->u.equality.value, 
+                                            &el->values[i]) == 0) {
                        return 1;
                }
        }
@@ -207,20 +180,20 @@ static int ldb_match_equality(struct ldb_context *ldb,
 }
 
 static int ldb_wildcard_compare(struct ldb_context *ldb,
-                               struct ldb_parse_tree *tree,
+                               const struct ldb_parse_tree *tree,
                                const struct ldb_val value)
 {
-       const struct ldb_attrib_handler *h;
+       const struct ldb_schema_attribute *a;
        struct ldb_val val;
        struct ldb_val cnk;
        struct ldb_val *chunk;
        char *p, *g;
-       char *save_p = NULL;
+       uint8_t *save_p = NULL;
        int c = 0;
 
-       h = ldb_attrib_handler(ldb, tree->u.substring.attr);
+       a = ldb_schema_attribute_by_name(ldb, tree->u.substring.attr);
 
-       if(h->canonicalise_fn(ldb, ldb, &value, &val) != 0)
+       if(a->syntax->canonicalise_fn(ldb, ldb, &value, &val) != 0)
                return -1;
 
        save_p = val.data;
@@ -229,10 +202,13 @@ static int ldb_wildcard_compare(struct ldb_context *ldb,
        if ( ! tree->u.substring.start_with_wildcard ) {
 
                chunk = tree->u.substring.chunks[c];
-               if(h->canonicalise_fn(ldb, ldb, chunk, &cnk) != 0) goto failed;
+               if(a->syntax->canonicalise_fn(ldb, ldb, chunk, &cnk) != 0) goto failed;
 
-               /* FIXME: case of embedded nulls */
-               if (strncmp(val.data, cnk.data, cnk.length) != 0) goto failed;
+               /* This deals with wildcard prefix searches on binary attributes (eg objectGUID) */
+               if (cnk.length > val.length) {
+                       goto failed;
+               }
+               if (memcmp((char *)val.data, (char *)cnk.data, cnk.length) != 0) goto failed;
                val.length -= cnk.length;
                val.data += cnk.length;
                c++;
@@ -243,19 +219,19 @@ static int ldb_wildcard_compare(struct ldb_context *ldb,
        while (tree->u.substring.chunks[c]) {
 
                chunk = tree->u.substring.chunks[c];
-               if(h->canonicalise_fn(ldb, ldb, chunk, &cnk) != 0) goto failed;
+               if(a->syntax->canonicalise_fn(ldb, ldb, chunk, &cnk) != 0) goto failed;
 
                /* FIXME: case of embedded nulls */
-               p = strstr(val.data, cnk.data);
+               p = strstr((char *)val.data, (char *)cnk.data);
                if (p == NULL) goto failed;
                if ( (! tree->u.substring.chunks[c + 1]) && (! tree->u.substring.end_with_wildcard) ) {
                        do { /* greedy */
-                               g = strstr(p + cnk.length, cnk.data);
+                               g = strstr((char *)p + cnk.length, (char *)cnk.data);
                                if (g) p = g;
                        } while(g);
                }
                val.length = val.length - (p - (char *)(val.data)) - cnk.length;
-               val.data = p + cnk.length;
+               val.data = (uint8_t *)(p + cnk.length);
                c++;
                talloc_free(cnk.data);
                cnk.data = NULL;
@@ -275,9 +251,8 @@ failed:
   match a simple leaf node
 */
 static int ldb_match_substring(struct ldb_context *ldb, 
-                              struct ldb_message *msg,
-                              struct ldb_parse_tree *tree,
-                              const char *base,
+                              const struct ldb_message *msg,
+                              const struct ldb_parse_tree *tree,
                               enum ldb_scope scope)
 {
        unsigned int i;
@@ -301,22 +276,22 @@ static int ldb_match_substring(struct ldb_context *ldb,
 /*
   bitwise-and comparator
 */
-static int ldb_comparator_and(struct ldb_val *v1, struct ldb_val *v2)
+static int ldb_comparator_and(const struct ldb_val *v1, const struct ldb_val *v2)
 {
        uint64_t i1, i2;
-       i1 = strtoull(v1->data, NULL, 0);
-       i2 = strtoull(v2->data, NULL, 0);
+       i1 = strtoull((char *)v1->data, NULL, 0);
+       i2 = strtoull((char *)v2->data, NULL, 0);
        return ((i1 & i2) == i2);
 }
 
 /*
   bitwise-or comparator
 */
-static int ldb_comparator_or(struct ldb_val *v1, struct ldb_val *v2)
+static int ldb_comparator_or(const struct ldb_val *v1, const struct ldb_val *v2)
 {
        uint64_t i1, i2;
-       i1 = strtoull(v1->data, NULL, 0);
-       i2 = strtoull(v2->data, NULL, 0);
+       i1 = strtoull((char *)v1->data, NULL, 0);
+       i2 = strtoull((char *)v2->data, NULL, 0);
        return ((i1 & i2) != 0);
 }
 
@@ -325,20 +300,19 @@ static int ldb_comparator_or(struct ldb_val *v1, struct ldb_val *v2)
   extended match, handles things like bitops
 */
 static int ldb_match_extended(struct ldb_context *ldb, 
-                             struct ldb_message *msg,
-                             struct ldb_parse_tree *tree,
-                             const char *base,
+                             const struct ldb_message *msg,
+                             const struct ldb_parse_tree *tree,
                              enum ldb_scope scope)
 {
        int i;
        const struct {
                const char *oid;
-               int (*comparator)(struct ldb_val *, struct ldb_val *);
+               int (*comparator)(const struct ldb_val *, const struct ldb_val *);
        } rules[] = {
                { LDB_OID_COMPARATOR_AND, ldb_comparator_and},
                { LDB_OID_COMPARATOR_OR, ldb_comparator_or}
        };
-       int (*comp)(struct ldb_val *, struct ldb_val *) = NULL;
+       int (*comp)(const struct ldb_val *, const struct ldb_val *) = NULL;
        struct ldb_message_element *el;
 
        if (tree->u.extended.dnAttributes) {
@@ -389,9 +363,8 @@ static int ldb_match_extended(struct ldb_context *ldb,
   this is a recursive function, and does short-circuit evaluation
  */
 static int ldb_match_message(struct ldb_context *ldb, 
-                            struct ldb_message *msg,
-                            struct ldb_parse_tree *tree,
-                            const char *base,
+                            const struct ldb_message *msg,
+                            const struct ldb_parse_tree *tree,
                             enum ldb_scope scope)
 {
        unsigned int i;
@@ -400,43 +373,41 @@ static int ldb_match_message(struct ldb_context *ldb,
        switch (tree->operation) {
        case LDB_OP_AND:
                for (i=0;i<tree->u.list.num_elements;i++) {
-                       v = ldb_match_message(ldb, msg, tree->u.list.elements[i],
-                                              base, scope);
+                       v = ldb_match_message(ldb, msg, tree->u.list.elements[i], scope);
                        if (!v) return 0;
                }
                return 1;
 
        case LDB_OP_OR:
                for (i=0;i<tree->u.list.num_elements;i++) {
-                       v = ldb_match_message(ldb, msg, tree->u.list.elements[i],
-                                             base, scope);
+                       v = ldb_match_message(ldb, msg, tree->u.list.elements[i], scope);
                        if (v) return 1;
                }
                return 0;
 
        case LDB_OP_NOT:
-               return ! ldb_match_message(ldb, msg, tree->u.isnot.child, base, scope);
+               return ! ldb_match_message(ldb, msg, tree->u.isnot.child, scope);
 
        case LDB_OP_EQUALITY:
-               return ldb_match_equality(ldb, msg, tree, base, scope);
+               return ldb_match_equality(ldb, msg, tree, scope);
 
        case LDB_OP_SUBSTRING:
-               return ldb_match_substring(ldb, msg, tree, base, scope);
+               return ldb_match_substring(ldb, msg, tree, scope);
 
        case LDB_OP_GREATER:
-               return ldb_match_comparison(ldb, msg, tree, base, scope, LDB_OP_GREATER);
+               return ldb_match_comparison(ldb, msg, tree, scope, LDB_OP_GREATER);
 
        case LDB_OP_LESS:
-               return ldb_match_comparison(ldb, msg, tree, base, scope, LDB_OP_LESS);
+               return ldb_match_comparison(ldb, msg, tree, scope, LDB_OP_LESS);
 
        case LDB_OP_PRESENT:
-               return ldb_match_present(ldb, msg, tree, base, scope);
+               return ldb_match_present(ldb, msg, tree, scope);
 
        case LDB_OP_APPROX:
-               return ldb_match_comparison(ldb, msg, tree, base, scope, LDB_OP_APPROX);
+               return ldb_match_comparison(ldb, msg, tree, scope, LDB_OP_APPROX);
 
        case LDB_OP_EXTENDED:
-               return ldb_match_extended(ldb, msg, tree, base, scope);
+               return ldb_match_extended(ldb, msg, tree, scope);
 
        }
 
@@ -444,14 +415,14 @@ static int ldb_match_message(struct ldb_context *ldb,
 }
 
 int ldb_match_msg(struct ldb_context *ldb,
-                 struct ldb_message *msg,
-                 struct ldb_parse_tree *tree,
-                 const char *base,
+                 const struct ldb_message *msg,
+                 const struct ldb_parse_tree *tree,
+                 struct ldb_dn *base,
                  enum ldb_scope scope)
 {
        if ( ! ldb_match_scope(ldb, base, msg->dn, scope) ) {
                return 0;
        }
 
-       return ldb_match_message(ldb, msg, tree, base, scope);
+       return ldb_match_message(ldb, msg, tree, scope);
 }