path: root/calendar/gui/cal-search-bar.c

/* Evolution calendar - Search bar widget for calendar views
 *
 * Copyright (C) 2001 Ximian, Inc.
 *
 * Author: Federico Mena-Quintero <federico@ximian.com>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of version 2 of the GNU General Public
 * License as published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <stdlib.h>
#include <string.h>
#include <glib.h>
#include <gtk/gtkmenu.h>
#include <gtk/gtkmenuitem.h>
#include <gtk/gtkoptionmenu.h>
#include <gtk/gtksignal.h>
#include <glib/gi18n.h>
#include <libedataserver/e-categories.h>
#include <libecal/e-cal-time-util.h>
#include <e-util/e-icon-factory.h>
#include <libedataserver/e-categories.h>
#include <filter/rule-editor.h>

#include "cal-search-bar.h"

#include "e-util/e-util.h"
#include "e-util/e-error.h"
#include "e-util/e-util-private.h"

typedef struct CALSearchBarItem {
     ESearchBarItem search;
     const char *image;
} CALSearchBarItem;

static ESearchBarItem calendar_search_items[] = {
    E_FILTERBAR_ADVANCED,
    {NULL, 0, 0},
    E_FILTERBAR_SAVE,
    E_FILTERBAR_EDIT,
    {NULL, -1, 0}
};


/* IDs and option items for the ESearchBar */
enum {
    SEARCH_SUMMARY_CONTAINS,
    SEARCH_DESCRIPTION_CONTAINS,
    SEARCH_ANY_FIELD_CONTAINS,
    SEARCH_CATEGORY_IS,
    SEARCH_COMMENT_CONTAINS,
    SEARCH_LOCATION_CONTAINS,
    SEARCH_ATTENDEE_CONTAINS
    
};

/* Comments are disabled because they are kind of useless right now, see bug 33247 */
static ESearchBarItem search_option_items[] = {
    { N_("Summary contains"), SEARCH_SUMMARY_CONTAINS, ESB_ITEMTYPE_RADIO },
    { N_("Description contains"), SEARCH_DESCRIPTION_CONTAINS, ESB_ITEMTYPE_RADIO },
    { N_("Category is"), SEARCH_CATEGORY_IS, ESB_ITEMTYPE_RADIO },
    { N_("Comment contains"), SEARCH_COMMENT_CONTAINS, ESB_ITEMTYPE_RADIO },
    { N_("Location contains"), SEARCH_LOCATION_CONTAINS, ESB_ITEMTYPE_RADIO },
    { N_("Any field contains"), SEARCH_ANY_FIELD_CONTAINS, ESB_ITEMTYPE_RADIO },
};

/* IDs for the categories suboptions */

typedef enum {
    CATEGORIES_ALL,
    CATEGORIES_UNMATCHED,
    LAST_FIELD
} common_search_options;

typedef enum {
    N_DAY_TASK = LAST_FIELD,
    ACTIVE_TASK,
    OVERDUE_TASK,
    COMPLETED_TASK,
    TASK_WITH_ATTACHMENT,
    TASK_LAST_FIELD
} task_search_options;

typedef enum  {
    ACTIVE_APPONTMENT = LAST_FIELD,
    N_DAY_APPOINTMENT,
    CAL_LAST_FIELD
} cal_search_options;

/* We add 2 to the offset to include the separators used to differenciate the quick search queries. */
#define CATEGORIES_TASKS_OFFSET (TASK_LAST_FIELD + 2)
#define CATEGORIES_MEMOS_OFFSET (LAST_FIELD + 1)
#define CATEGORIES_CALENDAR_OFFSET (CAL_LAST_FIELD + 2)

/* Private part of the CalSearchBar structure */
struct CalSearchBarPrivate {
    /* Array of categories */
    GPtrArray *categories;

    RuleContext *search_context;
    FilterRule *search_rule;
    guint32 view_flag;

    time_t start;
    time_t end;
};

static void cal_search_bar_destroy (GtkObject *object);

static void cal_search_bar_search_activated (ESearchBar *search);

/* Signal IDs */
enum {
    SEXP_CHANGED,
    CATEGORY_CHANGED,
    LAST_SIGNAL
};

static guint cal_search_bar_signals[LAST_SIGNAL] = { 0 };


