Sylpheed

/*

 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client

 * Copyright (C) 1999-2005 Hiroyuki Yamamoto

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation; either version 2 of the License, or

 * (at your option) any later version.

 *

 * 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 "defs.h"

#include <glib.h>

#include <glib/gi18n.h>

#include <gdk/gdkkeysyms.h>

#include <gtk/gtkwidget.h>

#include <gtk/gtkwindow.h>

#include <gtk/gtkvbox.h>

#include <gtk/gtktable.h>

#include <gtk/gtkoptionmenu.h>

#include <gtk/gtklabel.h>

#include <gtk/gtkentry.h>

#include <gtk/gtkhbox.h>

#include <gtk/gtkcheckbutton.h>

#include <gtk/gtkhbbox.h>

#include <gtk/gtkbutton.h>

#include <gtk/gtkmenuitem.h>

#include <gtk/gtkstock.h>

#include <gtk/gtktreemodel.h>

#include <gtk/gtktreeselection.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include "main.h"

#include "summary_search.h"

#include "summaryview.h"

#include "messageview.h"

#include "mainwindow.h"

#include "menu.h"

#include "utils.h"

#include "gtkutils.h"

#include "manage_window.h"

#include "alertpanel.h"

static GtkWidget *window;

static GtkWidget *bool_optmenu;

static GtkWidget *from_entry;

static GtkWidget *to_entry;

static GtkWidget *subject_entry;

static GtkWidget *body_entry;

static GtkWidget *case_checkbtn;

static GtkWidget *backward_checkbtn;

static GtkWidget *all_checkbtn;

static GtkWidget *search_btn;

static GtkWidget *clear_btn;

static GtkWidget *close_btn;

static void summary_search_create(SummaryView *summaryview);

static void summary_search_execute(GtkButton *button, gpointer data);

static void summary_search_clear(GtkButton *button, gpointer data);

static void from_activated(void);

static void to_activated(void);

static void subject_activated(void);

static void body_activated(void);

static void all_clicked(GtkButton *button);

static gboolean key_pressed(GtkWidget *widget, GdkEventKey *event,

                            gpointer data);

void summary_search(SummaryView *summaryview)

{

        if (!window)

                summary_search_create(summaryview);

        else

                gtk_widget_hide(window);

        gtk_widget_grab_focus(search_btn);

        gtk_widget_grab_focus(subject_entry);

        gtk_widget_show(window);

}

static void summary_search_create(SummaryView *summaryview)

{

        GtkWidget *vbox1;

        GtkWidget *bool_hbox;

        GtkWidget *bool_menu;

        GtkWidget *menuitem;

        GtkWidget *table1;

        GtkWidget *from_label;

        GtkWidget *to_label;

        GtkWidget *subject_label;

        GtkWidget *body_label;

        GtkWidget *checkbtn_hbox;

        GtkWidget *confirm_area;

        window = gtk_window_new(GTK_WINDOW_TOPLEVEL);

        gtk_window_set_title(GTK_WINDOW (window), _("Search messages"));

        gtk_widget_set_size_request(window, 450, -1);

        gtk_window_set_policy(GTK_WINDOW(window), FALSE, TRUE, TRUE);

        gtk_container_set_border_width(GTK_CONTAINER (window), 8);

        g_signal_connect(G_OBJECT(window), "delete_event",

                         G_CALLBACK(gtk_widget_hide_on_delete), NULL);

        g_signal_connect(G_OBJECT(window), "key_press_event",

                         G_CALLBACK(key_pressed), NULL);

        MANAGE_WINDOW_SIGNALS_CONNECT(window);

        vbox1 = gtk_vbox_new (FALSE, 0);

        gtk_widget_show (vbox1);

        gtk_container_add (GTK_CONTAINER (window), vbox1);

        bool_hbox = gtk_hbox_new(FALSE, 4);

        gtk_widget_show(bool_hbox);

        gtk_box_pack_start(GTK_BOX(vbox1), bool_hbox, FALSE, FALSE, 0);

        bool_optmenu = gtk_option_menu_new();

        gtk_widget_show(bool_optmenu);

        gtk_box_pack_start(GTK_BOX(bool_hbox), bool_optmenu, FALSE, FALSE, 0);

        bool_menu = gtk_menu_new();

        MENUITEM_ADD(bool_menu, menuitem, _("Match any of the following"), 0);

        MENUITEM_ADD(bool_menu, menuitem, _("Match all of the following"), 1);

        gtk_option_menu_set_menu(GTK_OPTION_MENU(bool_optmenu), bool_menu);

        table1 = gtk_table_new (4, 3, FALSE);

        gtk_widget_show (table1);

        gtk_box_pack_start (GTK_BOX (vbox1), table1, TRUE, TRUE, 0);

        gtk_container_set_border_width (GTK_CONTAINER (table1), 4);

        gtk_table_set_row_spacings (GTK_TABLE (table1), 8);

        gtk_table_set_col_spacings (GTK_TABLE (table1), 8);

        from_entry = gtk_entry_new ();

        gtk_widget_show (from_entry);

        gtk_table_attach (GTK_TABLE (table1), from_entry, 1, 3, 0, 1,

                          GTK_EXPAND|GTK_FILL, 0, 0, 0);

        g_signal_connect(G_OBJECT(from_entry), "activate",

                         G_CALLBACK(from_activated), summaryview);

        to_entry = gtk_entry_new ();

        gtk_widget_show (to_entry);

        gtk_table_attach (GTK_TABLE (table1), to_entry, 1, 3, 1, 2,

                          GTK_EXPAND|GTK_FILL, 0, 0, 0);

        g_signal_connect(G_OBJECT(to_entry), "activate",

                         G_CALLBACK(to_activated), summaryview);

        subject_entry = gtk_entry_new ();

        gtk_widget_show (subject_entry);

        gtk_table_attach (GTK_TABLE (table1), subject_entry, 1, 3, 2, 3,

                          GTK_EXPAND|GTK_FILL, 0, 0, 0);

        g_signal_connect(G_OBJECT(subject_entry), "activate",

                         G_CALLBACK(subject_activated), summaryview);

        body_entry = gtk_entry_new ();

        gtk_widget_show (body_entry);

        gtk_table_attach (GTK_TABLE (table1), body_entry, 1, 3, 3, 4,

                          GTK_EXPAND|GTK_FILL, 0, 0, 0);

        g_signal_connect(G_OBJECT(body_entry), "activate",

                         G_CALLBACK(body_activated), summaryview);

        from_label = gtk_label_new (_("From:"));

        gtk_widget_show (from_label);

        gtk_table_attach (GTK_TABLE (table1), from_label, 0, 1, 0, 1,

                          GTK_FILL, 0, 0, 0);

        gtk_label_set_justify (GTK_LABEL (from_label), GTK_JUSTIFY_RIGHT);

        gtk_misc_set_alignment (GTK_MISC (from_label), 1, 0.5);

        to_label = gtk_label_new (_("To:"));

        gtk_widget_show (to_label);

        gtk_table_attach (GTK_TABLE (table1), to_label, 0, 1, 1, 2,

                          GTK_FILL, 0, 0, 0);

        gtk_label_set_justify (GTK_LABEL (to_label), GTK_JUSTIFY_RIGHT);

        gtk_misc_set_alignment (GTK_MISC (to_label), 1, 0.5);

        subject_label = gtk_label_new (_("Subject:"));

        gtk_widget_show (subject_label);

        gtk_table_attach (GTK_TABLE (table1), subject_label, 0, 1, 2, 3,

                          GTK_FILL, 0, 0, 0);

        gtk_label_set_justify (GTK_LABEL (subject_label), GTK_JUSTIFY_RIGHT);

        gtk_misc_set_alignment (GTK_MISC (subject_label), 1, 0.5);

        body_label = gtk_label_new (_("Body:"));

        gtk_widget_show (body_label);

        gtk_table_attach (GTK_TABLE (table1), body_label, 0, 1, 3, 4,

                          GTK_FILL, 0, 0, 0);

        gtk_label_set_justify (GTK_LABEL (body_label), GTK_JUSTIFY_RIGHT);

        gtk_misc_set_alignment (GTK_MISC (body_label), 1, 0.5);

        checkbtn_hbox = gtk_hbox_new (FALSE, 8);

        gtk_widget_show (checkbtn_hbox);

        gtk_box_pack_start (GTK_BOX (vbox1), checkbtn_hbox, TRUE, TRUE, 0);

        gtk_container_set_border_width (GTK_CONTAINER (checkbtn_hbox), 8);

        case_checkbtn = gtk_check_button_new_with_label (_("Case sensitive"));

        gtk_widget_show (case_checkbtn);

        gtk_box_pack_start (GTK_BOX (checkbtn_hbox), case_checkbtn,

                            FALSE, FALSE, 0);

        backward_checkbtn =

                gtk_check_button_new_with_label (_("Backward search"));

        gtk_widget_show (backward_checkbtn);

        gtk_box_pack_start (GTK_BOX (checkbtn_hbox), backward_checkbtn,

                            FALSE, FALSE, 0);

        all_checkbtn =

                gtk_check_button_new_with_label (_("Select all matched"));

        gtk_widget_show (all_checkbtn);

        gtk_box_pack_start (GTK_BOX (checkbtn_hbox), all_checkbtn,

                            FALSE, FALSE, 0);

        g_signal_connect(G_OBJECT(all_checkbtn), "clicked",

                         G_CALLBACK(all_clicked), summaryview);

        gtkut_stock_button_set_create(&confirm_area,

                                      &search_btn, GTK_STOCK_FIND,

                                      &clear_btn, GTK_STOCK_CLEAR,

                                      &close_btn, GTK_STOCK_CLOSE);

        gtk_widget_show (confirm_area);

        gtk_box_pack_start (GTK_BOX (vbox1), confirm_area, FALSE, FALSE, 0);

        gtk_widget_grab_default(search_btn);

        g_signal_connect(G_OBJECT(search_btn), "clicked",

                         G_CALLBACK(summary_search_execute), summaryview);

        g_signal_connect(G_OBJECT(clear_btn), "clicked",

                         G_CALLBACK(summary_search_clear), summaryview);

        g_signal_connect_closure

                (G_OBJECT(close_btn), "clicked",

                 g_cclosure_new_swap(G_CALLBACK(gtk_widget_hide),

                                     window, NULL),

                 FALSE);

}

static void summary_search_execute(GtkButton *button, gpointer data)

{

        SummaryView *summaryview = data;

        GtkTreeModel *model;

        GtkTreeIter iter;

        MsgInfo *msginfo;

        gboolean bool_and;

        gboolean case_sens;

        gboolean backward;

        gboolean search_all;

        gboolean all_searched = FALSE;

        gboolean matched;

        gboolean body_matched;

        const gchar *from_str, *to_str, *subject_str, *body_str;

        StrFindFunc str_find_func;

        gboolean valid;

        if (summary_is_locked(summaryview)) return;

        summary_lock(summaryview);

        model = GTK_TREE_MODEL(summaryview->store);

        bool_and = menu_get_option_menu_active_index

                (GTK_OPTION_MENU(bool_optmenu));

        case_sens = gtk_toggle_button_get_active

                (GTK_TOGGLE_BUTTON(case_checkbtn));

        backward = gtk_toggle_button_get_active

                (GTK_TOGGLE_BUTTON(backward_checkbtn));

        search_all = gtk_toggle_button_get_active

                (GTK_TOGGLE_BUTTON(all_checkbtn));

        if (case_sens)

                str_find_func = str_find;

        else

                str_find_func = str_case_find;

        from_str    = gtk_entry_get_text(GTK_ENTRY(from_entry));

        to_str      = gtk_entry_get_text(GTK_ENTRY(to_entry));

        subject_str = gtk_entry_get_text(GTK_ENTRY(subject_entry));

        body_str    = gtk_entry_get_text(GTK_ENTRY(body_entry));

        if (search_all) {

                summary_unselect_all(summaryview);

                valid = gtk_tree_model_get_iter_first(model, &iter);

                backward = FALSE;

        } else if (!summaryview->selected) {

                if (backward)

                        valid  = gtkut_tree_model_get_iter_last(model, &iter);

                else

                        valid = gtk_tree_model_get_iter_first(model, &iter);

                if (!valid) {

                        summary_unlock(summaryview);

                        return;

                }

        } else {

                valid = gtkut_tree_row_reference_get_iter

                        (model, summaryview->selected, &iter);

                if (!valid) {

                        summary_unlock(summaryview);

                        return;

                }

                if (backward)

                        valid = gtkut_tree_model_prev(model, &iter);

                else

                        valid = gtkut_tree_model_next(model, &iter);

        }

        if (*body_str)

                main_window_cursor_wait(summaryview->mainwin);

        for (;;) {

                if (!valid) {

                        gchar *str;

                        AlertValue val;

                        if (search_all) {

                                break;

                        }

                        if (all_searched) {

                                alertpanel_message

                                        (_("Search failed"),

                                         _("Search string not found."),

                                         ALERT_WARNING);

                                break;

                        }

                        if (backward)

                                str = _("Beginning of list reached; continue from end?");

                        else

                                str = _("End of list reached; continue from beginning?");

                        val = alertpanel(_("Search finished"), str,

                                         GTK_STOCK_YES, GTK_STOCK_NO, NULL);

                        if (G_ALERTDEFAULT == val) {

                                if (backward)

                                        valid  = gtkut_tree_model_get_iter_last

                                                (model, &iter);

                                else

                                        valid = gtk_tree_model_get_iter_first

                                                (model, &iter);

                                all_searched = TRUE;

                                manage_window_focus_in(window, NULL, NULL);

                        } else

                                break;

                }

                gtk_tree_model_get(model, &iter, S_COL_MSG_INFO, &msginfo, -1);

                body_matched = FALSE;

                if (bool_and) {

                        matched = TRUE;

                        if (*from_str) {

                                if (!msginfo->from ||

                                    !str_find_func(msginfo->from, from_str))

                                        matched = FALSE;

                        }

                        if (matched && *to_str) {

                                if (!msginfo->to ||

                                    !str_find_func(msginfo->to, to_str))

                                        matched = FALSE;

                        }

                        if (matched && *subject_str) {

                                if (!msginfo->subject ||

                                    !str_find_func(msginfo->subject, subject_str))

                                        matched = FALSE;

                        }

                        if (matched && *body_str) {

                                if (procmime_find_string(msginfo, body_str,

                                                         str_find_func))

                                        body_matched = TRUE;

                                else

                                        matched = FALSE;

                        }

                        if (matched && !*from_str && !*to_str &&

                            !*subject_str && !*body_str)

                                matched = FALSE;

                } else {

                        matched = FALSE;

                        if (*from_str && msginfo->from) {

                                if (str_find_func(msginfo->from, from_str))

                                        matched = TRUE;

                        }

                        if (!matched && *to_str && msginfo->to) {

                                if (str_find_func(msginfo->to, to_str))

                                        matched = TRUE;

                        }

                        if (!matched && *subject_str && msginfo->subject) {

                                if (str_find_func(msginfo->subject, subject_str))

                                        matched = TRUE;

                        }

                        if (!matched && *body_str) {

                                if (procmime_find_string(msginfo, body_str,

                                                         str_find_func)) {

                                        matched = TRUE;

                                        body_matched = TRUE;

                                }

                        }

                }

                if (matched) {

                        if (search_all) {

                                gtk_tree_selection_select_iter

                                        (summaryview->selection, &iter);

                        } else {

                                if (messageview_is_visible

                                        (summaryview->messageview)) {

                                        summary_unlock(summaryview);

                                        summary_select_row

                                                (summaryview, &iter,

                                                 TRUE, TRUE);

                                        summary_lock(summaryview);

                                        if (body_matched) {

                                                messageview_search_string

                                                        (summaryview->messageview,

                                                         body_str, case_sens);

                                        }

                                } else {

                                        summary_select_row

                                                (summaryview, &iter,

                                                 FALSE, TRUE);

                                }

                                break;

                        }

                }

                if (backward)

                        valid = gtkut_tree_model_prev(model, &iter);

                else

                        valid = gtkut_tree_model_next(model, &iter);

        }

        if (*body_str)

                main_window_cursor_normal(summaryview->mainwin);

        summary_unlock(summaryview);

}

static void summary_search_clear(GtkButton *button, gpointer data)

{

        gtk_editable_delete_text(GTK_EDITABLE(from_entry),    0, -1);

        gtk_editable_delete_text(GTK_EDITABLE(to_entry),      0, -1);

        gtk_editable_delete_text(GTK_EDITABLE(subject_entry), 0, -1);

        gtk_editable_delete_text(GTK_EDITABLE(body_entry),    0, -1);

}

static void from_activated(void)

{

        gtk_widget_grab_focus(to_entry);

}

static void to_activated(void)

{

        gtk_widget_grab_focus(subject_entry);

}

static void subject_activated(void)

{

        gtk_button_clicked(GTK_BUTTON(search_btn));

}

static void body_activated(void)

{

        gtk_button_clicked(GTK_BUTTON(search_btn));

}

static void all_clicked(GtkButton *button)

{

        if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(button)))

                gtk_widget_set_sensitive(backward_checkbtn, FALSE);

        else

                gtk_widget_set_sensitive(backward_checkbtn, TRUE);

}

static gboolean key_pressed(GtkWidget *widget, GdkEventKey *event,

                            gpointer data)

{

        if (event && event->keyval == GDK_Escape)

                gtk_widget_hide(window);

        return FALSE;

}