/**
* e_cal_backend_sexp_match_comp:
* @sexp: An #ESExp object.
* @comp: Component to match against the expression.
* @backend: Backend.
*
* Matches the given ECalComponent against the expression.
*
* Returns: TRUE if the component matched the expression, FALSE if not.
*/
gboolean
e_cal_backend_sexp_match_comp (ECalBackendSExp *sexp,
ECalComponent *comp,
ECalBackend *backend)
{
ESExpResult *r;
gboolean retval;
g_return_val_if_fail (E_IS_CAL_BACKEND_SEXP (sexp), FALSE);
g_return_val_if_fail (E_IS_CAL_COMPONENT (comp), FALSE);
g_return_val_if_fail (E_IS_CAL_BACKEND (backend), FALSE);
sexp->priv->search_context->comp = g_object_ref (comp);
sexp->priv->search_context->backend = g_object_ref (backend);
/* if it's not a valid vcard why is it in our db? :) */
if (!sexp->priv->search_context->comp) {
g_object_unref (sexp->priv->search_context->backend);
return FALSE;
}
r = e_sexp_eval (sexp->priv->search_sexp);
retval = (r && r->type == ESEXP_RES_BOOL && r->value.boolean);
g_object_unref (sexp->priv->search_context->comp);
g_object_unref (sexp->priv->search_context->backend);
e_sexp_result_free (sexp->priv->search_sexp, r);
return retval;
}
static void
e_ews_convert_sexp_to_restriction (ESoapMessage *msg,
const gchar *query,
EEwsFolderType type)
{
ESExp *sexp;
ESExpResult *r;
gint i;
sexp = e_sexp_new ();
if (type == E_EWS_FOLDER_TYPE_CONTACTS) {
for (i = 0; i < G_N_ELEMENTS (contact_symbols); i++) {
if (contact_symbols[i].immediate)
e_sexp_add_ifunction (
sexp, 0, contact_symbols[i].name,
(ESExpIFunc *) contact_symbols[i].func, msg);
else
e_sexp_add_function (
sexp, 0, contact_symbols[i].name,
contact_symbols[i].func, msg);
}
} else if (type == E_EWS_FOLDER_TYPE_CALENDAR || type == E_EWS_FOLDER_TYPE_TASKS || type == E_EWS_FOLDER_TYPE_MEMOS) {
for (i = 0; i < G_N_ELEMENTS (calendar_symbols); i++) {
if (calendar_symbols[i].immediate)
e_sexp_add_ifunction (
sexp, 0, calendar_symbols[i].name,
(ESExpIFunc *) calendar_symbols[i].func, msg);
else
e_sexp_add_function (
sexp, 0, calendar_symbols[i].name,
calendar_symbols[i].func, msg);
}
} else if (type == E_EWS_FOLDER_TYPE_MAILBOX) {
for (i = 0; i < G_N_ELEMENTS (message_symbols); i++) {
if (message_symbols[i].immediate)
e_sexp_add_ifunction (
sexp, 0, message_symbols[i].name,
(ESExpIFunc *) message_symbols[i].func, msg);
else
e_sexp_add_function (
sexp, 0, message_symbols[i].name,
message_symbols[i].func, msg);
}
}
e_sexp_input_text (sexp, query, strlen (query));
e_sexp_parse (sexp);
r = e_sexp_eval (sexp);
if (!r)
return;
e_sexp_result_free (sexp, r);
e_sexp_unref (sexp);
}
/**
* e_book_backend_sexp_match_contact:
* @sexp: an #EBookBackendSExp
* @contact: an #EContact
*
* Checks if @contact matches @sexp.
*
* Returns: %TRUE if the contact matches, %FALSE otherwise.
**/
gboolean
e_book_backend_sexp_match_contact (EBookBackendSExp *sexp,
EContact *contact)
{
ESExpResult *r;
gboolean retval;
if (!contact) {
g_warning ("null EContact passed to e_book_backend_sexp_match_contact");
return FALSE;
}
sexp->priv->search_context->contact = g_object_ref (contact);
r = e_sexp_eval (sexp->priv->search_sexp);
retval = (r && r->type == ESEXP_RES_BOOL && r->value.boolean);
g_object_unref (sexp->priv->search_context->contact);
e_sexp_result_free (sexp->priv->search_sexp, r);
return retval;
}