G_DEFINE_TYPE (CalSearchBar, cal_search_bar, E_FILTER_BAR_TYPE)

/* Class initialization function for the calendar search bar */
static void
cal_search_bar_class_init (CalSearchBarClass *klass)
{

    GtkObjectClass *object_class = GTK_OBJECT_CLASS (klass);
    ESearchBarClass *search_bar_class = E_SEARCH_BAR_CLASS (klass);

    cal_search_bar_signals[SEXP_CHANGED] =
        gtk_signal_new ("sexp_changed",
                GTK_RUN_FIRST,
                G_TYPE_FROM_CLASS (object_class),
                GTK_SIGNAL_OFFSET (CalSearchBarClass, sexp_changed),
                gtk_marshal_NONE__STRING,
                GTK_TYPE_NONE, 1,
                GTK_TYPE_STRING);

    cal_search_bar_signals[CATEGORY_CHANGED] =
        gtk_signal_new ("category_changed",
                GTK_RUN_FIRST,
                G_TYPE_FROM_CLASS (object_class),
                GTK_SIGNAL_OFFSET (CalSearchBarClass, category_changed),
                gtk_marshal_NONE__STRING,
                GTK_TYPE_NONE, 1,
                GTK_TYPE_STRING);

    klass->sexp_changed = NULL;
    klass->category_changed = NULL;

    search_bar_class->search_activated = cal_search_bar_search_activated; 
    object_class->destroy = cal_search_bar_destroy;
}

/* Object initialization function for the calendar search bar */
static void
cal_search_bar_init (CalSearchBar *cal_search)
{
    CalSearchBarPrivate *priv;

    priv = g_new (CalSearchBarPrivate, 1);
    cal_search->priv = priv;

    priv->categories = g_ptr_array_new ();
    g_ptr_array_set_size (priv->categories, 0);

    priv->start = -1;
    priv->end = -1;
}

/* Frees an array of categories */
static void
free_categories (GPtrArray *categories)
{
    int i;

    for (i = 0; i < categories->len; i++) {
        g_assert (categories->pdata[i] != NULL);
        g_free (categories->pdata[i]);
    }

    g_ptr_array_free (categories, TRUE);
}

/* Destroy handler for the calendar search bar */
static void
cal_search_bar_destroy (GtkObject *object)
{
    CalSearchBar *cal_search;
    CalSearchBarPrivate *priv;

    g_return_if_fail (object != NULL);
    g_return_if_fail (IS_CAL_SEARCH_BAR (object));

    cal_search = CAL_SEARCH_BAR (object);
    priv = cal_search->priv;

    if (priv) {
        if (priv->categories) {
            free_categories (priv->categories);
            priv->categories = NULL;
        }
        
        if (priv->search_rule) {
            g_object_unref (priv->search_rule);
            priv->search_rule = NULL;
        }
        
        /* FIXME        
        if (priv->search_context) {
            g_object_unref (priv->search_context);
            priv->search_context = NULL;
        }*/

        g_free (priv);
        cal_search->priv = NULL;
    }
    
    if (GTK_OBJECT_CLASS (cal_search_bar_parent_class)->destroy)
        (* GTK_OBJECT_CLASS (cal_search_bar_parent_class)->destroy) (object);
}



/* Emits the "sexp_changed" signal for the calendar search bar */
static void
notify_sexp_changed (CalSearchBar *cal_search, const char *sexp)
{
    gtk_signal_emit (GTK_OBJECT (cal_search), cal_search_bar_signals[SEXP_CHANGED],
             sexp);
}

/* Returns the string of the currently selected category, NULL for "Unmatched" and "All
*/
static const char *
get_current_category (CalSearchBar *cal_search)
{
    CalSearchBarPrivate *priv;
    gint viewid, i;

    priv = cal_search->priv;

    g_assert (priv->categories != NULL);

    viewid = e_search_bar_get_viewitem_id (E_SEARCH_BAR (cal_search));

    if (viewid == CATEGORIES_ALL || viewid == CATEGORIES_UNMATCHED)
        return NULL;

    if (priv->view_flag == CAL_SEARCH_TASKS_DEFAULT)
        i = viewid - CATEGORIES_TASKS_OFFSET;
    else if (priv->view_flag == CAL_SEARCH_MEMOS_DEFAULT) 
        i = viewid - CATEGORIES_MEMOS_OFFSET;
    else if (priv->view_flag == CAL_SEARCH_CALENDAR_DEFAULT)
        i = viewid - CATEGORIES_CALENDAR_OFFSET;
    
    if (i >= 0 && i < priv->categories->len)
        return priv->categories->pdata[i];
    else
        return NULL;
}


