static void
test_mongoc_matcher_basic (void)
{
bson_t matcher_query;
bson_t *query;
bson_t *to_match;
bson_t *should_fail;
bson_error_t error;
mongoc_matcher_t *matcher;
bson_init(&matcher_query);
query = BCON_NEW(
"city", "New York",
"state", "New York",
"favorite color", "blue",
"name", "{", "$not", "invalid", "}",
// "zip", "{", "$in", "[", BCON_INT32(11201), BCON_INT32(90210), "]", "}",
"$or", "[",
"{", "age", "{", "$lt", BCON_INT32(18), "}", "}",
"{", "age", "{", "$gt", BCON_INT32(45), "}", "}",
"]"
);
matcher = mongoc_matcher_new (query, &error);
assert (matcher);
_mongoc_matcher_op_to_bson(matcher->optree, &matcher_query);
#if 0
{
char *out = bson_as_json(&matcher_query, NULL);
fprintf(stderr, "bson: %s\n", out);
free(out);
}
#endif
to_match = BCON_NEW(
"city", "New York",
"state", "New York",
"favorite color", "blue",
"zip", BCON_INT32(11201),
"age", BCON_INT32(65)
);
assert(mongoc_matcher_match(matcher, to_match));
should_fail = BCON_NEW(
"city", "New York",
"state", "New York",
"favorite color", "blue",
"zip", BCON_INT32(99999),
"age", BCON_INT32(30)
);
assert(! mongoc_matcher_match(matcher, should_fail));
bson_destroy (query);
bson_destroy (to_match);
bson_destroy (should_fail);
bson_destroy (&matcher_query);
mongoc_matcher_destroy(matcher);
}
void
_mongoc_matcher_op_to_bson (mongoc_matcher_op_t *op, /* IN */
bson_t *bson) /* IN */
{
const char *str;
bson_t child;
bson_t child2;
BSON_ASSERT (op);
BSON_ASSERT (bson);
switch (op->base.opcode) {
case MONGOC_MATCHER_OPCODE_EQ:
bson_append_iter (bson, op->compare.path, -1, &op->compare.iter);
break;
case MONGOC_MATCHER_OPCODE_GT:
case MONGOC_MATCHER_OPCODE_GTE:
case MONGOC_MATCHER_OPCODE_IN:
case MONGOC_MATCHER_OPCODE_LT:
case MONGOC_MATCHER_OPCODE_LTE:
case MONGOC_MATCHER_OPCODE_NE:
case MONGOC_MATCHER_OPCODE_NIN:
switch ((int)op->base.opcode) {
case MONGOC_MATCHER_OPCODE_GT:
str = "$gt";
break;
case MONGOC_MATCHER_OPCODE_GTE:
str = "$gte";
break;
case MONGOC_MATCHER_OPCODE_IN:
str = "$in";
break;
case MONGOC_MATCHER_OPCODE_LT:
str = "$lt";
break;
case MONGOC_MATCHER_OPCODE_LTE:
str = "$lte";
break;
case MONGOC_MATCHER_OPCODE_NE:
str = "$ne";
break;
case MONGOC_MATCHER_OPCODE_NIN:
str = "$nin";
break;
default:
str = "???";
break;
}
bson_append_document_begin (bson, op->compare.path, -1, &child);
bson_append_iter (&child, str, -1, &op->compare.iter);
bson_append_document_end (bson, &child);
break;
case MONGOC_MATCHER_OPCODE_OR:
case MONGOC_MATCHER_OPCODE_AND:
case MONGOC_MATCHER_OPCODE_NOR:
if (op->base.opcode == MONGOC_MATCHER_OPCODE_OR) {
str = "$or";
} else if (op->base.opcode == MONGOC_MATCHER_OPCODE_AND) {
str = "$and";
} else if (op->base.opcode == MONGOC_MATCHER_OPCODE_NOR) {
str = "$nor";
} else {
BSON_ASSERT (false);
str = NULL;
}
bson_append_array_begin (bson, str, -1, &child);
bson_append_document_begin (&child, "0", 1, &child2);
_mongoc_matcher_op_to_bson (op->logical.left, &child2);
bson_append_document_end (&child, &child2);
if (op->logical.right) {
bson_append_document_begin (&child, "1", 1, &child2);
_mongoc_matcher_op_to_bson (op->logical.right, &child2);
bson_append_document_end (&child, &child2);
}
bson_append_array_end (bson, &child);
break;
case MONGOC_MATCHER_OPCODE_NOT:
bson_append_document_begin (bson, op->not.path, -1, &child);
bson_append_document_begin (&child, "$not", 4, &child2);
_mongoc_matcher_op_to_bson (op->not.child, &child2);
bson_append_document_end (&child, &child2);
bson_append_document_end (bson, &child);
break;
case MONGOC_MATCHER_OPCODE_EXISTS:
BSON_APPEND_BOOL (bson, "$exists", op->exists.exists);
break;
case MONGOC_MATCHER_OPCODE_TYPE:
BSON_APPEND_INT32 (bson, "$type", (int)op->type.type);
break;
default:
BSON_ASSERT (false);
break;
}
}
