2 * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 2006-2015 Ricardo Mones and the Claws Mail Team
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "claws-features.h"
25 #include <glib/gi18n.h>
28 #include "attachwarner.h"
29 #include "attachwarner_prefs.h"
31 #include "prefs_common.h"
33 /** Identifier for the hook. */
36 static AttachWarnerMention *aw_matcherlist_string_match(MatcherList *matchers, gchar *str, gchar *sig_separator)
42 AttachWarnerMention *awm = NULL;
44 if (str == NULL || *str == '\0') {
48 lines = g_strsplit(str, "\n", -1);
49 if (attwarnerprefs.skip_quotes
50 && *prefs_common_get_prefs()->quote_chars != '\0') {
51 debug_print("checking without quotes\n");
52 for (i = 0; lines[i] != NULL && ret == FALSE; i++) {
53 if(attwarnerprefs.skip_signature
54 && sig_separator != NULL
55 && *sig_separator != '\0'
56 && strcmp(lines[i], sig_separator) == 0) {
57 debug_print("reached signature delimiter at line %d\n", i);
60 if (line_has_quote_char(lines[i],
61 prefs_common_get_prefs()->quote_chars) == NULL) {
62 debug_print("testing line %d\n", i);
63 info.subject = lines[i];
64 ret = matcherlist_match(matchers, &info);
65 debug_print("line %d: %d\n", i, ret);
69 debug_print("checking with quotes\n");
70 for (i = 0; lines[i] != NULL && ret == FALSE; i++) {
71 if(attwarnerprefs.skip_signature
72 && sig_separator != NULL
73 && *sig_separator != '\0'
74 && strcmp(lines[i], sig_separator) == 0) {
75 debug_print("reached signature delimiter at line %d\n", i);
78 debug_print("testing line %d\n", i);
79 info.subject = lines[i];
80 ret = matcherlist_match(matchers, &info);
81 debug_print("line %d: %d\n", i, ret);
85 awm = g_new0(AttachWarnerMention, 1);
86 awm->line = i; /* usual humans count lines from 1 */
87 awm->context = g_strdup(lines[i - 1]);
88 debug_print("found at line %d, context \"%s\"\n", awm->line, awm->context);
96 * Looks for attachment references in the composer text.
98 * @param compose The composer object to inspect.
100 * @return A pointer to an AttachWarnerMention if attachment references
101 * are found, or NULL otherwise.
103 AttachWarnerMention *are_attachments_mentioned(Compose *compose)
105 GtkTextView *textview = NULL;
106 GtkTextBuffer *textbuffer = NULL;
107 GtkTextIter start, end;
109 AttachWarnerMention *mention = NULL;
110 MatcherList *matchers = NULL;
112 matchers = matcherlist_new_from_lines(attwarnerprefs.match_strings, FALSE, attwarnerprefs.case_sensitive);
114 if (matchers == NULL) {
115 g_warning("couldn't allocate matcher");
119 textview = GTK_TEXT_VIEW(compose->text);
120 textbuffer = gtk_text_view_get_buffer(textview);
121 gtk_text_buffer_get_start_iter(textbuffer, &start);
122 gtk_text_buffer_get_end_iter(textbuffer, &end);
123 text = gtk_text_buffer_get_text(textbuffer, &start, &end, FALSE);
125 debug_print("checking text for attachment mentions\n");
127 mention = aw_matcherlist_string_match(matchers, text, compose->account->sig_sep);
130 if (matchers != NULL)
131 matcherlist_free(matchers);
132 debug_print("done\n");
137 * Looks for files attached in the composer.
139 * @param compose The composer object to inspect.
141 * @return TRUE if there is one or more files attached, FALSE otherwise.
143 gboolean does_not_have_attachments(Compose *compose)
145 GtkTreeView *tree_view = GTK_TREE_VIEW(compose->attach_clist);
149 model = gtk_tree_view_get_model(tree_view);
151 debug_print("checking for attachments existence\n");
152 if (!gtk_tree_model_get_iter_first(model, &iter))
159 * Check whether not check while redirecting or forwarding.
161 * @param mode The current compose->mode.
163 * @return TRUE for cancel further checking because it's being redirected or
164 * forwarded and user configured not to check, FALSE otherwise.
166 gboolean do_not_check_redirect_forward(int mode)
169 case COMPOSE_FORWARD:
170 case COMPOSE_FORWARD_AS_ATTACH:
171 case COMPOSE_FORWARD_INLINE:
172 case COMPOSE_REDIRECT:
173 if (attwarnerprefs.skip_forwards_and_redirections)
181 * Callback function to be called before sending the mail.
183 * @param source The composer to be checked.
184 * @param data Additional data.
186 * @return TRUE if no attachments are mentioned or files are attached,
187 * FALSE if attachments are mentioned and no files are attached.
189 static gboolean attwarn_before_send_hook(gpointer source, gpointer data)
191 Compose *compose = (Compose *)source;
192 AttachWarnerMention *mention = NULL;
194 debug_print("attachwarner invoked\n");
196 return FALSE; /* do not check while queuing */
198 if (do_not_check_redirect_forward(compose->mode))
201 mention = are_attachments_mentioned(compose);
202 if (does_not_have_attachments(compose) && mention != NULL) {
208 debug_print("user has to decide\n");
209 if (compose->sending)
210 button_label = g_strconcat("+", _("_Send"), NULL);
212 button_label = g_strconcat("+", _("_Queue"), NULL);
214 bold_text = g_strdup_printf("<span weight=\"bold\">%.20s</span>...",
216 message = g_strdup_printf(
217 _("An attachment is mentioned in the mail you're sending, "
218 "but no file was attached. Mention appears on line %d, "
219 "which begins with text: %s\n\n%s"),
222 compose->sending?_("Send it anyway?"):_("Queue it anyway?"));
223 aval = alertpanel(_("Attachment warning"), message,
224 GTK_STOCK_CANCEL, button_label, NULL);
227 g_free(button_label);
228 if (aval != G_ALERTALTERNATE)
231 if (mention != NULL) {
232 if (mention->context != NULL)
233 g_free(mention->context);
237 return FALSE; /* continue sending */
243 * @param error For storing the returned error message.
245 * @return 0 if initialization succeeds, -1 on failure.
247 gint plugin_init(gchar **error)
249 if (!check_plugin_version(MAKE_NUMERIC_VERSION(2,9,2,72),
250 VERSION_NUMERIC, _("Attach warner"), error))
253 hook_id = hooks_register_hook(COMPOSE_CHECK_BEFORE_SEND_HOOKLIST,
254 attwarn_before_send_hook, NULL);
257 *error = g_strdup(_("Failed to register check before send hook"));
261 attachwarner_prefs_init();
263 debug_print("Attachment warner plugin loaded\n");
269 * Destructor for the plugin.
270 * Unregister the callback function and frees matcher.
272 gboolean plugin_done(void)
274 hooks_unregister_hook(COMPOSE_CHECK_BEFORE_SEND_HOOKLIST, hook_id);
275 attachwarner_prefs_done();
276 debug_print("Attachment warner plugin unloaded\n");
281 * Get the name of the plugin.
283 * @return The plugin name (maybe translated).
285 const gchar *plugin_name(void)
287 return _("Attach warner");
291 * Get the description of the plugin.
293 * @return The plugin description (maybe translated).
295 const gchar *plugin_desc(void)
297 return _("Warns user if some reference to attachments is found in the "
298 "message text and no file is attached.");
302 * Get the kind of plugin.
304 * @return The "GTK2" constant.
306 const gchar *plugin_type(void)
312 * Get the license acronym the plugin is released under.
314 * @return The "GPL" constant.
316 const gchar *plugin_licence(void)
322 * Get the version of the plugin.
324 * @return The current version string.
326 const gchar *plugin_version(void)
332 * Get the features implemented by the plugin.
334 * @return A constant PluginFeature structure with the features.
336 struct PluginFeature *plugin_provides(void)
338 static struct PluginFeature features[] =
339 { {PLUGIN_OTHER, N_("Attach warner")},
340 {PLUGIN_NOTHING, NULL}};