/* Returns a sexp for the selected category in the drop-down menu.  The "All"
 * option is returned as (const char *) 1, and the "Unfiled" option is returned
 * as NULL.
 */
static char *
get_show_option_sexp (CalSearchBar *cal_search)
{
    CalSearchBarPrivate *priv ;
    gint viewid ;
    char *start, *end, *due, *ret = NULL;
    const char *category = NULL ;
    time_t start_range, end_range;

    priv = cal_search->priv;
    viewid = e_search_bar_get_viewitem_id (E_SEARCH_BAR (cal_search));

    if (viewid == CATEGORIES_UNMATCHED)
        return g_strdup ("(has-categories? #f)"); /* Unfiled items */
    else if (viewid == CATEGORIES_ALL) 
        return NULL; /* All items */

    switch (priv->view_flag) {
    case CAL_SEARCH_TASKS_DEFAULT:
        if (viewid == N_DAY_TASK) {
            start_range = time(NULL);
            end_range = time_add_day(start_range, 7);
            start = isodate_from_time_t (start_range);
            due = isodate_from_time_t (end_range);

            ret =  g_strdup_printf ("(due-in-time-range? (make-time \"%s\")"
                    "                      (make-time \"%s\"))",
                    start, due);

            g_free (start);
            g_free (due);

            return ret;
        } else if (viewid == ACTIVE_TASK) {
            /* Shows the tasks due for an year from now which are not completed yet*/
            start_range = time(NULL);
            end_range = time_add_day(start_range, 365);
            start = isodate_from_time_t (start_range);
            due = isodate_from_time_t (end_range);

            ret =  g_strdup_printf ("(and (due-in-time-range? (make-time \"%s\")"
                    "                      (make-time \"%s\")) (not (is-completed?)))",
                    start, due);

            g_free (start);
            g_free (due);

            return ret;
        } else if (viewid == OVERDUE_TASK) {
            /* Shows the tasks which are overdue from lower limit 1970 to the current time */
            start_range = 0;
            end_range = time (NULL);
            start = isodate_from_time_t (start_range);
            due = isodate_from_time_t (end_range);

            ret =  g_strdup_printf ("(and (due-in-time-range? (make-time \"%s\")"
                    "                      (make-time \"%s\")) (not (is-completed?)))",
                    start, due);

            g_free (start);
            g_free (due);

            return ret;
        } else if (viewid == COMPLETED_TASK)  
            return g_strdup ("(is-completed?)");
        else if (viewid == TASK_WITH_ATTACHMENT) 
            return g_strdup ("(has-attachments?)");
        break;
    case CAL_SEARCH_CALENDAR_DEFAULT:
        if (viewid == ACTIVE_APPONTMENT) {
            /* Shows next one year's Appointments */
            start_range = time (NULL);
            end_range = time_add_day (start_range, 365);
            start = isodate_from_time_t (start_range);
            end = isodate_from_time_t (end_range);

            ret = g_strdup_printf ("(occur-in-time-range? (make-time \"%s\")"
                    "                      (make-time \"%s\"))",
                    start, end);

            cal_search->priv->start = start_range;
            cal_search->priv->end = end_range;

            g_free (start);
            g_free (end);

            return ret;
        } else if (viewid == N_DAY_APPOINTMENT) { 
            start_range = time (NULL);
            end_range = time_add_day (start_range, 7);
            start = isodate_from_time_t (start_range);
            end = isodate_from_time_t (end_range);

            ret = g_strdup_printf ("(occur-in-time-range? (make-time \"%s\")"
                    "                      (make-time \"%s\"))",
                    start, end);

            cal_search->priv->start = start_range;
            cal_search->priv->end = end_range;

            g_free (start);
            g_free (end);

            return ret;
        }
        break;
    default:
        break;
    }

    category = get_current_category (cal_search);

    if (category != NULL)
        return g_strdup_printf ("(has-categories? \"%s\")", category);
    else
        return NULL;
}

