gfgit/claws-mail
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
claws-mail/src/textview.c
Paul Mangan 360db791f8 2005-01-29 [paul] 1.0.0cvs23.2 
* src/account.c
	* src/action.c
	* src/addressadd.c
	* src/addressbook.c
	* src/alertpanel.c
	* src/compose.c
	* src/editaddress.c
	* src/editbook.c
	* src/editgroup.c
	* src/editjpilot.c
	* src/editldap.c
	* src/editldap_basedn.c
	* src/editvcard.c
	* src/export.c
	* src/foldersel.c
	* src/grouplistdialog.c
	* src/import.c
	* src/importldif.c
	* src/inc.c
	* src/main.c
	* src/mainwindow.c
	* src/message_search.c
	* src/messageview.c
	* src/mimeview.c
	* src/prefs_actions.c
	* src/prefs_common.c
	* src/prefs_common.h
	* src/prefs_customheader.c
	* src/prefs_display_header.c
	* src/prefs_filtering.c
	* src/prefs_filtering_action.c
	* src/prefs_gtk.c
	* src/prefs_matcher.c
	* src/prefs_summary_column.c
	* src/prefs_template.c
	* src/sourcewindow.c
	* src/summary_search.c
	* src/summaryview.c
	* src/textview.c
	* src/gtk/about.c
	* src/gtk/description_window.c
	* src/gtk/gtkshruler.c
	* src/gtk/gtkutils.c
	* src/gtk/gtkutils.h
	* src/gtk/inputdialog.c
	* src/gtk/logwindow.c
	* src/gtk/prefswindow.c
	* src/gtk/progressdialog.c
	* src/gtk/progressdialog.h
		first part of initial sync with main-gtk2
		(more to follow)
2005-01-29 16:53:23 +00:00

2199 lines
59 KiB
C
Raw Blame History

