int profile_compare(struct profile *p1,struct profile *p2,int param)
{
switch(param){
case 1:
printf("Sorted by id");
return p1->id - p2->id;
case 2:
return strcmp(p1->name,p2->name);
case 3:
return compare_date(&p1->birth,&p2->birth);
case 4:
return strcmp(p1->home,p2->home);
case 5:
return strcmp(p1->comment,p2->comment);
}
}
static ESExpResult *
entry_compare (SearchContext *ctx,
struct _ESExp *f,
gint argc,
struct _ESExpResult **argv,
CompareFunc compare)
{
ESExpResult *r;
gint truth = FALSE;
if ((argc == 2
&& argv[0]->type == ESEXP_RES_STRING
&& argv[1]->type == ESEXP_RES_STRING) ||
(argc == 3
&& argv[0]->type == ESEXP_RES_STRING
&& argv[1]->type == ESEXP_RES_STRING
&& argv[2]->type == ESEXP_RES_STRING)) {
gchar *propname;
struct prop_info *info = NULL;
const gchar *region = NULL;
gint i;
gboolean any_field;
gboolean saw_any = FALSE;
if (argc > 2)
region = argv[2]->value.string;
propname = argv[0]->value.string;
any_field = !strcmp (propname, "x-evolution-any-field");
for (i = 0; i < G_N_ELEMENTS (prop_info_table); i++) {
if (any_field
|| !strcmp (prop_info_table[i].query_prop, propname)) {
saw_any = TRUE;
info = &prop_info_table[i];
if (any_field && info->field_id == E_CONTACT_UID) {
/* We need to skip UID from any field contains search
* any-field search should be supported for the
* visible fields only.
*/
truth = FALSE;
}
else if (info->prop_type == PROP_TYPE_NORMAL) {
const gchar *prop = NULL;
/* straight string property matches */
prop = e_contact_get_const (ctx->contact, info->field_id);
if (prop && compare (prop, argv[1]->value.string, region)) {
truth = TRUE;
}
if ((!prop) && compare ("", argv[1]->value.string, region)) {
truth = TRUE;
}
}
else if (info->prop_type == PROP_TYPE_LIST) {
/* the special searches that match any of the list elements */
truth = info->list_compare (ctx->contact, argv[1]->value.string, region, compare);
}
else if (info->prop_type == PROP_TYPE_DATE) {
/* the special searches that match dates */
EContactDate *date;
date = e_contact_get (ctx->contact, info->field_id);
if (date) {
truth = compare_date (date, argv[1]->value.string, region, compare);
e_contact_date_free (date);
}
} else {
g_warn_if_reached ();
saw_any = FALSE;
break;
}
/* if we're looking at all fields and find a match,
* or if we're just looking at this one field,
* break. */
if ((any_field && truth)
|| !any_field)
break;
}
}
if (!saw_any) {
/* propname didn't match to any of our known "special" properties,
* so try to find if it isn't a real field and if so, then compare
* against value in this field only */
EContactField fid = e_contact_field_id (propname);
if (fid >= E_CONTACT_FIELD_FIRST && fid < E_CONTACT_FIELD_LAST) {
const gchar *prop = e_contact_get_const (ctx->contact, fid);
if (prop && compare (prop, argv[1]->value.string, region)) {
truth = TRUE;
}
if ((!prop) && compare ("", argv[1]->value.string, region)) {
truth = TRUE;
}
} else {
/* it is not direct EContact known field, so try to find
* it in EVCard attributes */
GList *a, *attrs = e_vcard_get_attributes (E_VCARD (ctx->contact));
for (a = attrs; a && !truth; a = a->next) {
EVCardAttribute *attr = (EVCardAttribute *) a->data;
if (g_ascii_strcasecmp (e_vcard_attribute_get_name (attr), propname) == 0) {
GList *l, *values = e_vcard_attribute_get_values (attr);
for (l = values; l && !truth; l = l->next) {
const gchar *value = l->data;
if (value && compare (value, argv[1]->value.string, region)) {
truth = TRUE;
} else if ((!value) && compare ("", argv[1]->value.string, region)) {
truth = TRUE;
}
}
}
}
}
}
}
r = e_sexp_result_new (f, ESEXP_RES_BOOL);
r->value.boolean = truth;
return r;
}
gboolean
test_date_expression(xmlNode * time_expr, ha_time_t * now)
{
ha_time_t *start = NULL;
ha_time_t *end = NULL;
const char *value = NULL;
char *value_copy = NULL;
char *value_copy_start = NULL;
const char *op = crm_element_value(time_expr, "operation");
xmlNode *duration_spec = NULL;
xmlNode *date_spec = NULL;
gboolean passed = FALSE;
crm_trace("Testing expression: %s", ID(time_expr));
duration_spec = first_named_child(time_expr, "duration");
date_spec = first_named_child(time_expr, "date_spec");
value = crm_element_value(time_expr, "start");
if (value != NULL) {
value_copy = crm_strdup(value);
value_copy_start = value_copy;
start = parse_date(&value_copy);
crm_free(value_copy_start);
}
value = crm_element_value(time_expr, "end");
if (value != NULL) {
value_copy = crm_strdup(value);
value_copy_start = value_copy;
end = parse_date(&value_copy);
crm_free(value_copy_start);
}
if (start != NULL && end == NULL && duration_spec != NULL) {
end = parse_xml_duration(start, duration_spec);
}
if (op == NULL) {
op = "in_range";
}
if (safe_str_eq(op, "date_spec") || safe_str_eq(op, "in_range")) {
if (start != NULL && compare_date(start, now) > 0) {
passed = FALSE;
} else if (end != NULL && compare_date(end, now) < 0) {
passed = FALSE;
} else if (safe_str_eq(op, "in_range")) {
passed = TRUE;
} else {
passed = cron_range_satisfied(now, date_spec);
}
} else if (safe_str_eq(op, "gt") && compare_date(start, now) < 0) {
passed = TRUE;
} else if (safe_str_eq(op, "lt") && compare_date(end, now) > 0) {
passed = TRUE;
} else if (safe_str_eq(op, "eq") && compare_date(start, now) == 0) {
passed = TRUE;
} else if (safe_str_eq(op, "neq") && compare_date(start, now) != 0) {
passed = TRUE;
}
free_ha_date(start);
free_ha_date(end);
return passed;
}