/* Sets the query string to be (contains? "field" "text") */
static void
notify_e_cal_view_contains (CalSearchBar *cal_search, const char *field, const char *view)
{
    char *text = NULL;
    char *sexp = " ";

    text = e_search_bar_get_text (E_SEARCH_BAR (cal_search));

    if (!text)
        return; /* This is an error in the UTF8 conversion, not an empty string! */

    if (text && *text) {
        sexp = g_strdup_printf ("(contains? \"%s\" \"%s\")", field, text);
        g_free (text);
    } else 
        sexp = g_strdup ("(contains? \"summary\" \"\")"); /* Show all */


    /* Apply the selected view on search */
    if (view && *view){ 
        sexp = g_strconcat ("(and ",sexp, view, ")", NULL);
    }
 
    notify_sexp_changed (cal_search, sexp);
    
    g_free (sexp);
}

#if 0
/* Sets the query string to the appropriate match for categories */
static void
notify_category_is (CalSearchBar *cal_search)
{
    char *sexp;

    sexp = get_show_option_sexp (cal_search);

    if (!sexp)
        notify_sexp_changed (cal_search, "#t"); /* Match all */
    else
        notify_sexp_changed (cal_search, sexp);

    if (sexp)
        g_free (sexp);
}
#endif

/* Creates a new query from the values in the widgets and notifies upstream */
static void
regen_query (CalSearchBar *cal_search)
{
    int id;
    char *show_option_sexp = NULL;
    char *sexp = NULL;
    GString *out = NULL;
    EFilterBar *efb = (EFilterBar *) cal_search;

    /* Fetch the data from the ESearchBar's entry widgets */
    id = e_search_bar_get_item_id (E_SEARCH_BAR (cal_search));

    cal_search->priv->start = -1;
    cal_search->priv->end = -1;
    
    /* Get the selected view */
    show_option_sexp = get_show_option_sexp (cal_search);

    /* Generate the different types of queries */
    switch (id) {
    case SEARCH_ANY_FIELD_CONTAINS:
        notify_e_cal_view_contains (cal_search, "any", show_option_sexp);
        break;

    case SEARCH_SUMMARY_CONTAINS:
        notify_e_cal_view_contains (cal_search, "summary", show_option_sexp);
        break;

    case SEARCH_DESCRIPTION_CONTAINS:
        notify_e_cal_view_contains (cal_search, "description", show_option_sexp);
        break;

    case SEARCH_COMMENT_CONTAINS:
        notify_e_cal_view_contains (cal_search, "comment", show_option_sexp);
        break;

    case SEARCH_LOCATION_CONTAINS:
        notify_e_cal_view_contains (cal_search, "location", show_option_sexp);
        break;
    case SEARCH_ATTENDEE_CONTAINS:
        notify_e_cal_view_contains (cal_search, "attendee", show_option_sexp);
        break;
    case  E_FILTERBAR_ADVANCED_ID:
        out = g_string_new ("");
        filter_rule_build_code (efb->current_query, out);

        if (show_option_sexp && *show_option_sexp)  
            sexp = g_strconcat ("(and ", out->str, show_option_sexp, ")", NULL);
        
        notify_sexp_changed (cal_search, sexp ? sexp : out->str);
        
        g_string_free (out, TRUE);
        g_free(sexp);
        break;

    default:
        g_assert_not_reached ();
    }

    g_free (show_option_sexp);
}

#if 0
static void
regen_view_query (CalSearchBar *cal_search)
{
        const char *category;
    notify_category_is (cal_search);

    category = cal_search_bar_get_category (cal_search);
    gtk_signal_emit (GTK_OBJECT (cal_search), cal_search_bar_signals[CATEGORY_CHANGED],
             category);
}
#endif

/* search_activated handler for the calendar search bar */
static void
cal_search_bar_search_activated (ESearchBar *search)
{
    CalSearchBar *cal_search;

    cal_search = CAL_SEARCH_BAR (search);
    regen_query (cal_search);
}