/*
* 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 <gdk/gdk.h>
#include <gdk/gdkkeysyms.h>
#include <gtk/gtkvbox.h>
#include <gtk/gtkscrolledwindow.h>
#include <gtk/gtksignal.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#include "intl.h"
#include "main.h"
#include "summaryview.h"
#include "procheader.h"
#include "prefs_common.h"
#include "codeconv.h"
#include "utils.h"
#include "gtkutils.h"
#include "procmime.h"
#include "html.h"
#include "enriched.h"
#include "compose.h"
#include "addressbook.h"
#include "displayheader.h"
#include "account.h"
#include "mimeview.h"
#include "alertpanel.h"
#include "menu.h"
struct _RemoteURI
{
gchar *uri;
guint start;
guint end;
};
static GdkColor quote_colors[3] = {
{(gulong)0, (gushort)0, (gushort)0, (gushort)0},
{(gulong)0, (gushort)0, (gushort)0, (gushort)0},
{(gulong)0, (gushort)0, (gushort)0, (gushort)0}
};
static GdkColor signature_color = {
(gulong)0,
(gushort)0x7fff,
(gushort)0x7fff,
(gushort)0x7fff
};
static GdkColor uri_color = {
(gulong)0,
(gushort)0,
(gushort)0,
(gushort)0
};
static GdkColor emphasis_color = {
(gulong)0,
(gushort)0,
(gushort)0,
(gushort)0xcfff
};
#if 0
static GdkColor error_color = {
(gulong)0,
(gushort)0xefff,
(gushort)0,
(gushort)0
};
#endif
static GdkCursor *hand_cursor = NULL;
static GdkCursor *text_cursor = NULL;
#define TEXTVIEW_STATUSBAR_PUSH(textview, str) \
{ \
gtk_statusbar_push(GTK_STATUSBAR(textview->messageview->statusbar), \
textview->messageview->statusbar_cid, str); \
}
#define TEXTVIEW_STATUSBAR_POP(textview) \
{ \
gtk_statusbar_pop(GTK_STATUSBAR(textview->messageview->statusbar), \
textview->messageview->statusbar_cid); \
}
static void textview_show_ertf (TextView *textview,
FILE *fp,
CodeConverter *conv);
static void textview_add_part (TextView *textview,
MimeInfo *mimeinfo);
static void textview_add_parts (TextView *textview,
MimeInfo *mimeinfo);
static void textview_write_body (TextView *textview,
MimeInfo *mimeinfo);
static void textview_show_html (TextView *textview,
FILE *fp,
CodeConverter *conv);
static void textview_write_line (TextView *textview,
const gchar *str,
CodeConverter *conv);
static void textview_write_link (TextView *textview,
const gchar *str,
const gchar *uri,
CodeConverter *conv);
static GPtrArray *textview_scan_header (TextView *textview,
FILE *fp);
static void textview_show_header (TextView *textview,
GPtrArray *headers);
static gint textview_key_pressed (GtkWidget *widget,
GdkEventKey *event,
TextView *textview);
static gboolean textview_motion_notify (GtkWidget *widget,
GdkEventMotion *motion,
TextView *textview);
static gboolean textview_leave_notify (GtkWidget *widget,
GdkEventCrossing *event,
TextView *textview);
static gboolean textview_visibility_notify (GtkWidget *widget,
GdkEventVisibility *event,
TextView *textview);
static void textview_uri_update (TextView *textview,
gint x,
gint y);
static gboolean textview_get_uri_range (TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag,
GtkTextIter *start_iter,
GtkTextIter *end_iter);
static RemoteURI *textview_get_uri_from_range (TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag,
GtkTextIter *start_iter,
GtkTextIter *end_iter);
static RemoteURI *textview_get_uri (TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag);
static gboolean textview_uri_button_pressed (GtkTextTag *tag,
GObject *obj,
GdkEvent *event,
GtkTextIter *iter,
TextView *textview);
static void textview_smooth_scroll_do (TextView *textview,
gfloat old_value,
gfloat last_value,
gint step);
static void textview_smooth_scroll_one_line (TextView *textview,
gboolean up);
static gboolean textview_smooth_scroll_page (TextView *textview,
gboolean up);
static gboolean textview_uri_security_check (TextView *textview,
RemoteURI *uri);
static void textview_uri_list_remove_all (GSList *uri_list);
static void open_uri_cb (TextView *textview,
guint action,
void *data);
static void copy_uri_cb (TextView *textview,
guint action,
void *data);
static GtkItemFactoryEntry textview_popup_entries[] =
{
{N_("/_Open link"), NULL, open_uri_cb, 0, NULL},
{N_("/_Copy link location"), NULL, copy_uri_cb, 0, NULL},
};
TextView *textview_create(void)
{
TextView *textview;
GtkWidget *vbox;
GtkWidget *scrolledwin;
GtkWidget *text;
GtkTextBuffer *buffer;
GtkClipboard *clipboard;
GtkItemFactory *popupfactory;
GtkWidget *popupmenu;
gint n_entries;
PangoFontDescription *font_desc = NULL;
debug_print("Creating text view...\n");
textview = g_new0(TextView, 1);
scrolledwin = gtk_scrolled_window_new(NULL, NULL);
gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwin),
GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolledwin),
GTK_SHADOW_IN);
gtk_widget_set_size_request
(scrolledwin, prefs_common.mainview_width, -1);
/* create GtkSText widgets for single-byte and multi-byte character */
text = gtk_text_view_new();
gtk_widget_add_events(text, GDK_LEAVE_NOTIFY_MASK);
gtk_widget_show(text);
gtk_text_view_set_editable(GTK_TEXT_VIEW(text), FALSE);
gtk_text_view_set_wrap_mode(GTK_TEXT_VIEW(text), GTK_WRAP_WORD_CHAR);
gtk_text_view_set_cursor_visible(GTK_TEXT_VIEW(text), FALSE);
gtk_text_view_set_left_margin(GTK_TEXT_VIEW(text), 6);
gtk_text_view_set_right_margin(GTK_TEXT_VIEW(text), 6);
buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text));
clipboard = gtk_clipboard_get(GDK_SELECTION_PRIMARY);
gtk_text_buffer_add_selection_clipboard(buffer, clipboard);
gtk_widget_ensure_style(text);
if (prefs_common.normalfont)
font_desc = pango_font_description_from_string
(prefs_common.normalfont);
if (font_desc) {
gtk_widget_modify_font(text, font_desc);
}
pango_font_description_free(font_desc);
gtk_widget_ref(scrolledwin);
gtk_container_add(GTK_CONTAINER(scrolledwin), text);
if (!hand_cursor)
hand_cursor = gdk_cursor_new(GDK_HAND2);
if (!text_cursor)
text_cursor = gdk_cursor_new(GDK_XTERM);
g_signal_connect(G_OBJECT(text), "key_press_event",
G_CALLBACK(textview_key_pressed),
textview);
g_signal_connect(G_OBJECT(text), "motion_notify_event",
G_CALLBACK(textview_motion_notify),
textview);
g_signal_connect(G_OBJECT(text), "leave_notify_event",
G_CALLBACK(textview_leave_notify),
textview);
g_signal_connect(G_OBJECT(text), "visibility_notify_event",
G_CALLBACK(textview_visibility_notify),
textview);
gtk_widget_show(scrolledwin);
vbox = gtk_vbox_new(FALSE, 0);
gtk_box_pack_start(GTK_BOX(vbox), scrolledwin, TRUE, TRUE, 0);
gtk_widget_show(vbox);
n_entries = sizeof(textview_popup_entries) /
sizeof(textview_popup_entries[0]);
popupmenu = menu_create_items(textview_popup_entries, n_entries,
"<UriPopupMenu>", &popupfactory,
textview);
textview->vbox = vbox;
textview->scrolledwin = scrolledwin;
textview->text = text;
textview->uri_list = NULL;
textview->body_pos = 0;
textview->show_all_headers = FALSE;
textview->last_buttonpress = GDK_NOTHING;
textview->popup_menu = popupmenu;
textview->popup_factory = popupfactory;
return textview;
}
static void textview_create_tags(GtkTextView *text, TextView *textview)
{
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextTag *tag;
gtk_text_buffer_create_tag(buffer, "header",
"pixels-above-lines", 0,
"pixels-above-lines-set", TRUE,
"pixels-below-lines", 0,
"pixels-below-lines-set", TRUE,
"left-margin", 0,
"left-margin-set", TRUE,
NULL);
gtk_text_buffer_create_tag(buffer, "header_title",
"font", prefs_common.boldfont,
NULL);
gtk_text_buffer_create_tag(buffer, "quote0",
"foreground-gdk", &quote_colors[0],
NULL);
gtk_text_buffer_create_tag(buffer, "quote1",
"foreground-gdk", &quote_colors[1],
NULL);
gtk_text_buffer_create_tag(buffer, "quote2",
"foreground-gdk", &quote_colors[2],
NULL);
gtk_text_buffer_create_tag(buffer, "emphasis",
"foreground-gdk", &emphasis_color,
NULL);
gtk_text_buffer_create_tag(buffer, "signature",
"foreground-gdk", &signature_color,
NULL);
tag = gtk_text_buffer_create_tag(buffer, "link",
"foreground-gdk", &uri_color,
NULL);
gtk_text_buffer_create_tag(buffer, "link-hover",
"underline", PANGO_UNDERLINE_SINGLE,
NULL);
g_signal_connect(G_OBJECT(tag), "event",
G_CALLBACK(textview_uri_button_pressed), textview);
}
void textview_init(TextView *textview)
{
textview_update_message_colors();
textview_set_all_headers(textview, FALSE);
textview_set_font(textview, NULL);
textview_create_tags(GTK_TEXT_VIEW(textview->text), textview);
}
void textview_update_message_colors(void)
{
GdkColor black = {0, 0, 0, 0};
if (prefs_common.enable_color) {
/* grab the quote colors, converting from an int to a GdkColor */
gtkut_convert_int_to_gdk_color(prefs_common.quote_level1_col,
&quote_colors[0]);
gtkut_convert_int_to_gdk_color(prefs_common.quote_level2_col,
&quote_colors[1]);
gtkut_convert_int_to_gdk_color(prefs_common.quote_level3_col,
&quote_colors[2]);
gtkut_convert_int_to_gdk_color(prefs_common.uri_col,
&uri_color);
gtkut_convert_int_to_gdk_color(prefs_common.signature_col,
&signature_color);
} else {
quote_colors[0] = quote_colors[1] = quote_colors[2] =
uri_color = emphasis_color = signature_color = black;
}
}
void textview_show_message(TextView *textview, MimeInfo *mimeinfo,
const gchar *file)
{
FILE *fp;
if ((fp = fopen(file, "rb")) == NULL) {
FILE_OP_ERROR(file, "fopen");
return;
}
textview_clear(textview);
textview_add_parts(textview, mimeinfo);
fclose(fp);
textview_set_position(textview, 0);
}
void textview_show_part(TextView *textview, MimeInfo *mimeinfo, FILE *fp)
{
GtkTextView *text;
g_return_if_fail(mimeinfo != NULL);
g_return_if_fail(fp != NULL);
if ((mimeinfo->type == MIMETYPE_MULTIPART) ||
((mimeinfo->type == MIMETYPE_MESSAGE) && !g_ascii_strcasecmp(mimeinfo->subtype, "rfc822"))) {
textview_clear(textview);
textview_add_parts(textview, mimeinfo);
return;
}
if (fseek(fp, mimeinfo->offset, SEEK_SET) < 0)
perror("fseek");
textview_clear(textview);
if (mimeinfo->type == MIMETYPE_MULTIPART)
textview_add_parts(textview, mimeinfo);
else
textview_write_body(textview, mimeinfo);
}
static void textview_add_part(TextView *textview, MimeInfo *mimeinfo)
{
GtkTextView *text;
GtkTextBuffer *buffer;
GtkTextIter iter;
gchar buf[BUFFSIZE];
GPtrArray *headers = NULL;
const gchar *name;
gchar *content_type;
gint charcount;
g_return_if_fail(mimeinfo != NULL);
text = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(text);
charcount = gtk_text_buffer_get_char_count(buffer);
gtk_text_buffer_get_end_iter(buffer, &iter);
if (mimeinfo->type == MIMETYPE_MULTIPART) return;
if ((mimeinfo->type == MIMETYPE_MESSAGE) && !g_ascii_strcasecmp(mimeinfo->subtype, "rfc822")) {
FILE *fp;
fp = fopen(mimeinfo->data.filename, "rb");
fseek(fp, mimeinfo->offset, SEEK_SET);
headers = textview_scan_header(textview, fp);
if (headers) {
if (charcount > 0)
gtk_text_buffer_insert(buffer, &iter, "\n", 1);
textview_show_header(textview, headers);
procheader_header_array_destroy(headers);
}
fclose(fp);
return;
}
name = procmime_mimeinfo_get_parameter(mimeinfo, "filename");
content_type = procmime_get_content_type_str(mimeinfo->type,
mimeinfo->subtype);
if (name == NULL)
name = procmime_mimeinfo_get_parameter(mimeinfo, "name");
if (name != NULL)
g_snprintf(buf, sizeof(buf), "\n[%s %s (%d bytes)]\n",
name, content_type, mimeinfo->length);
else
g_snprintf(buf, sizeof(buf), "\n[%s (%d bytes)]\n",
content_type, mimeinfo->length);
g_free(content_type);
if (mimeinfo->type != MIMETYPE_TEXT) {
gtk_text_buffer_insert(buffer, &iter, buf, -1);
} else if (mimeinfo->disposition != DISPOSITIONTYPE_ATTACHMENT) {
if (prefs_common.display_header && (charcount > 0))
gtk_text_buffer_insert(buffer, &iter, "\n", 1);
textview_write_body(textview, mimeinfo);
}
}
static void recursive_add_parts(TextView *textview, GNode *node)
{
GNode * iter;
MimeInfo *mimeinfo;
mimeinfo = (MimeInfo *) node->data;
textview_add_part(textview, mimeinfo);
if ((mimeinfo->type != MIMETYPE_MULTIPART) &&
(mimeinfo->type != MIMETYPE_MESSAGE))
return;
if (g_ascii_strcasecmp(mimeinfo->subtype, "alternative") == 0) {
GNode * prefered_body;
int prefered_score;
/*
text/plain : score 3
text/ * : score 2
other : score 1
*/
prefered_body = NULL;
prefered_score = 0;
for (iter = g_node_first_child(node) ; iter != NULL ;
iter = g_node_next_sibling(iter)) {
int score;
MimeInfo * submime;
score = 1;
submime = (MimeInfo *) iter->data;
if (submime->type == MIMETYPE_TEXT)
score = 2;
if (submime->subtype != NULL) {
if (g_ascii_strcasecmp(submime->subtype, "plain") == 0)
score = 3;
}
if (score > prefered_score) {
prefered_score = score;
prefered_body = iter;
}
}
if (prefered_body != NULL) {
recursive_add_parts(textview, prefered_body);
}
}
else {
for (iter = g_node_first_child(node) ; iter != NULL ;
iter = g_node_next_sibling(iter)) {
recursive_add_parts(textview, iter);
}
}
}
static void textview_add_parts(TextView *textview, MimeInfo *mimeinfo)
{
g_return_if_fail(mimeinfo != NULL);
recursive_add_parts(textview, mimeinfo->node);
}
#define TEXT_INSERT(str) \
gtk_text_buffer_insert(buffer, &iter, str, -1)
void textview_show_error(TextView *textview)
{
GtkTextView *text;
GtkTextBuffer *buffer;
GtkTextIter iter;
textview_set_font(textview, NULL);
textview_clear(textview);
text = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(text);
gtk_text_buffer_get_start_iter(buffer, &iter);
TEXT_INSERT(_("This message can't be displayed.\n"));
}
void textview_show_mime_part(TextView *textview, MimeInfo *partinfo)
{
GtkTextView *text;
GtkTextBuffer *buffer;
GtkTextIter iter;
if (!partinfo) return;
textview_set_font(textview, NULL);
textview_clear(textview);
text = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(text);
gtk_text_buffer_get_start_iter(buffer, &iter);
TEXT_INSERT(_("The following can be performed on this part by "));
TEXT_INSERT(_("right-clicking the icon or list item:\n"));
TEXT_INSERT(_(" To save select 'Save as...' (Shortcut key: 'y')\n"));
TEXT_INSERT(_(" To display as text select 'Display as text' "));
TEXT_INSERT(_("(Shortcut key: 't')\n"));
TEXT_INSERT(_(" To open with an external program select 'Open' "));
TEXT_INSERT(_("(Shortcut key: 'l'),\n"));
TEXT_INSERT(_(" (alternately double-click, or click the middle "));
TEXT_INSERT(_("mouse button),\n"));
TEXT_INSERT(_(" or 'Open with...' (Shortcut key: 'o')\n"));
}
#undef TEXT_INSERT
static void textview_write_body(TextView *textview, MimeInfo *mimeinfo)
{
FILE *tmpfp;
gchar buf[BUFFSIZE];
CodeConverter *conv;
const gchar *charset;
if (textview->messageview->forced_charset)
charset = textview->messageview->forced_charset;
else
charset = procmime_mimeinfo_get_parameter(mimeinfo, "charset");
textview_set_font(textview, charset);
conv = conv_code_converter_new(charset);
procmime_force_encoding(textview->messageview->forced_encoding);
textview->is_in_signature = FALSE;
procmime_decode_content(mimeinfo);
if (!g_ascii_strcasecmp(mimeinfo->subtype, "html")) {
gchar *filename;
filename = procmime_get_tmp_file_name(mimeinfo);
if (procmime_get_part(filename, mimeinfo) == 0) {
tmpfp = fopen(filename, "rb");
textview_show_html(textview, tmpfp, conv);
fclose(tmpfp);
unlink(filename);
}
g_free(filename);
} else if (!g_ascii_strcasecmp(mimeinfo->subtype, "enriched")) {
gchar *filename;
filename = procmime_get_tmp_file_name(mimeinfo);
if (procmime_get_part(filename, mimeinfo) == 0) {
tmpfp = fopen(filename, "rb");
textview_show_ertf(textview, tmpfp, conv);
fclose(tmpfp);
unlink(filename);
}
g_free(filename);
} else {
tmpfp = fopen(mimeinfo->data.filename, "rb");
fseek(tmpfp, mimeinfo->offset, SEEK_SET);
debug_print("Viewing text content of type: %s (length: %d)\n", mimeinfo->subtype, mimeinfo->length);
while ((fgets(buf, sizeof(buf), tmpfp) != NULL) &&
(ftell(tmpfp) <= mimeinfo->offset + mimeinfo->length))
textview_write_line(textview, buf, conv);
fclose(tmpfp);
}
conv_code_converter_destroy(conv);
procmime_force_encoding(0);
}
static void textview_show_html(TextView *textview, FILE *fp,
CodeConverter *conv)
{
HTMLParser *parser;
gchar *str;
parser = html_parser_new(fp, conv);
g_return_if_fail(parser != NULL);
while ((str = html_parse(parser)) != NULL) {
if (parser->state == HTML_HREF) {
/* first time : get and copy the URL */
if (parser->href == NULL) {
/* ALF - the sylpheed html parser returns an empty string,
* if still inside an <a>, but already parsed past HREF */
str = strtok(str, " ");
if (str) {
parser->href = g_strdup(str);
/* the URL may (or not) be followed by the
* referenced text */
str = strtok(NULL, "");
}
}
if (str != NULL)
textview_write_link(textview, str, parser->href, NULL);
} else
textview_write_line(textview, str, NULL);
}
html_parser_destroy(parser);
}
static void textview_show_ertf(TextView *textview, FILE *fp,
CodeConverter *conv)
{
ERTFParser *parser;
gchar *str;
parser = ertf_parser_new(fp, conv);
g_return_if_fail(parser != NULL);
while ((str = ertf_parse(parser)) != NULL) {
textview_write_line(textview, str, NULL);
}
ertf_parser_destroy(parser);
}
/* get_uri_part() - retrieves a URI starting from scanpos.
Returns TRUE if succesful */
static gboolean get_uri_part(const gchar *start, const gchar *scanpos,
const gchar **bp, const gchar **ep)
{
const gchar *ep_;
g_return_val_if_fail(start != NULL, FALSE);
g_return_val_if_fail(scanpos != NULL, FALSE);
g_return_val_if_fail(bp != NULL, FALSE);
g_return_val_if_fail(ep != NULL, FALSE);
*bp = scanpos;
/* find end point of URI */
for (ep_ = scanpos; *ep_ != '\0'; ep_++) {
if (!isgraph(*(const guchar *)ep_) ||
!IS_ASCII(*(const guchar *)ep_) ||
strchr("()<>\"", *ep_))
break;
}
/* no punctuation at end of string */
/* FIXME: this stripping of trailing punctuations may bite with other URIs.
* should pass some URI type to this function and decide on that whether
* to perform punctuation stripping */
#define IS_REAL_PUNCT(ch) (ispunct(ch) && ((ch) != '/'))
for (; ep_ - 1 > scanpos + 1 &&
IS_REAL_PUNCT(*(const guchar *)(ep_ - 1));
ep_--)
;
#undef IS_REAL_PUNCT
*ep = ep_;
return TRUE;
}
static gchar *make_uri_string(const gchar *bp, const gchar *ep)
{
return g_strndup(bp, ep - bp);
}
/* valid mail address characters */
#define IS_RFC822_CHAR(ch) \
(IS_ASCII(ch) && \
(ch) > 32 && \
(ch) != 127 && \
!isspace(ch) && \
!strchr("(),;<>\"", (ch)))
/* alphabet and number within 7bit ASCII */
#define IS_ASCII_ALNUM(ch) (IS_ASCII(ch) && isalnum(ch))
#define IS_QUOTE(ch) ((ch) == '\'' || (ch) == '"')
static GHashTable *create_domain_tab(void)
{
static const gchar *toplvl_domains [] = {
"museum", "aero",
"arpa", "coop", "info", "name", "biz", "com", "edu", "gov",
"int", "mil", "net", "org", "ac", "ad", "ae", "af", "ag",
"ai", "al", "am", "an", "ao", "aq", "ar", "as", "at", "au",
"aw", "az", "ba", "bb", "bd", "be", "bf", "bg", "bh", "bi",
"bj", "bm", "bn", "bo", "br", "bs", "bt", "bv", "bw", "by",
"bz", "ca", "cc", "cd", "cf", "cg", "ch", "ci", "ck", "cl",
"cm", "cn", "co", "cr", "cu", "cv", "cx", "cy", "cz", "de",
"dj", "dk", "dm", "do", "dz", "ec", "ee", "eg", "eh", "er",
"es", "et", "fi", "fj", "fk", "fm", "fo", "fr", "ga", "gd",
"ge", "gf", "gg", "gh", "gi", "gl", "gm", "gn", "gp", "gq",
"gr", "gs", "gt", "gu", "gw", "gy", "hk", "hm", "hn", "hr",
"ht", "hu", "id", "ie", "il", "im", "in", "io", "iq", "ir",
"is", "it", "je", "jm", "jo", "jp", "ke", "kg", "kh", "ki",
"km", "kn", "kp", "kr", "kw", "ky", "kz", "la", "lb", "lc",
"li", "lk", "lr", "ls", "lt", "lu", "lv", "ly", "ma", "mc",
"md", "mg", "mh", "mk", "ml", "mm", "mn", "mo", "mp", "mq",
"mr", "ms", "mt", "mu", "mv", "mw", "mx", "my", "mz", "na",
"nc", "ne", "nf", "ng", "ni", "nl", "no", "np", "nr", "nu",
"nz", "om", "pa", "pe", "pf", "pg", "ph", "pk", "pl", "pm",
"pn", "pr", "ps", "pt", "pw", "py", "qa", "re", "ro", "ru",
"rw", "sa", "sb", "sc", "sd", "se", "sg", "sh", "si", "sj",
"sk", "sl", "sm", "sn", "so", "sr", "st", "sv", "sy", "sz",
"tc", "td", "tf", "tg", "th", "tj", "tk", "tm", "tn", "to",
"tp", "tr", "tt", "tv", "tw", "tz", "ua", "ug", "uk", "um",
"us", "uy", "uz", "va", "vc", "ve", "vg", "vi", "vn", "vu",
"wf", "ws", "ye", "yt", "yu", "za", "zm", "zw"
};
gint n;
GHashTable *htab = g_hash_table_new(g_stricase_hash, g_stricase_equal);
g_return_val_if_fail(htab, NULL);
for (n = 0; n < sizeof toplvl_domains / sizeof toplvl_domains[0]; n++)
g_hash_table_insert(htab, (gpointer) toplvl_domains[n], (gpointer) toplvl_domains[n]);
return htab;
}
static gboolean is_toplvl_domain(GHashTable *tab, const gchar *first, const gchar *last)
{
const gint MAX_LVL_DOM_NAME_LEN = 6;
gchar buf[MAX_LVL_DOM_NAME_LEN + 1];
const gchar *m = buf + MAX_LVL_DOM_NAME_LEN + 1;
register gchar *p;
if (last - first > MAX_LVL_DOM_NAME_LEN || first > last)
return FALSE;
for (p = buf; p < m && first < last; *p++ = *first++)
;
*p = 0;
return g_hash_table_lookup(tab, buf) != NULL;
}
/* get_email_part() - retrieves an email address. Returns TRUE if succesful */
static gboolean get_email_part(const gchar *start, const gchar *scanpos,
const gchar **bp, const gchar **ep)
{
/* more complex than the uri part because we need to scan back and forward starting from
* the scan position. */
gboolean result = FALSE;
const gchar *bp_ = NULL;
const gchar *ep_ = NULL;
static GHashTable *dom_tab;
const gchar *last_dot = NULL;
const gchar *prelast_dot = NULL;
const gchar *last_tld_char = NULL;
/* the informative part of the email address (describing the name
* of the email address owner) may contain quoted parts. the
* closure stack stores the last encountered quotes. */
gchar closure_stack[128];
gchar *ptr = closure_stack;
g_return_val_if_fail(start != NULL, FALSE);
g_return_val_if_fail(scanpos != NULL, FALSE);
g_return_val_if_fail(bp != NULL, FALSE);
g_return_val_if_fail(ep != NULL, FALSE);
if (!dom_tab)
dom_tab = create_domain_tab();
g_return_val_if_fail(dom_tab, FALSE);
/* scan start of address */
for (bp_ = scanpos - 1;
bp_ >= start && IS_RFC822_CHAR(*(const guchar *)bp_); bp_--)
;
/* TODO: should start with an alnum? */
bp_++;
for (; bp_ < scanpos && !IS_ASCII_ALNUM(*(const guchar *)bp_); bp_++)
;
if (bp_ != scanpos) {
/* scan end of address */
for (ep_ = scanpos + 1;
*ep_ && IS_RFC822_CHAR(*(const guchar *)ep_); ep_++)
if (*ep_ == '.') {
prelast_dot = last_dot;
last_dot = ep_;
if (*(last_dot + 1) == '.') {
if (prelast_dot == NULL)
return FALSE;
last_dot = prelast_dot;
break;
}
}
/* TODO: really should terminate with an alnum? */
for (; ep_ > scanpos && !IS_ASCII_ALNUM(*(const guchar *)ep_);
--ep_)
;
ep_++;
if (last_dot == NULL)
return FALSE;
if (last_dot >= ep_)
last_dot = prelast_dot;
if (last_dot == NULL || (scanpos + 1 >= last_dot))
return FALSE;
last_dot++;
for (last_tld_char = last_dot; last_tld_char < ep_; last_tld_char++)
if (*last_tld_char == '?')
break;
if (is_toplvl_domain(dom_tab, last_dot, last_tld_char))
result = TRUE;
*ep = ep_;
*bp = bp_;
}
if (!result) return FALSE;
if (*ep_ && *(bp_ - 1) == '"' && *(ep_) == '"'
&& *(ep_ + 1) == ' ' && *(ep_ + 2) == '<'
&& IS_RFC822_CHAR(*(ep_ + 3))) {
/* this informative part with an @ in it is
* followed by the email address */
ep_ += 3;
/* go to matching '>' (or next non-rfc822 char, like \n) */
for (; *ep_ != '>' && *ep != '\0' && IS_RFC822_CHAR(*ep_); ep_++)
;
/* include the bracket */
if (*ep_ == '>') ep_++;
/* include the leading quote */
bp_--;
*ep = ep_;
*bp = bp_;
return TRUE;
}
/* skip if it's between quotes "'alfons@proteus.demon.nl'" <alfons@proteus.demon.nl> */
if (bp_ - 1 > start && IS_QUOTE(*(bp_ - 1)) && IS_QUOTE(*ep_))
return FALSE;
/* see if this is <bracketed>; in this case we also scan for the informative part. */
if (bp_ - 1 <= start || *(bp_ - 1) != '<' || *ep_ != '>')
return TRUE;
#define FULL_STACK() ((size_t) (ptr - closure_stack) >= sizeof closure_stack)
#define IN_STACK() (ptr > closure_stack)
/* has underrun check */
#define POP_STACK() if(IN_STACK()) --ptr
/* has overrun check */
#define PUSH_STACK(c) if(!FULL_STACK()) *ptr++ = (c); else return TRUE
/* has underrun check */
#define PEEK_STACK() (IN_STACK() ? *(ptr - 1) : 0)
ep_++;
/* scan for the informative part. */
for (bp_ -= 2; bp_ >= start; bp_--) {
/* if closure on the stack keep scanning */
if (PEEK_STACK() == *bp_) {
POP_STACK();
continue;
}
if (*bp_ == '\'' || *bp_ == '"') {
PUSH_STACK(*bp_);
continue;
}
/* if nothing in the closure stack, do the special conditions
* the following if..else expression simply checks whether
* a token is acceptable. if not acceptable, the clause
* should terminate the loop with a 'break' */
if (!PEEK_STACK()) {
if (*bp_ == '-'
&& (((bp_ - 1) >= start) && isalnum(*(bp_ - 1)))
&& (((bp_ + 1) < ep_) && isalnum(*(bp_ + 1)))) {
/* hyphens are allowed, but only in
between alnums */
} else if (!ispunct(*bp_)) {
/* but anything not being a punctiation
is ok */
} else {
break; /* anything else is rejected */
}
}
}
bp_++;
#undef PEEK_STACK
#undef PUSH_STACK
#undef POP_STACK
#undef IN_STACK
#undef FULL_STACK
/* scan forward (should start with an alnum) */
for (; *bp_ != '<' && isspace(*bp_) && *bp_ != '"'; bp_++)
;
*ep = ep_;
*bp = bp_;
return result;
}
#undef IS_QUOTE
#undef IS_ASCII_ALNUM
#undef IS_RFC822_CHAR
static gchar *make_email_string(const gchar *bp, const gchar *ep)
{
/* returns a mailto: URI; mailto: is also used to detect the
* uri type later on in the button_pressed signal handler */
gchar *tmp;
gchar *result;
tmp = g_strndup(bp, ep - bp);
result = g_strconcat("mailto:", tmp, NULL);
g_free(tmp);
return result;
}
static gchar *make_http_string(const gchar *bp, const gchar *ep)
{
/* returns an http: URI; */
gchar *tmp;
gchar *result;
tmp = g_strndup(bp, ep - bp);
result = g_strconcat("http://", tmp, NULL);
g_free(tmp);
return result;
}
#define ADD_TXT_POS(bp_, ep_, pti_) \
if ((last->next = alloca(sizeof(struct txtpos))) != NULL) { \
last = last->next; \
last->bp = (bp_); last->ep = (ep_); last->pti = (pti_); \
last->next = NULL; \
} else { \
g_warning("alloc error scanning URIs\n"); \
gtk_text_buffer_insert_with_tags_by_name(buffer, &iter, \
linebuf, -1, \
fg_tag, NULL); \
return; \
}
/* textview_make_clickable_parts() - colorizes clickable parts */
static void textview_make_clickable_parts(TextView *textview,
const gchar *fg_tag,
const gchar *uri_tag,
const gchar *linebuf)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextIter iter;
/* parse table - in order of priority */
struct table {
const gchar *needle; /* token */
/* token search function */
gchar *(*search) (const gchar *haystack,
const gchar *needle);
/* part parsing function */
gboolean (*parse) (const gchar *start,
const gchar *scanpos,
const gchar **bp_,
const gchar **ep_);
/* part to URI function */
gchar *(*build_uri) (const gchar *bp,
const gchar *ep);
};
static struct table parser[] = {
{"http://", strcasestr, get_uri_part, make_uri_string},
{"https://", strcasestr, get_uri_part, make_uri_string},
{"ftp://", strcasestr, get_uri_part, make_uri_string},
{"www.", strcasestr, get_uri_part, make_http_string},
{"mailto:", strcasestr, get_uri_part, make_uri_string},
{"@", strcasestr, get_email_part, make_email_string}
};
const gint PARSE_ELEMS = sizeof parser / sizeof parser[0];
gint n;
const gchar *walk, *bp, *ep;
struct txtpos {
const gchar *bp, *ep; /* text position */
gint pti; /* index in parse table */
struct txtpos *next; /* next */
} head = {NULL, NULL, 0, NULL}, *last = &head;
gtk_text_buffer_get_end_iter(buffer, &iter);
/* parse for clickable parts, and build a list of begin and end positions */
for (walk = linebuf, n = 0;;) {
gint last_index = PARSE_ELEMS;
gchar *scanpos = NULL;
/* FIXME: this looks phony. scanning for anything in the parse table */
for (n = 0; n < PARSE_ELEMS; n++) {
gchar *tmp;
tmp = parser[n].search(walk, parser[n].needle);
if (tmp) {
if (scanpos == NULL || tmp < scanpos) {
scanpos = tmp;
last_index = n;
}
}
}
if (scanpos) {
/* check if URI can be parsed */
if (parser[last_index].parse(walk, scanpos, &bp, &ep)
&& (size_t) (ep - bp - 1) > strlen(parser[last_index].needle)) {
ADD_TXT_POS(bp, ep, last_index);
walk = ep;
} else
walk = scanpos +
strlen(parser[last_index].needle);
} else
break;
}
/* colorize this line */
if (head.next) {
const gchar *normal_text = linebuf;
/* insert URIs */
for (last = head.next; last != NULL;
normal_text = last->ep, last = last->next) {
RemoteURI *uri;
uri = g_new(RemoteURI, 1);
if (last->bp - normal_text > 0)
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter,
normal_text,
last->bp - normal_text,
fg_tag, NULL);
uri->uri = parser[last->pti].build_uri(last->bp,
last->ep);
uri->start = gtk_text_iter_get_offset(&iter);
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, last->bp, last->ep - last->bp,
uri_tag, fg_tag, NULL);
uri->end = gtk_text_iter_get_offset(&iter);
textview->uri_list =
g_slist_append(textview->uri_list, uri);
}
if (*normal_text)
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, normal_text, -1, fg_tag, NULL);
} else {
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, linebuf, -1, fg_tag, NULL);
}
}
#undef ADD_TXT_POS
static void textview_write_line(TextView *textview, const gchar *str,
CodeConverter *conv)
{
GtkTextView *text;
GtkTextBuffer *buffer;
GtkTextIter iter;
gchar buf[BUFFSIZE];
gchar *fg_color;
gint quotelevel = -1;
gchar quote_tag_str[10];
text = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(text);
gtk_text_buffer_get_end_iter(buffer, &iter);
if (!conv) {
strncpy2(buf, str, sizeof(buf));
} else if (conv_convert(conv, buf, sizeof(buf), str) < 0) {
conv_localetodisp(buf, sizeof(buf), str);
}
strcrchomp(buf);
//if (prefs_common.conv_mb_alnum) conv_mb_alnum(buf);
fg_color = NULL;
/* change color of quotation
>, foo>, _> ... ok, <foo>, foo bar>, foo-> ... ng
Up to 3 levels of quotations are detected, and each
level is colored using a different color. */
if (prefs_common.enable_color
&& line_has_quote_char(buf, prefs_common.quote_chars)) {
quotelevel = get_quote_level(buf, prefs_common.quote_chars);
/* set up the correct foreground color */
if (quotelevel > 2) {
/* recycle colors */
if (prefs_common.recycle_quote_colors)
quotelevel %= 3;
else
quotelevel = 2;
}
}
if (quotelevel == -1)
fg_color = NULL;
else {
g_snprintf(quote_tag_str, sizeof(quote_tag_str),
"quote%d", quotelevel);
fg_color = quote_tag_str;
}
if (prefs_common.enable_color && (strcmp(buf,"-- \n") == 0 || textview->is_in_signature)) {
fg_color = "signature";
textview->is_in_signature = TRUE;
}
if (prefs_common.enable_color)
textview_make_clickable_parts(textview, fg_color, "link", buf);
else
textview_make_clickable_parts(textview, fg_color, NULL, buf);
}
void textview_write_link(TextView *textview, const gchar *str,
const gchar *uri, CodeConverter *conv)
{
GdkColor *link_color = NULL;
GtkTextView *text;
GtkTextBuffer *buffer;
GtkTextIter iter;
gchar buf[BUFFSIZE];
gchar *bufp;
RemoteURI *r_uri;
if (*str == '\0')
return;
text = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(text);
gtk_text_buffer_get_end_iter(buffer, &iter);
#warning FIXME_GTK2
#if 0
if (!conv) {
if (textview->text_is_mb)
conv_localetodisp(buf, sizeof(buf), str);
else
strncpy2(buf, str, sizeof(buf));
} else if (conv_convert(conv, buf, sizeof(buf), str) < 0)
conv_localetodisp(buf, sizeof(buf), str);
else if (textview->text_is_mb)
conv_unreadable_locale(buf);
#else
if (!conv)
strncpy2(buf, str, sizeof(buf));
else if (conv_convert(conv, buf, sizeof(buf), str) < 0)
conv_localetodisp(buf, sizeof(buf), str);
#endif
strcrchomp(buf);
gtk_text_buffer_get_end_iter(buffer, &iter);
for (bufp = buf; isspace(*(guchar *)bufp); bufp++)
gtk_text_buffer_insert(buffer, &iter, bufp, 1);
if (prefs_common.enable_color) {
link_color = &uri_color;
}
r_uri = g_new(RemoteURI, 1);
r_uri->uri = g_strdup(uri);
r_uri->start = gtk_text_iter_get_offset(&iter);
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, bufp, -1, "link", NULL);
r_uri->end = gtk_text_iter_get_offset(&iter);
textview->uri_list = g_slist_append(textview->uri_list, r_uri);
}
void textview_clear(TextView *textview)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer;
buffer = gtk_text_view_get_buffer(text);
gtk_text_buffer_set_text(buffer, "", -1);
TEXTVIEW_STATUSBAR_POP(textview);
textview_uri_list_remove_all(textview->uri_list);
textview->uri_list = NULL;
textview->body_pos = 0;
}
void textview_destroy(TextView *textview)
{
textview_uri_list_remove_all(textview->uri_list);
textview->uri_list = NULL;
g_free(textview);
}
void textview_set_all_headers(TextView *textview, gboolean all_headers)
{
textview->show_all_headers = all_headers;
}
void textview_set_font(TextView *textview, const gchar *codeset)
{
if (prefs_common.textfont) {
PangoFontDescription *font_desc = NULL;
if (prefs_common.textfont)
font_desc = pango_font_description_from_string
(prefs_common.textfont);
if (font_desc) {
gtk_widget_modify_font(textview->text, font_desc);
pango_font_description_free(font_desc);
}
}
gtk_text_view_set_pixels_above_lines(GTK_TEXT_VIEW(textview->text),
prefs_common.line_space / 2);
gtk_text_view_set_pixels_below_lines(GTK_TEXT_VIEW(textview->text),
prefs_common.line_space / 2);
}
void textview_set_text(TextView *textview, const gchar *text)
{
GtkTextView *view;
GtkTextBuffer *buffer;
g_return_if_fail(textview != NULL);
g_return_if_fail(text != NULL);
textview_clear(textview);
view = GTK_TEXT_VIEW(textview->text);
buffer = gtk_text_view_get_buffer(view);
gtk_text_buffer_set_text(buffer, text, strlen(text));
}
enum
{
H_DATE = 0,
H_FROM = 1,
H_TO = 2,
H_NEWSGROUPS = 3,
H_SUBJECT = 4,
H_CC = 5,
H_REPLY_TO = 6,
H_FOLLOWUP_TO = 7,
H_X_MAILER = 8,
H_X_NEWSREADER = 9,
H_USER_AGENT = 10,
H_ORGANIZATION = 11,
};
void textview_set_position(TextView *textview, gint pos)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextIter iter;
gtk_text_buffer_get_iter_at_offset(buffer, &iter, pos);
gtk_text_buffer_place_cursor(buffer, &iter);
gtk_text_view_scroll_to_iter(text, &iter, 0.0, FALSE, 0.0, 0.0);
}
static GPtrArray *textview_scan_header(TextView *textview, FILE *fp)
{
gchar buf[BUFFSIZE];
GPtrArray *headers, *sorted_headers;
GSList *disphdr_list;
Header *header;
gint i;
g_return_val_if_fail(fp != NULL, NULL);
if (textview->show_all_headers)
return procheader_get_header_array_asis(fp);
if (!prefs_common.display_header) {
while (fgets(buf, sizeof(buf), fp) != NULL)
if (buf[0] == '\r' || buf[0] == '\n') break;
return NULL;
}
headers = procheader_get_header_array_asis(fp);
sorted_headers = g_ptr_array_new();
for (disphdr_list = prefs_common.disphdr_list; disphdr_list != NULL;
disphdr_list = disphdr_list->next) {
DisplayHeaderProp *dp =
(DisplayHeaderProp *)disphdr_list->data;
for (i = 0; i < headers->len; i++) {
header = g_ptr_array_index(headers, i);
if (procheader_headername_equal(header->name,
dp->name)) {
if (dp->hidden)
procheader_header_free(header);
else
g_ptr_array_add(sorted_headers, header);
g_ptr_array_remove_index(headers, i);
i--;
}
}
}
if (prefs_common.show_other_header) {
for (i = 0; i < headers->len; i++) {
header = g_ptr_array_index(headers, i);
g_ptr_array_add(sorted_headers, header);
}
g_ptr_array_free(headers, TRUE);
} else
procheader_header_array_destroy(headers);
return sorted_headers;
}
static void textview_show_header(TextView *textview, GPtrArray *headers)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextIter iter;
Header *header;
gint i;
g_return_if_fail(headers != NULL);
for (i = 0; i < headers->len; i++) {
header = g_ptr_array_index(headers, i);
g_return_if_fail(header->name != NULL);
gtk_text_buffer_get_end_iter (buffer, &iter);
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, header->name, -1,
"header_title", "header", NULL);
if (header->name[strlen(header->name) - 1] != ' ')
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, " ", 1,
"header_title", "header", NULL);
if (procheader_headername_equal(header->name, "Subject") ||
procheader_headername_equal(header->name, "From") ||
procheader_headername_equal(header->name, "To") ||
procheader_headername_equal(header->name, "Cc"))
unfold_line(header->body);
#warning FIXME_GTK2
#if 0
if (textview->text_is_mb == TRUE)
conv_unreadable_locale(header->body);
#endif
if (prefs_common.enable_color &&
(procheader_headername_equal(header->name, "X-Mailer") ||
procheader_headername_equal(header->name,
"X-Newsreader")) &&
strstr(header->body, "Sylpheed") != NULL) {
gtk_text_buffer_get_end_iter (buffer, &iter);
gtk_text_buffer_insert_with_tags_by_name
(buffer, &iter, header->body, -1,
"header", "emphasis", NULL);
} else if (prefs_common.enable_color) {
textview_make_clickable_parts(textview, "header", "link",
header->body);
} else {
textview_make_clickable_parts(textview, "header", NULL,
header->body);
}
gtk_text_buffer_get_end_iter (buffer, &iter);
gtk_text_buffer_insert_with_tags_by_name(buffer, &iter, "\n", 1,
"header", NULL);
}
}
gboolean textview_search_string(TextView *textview, const gchar *str,
gboolean case_sens)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextMark *mark;
GtkTextIter iter, start, end, real_end, *pos;
gboolean found = FALSE;
gint insert_offset, selbound_offset;
/* reset selection */
mark = gtk_text_buffer_get_mark(buffer, "insert");
gtk_text_buffer_get_iter_at_mark(buffer, &start, mark);
insert_offset = gtk_text_iter_get_offset(&start);
mark = gtk_text_buffer_get_mark(buffer, "selection_bound");
gtk_text_buffer_get_iter_at_mark(buffer, &end, mark);
selbound_offset = gtk_text_iter_get_offset(&end);
pos = insert_offset > selbound_offset ? &start : &end;
gtk_text_buffer_place_cursor(buffer, pos);
/* search */
mark = gtk_text_buffer_get_insert(buffer);
gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
if (case_sens) {
found = gtk_text_iter_forward_search(&iter, str,
GTK_TEXT_SEARCH_VISIBLE_ONLY,
&start, &end, NULL);
} else {
gchar *text = NULL;
int i = 0;
gtk_text_buffer_get_end_iter(buffer, &real_end);
text = gtk_text_buffer_get_text(buffer, &iter,
&real_end, FALSE);
while (!found && i++ < strlen(text) - 1) {
found = (strncasecmp(text+i, str, strlen(str)) == 0);
}
i += gtk_text_iter_get_offset(&end);
if (found) {
gtk_text_buffer_get_iter_at_offset(buffer, &start, i);
gtk_text_buffer_get_iter_at_offset(buffer, &end,
i + strlen(str));
}
g_free(text);
}
if (found) {
gtk_text_buffer_place_cursor(buffer, &start);
gtk_text_buffer_move_mark_by_name(buffer, "selection_bound",
&end);
mark = gtk_text_buffer_get_mark(buffer, "insert");
gtk_text_view_scroll_mark_onscreen(text, mark);
}
return found;
}
gboolean textview_search_string_backward(TextView *textview, const gchar *str,
gboolean case_sens)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkTextBuffer *buffer = gtk_text_view_get_buffer(text);
GtkTextMark *mark;
GtkTextIter iter, start, real_start, end, *pos;
gboolean found = FALSE;
gint insert_offset, selbound_offset;
/* reset selection */
mark = gtk_text_buffer_get_mark(buffer, "insert");
gtk_text_buffer_get_iter_at_mark(buffer, &start, mark);
insert_offset = gtk_text_iter_get_offset(&start);
mark = gtk_text_buffer_get_mark(buffer, "selection_bound");
gtk_text_buffer_get_iter_at_mark(buffer, &end, mark);
selbound_offset = gtk_text_iter_get_offset(&end);
pos = insert_offset < selbound_offset ? &start : &end;
gtk_text_buffer_place_cursor(buffer, pos);
/* search */
mark = gtk_text_buffer_get_insert(buffer);
gtk_text_buffer_get_iter_at_mark(buffer, &iter, mark);
if (case_sens) {
found = gtk_text_iter_backward_search(&iter, str,
GTK_TEXT_SEARCH_VISIBLE_ONLY,
&start, &end, NULL);
} else {
gchar *text = NULL;
int i = 0;
if (gtk_text_iter_get_offset(&iter) == 0)
gtk_text_buffer_get_end_iter(buffer, &iter);
i = gtk_text_iter_get_offset(&iter) - strlen(str) - 1;
gtk_text_buffer_get_start_iter(buffer, &real_start);
text = gtk_text_buffer_get_text(buffer, &real_start,
&iter, FALSE);
while (!found && i-- > 0) {
found = (strncasecmp(text+i, str, strlen(str)) == 0);
}
if (found) {
gtk_text_buffer_get_iter_at_offset(buffer, &start, i);
gtk_text_buffer_get_iter_at_offset(buffer, &end,
i + strlen(str));
}
g_free(text);
}
if (found) {
gtk_text_buffer_place_cursor(buffer, &end);
gtk_text_buffer_move_mark_by_name(buffer, "selection_bound",
&start);
mark = gtk_text_buffer_get_mark(buffer, "insert");
gtk_text_view_scroll_mark_onscreen(text, mark);
}
return found;
}
void textview_scroll_one_line(TextView *textview, gboolean up)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkAdjustment *vadj = text->vadjustment;
gfloat upper;
if (prefs_common.enable_smooth_scroll) {
textview_smooth_scroll_one_line(textview, up);
return;
}
if (!up) {
upper = vadj->upper - vadj->page_size;
if (vadj->value < upper) {
vadj->value += vadj->step_increment;
vadj->value = MIN(vadj->value, upper);
g_signal_emit_by_name(G_OBJECT(vadj),
"value_changed", 0);
}
} else {
if (vadj->value > 0.0) {
vadj->value -= vadj->step_increment;
vadj->value = MAX(vadj->value, 0.0);
g_signal_emit_by_name(G_OBJECT(vadj),
"value_changed", 0);
}
}
}
gboolean textview_scroll_page(TextView *textview, gboolean up)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkAdjustment *vadj = text->vadjustment;
gfloat upper;
gfloat page_incr;
if (prefs_common.enable_smooth_scroll)
return textview_smooth_scroll_page(textview, up);
if (prefs_common.scroll_halfpage)
page_incr = vadj->page_increment / 2;
else
page_incr = vadj->page_increment;
if (!up) {
upper = vadj->upper - vadj->page_size;
if (vadj->value < upper) {
vadj->value += page_incr;
vadj->value = MIN(vadj->value, upper);
g_signal_emit_by_name(G_OBJECT(vadj),
"value_changed", 0);
} else
return FALSE;
} else {
if (vadj->value > 0.0) {
vadj->value -= page_incr;
vadj->value = MAX(vadj->value, 0.0);
g_signal_emit_by_name(G_OBJECT(vadj),
"value_changed", 0);
} else
return FALSE;
}
return TRUE;
}
static void textview_smooth_scroll_do(TextView *textview,
gfloat old_value, gfloat last_value,
gint step)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkAdjustment *vadj = text->vadjustment;
gint change_value;
gboolean up;
gint i;
if (old_value < last_value) {
change_value = last_value - old_value;
up = FALSE;
} else {
change_value = old_value - last_value;
up = TRUE;
}
for (i = step; i <= change_value; i += step) {
vadj->value = old_value + (up ? -i : i);
g_signal_emit_by_name(G_OBJECT(vadj),
"value_changed", 0);
}
vadj->value = last_value;
g_signal_emit_by_name(G_OBJECT(vadj), "value_changed", 0);
}
static void textview_smooth_scroll_one_line(TextView *textview, gboolean up)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkAdjustment *vadj = text->vadjustment;
gfloat upper;
gfloat old_value;
gfloat last_value;
if (!up) {
upper = vadj->upper - vadj->page_size;
if (vadj->value < upper) {
old_value = vadj->value;
last_value = vadj->value + vadj->step_increment;
last_value = MIN(last_value, upper);
textview_smooth_scroll_do(textview, old_value,
last_value,
prefs_common.scroll_step);
}
} else {
if (vadj->value > 0.0) {
old_value = vadj->value;
last_value = vadj->value - vadj->step_increment;
last_value = MAX(last_value, 0.0);
textview_smooth_scroll_do(textview, old_value,
last_value,
prefs_common.scroll_step);
}
}
}
static gboolean textview_smooth_scroll_page(TextView *textview, gboolean up)
{
GtkTextView *text = GTK_TEXT_VIEW(textview->text);
GtkAdjustment *vadj = text->vadjustment;
gfloat upper;
gfloat page_incr;
gfloat old_value;
gfloat last_value;
if (prefs_common.scroll_halfpage)
page_incr = vadj->page_increment / 2;
else
page_incr = vadj->page_increment;
if (!up) {
upper = vadj->upper - vadj->page_size;
if (vadj->value < upper) {
old_value = vadj->value;
last_value = vadj->value + page_incr;
last_value = MIN(last_value, upper);
textview_smooth_scroll_do(textview, old_value,
last_value,
prefs_common.scroll_step);
} else
return FALSE;
} else {
if (vadj->value > 0.0) {
old_value = vadj->value;
last_value = vadj->value - page_incr;
last_value = MAX(last_value, 0.0);
textview_smooth_scroll_do(textview, old_value,
last_value,
prefs_common.scroll_step);
} else
return FALSE;
}
return TRUE;
}
#define KEY_PRESS_EVENT_STOP() \
g_signal_stop_emission_by_name(G_OBJECT(widget), \
"key_press_event");
static gint textview_key_pressed(GtkWidget *widget, GdkEventKey *event,
TextView *textview)
{
SummaryView *summaryview = NULL;
MessageView *messageview = textview->messageview;
if (!event) return FALSE;
if (messageview->mainwin)
summaryview = messageview->mainwin->summaryview;
switch (event->keyval) {
case GDK_Tab:
case GDK_Home:
case GDK_Left:
case GDK_Up:
case GDK_Right:
case GDK_Down:
case GDK_Page_Up:
case GDK_Page_Down:
case GDK_End:
case GDK_Control_L:
case GDK_Control_R:
return FALSE;
case GDK_space:
if (summaryview)
summary_pass_key_press_event(summaryview, event);
else
textview_scroll_page
(textview,
(event->state &
(GDK_SHIFT_MASK|GDK_MOD1_MASK)) != 0);
break;
case GDK_BackSpace:
textview_scroll_page(textview, TRUE);
break;
case GDK_Return:
textview_scroll_one_line
(textview, (event->state &
(GDK_SHIFT_MASK|GDK_MOD1_MASK)) != 0);
break;
case GDK_Delete:
if (summaryview)
summary_pass_key_press_event(summaryview, event);
break;
case GDK_y:
case GDK_t:
case GDK_l:
if ((event->state & (GDK_MOD1_MASK|GDK_CONTROL_MASK)) == 0) {
KEY_PRESS_EVENT_STOP();
mimeview_pass_key_press_event(messageview->mimeview,
event);
break;
}
/* possible fall through */
default:
if (summaryview &&
event->window != messageview->mainwin->window->window) {
GdkEventKey tmpev = *event;
tmpev.window = messageview->mainwin->window->window;
KEY_PRESS_EVENT_STOP();
gtk_widget_event(messageview->mainwin->window,
(GdkEvent *)&tmpev);
}
break;
}
return TRUE;
}
static gboolean textview_motion_notify(GtkWidget *widget,
GdkEventMotion *event,
TextView *textview)
{
textview_uri_update(textview, event->x, event->y);
gdk_window_get_pointer(widget->window, NULL, NULL, NULL);
return FALSE;
}
static gboolean textview_leave_notify(GtkWidget *widget,
GdkEventCrossing *event,
TextView *textview)
{
textview_uri_update(textview, -1, -1);
return FALSE;
}
static gboolean textview_visibility_notify(GtkWidget *widget,
GdkEventVisibility *event,
TextView *textview)
{
gint wx, wy;
GdkWindow *window;
window = gtk_text_view_get_window(GTK_TEXT_VIEW(widget),
GTK_TEXT_WINDOW_TEXT);
/* check if occurred for the text window part */
if (window != event->window)
return FALSE;
gdk_window_get_pointer(widget->window, &wx, &wy, NULL);
textview_uri_update(textview, wx, wy);
return FALSE;
}
static void textview_uri_update(TextView *textview, gint x, gint y)
{
GtkTextBuffer *buffer;
GtkTextIter start_iter, end_iter;
RemoteURI *uri = NULL;
buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(textview->text));
if (x != -1 && y != -1) {
gint bx, by;
GtkTextIter iter;
GSList *tags;
GSList *cur;
gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(textview->text),
GTK_TEXT_WINDOW_WIDGET,
x, y, &bx, &by);
gtk_text_view_get_iter_at_location(GTK_TEXT_VIEW(textview->text),
&iter, bx, by);
tags = gtk_text_iter_get_tags(&iter);
for (cur = tags; cur != NULL; cur = cur->next) {
GtkTextTag *tag = cur->data;
char *name;
g_object_get(G_OBJECT(tag), "name", &name, NULL);
if (!strcmp(name, "link")
&& textview_get_uri_range(textview, &iter, tag,
&start_iter, &end_iter))
uri = textview_get_uri_from_range(textview,
&iter, tag,
&start_iter,
&end_iter);
g_free(name);
if (uri)
break;
}
g_slist_free(tags);
}
if (uri != textview->uri_hover) {
GdkWindow *window;
if (textview->uri_hover)
gtk_text_buffer_remove_tag_by_name(buffer,
"link-hover",
&textview->uri_hover_start_iter,
&textview->uri_hover_end_iter);
textview->uri_hover = uri;
if (uri) {
textview->uri_hover_start_iter = start_iter;
textview->uri_hover_end_iter = end_iter;
}
window = gtk_text_view_get_window(GTK_TEXT_VIEW(textview->text),
GTK_TEXT_WINDOW_TEXT);
gdk_window_set_cursor(window, uri ? hand_cursor : text_cursor);
TEXTVIEW_STATUSBAR_POP(textview);
if (uri) {
char *trimmed_uri;
gtk_text_buffer_apply_tag_by_name(buffer,
"link-hover",
&start_iter,
&end_iter);
trimmed_uri = trim_string(uri->uri, 60);
TEXTVIEW_STATUSBAR_PUSH(textview, trimmed_uri);
g_free(trimmed_uri);
}
}
}
static gboolean textview_get_uri_range(TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag,
GtkTextIter *start_iter,
GtkTextIter *end_iter)
{
GtkTextIter _start_iter, _end_iter;
_end_iter = *iter;
if (!gtk_text_iter_forward_to_tag_toggle(&_end_iter, tag)) {
debug_print("Can't find end");
return FALSE;
}
_start_iter = _end_iter;
if (!gtk_text_iter_backward_to_tag_toggle(&_start_iter, tag)) {
debug_print("Can't find start.");
return FALSE;
}
*start_iter = _start_iter;
*end_iter = _end_iter;
return TRUE;
}
static RemoteURI *textview_get_uri_from_range(TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag,
GtkTextIter *start_iter,
GtkTextIter *end_iter)
{
gint start_pos, end_pos, cur_pos;
RemoteURI *uri = NULL;
GSList *cur;
start_pos = gtk_text_iter_get_offset(start_iter);
end_pos = gtk_text_iter_get_offset(end_iter);
cur_pos = gtk_text_iter_get_offset(iter);
for (cur = textview->uri_list; cur != NULL; cur = cur->next) {
RemoteURI *uri_ = (RemoteURI *)cur->data;
if (start_pos == uri_->start &&
end_pos == uri_->end) {
uri = uri_;
break;
} else if (start_pos == uri_->start ||
end_pos == uri_->end) {
/* in case of contiguous links, textview_get_uri_range
* returns a broader range (start of 1st link to end
* of last link).
* In that case, correct link is the one covering
* current iter.
*/
if (uri_->start <= cur_pos && cur_pos <= uri_->end) {
uri = uri_;
break;
}
}
}
return uri;
}
static RemoteURI *textview_get_uri(TextView *textview,
GtkTextIter *iter,
GtkTextTag *tag)
{
GtkTextIter start_iter, end_iter;
RemoteURI *uri = NULL;
if (textview_get_uri_range(textview, iter, tag, &start_iter,
&end_iter))
uri = textview_get_uri_from_range(textview, iter, tag,
&start_iter, &end_iter);
return uri;
}
static gboolean textview_uri_button_pressed(GtkTextTag *tag, GObject *obj,
GdkEvent *event, GtkTextIter *iter,
TextView *textview)
{
GdkEventButton *bevent;
RemoteURI *uri = NULL;
GSList *cur;
gchar *trimmed_uri;
if (!event)
return FALSE;
if (event->type != GDK_BUTTON_PRESS && event->type != GDK_2BUTTON_PRESS
&& event->type != GDK_MOTION_NOTIFY)
return FALSE;
uri = textview_get_uri(textview, iter, tag);
if (!uri)
return FALSE;
bevent = (GdkEventButton *) event;
/* doubleclick: open compose / add address / browser */
if ((event->type == GDK_BUTTON_PRESS && bevent->button == 1) ||
bevent->button == 2 || bevent->button == 3) {
if (!g_ascii_strncasecmp(uri->uri, "mailto:", 7)) {
if (bevent->button == 3) {
gchar *fromname, *fromaddress;
/* extract url */
fromaddress = g_strdup(uri->uri + 7);
/* Hiroyuki: please put this function in utils.c! */
fromname = procheader_get_fromname(fromaddress);
extract_address(fromaddress);
g_message("adding from textview %s <%s>", fromname, fromaddress);
/* Add to address book - Match */
addressbook_add_contact( fromname, fromaddress, NULL );
g_free(fromaddress);
g_free(fromname);
} else {
PrefsAccount *account = NULL;
if (textview->messageview && textview->messageview->msginfo &&
textview->messageview->msginfo->folder) {
FolderItem *folder_item;
folder_item = textview->messageview->msginfo->folder;
if (folder_item->prefs && folder_item->prefs->enable_default_account)
account = account_find_from_id(folder_item->prefs->default_account);
}
compose_new(account, uri->uri + 7, NULL);
}
return TRUE;
} else {
if (bevent->button == 1 &&
textview_uri_security_check(textview, uri) == TRUE)
open_uri(uri->uri,
prefs_common.uri_cmd);
else if (bevent->button == 3) {
g_object_set_data(
G_OBJECT(textview->popup_menu),
"menu_button", uri);
gtk_menu_popup(GTK_MENU(textview->popup_menu),
NULL, NULL, NULL, NULL,
bevent->button, bevent->time);
}
return TRUE;
}
}
return FALSE;
}
/*!
*\brief Check to see if a web URL has been disguised as a different
* URL (possible with HTML email).
*
*\param uri The uri to check
*
*\param textview The TextView the URL is contained in
*
*\return gboolean TRUE if the URL is ok, or if the user chose to open
* it anyway, otherwise FALSE
*/
static gboolean textview_uri_security_check(TextView *textview, RemoteURI *uri)
{
gchar *visible_str;
gboolean retval = TRUE;
GtkTextBuffer *buffer;
GtkTextIter start, end;
if (is_uri_string(uri->uri) == FALSE)
return TRUE;
buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(textview->text));
gtk_text_buffer_get_iter_at_offset(buffer, &start, uri->start);
gtk_text_buffer_get_iter_at_offset(buffer, &end, uri->end);
visible_str = gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
if (visible_str == NULL)
return TRUE;
if (strcmp(visible_str, uri->uri) != 0 && is_uri_string(visible_str)) {
gchar *uri_path;
gchar *visible_uri_path;
uri_path = get_uri_path(uri->uri);
visible_uri_path = get_uri_path(visible_str);
if (strcmp(uri_path, visible_uri_path) != 0)
retval = FALSE;
}
if (retval == FALSE) {
gchar *msg;
AlertValue aval;
msg = g_strdup_printf(_("The real URL (%s) is different from\n"
"the apparent URL (%s).\n"
"Open it anyway?"),
uri->uri, visible_str);
aval = alertpanel_with_type(_("Warning"), msg,
GTK_STOCK_YES, GTK_STOCK_NO,
NULL, NULL, ALERT_WARNING);
g_free(msg);
if (aval == G_ALERTDEFAULT)
retval = TRUE;
}
g_free(visible_str);
return retval;
}
static void textview_uri_list_remove_all(GSList *uri_list)
{
GSList *cur;
for (cur = uri_list; cur != NULL; cur = cur->next) {
if (cur->data) {
g_free(((RemoteURI *)cur->data)->uri);
g_free(cur->data);
}
}
g_slist_free(uri_list);
}
static void open_uri_cb (TextView *textview, guint action, void *data)
{
RemoteURI *uri = g_object_get_data(G_OBJECT(textview->popup_menu),
"menu_button");
if (uri == NULL)
return;
if (textview_uri_security_check(textview, uri) == TRUE)
open_uri(uri->uri,
prefs_common.uri_cmd);
g_object_set_data(G_OBJECT(textview->popup_menu), "menu_button",
NULL);
}
static void copy_uri_cb (TextView *textview, guint action, void *data)
{
RemoteURI *uri = g_object_get_data(G_OBJECT(textview->popup_menu),
"menu_button");
if (uri == NULL)
return;
gtk_clipboard_set_text(gtk_clipboard_get(GDK_NONE), uri->uri, -1);
g_object_set_data(G_OBJECT(textview->popup_menu), "menu_button",
NULL);
}
Reference in a new issue View git blame Copy permalink