xed/plugins/spell/xed-spell-plugin.c

1426 lines
39 KiB
C

/*
* xed-spell-plugin.c
*
* Copyright (C) 2002-2005 Paolo Maggi
*
* 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, 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include "xed-spell-plugin.h"
#include "xed-spell-utils.h"
#include <string.h> /* For strlen */
#include <glib/gi18n.h>
#include <libpeas-gtk/peas-gtk-configurable.h>
#include <xed/xed-window.h>
#include <xed/xed-window-activatable.h>
#include <xed/xed-debug.h>
#include <xed/xed-statusbar.h>
#include <xed/xed-utils.h>
#include "xed-spell-checker.h"
#include "xed-spell-checker-dialog.h"
#include "xed-spell-language-dialog.h"
#include "xed-automatic-spell-checker.h"
#define XED_METADATA_ATTRIBUTE_SPELL_LANGUAGE "metadata::xed-spell-language"
#define XED_METADATA_ATTRIBUTE_SPELL_ENABLED "metadata::xed-spell-enabled"
#define MENU_PATH "/MenuBar/ToolsMenu/ToolsOps_1"
#define XED_SPELL_PLUGIN_GET_PRIVATE(object)(G_TYPE_INSTANCE_GET_PRIVATE ((object), \
XED_TYPE_SPELL_PLUGIN, \
XedSpellPluginPrivate))
/* GSettings keys */
#define SPELL_SCHEMA "org.x.editor.plugins.spell"
#define AUTOCHECK_TYPE_KEY "autocheck-type"
static void xed_window_activatable_iface_init (XedWindowActivatableInterface *iface);
static void peas_gtk_configurable_iface_init (PeasGtkConfigurableInterface *iface);
G_DEFINE_DYNAMIC_TYPE_EXTENDED (XedSpellPlugin,
xed_spell_plugin,
PEAS_TYPE_EXTENSION_BASE,
0,
G_IMPLEMENT_INTERFACE_DYNAMIC (XED_TYPE_WINDOW_ACTIVATABLE,
xed_window_activatable_iface_init)
G_IMPLEMENT_INTERFACE_DYNAMIC (PEAS_GTK_TYPE_CONFIGURABLE,
peas_gtk_configurable_iface_init))
struct _XedSpellPluginPrivate
{
XedWindow *window;
GtkActionGroup *action_group;
guint ui_id;
guint message_cid;
gulong tab_added_id;
gulong tab_removed_id;
GSettings *settings;
};
typedef struct _CheckRange CheckRange;
struct _CheckRange
{
GtkTextMark *start_mark;
GtkTextMark *end_mark;
gint mw_start; /* misspelled word start */
gint mw_end; /* end */
GtkTextMark *current_mark;
};
enum
{
PROP_0,
PROP_WINDOW
};
static void spell_cb (GtkAction *action,
XedSpellPlugin *plugin);
static void set_language_cb (GtkAction *action,
XedSpellPlugin *plugin);
static void auto_spell_cb (GtkAction *action,
XedSpellPlugin *plugin);
/* UI actions. */
static const GtkActionEntry action_entries[] =
{
{ "CheckSpell",
"tools-check-spelling-symbolic",
N_("_Check Spelling..."),
"<shift>F7",
N_("Check the current document for incorrect spelling"),
G_CALLBACK (spell_cb)
},
{ "ConfigSpell",
NULL,
N_("Set _Language..."),
NULL,
N_("Set the language of the current document"),
G_CALLBACK (set_language_cb)
}
};
static const GtkToggleActionEntry toggle_action_entries[] =
{
{ "AutoSpell",
NULL,
N_("_Autocheck Spelling"),
NULL,
N_("Automatically spell-check the current document"),
G_CALLBACK (auto_spell_cb),
FALSE
}
};
typedef struct _SpellConfigureWidget SpellConfigureWidget;
struct _SpellConfigureWidget
{
GtkWidget *content;
GtkWidget *never;
GtkWidget *always;
GtkWidget *document;
GSettings *settings;
};
typedef enum
{
AUTOCHECK_NEVER = 0,
AUTOCHECK_DOCUMENT,
AUTOCHECK_ALWAYS
} XedSpellPluginAutocheckType;
static GQuark spell_checker_id = 0;
static GQuark check_range_id = 0;
static void
xed_spell_plugin_init (XedSpellPlugin *plugin)
{
xed_debug_message (DEBUG_PLUGINS, "XedSpellPlugin initializing");
plugin->priv = G_TYPE_INSTANCE_GET_PRIVATE (plugin, XED_TYPE_SPELL_PLUGIN, XedSpellPluginPrivate);
plugin->priv->settings = g_settings_new (SPELL_SCHEMA);
}
static void
xed_spell_plugin_dispose (GObject *object)
{
XedSpellPlugin *plugin = XED_SPELL_PLUGIN (object);
xed_debug_message (DEBUG_PLUGINS, "XedSpellPlugin disposing");
g_clear_object (&plugin->priv->settings);
g_clear_object (&plugin->priv->window);
g_clear_object (&plugin->priv->action_group);
g_clear_object (&plugin->priv->settings);
G_OBJECT_CLASS (xed_spell_plugin_parent_class)->dispose (object);
}
static void
xed_spell_plugin_set_property (GObject *object,
guint prop_id,
const GValue *value,
GParamSpec *pspec)
{
XedSpellPlugin *plugin = XED_SPELL_PLUGIN (object);
switch (prop_id)
{
case PROP_WINDOW:
plugin->priv->window = XED_WINDOW (g_value_dup_object (value));
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static void
xed_spell_plugin_get_property (GObject *object,
guint prop_id,
GValue *value,
GParamSpec *pspec)
{
XedSpellPlugin *plugin = XED_SPELL_PLUGIN (object);
switch (prop_id)
{
case PROP_WINDOW:
g_value_set_object (value, plugin->priv->window);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
break;
}
}
static void
set_spell_language_cb (XedSpellChecker *spell,
const XedSpellCheckerLanguage *lang,
XedDocument *doc)
{
const gchar *key;
g_return_if_fail (XED_IS_DOCUMENT (doc));
g_return_if_fail (lang != NULL);
key = xed_spell_checker_language_to_key (lang);
g_return_if_fail (key != NULL);
xed_document_set_metadata (doc, XED_METADATA_ATTRIBUTE_SPELL_LANGUAGE, key, NULL);
}
static void
set_language_from_metadata (XedSpellChecker *spell,
XedDocument *doc)
{
const XedSpellCheckerLanguage *lang = NULL;
gchar *value = NULL;
value = xed_document_get_metadata (doc, XED_METADATA_ATTRIBUTE_SPELL_LANGUAGE);
if (value != NULL)
{
lang = xed_spell_checker_language_from_key (value);
g_free (value);
}
if (lang != NULL)
{
g_signal_handlers_block_by_func (spell, set_spell_language_cb, doc);
xed_spell_checker_set_language (spell, lang);
g_signal_handlers_unblock_by_func (spell, set_spell_language_cb, doc);
}
}
static XedSpellPluginAutocheckType
get_autocheck_type (XedSpellPlugin *plugin)
{
XedSpellPluginAutocheckType autocheck_type;
autocheck_type = g_settings_get_enum (plugin->priv->settings, AUTOCHECK_TYPE_KEY);
return autocheck_type;
}
static void
set_autocheck_type (GSettings *settings,
XedSpellPluginAutocheckType autocheck_type)
{
if (!g_settings_is_writable (settings, AUTOCHECK_TYPE_KEY))
{
return;
}
g_settings_set_enum (settings, AUTOCHECK_TYPE_KEY, autocheck_type);
}
static XedSpellChecker *
get_spell_checker_from_document (XedDocument *doc)
{
XedSpellChecker *spell;
gpointer data;
xed_debug (DEBUG_PLUGINS);
g_return_val_if_fail (doc != NULL, NULL);
data = g_object_get_qdata (G_OBJECT (doc), spell_checker_id);
if (data == NULL)
{
spell = xed_spell_checker_new ();
set_language_from_metadata (spell, doc);
g_object_set_qdata_full (G_OBJECT (doc),
spell_checker_id,
spell,
(GDestroyNotify) g_object_unref);
g_signal_connect (spell, "set_language",
G_CALLBACK (set_spell_language_cb), doc);
}
else
{
g_return_val_if_fail (XED_IS_SPELL_CHECKER (data), NULL);
spell = XED_SPELL_CHECKER (data);
}
return spell;
}
static CheckRange *
get_check_range (XedDocument *doc)
{
CheckRange *range;
xed_debug (DEBUG_PLUGINS);
g_return_val_if_fail (doc != NULL, NULL);
range = (CheckRange *) g_object_get_qdata (G_OBJECT (doc), check_range_id);
return range;
}
static void
update_current (XedDocument *doc,
gint current)
{
CheckRange *range;
GtkTextIter iter;
GtkTextIter end_iter;
xed_debug (DEBUG_PLUGINS);
g_return_if_fail (doc != NULL);
g_return_if_fail (current >= 0);
range = get_check_range (doc);
g_return_if_fail (range != NULL);
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &iter, current);
if (!gtk_text_iter_inside_word (&iter))
{
/* if we're not inside a word,
* we must be in some spaces.
* skip forward to the beginning of the next word. */
if (!gtk_text_iter_is_end (&iter))
{
gtk_text_iter_forward_word_end (&iter);
gtk_text_iter_backward_word_start (&iter);
}
}
else
{
if (!gtk_text_iter_starts_word (&iter))
{
gtk_text_iter_backward_word_start (&iter);
}
}
gtk_text_buffer_get_iter_at_mark (GTK_TEXT_BUFFER (doc), &end_iter, range->end_mark);
if (gtk_text_iter_compare (&end_iter, &iter) < 0)
{
gtk_text_buffer_move_mark (GTK_TEXT_BUFFER (doc), range->current_mark, &end_iter);
}
else
{
gtk_text_buffer_move_mark (GTK_TEXT_BUFFER (doc), range->current_mark, &iter);
}
}
static void
set_check_range (XedDocument *doc,
GtkTextIter *start,
GtkTextIter *end)
{
CheckRange *range;
GtkTextIter iter;
xed_debug (DEBUG_PLUGINS);
range = get_check_range (doc);
if (range == NULL)
{
xed_debug_message (DEBUG_PLUGINS, "There was not a previous check range");
gtk_text_buffer_get_end_iter (GTK_TEXT_BUFFER (doc), &iter);
range = g_new0 (CheckRange, 1);
range->start_mark = gtk_text_buffer_create_mark (GTK_TEXT_BUFFER (doc),
"check_range_start_mark", &iter, TRUE);
range->end_mark = gtk_text_buffer_create_mark (GTK_TEXT_BUFFER (doc),
"check_range_end_mark", &iter, FALSE);
range->current_mark = gtk_text_buffer_create_mark (GTK_TEXT_BUFFER (doc),
"check_range_current_mark", &iter, TRUE);
g_object_set_qdata_full (G_OBJECT (doc), check_range_id, range, (GDestroyNotify)g_free);
}
if (xed_spell_utils_skip_no_spell_check (start, end))
{
if (!gtk_text_iter_inside_word (end))
{
/* if we're neither inside a word,
* we must be in some spaces.
* skip backward to the end of the previous word. */
if (!gtk_text_iter_is_end (end))
{
gtk_text_iter_backward_word_start (end);
gtk_text_iter_forward_word_end (end);
}
}
else
{
if (!gtk_text_iter_ends_word (end))
{
gtk_text_iter_forward_word_end (end);
}
}
}
else
{
/* no spell checking in the specified range */
start = end;
}
gtk_text_buffer_move_mark (GTK_TEXT_BUFFER (doc), range->start_mark, start);
gtk_text_buffer_move_mark (GTK_TEXT_BUFFER (doc), range->end_mark, end);
range->mw_start = -1;
range->mw_end = -1;
update_current (doc, gtk_text_iter_get_offset (start));
}
static gchar *
get_current_word (XedDocument *doc,
gint *start,
gint *end)
{
const CheckRange *range;
GtkTextIter end_iter;
GtkTextIter current_iter;
gint range_end;
xed_debug (DEBUG_PLUGINS);
g_return_val_if_fail (doc != NULL, NULL);
g_return_val_if_fail (start != NULL, NULL);
g_return_val_if_fail (end != NULL, NULL);
range = get_check_range (doc);
g_return_val_if_fail (range != NULL, NULL);
gtk_text_buffer_get_iter_at_mark (GTK_TEXT_BUFFER (doc), &end_iter, range->end_mark);
range_end = gtk_text_iter_get_offset (&end_iter);
gtk_text_buffer_get_iter_at_mark (GTK_TEXT_BUFFER (doc), &current_iter, range->current_mark);
end_iter = current_iter;
if (!gtk_text_iter_is_end (&end_iter))
{
xed_debug_message (DEBUG_PLUGINS, "Current is not end");
gtk_text_iter_forward_word_end (&end_iter);
}
*start = gtk_text_iter_get_offset (&current_iter);
*end = MIN (gtk_text_iter_get_offset (&end_iter), range_end);
xed_debug_message (DEBUG_PLUGINS, "Current word extends [%d, %d]", *start, *end);
if (!(*start < *end))
{
return NULL;
}
return gtk_text_buffer_get_slice (GTK_TEXT_BUFFER (doc), &current_iter, &end_iter, TRUE);
}
static gboolean
goto_next_word (XedDocument *doc)
{
CheckRange *range;
GtkTextIter current_iter;
GtkTextIter old_current_iter;
GtkTextIter end_iter;
xed_debug (DEBUG_PLUGINS);
g_return_val_if_fail (doc != NULL, FALSE);
range = get_check_range (doc);
g_return_val_if_fail (range != NULL, FALSE);
gtk_text_buffer_get_iter_at_mark (GTK_TEXT_BUFFER (doc), &current_iter, range->current_mark);
gtk_text_buffer_get_end_iter (GTK_TEXT_BUFFER (doc), &end_iter);
old_current_iter = current_iter;
gtk_text_iter_forward_word_ends (&current_iter, 2);
gtk_text_iter_backward_word_start (&current_iter);
if (xed_spell_utils_skip_no_spell_check (&current_iter, &end_iter) &&
(gtk_text_iter_compare (&old_current_iter, &current_iter) < 0) &&
(gtk_text_iter_compare (&current_iter, &end_iter) < 0))
{
update_current (doc, gtk_text_iter_get_offset (&current_iter));
return TRUE;
}
return FALSE;
}
static gchar *
get_next_misspelled_word (XedView *view)
{
XedDocument *doc;
CheckRange *range;
gint start, end;
gchar *word;
XedSpellChecker *spell;
g_return_val_if_fail (view != NULL, NULL);
doc = XED_DOCUMENT (gtk_text_view_get_buffer (GTK_TEXT_VIEW (view)));
g_return_val_if_fail (doc != NULL, NULL);
range = get_check_range (doc);
g_return_val_if_fail (range != NULL, NULL);
spell = get_spell_checker_from_document (doc);
g_return_val_if_fail (spell != NULL, NULL);
word = get_current_word (doc, &start, &end);
if (word == NULL)
{
return NULL;
}
xed_debug_message (DEBUG_PLUGINS, "Word to check: %s", word);
while (xed_spell_checker_check_word (spell, word, -1))
{
g_free (word);
if (!goto_next_word (doc))
{
return NULL;
}
/* may return null if we reached the end of the selection */
word = get_current_word (doc, &start, &end);
if (word == NULL)
{
return NULL;
}
xed_debug_message (DEBUG_PLUGINS, "Word to check: %s", word);
}
if (!goto_next_word (doc))
{
update_current (doc, gtk_text_buffer_get_char_count (GTK_TEXT_BUFFER (doc)));
}
if (word != NULL)
{
GtkTextIter s, e;
range->mw_start = start;
range->mw_end = end;
xed_debug_message (DEBUG_PLUGINS, "Select [%d, %d]", start, end);
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &s, start);
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &e, end);
gtk_text_buffer_select_range (GTK_TEXT_BUFFER (doc), &s, &e);
xed_view_scroll_to_cursor (view);
}
else
{
range->mw_start = -1;
range->mw_end = -1;
}
return word;
}
static void
ignore_cb (XedSpellCheckerDialog *dlg,
const gchar *w,
XedView *view)
{
gchar *word = NULL;
xed_debug (DEBUG_PLUGINS);
g_return_if_fail (w != NULL);
g_return_if_fail (view != NULL);
word = get_next_misspelled_word (view);
if (word == NULL)
{
xed_spell_checker_dialog_set_completed (dlg);
return;
}
xed_spell_checker_dialog_set_misspelled_word (XED_SPELL_CHECKER_DIALOG (dlg), word, -1);
g_free (word);
}
static void
change_cb (XedSpellCheckerDialog *dlg,
const gchar *word,
const gchar *change,
XedView *view)
{
XedDocument *doc;
CheckRange *range;
gchar *w = NULL;
GtkTextIter start, end;
xed_debug (DEBUG_PLUGINS);
g_return_if_fail (view != NULL);
g_return_if_fail (word != NULL);
g_return_if_fail (change != NULL);
doc = XED_DOCUMENT (gtk_text_view_get_buffer (GTK_TEXT_VIEW (view)));
g_return_if_fail (doc != NULL);
range = get_check_range (doc);
g_return_if_fail (range != NULL);
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &start, range->mw_start);
if (range->mw_end < 0)
{
gtk_text_buffer_get_end_iter (GTK_TEXT_BUFFER (doc), &end);
}
else
{
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &end, range->mw_end);
}
w = gtk_text_buffer_get_slice (GTK_TEXT_BUFFER (doc), &start, &end, TRUE);
g_return_if_fail (w != NULL);
if (strcmp (w, word) != 0)
{
g_free (w);
return;
}
g_free (w);
gtk_text_buffer_begin_user_action (GTK_TEXT_BUFFER(doc));
gtk_text_buffer_delete (GTK_TEXT_BUFFER (doc), &start, &end);
gtk_text_buffer_insert (GTK_TEXT_BUFFER (doc), &start, change, -1);
gtk_text_buffer_end_user_action (GTK_TEXT_BUFFER(doc));
update_current (doc, range->mw_start + g_utf8_strlen (change, -1));
/* go to next misspelled word */
ignore_cb (dlg, word, view);
}
static void
change_all_cb (XedSpellCheckerDialog *dlg,
const gchar *word,
const gchar *change,
XedView *view)
{
XedDocument *doc;
CheckRange *range;
gchar *w = NULL;
GtkTextIter start, end;
gint flags = 0;
xed_debug (DEBUG_PLUGINS);
g_return_if_fail (view != NULL);
g_return_if_fail (word != NULL);
g_return_if_fail (change != NULL);
doc = XED_DOCUMENT (gtk_text_view_get_buffer (GTK_TEXT_VIEW (view)));
g_return_if_fail (doc != NULL);
range = get_check_range (doc);
g_return_if_fail (range != NULL);
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &start, range->mw_start);
if (range->mw_end < 0)
{
gtk_text_buffer_get_end_iter (GTK_TEXT_BUFFER (doc), &end);
}
else
{
gtk_text_buffer_get_iter_at_offset (GTK_TEXT_BUFFER (doc), &end, range->mw_end);
}
w = gtk_text_buffer_get_slice (GTK_TEXT_BUFFER (doc), &start, &end, TRUE);
g_return_if_fail (w != NULL);
if (strcmp (w, word) != 0)
{
g_free (w);
return;
}
g_free (w);
XED_SEARCH_SET_CASE_SENSITIVE (flags, TRUE);
XED_SEARCH_SET_ENTIRE_WORD (flags, TRUE);
/* CHECK: currently this function does escaping etc */
xed_document_replace_all (doc, word, change, flags);
update_current (doc, range->mw_start + g_utf8_strlen (change, -1));
/* go to next misspelled word */
ignore_cb (dlg, word, view);
}
static void
add_word_cb (XedSpellCheckerDialog *dlg,
const gchar *word,
XedView *view)
{
g_return_if_fail (view != NULL);
g_return_if_fail (word != NULL);
/* go to next misspelled word */
ignore_cb (dlg, word, view);
}
static void
language_dialog_response (GtkDialog *dlg,
gint res_id,
XedSpellChecker *spell)
{
if (res_id == GTK_RESPONSE_OK)
{
const XedSpellCheckerLanguage *lang;
lang = xed_spell_language_get_selected_language (XED_SPELL_LANGUAGE_DIALOG (dlg));
if (lang != NULL)
{
xed_spell_checker_set_language (spell, lang);
}
}
gtk_widget_destroy (GTK_WIDGET (dlg));
}
static void
configure_widget_button_toggled (GtkToggleButton *button,
SpellConfigureWidget *conf_widget)
{
xed_debug (DEBUG_PLUGINS);
if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (conf_widget->always)))
{
set_autocheck_type (conf_widget->settings, AUTOCHECK_ALWAYS);
}
else if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (conf_widget->document)))
{
set_autocheck_type (conf_widget->settings, AUTOCHECK_DOCUMENT);
}
else
{
set_autocheck_type (conf_widget->settings, AUTOCHECK_NEVER);
}
}
static void
configure_widget_destroyed (GtkWidget *widget,
gpointer data)
{
SpellConfigureWidget *conf_widget = (SpellConfigureWidget *)data;
xed_debug (DEBUG_PLUGINS);
g_object_unref (conf_widget->settings);
g_slice_free (SpellConfigureWidget, data);
xed_debug_message (DEBUG_PLUGINS, "END");
}
static SpellConfigureWidget *
get_configure_widget (XedSpellPlugin *plugin)
{
SpellConfigureWidget *widget;
gchar *data_dir;
gchar *ui_file;
XedSpellPluginAutocheckType autocheck_type;
GtkWidget *error_widget;
gboolean ret;
gchar *root_objects[] = {
"spell_dialog_content",
NULL
};
xed_debug (DEBUG_PLUGINS);
widget = g_slice_new (SpellConfigureWidget);
widget->settings = g_object_ref (plugin->priv->settings);
data_dir = peas_extension_base_get_data_dir (PEAS_EXTENSION_BASE (plugin));
ui_file = g_build_filename (data_dir, "xed-spell-setup-dialog.ui", NULL);
ret = xed_utils_get_ui_objects (ui_file,
root_objects,
&error_widget,
"spell_dialog_content", &widget->content,
"autocheck_never", &widget->never,
"autocheck_document", &widget->document,
"autocheck_always", &widget->always,
NULL);
g_free (data_dir);
g_free (ui_file);
if (!ret)
{
return NULL;
}
autocheck_type = get_autocheck_type (plugin);
if (autocheck_type == AUTOCHECK_ALWAYS)
{
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (widget->always), TRUE);
}
else if (autocheck_type == AUTOCHECK_DOCUMENT)
{
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (widget->document), TRUE);
}
else
{
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (widget->never), TRUE);
}
g_signal_connect (widget->always, "toggled",
G_CALLBACK (configure_widget_button_toggled), widget);
g_signal_connect (widget->document, "toggled",
G_CALLBACK (configure_widget_button_toggled), widget);
g_signal_connect (widget->never, "toggled",
G_CALLBACK (configure_widget_button_toggled), widget);
g_signal_connect (widget->content, "destroy",
G_CALLBACK (configure_widget_destroyed), widget);
return widget;
}
static void
set_language_cb (GtkAction *action,
XedSpellPlugin *plugin)
{
XedSpellPluginPrivate *priv;
XedDocument *doc;
XedSpellChecker *spell;
const XedSpellCheckerLanguage *lang;
GtkWidget *dlg;
GtkWindowGroup *wg;
gchar *data_dir;
xed_debug (DEBUG_PLUGINS);
priv = plugin->priv;
doc = xed_window_get_active_document (priv->window);
g_return_if_fail (doc != NULL);
spell = get_spell_checker_from_document (doc);
g_return_if_fail (spell != NULL);
lang = xed_spell_checker_get_language (spell);
data_dir = peas_extension_base_get_data_dir (PEAS_EXTENSION_BASE (plugin));
dlg = xed_spell_language_dialog_new (GTK_WINDOW (priv->window), lang, data_dir);
g_free (data_dir);
wg = xed_window_get_group (priv->window);
gtk_window_group_add_window (wg, GTK_WINDOW (dlg));
gtk_window_set_modal (GTK_WINDOW (dlg), TRUE);
g_signal_connect (dlg, "response",
G_CALLBACK (language_dialog_response), spell);
gtk_widget_show (dlg);
}
static void
spell_cb (GtkAction *action,
XedSpellPlugin *plugin)
{
XedSpellPluginPrivate *priv;
XedView *view;
XedDocument *doc;
XedSpellChecker *spell;
GtkWidget *dlg;
GtkTextIter start, end;
gchar *word;
gchar *data_dir;
xed_debug (DEBUG_PLUGINS);
priv = plugin->priv;
view = xed_window_get_active_view (priv->window);
g_return_if_fail (view != NULL);
doc = XED_DOCUMENT (gtk_text_view_get_buffer (GTK_TEXT_VIEW (view)));
g_return_if_fail (doc != NULL);
spell = get_spell_checker_from_document (doc);
g_return_if_fail (spell != NULL);
if (gtk_text_buffer_get_char_count (GTK_TEXT_BUFFER (doc)) <= 0)
{
GtkWidget *statusbar;
statusbar = xed_window_get_statusbar (priv->window);
xed_statusbar_flash_message (XED_STATUSBAR (statusbar), priv->message_cid, _("The document is empty."));
return;
}
if (!gtk_text_buffer_get_selection_bounds (GTK_TEXT_BUFFER (doc), &start, &end))
{
/* no selection, get the whole doc */
gtk_text_buffer_get_bounds (GTK_TEXT_BUFFER (doc), &start, &end);
}
set_check_range (doc, &start, &end);
word = get_next_misspelled_word (view);
if (word == NULL)
{
GtkWidget *statusbar;
statusbar = xed_window_get_statusbar (priv->window);
xed_statusbar_flash_message (XED_STATUSBAR (statusbar), priv->message_cid, _("No misspelled words"));
return;
}
data_dir = peas_extension_base_get_data_dir (PEAS_EXTENSION_BASE (plugin));
dlg = xed_spell_checker_dialog_new_from_spell_checker (spell, data_dir);
g_free (data_dir);
gtk_window_set_modal (GTK_WINDOW (dlg), TRUE);
gtk_window_set_transient_for (GTK_WINDOW (dlg), GTK_WINDOW (priv->window));
g_signal_connect (dlg, "ignore", G_CALLBACK (ignore_cb), view);
g_signal_connect (dlg, "ignore_all", G_CALLBACK (ignore_cb), view);
g_signal_connect (dlg, "change", G_CALLBACK (change_cb), view);
g_signal_connect (dlg, "change_all", G_CALLBACK (change_all_cb), view);
g_signal_connect (dlg, "add_word_to_personal", G_CALLBACK (add_word_cb), view);
xed_spell_checker_dialog_set_misspelled_word (XED_SPELL_CHECKER_DIALOG (dlg), word, -1);
g_free (word);
gtk_widget_show (dlg);
}
static void
set_auto_spell (XedWindow *window,
XedDocument *doc,
gboolean active)
{
XedAutomaticSpellChecker *autospell;
XedSpellChecker *spell;
spell = get_spell_checker_from_document (doc);
g_return_if_fail (spell != NULL);
autospell = xed_automatic_spell_checker_get_from_document (doc);
if (active)
{
if (autospell == NULL)
{
XedView *active_view;
active_view = xed_window_get_active_view (window);
g_return_if_fail (active_view != NULL);
autospell = xed_automatic_spell_checker_new (doc, spell);
xed_automatic_spell_checker_attach_view (autospell, active_view);
xed_automatic_spell_checker_recheck_all (autospell);
}
}
else
{
if (autospell != NULL)
{
xed_automatic_spell_checker_free (autospell);
}
}
}
static void
auto_spell_cb (GtkAction *action,
XedSpellPlugin *plugin)
{
XedSpellPluginPrivate *priv;
XedWindow *window;
XedDocument *doc;
gboolean active;
xed_debug (DEBUG_PLUGINS);
priv = plugin->priv;
active = gtk_toggle_action_get_active (GTK_TOGGLE_ACTION (action));
xed_debug_message (DEBUG_PLUGINS, active ? "Auto Spell activated" : "Auto Spell deactivated");
doc = xed_window_get_active_document (priv->window);
if (doc == NULL)
{
return;
}
if (get_autocheck_type (plugin) == AUTOCHECK_DOCUMENT)
{
xed_document_set_metadata (doc,
XED_METADATA_ATTRIBUTE_SPELL_ENABLED,
active ? "1" : NULL, NULL);
}
set_auto_spell (priv->window, doc, active);
}
static void
update_ui (XedSpellPlugin *plugin)
{
XedSpellPluginPrivate *priv;
XedDocument *doc;
XedView *view;
gboolean autospell;
GtkAction *action;
xed_debug (DEBUG_PLUGINS);
priv = plugin->priv;
doc = xed_window_get_active_document (priv->window);
view = xed_window_get_active_view (priv->window);
autospell = (doc != NULL && xed_automatic_spell_checker_get_from_document (doc) != NULL);
if (doc != NULL)
{
XedTab *tab;
XedTabState state;
tab = xed_window_get_active_tab (priv->window);
state = xed_tab_get_state (tab);
/* If the document is loading we can't get the metadata so we
endup with an useless speller */
if (state == XED_TAB_STATE_NORMAL)
{
action = gtk_action_group_get_action (priv->action_group, "AutoSpell");
g_signal_handlers_block_by_func (action, auto_spell_cb, plugin);
set_auto_spell (priv->window, doc, autospell);
gtk_toggle_action_set_active (GTK_TOGGLE_ACTION (action), autospell);
g_signal_handlers_unblock_by_func (action, auto_spell_cb, plugin);
}
}
gtk_action_group_set_sensitive (priv->action_group,
(view != NULL) &&
gtk_text_view_get_editable (GTK_TEXT_VIEW (view)));
}
static void
set_auto_spell_from_metadata (XedSpellPlugin *plugin,
XedDocument *doc,
GtkActionGroup *action_group)
{
gboolean active = FALSE;
gchar *active_str = NULL;
XedWindow *window;
XedDocument *active_doc;
XedSpellPluginAutocheckType autocheck_type;
autocheck_type = get_autocheck_type (plugin);
switch (autocheck_type)
{
case AUTOCHECK_ALWAYS:
{
active = TRUE;
break;
}
case AUTOCHECK_DOCUMENT:
{
active_str = xed_document_get_metadata (doc, XED_METADATA_ATTRIBUTE_SPELL_ENABLED);
break;
}
case AUTOCHECK_NEVER:
default:
active = FALSE;
break;
}
if (active_str)
{
active = *active_str == '1';
g_free (active_str);
}
window = XED_WINDOW (plugin->priv->window);
set_auto_spell (window, doc, active);
/* In case that the doc is the active one we mark the spell action */
active_doc = xed_window_get_active_document (window);
if (active_doc == doc && action_group != NULL)
{
GtkAction *action;
action = gtk_action_group_get_action (action_group, "AutoSpell");
g_signal_handlers_block_by_func (action, auto_spell_cb, plugin);
gtk_toggle_action_set_active (GTK_TOGGLE_ACTION (action), active);
g_signal_handlers_unblock_by_func (action, auto_spell_cb, plugin);
}
}
static void
on_document_loaded (XedDocument *doc,
const GError *error,
XedSpellPlugin *plugin)
{
if (error == NULL)
{
XedSpellChecker *spell;
spell = XED_SPELL_CHECKER (g_object_get_qdata (G_OBJECT (doc), spell_checker_id));
if (spell != NULL)
{
set_language_from_metadata (spell, doc);
}
set_auto_spell_from_metadata (plugin, doc, plugin->priv->action_group);
}
}
static void
on_document_saved (XedDocument *doc,
const GError *error,
XedSpellPlugin *plugin)
{
XedAutomaticSpellChecker *autospell;
XedSpellChecker *spell;
const gchar *key;
if (error != NULL)
{
return;
}
/* Make sure to save the metadata here too */
autospell = xed_automatic_spell_checker_get_from_document (doc);
spell = XED_SPELL_CHECKER (g_object_get_qdata (G_OBJECT (doc), spell_checker_id));
if (spell != NULL)
{
key = xed_spell_checker_language_to_key (xed_spell_checker_get_language (spell));
}
else
{
key = NULL;
}
if (get_autocheck_type (plugin) == AUTOCHECK_DOCUMENT)
{
xed_document_set_metadata (doc,
XED_METADATA_ATTRIBUTE_SPELL_ENABLED,
autospell != NULL ? "1" : NULL,
XED_METADATA_ATTRIBUTE_SPELL_LANGUAGE,
key,
NULL);
}
else
{
xed_document_set_metadata (doc, XED_METADATA_ATTRIBUTE_SPELL_LANGUAGE, key, NULL);
}
}
static void
tab_added_cb (XedWindow *window,
XedTab *tab,
XedSpellPlugin *plugin)
{
XedDocument *doc;
doc = xed_tab_get_document (tab);
g_signal_connect (doc, "loaded",
G_CALLBACK (on_document_loaded), plugin);
g_signal_connect (doc, "saved",
G_CALLBACK (on_document_saved), plugin);
}
static void
tab_removed_cb (XedWindow *window,
XedTab *tab,
XedSpellPlugin *plugin)
{
XedDocument *doc;
doc = xed_tab_get_document (tab);
g_signal_handlers_disconnect_by_func (doc, on_document_loaded, plugin);
g_signal_handlers_disconnect_by_func (doc, on_document_saved, plugin);
}
static void
xed_spell_plugin_activate (XedWindowActivatable *activatable)
{
XedSpellPluginPrivate *priv;
GtkUIManager *manager;
GList *docs, *l;
xed_debug (DEBUG_PLUGINS);
priv = XED_SPELL_PLUGIN (activatable)->priv;
manager = xed_window_get_ui_manager (priv->window);
priv->action_group = gtk_action_group_new ("XedSpellPluginActions");
gtk_action_group_set_translation_domain (priv->action_group, GETTEXT_PACKAGE);
gtk_action_group_add_actions (priv->action_group,
action_entries,
G_N_ELEMENTS (action_entries),
activatable);
gtk_action_group_add_toggle_actions (priv->action_group,
toggle_action_entries,
G_N_ELEMENTS (toggle_action_entries),
activatable);
gtk_ui_manager_insert_action_group (manager, priv->action_group, -1);
priv->ui_id = gtk_ui_manager_new_merge_id (manager);
priv->message_cid = gtk_statusbar_get_context_id (GTK_STATUSBAR (xed_window_get_statusbar (priv->window)),
"spell_plugin_message");
gtk_ui_manager_add_ui (manager,
priv->ui_id,
MENU_PATH,
"CheckSpell",
"CheckSpell",
GTK_UI_MANAGER_MENUITEM,
FALSE);
gtk_ui_manager_add_ui (manager,
priv->ui_id,
MENU_PATH,
"AutoSpell",
"AutoSpell",
GTK_UI_MANAGER_MENUITEM,
FALSE);
gtk_ui_manager_add_ui (manager,
priv->ui_id,
MENU_PATH,
"ConfigSpell",
"ConfigSpell",
GTK_UI_MANAGER_MENUITEM,
FALSE);
update_ui (XED_SPELL_PLUGIN (activatable));
docs = xed_window_get_documents (priv->window);
for (l = docs; l != NULL; l = g_list_next (l))
{
XedDocument *doc = XED_DOCUMENT (l->data);
set_auto_spell_from_metadata (activatable, doc, priv->action_group);
g_signal_handlers_disconnect_by_func (doc, on_document_loaded, activatable);
g_signal_handlers_disconnect_by_func (doc, on_document_saved, activatable);
}
priv->tab_added_id = g_signal_connect (priv->window, "tab-added",
G_CALLBACK (tab_added_cb), activatable);
priv->tab_removed_id = g_signal_connect (priv->window, "tab-removed",
G_CALLBACK (tab_removed_cb), activatable);
}
static void
xed_spell_plugin_deactivate (XedWindowActivatable *activatable)
{
XedSpellPluginPrivate *priv;
GtkUIManager *manager;
xed_debug (DEBUG_PLUGINS);
priv = XED_SPELL_PLUGIN (activatable)->priv;
manager = xed_window_get_ui_manager (priv->window);
gtk_ui_manager_remove_ui (manager, priv->ui_id);
gtk_ui_manager_remove_action_group (manager, priv->action_group);
g_signal_handler_disconnect (priv->window, priv->tab_added_id);
g_signal_handler_disconnect (priv->window, priv->tab_removed_id);
}
static void
xed_spell_plugin_update_state (XedWindowActivatable *activatable)
{
xed_debug (DEBUG_PLUGINS);
update_ui (XED_SPELL_PLUGIN (activatable));
}
static GtkWidget *
xed_spell_plugin_create_configure_widget (PeasGtkConfigurable *configurable)
{
SpellConfigureWidget *widget;
widget = get_configure_widget (XED_SPELL_PLUGIN (configurable));
return widget->content;
}
static void
xed_spell_plugin_class_init (XedSpellPluginClass *klass)
{
GObjectClass *object_class = G_OBJECT_CLASS (klass);
object_class->dispose = xed_spell_plugin_dispose;
object_class->set_property = xed_spell_plugin_set_property;
object_class->get_property = xed_spell_plugin_get_property;
if (spell_checker_id == 0)
{
spell_checker_id = g_quark_from_string ("XedSpellCheckerID");
}
if (check_range_id == 0)
{
check_range_id = g_quark_from_string ("CheckRangeID");
}
g_object_class_override_property (object_class, PROP_WINDOW, "window");
g_type_class_add_private (object_class, sizeof (XedSpellPluginPrivate));
}
static void
xed_spell_plugin_class_finalize (XedSpellPluginClass *klass)
{
}
static void
xed_window_activatable_iface_init (XedWindowActivatableInterface *iface)
{
iface->activate = xed_spell_plugin_activate;
iface->deactivate = xed_spell_plugin_deactivate;
iface->update_state = xed_spell_plugin_update_state;
}
static void
peas_gtk_configurable_iface_init (PeasGtkConfigurableInterface *iface)
{
iface->create_configure_widget = xed_spell_plugin_create_configure_widget;
}
G_MODULE_EXPORT void
peas_register_types (PeasObjectModule *module)
{
xed_spell_plugin_register_type (G_TYPE_MODULE (module));
peas_object_module_register_extension_type (module,
XED_TYPE_WINDOW_ACTIVATABLE,
XED_TYPE_SPELL_PLUGIN);
peas_object_module_register_extension_type (module,
PEAS_GTK_TYPE_CONFIGURABLE,
XED_TYPE_SPELL_PLUGIN);
}