static GtkWidget *
generate_viewoption_menu (CALSearchBarItem *subitems)
{
    GtkWidget *menu, *menu_item;
    gint i = 0;

    menu = gtk_menu_new ();

    for (i = 0; subitems[i].search.id != -1; ++i) {
        if (subitems[i].search.text) {
            char *str = NULL;
            str = e_str_without_underscores (subitems[i].search.text);
            menu_item = gtk_image_menu_item_new_with_label (str);
/*          if (subitems[i].image)
                gtk_image_menu_item_set_image (menu_item, e_icon_factory_get_image (subitems[i].image, E_ICON_SIZE_MENU));*/
            g_free (str);
        } else {
            menu_item = gtk_menu_item_new ();
            gtk_widget_set_sensitive (menu_item, FALSE);
        }

        g_object_set_data (G_OBJECT (menu_item), "EsbItemId",
                   GINT_TO_POINTER (subitems[i].search.id));

        gtk_widget_show (menu_item);
        gtk_menu_shell_append(GTK_MENU_SHELL(menu), menu_item);
    }

    return menu;
}

static void
setup_category_options (CalSearchBar *cal_search, CALSearchBarItem *subitems, gint index, gint offset)
{
    CalSearchBarPrivate *priv;
    gint i;

    priv = cal_search->priv;

    if (priv->categories->len > 0) {
        subitems[index].search.text = NULL; /* separator */
        subitems[index].search.id = 0;
        subitems[index].image = NULL;

        for (i = 0; i < priv->categories->len; i++) {
            const char *category;

            category = priv->categories->pdata[i] ? priv->categories->pdata [i] : "";

            /* The search.text field should not be free'd */
            subitems[i + offset].search.text = (char *) category;
            subitems[i + offset].search.id = i + offset;
            subitems[i + offset].image = e_categories_get_icon_file_for (category);
        }
        index = i + offset;
    }
    
    subitems[index].search.id = -1; /* terminator */
    subitems[index].search.text = NULL;
    subitems[index].image = NULL;
}


/* Creates the suboptions menu for the ESearchBar with the list of categories */
static void
make_suboptions (CalSearchBar *cal_search)
{
    CalSearchBarPrivate *priv;
    CALSearchBarItem *subitems = NULL;
    GtkWidget *menu;
    
    priv = cal_search->priv;

    g_assert (priv->categories != NULL);

    /* Categories plus "all", "unmatched", separator, terminator */

    /* All, unmatched, separator */

    if (priv->view_flag == CAL_SEARCH_TASKS_DEFAULT) {
        subitems = g_new (CALSearchBarItem, priv->categories->len + CATEGORIES_TASKS_OFFSET + 1);

        subitems[0].search.text = _("Any Category");
        subitems[0].search.id = CATEGORIES_ALL;
        subitems[0].image = NULL;

        subitems[1].search.text = _("Unmatched");
        subitems[1].search.id = CATEGORIES_UNMATCHED;
        subitems[1].image = NULL;

        subitems[2].search.text = NULL; 
        subitems[2].search.id = 0;
        subitems[2].image = 0;

        subitems[3].search.text = _("Next 7 Days' Tasks");
        subitems[3].search.id = N_DAY_TASK;
        subitems[3].image = NULL;

        subitems[4].search.text = _("Active Tasks");
        subitems[4].search.id = ACTIVE_TASK;
        subitems[4].image = NULL;

        subitems[5].search.text = _("Overdue Tasks");
        subitems[5].search.id = OVERDUE_TASK;
        subitems[5].image = NULL;

        subitems[6].search.text = _("Completed Tasks");
        subitems[6].search.id = COMPLETED_TASK;
        subitems[6].image = NULL;

        subitems[7].search.text = _("Tasks with Attachments");
        subitems[7].search.id = TASK_WITH_ATTACHMENT;
        subitems[7].image = NULL;

        /* All the other items */
        setup_category_options (cal_search, subitems, 8, CATEGORIES_TASKS_OFFSET);
        
        menu = generate_viewoption_menu (subitems);
        e_search_bar_set_viewoption_menu ((ESearchBar *)cal_search, menu);

    } else if (priv->view_flag == CAL_SEARCH_MEMOS_DEFAULT) {
        subitems = g_new (CALSearchBarItem, priv->categories->len + CATEGORIES_MEMOS_OFFSET + 1);

        /* All, unmatched, separator */

        subitems[0].search.text = _("Any Category");
        subitems[0].search.id = CATEGORIES_ALL;
        subitems[0].image = NULL;

        subitems[1].search.text = _("Unmatched");
        subitems[1].search.id = CATEGORIES_UNMATCHED;
        subitems[1].image = NULL;

        /* All the other items */
        setup_category_options (cal_search, subitems, 2, CATEGORIES_MEMOS_OFFSET);

        menu = generate_viewoption_menu (subitems);
        e_search_bar_set_viewoption_menu ((ESearchBar *)cal_search, menu);

    } else if (priv->view_flag == CAL_SEARCH_CALENDAR_DEFAULT) {
        subitems = g_new (CALSearchBarItem, priv->categories->len + CATEGORIES_CALENDAR_OFFSET + 1);

        /* All, unmatched, separator */

        subitems[0].search.text = _("Any Category");
        subitems[0].search.id = CATEGORIES_ALL;
        subitems[0].image = NULL;

        subitems[1].search.text = _("Unmatched");
        subitems[1].search.id = CATEGORIES_UNMATCHED;
        subitems[1].image = NULL;

        subitems[2].search.text = NULL; 
        subitems[2].search.id = 0;
        subitems[2].image = 0;

        subitems[3].search.text = _("Active Appointments"); 
        subitems[3].search.id = ACTIVE_APPONTMENT;
        subitems[3].image = NULL;

        subitems[4].search.text = _("Next 7 Days' Appointments"); 
        subitems[4].search.id = N_DAY_APPOINTMENT;
        subitems[4].image = NULL;

        /* All the other items */
        setup_category_options (cal_search, subitems, 5, CATEGORIES_CALENDAR_OFFSET);

        menu = generate_viewoption_menu (subitems);
        e_search_bar_set_viewoption_menu ((ESearchBar *)cal_search, menu);
    }

    if(subitems != NULL)    
        g_free (subitems);
}

static void
search_menu_activated (ESearchBar *esb, int id)
{
    if (id == E_FILTERBAR_ADVANCED_ID)
        e_search_bar_set_item_id (esb, id);
}

/**
 * cal_search_bar_construct:
 * @cal_search: A calendar search bar.
 * @flags: bitfield of items to appear in the search menu
 * 
 * Constructs a calendar search bar by binding its menu and option items.
 * 
 * Return value: The same value as @cal_search.
 **/
CalSearchBar *
cal_search_bar_construct (CalSearchBar *cal_search, guint32 flags)
{
    ESearchBarItem *items;
    guint32 bit = 0x1;
    int i, j;
    char *xmlfile = NULL;
    char *userfile = NULL;
    FilterPart *part;   
    RuleContext *search_context;
    FilterRule  *search_rule;
    
    g_return_val_if_fail (IS_CAL_SEARCH_BAR (cal_search), NULL);
    
    items = g_alloca ((G_N_ELEMENTS (search_option_items) + 1) * sizeof (ESearchBarItem));
    for (i = 0, j = 0; i < G_N_ELEMENTS (search_option_items); i++, bit <<= 1) {
        if ((flags & bit) != 0) {
            items[j].text = search_option_items[i].text;
            items[j].id = search_option_items[i].id;
            items[j].type = search_option_items[i].type;
            j++;
        }
    }
    
    items[j].text = NULL;
    items[j].id = -1;
    search_context = rule_context_new ();
    cal_search->priv->view_flag = flags;

    rule_context_add_part_set (search_context, "partset", filter_part_get_type (),
            rule_context_add_part, rule_context_next_part);
    rule_context_add_rule_set (search_context, "ruleset", filter_rule_get_type (),
            rule_context_add_rule, rule_context_next_rule);

    if (flags == CAL_SEARCH_MEMOS_DEFAULT) {
        userfile = g_build_filename (g_get_home_dir (), ".evolution", "memos", "searches.xml", NULL);
        xmlfile = g_build_filename (SEARCH_RULE_DIR, "memotypes.xml", NULL);
    } else if (flags == CAL_SEARCH_TASKS_DEFAULT) {
        userfile = g_build_filename (g_get_home_dir (), ".evolution", "tasks", "searches.xml", NULL);
        xmlfile = g_build_filename (SEARCH_RULE_DIR, "tasktypes.xml", NULL);
    } else {
        userfile = g_build_filename (g_get_home_dir (), ".evolution", "calendar", "searches.xml", NULL);
        xmlfile = g_build_filename (SEARCH_RULE_DIR, "caltypes.xml", NULL);
    }

    g_object_set_data_full (G_OBJECT (search_context), "user", userfile, g_free);
    g_object_set_data_full (G_OBJECT (search_context), "system", xmlfile, g_free);

    rule_context_load (search_context, xmlfile, userfile);  
    search_rule = filter_rule_new ();
    part = rule_context_next_part (search_context, NULL);
    
    if (part == NULL)
        g_warning ("Could not load calendar search; no parts.");
    else    
        filter_rule_add_part (search_rule, filter_part_clone (part));

    e_filter_bar_new_construct (search_context, xmlfile, userfile, NULL, cal_search, 
            (EFilterBar*) cal_search );
    e_search_bar_set_menu ((ESearchBar *) cal_search, calendar_search_items);

    g_signal_connect ((ESearchBar *) cal_search, "menu_activated", G_CALLBACK (search_menu_activated), cal_search);

    make_suboptions (cal_search);

    cal_search->priv->search_rule = search_rule;
    cal_search->priv->search_context = search_context;

    g_free (xmlfile);
    g_free (userfile);
    
    return cal_search;
}

/**
 * cal_search_bar_new:
 * flags: bitfield of items to appear in the search menu
 * 
 * creates a new calendar search bar.
 * 
 * return value: a newly-created calendar search bar.  you should connect to the
 * "sexp_changed" signal to monitor changes in the generated sexps.
 **/
GtkWidget *
cal_search_bar_new (guint32 flags)
{
    CalSearchBar *cal_search;

    cal_search = g_object_new (TYPE_CAL_SEARCH_BAR, NULL);
    return GTK_WIDGET (cal_search_bar_construct (cal_search, flags));
}

/* Used from qsort() */
static int
compare_categories_cb (const void *a, const void *b)
{
    const char **ca, **cb;

    ca = (const char **) a;
    cb = (const char **) b;

    /* FIXME: should use some utf8 strcoll() thingy */
    return strcmp (*ca, *cb);
}

/* Creates a sorted array of categories based on the original one; copies the
 * string values.
 */
static GPtrArray *
sort_categories (GPtrArray *categories)
{
    GPtrArray *c;
    int i;

    c = g_ptr_array_new ();
    g_ptr_array_set_size (c, categories->len);

    for (i = 0; i < categories->len; i++)
        c->pdata[i] = g_strdup (categories->pdata[i]);

    qsort (c->pdata, c->len, sizeof (gpointer), compare_categories_cb);

    return c;
}

/**
 * cal_search_bar_set_categories:
 * @cal_search: A calendar search bar.
 * @categories: Array of pointers to strings for the category names.
 * 
 * Sets the list of categories that are to be shown in the drop-down list
 * of a calendar search bar.  The search bar will automatically add an item
 * for "unfiled" components, that is, those that have no categories assigned
 * to them.
 **/
void
cal_search_bar_set_categories (CalSearchBar *cal_search, GPtrArray *categories)
{
    CalSearchBarPrivate *priv;

    g_return_if_fail (IS_CAL_SEARCH_BAR (cal_search));
    g_return_if_fail (categories != NULL);

    priv = cal_search->priv;

    g_assert (priv->categories != NULL);
    free_categories (priv->categories);

    priv->categories = sort_categories (categories);
    make_suboptions (cal_search);
}

/**
 * cal_search_bar_get_category:
 * @cal_search: A calendar search bar.
 * 
 * Queries the currently selected category name in a calendar search bar.
 * If "All" or "Unfiled" are selected, this function will return NULL.
 * 
 * Return value: Name of the selected category, or NULL if there is no
 * selected category.
 **/
const char *
cal_search_bar_get_category (CalSearchBar *cal_search)
{
    const char *category;

    category = get_current_category (cal_search);

    return category;
}

void 
cal_search_bar_get_time_range (CalSearchBar *cal_search, time_t *start, time_t *end)
{
    CalSearchBarPrivate *priv;

    g_return_if_fail (IS_CAL_SEARCH_BAR (cal_search));
    
    priv = cal_search->priv;

    *start = priv->start;
    *end = priv->end;
}