2 * Claws Mail -- A GTK+ based, lightweight, and fast e-mail client
3 * Copyright(C) 2019 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.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 * You should have received a copy of the GNU General Public License
14 * along with this program; if not, write tothe Free Software
15 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20 #include "claws-features.h"
24 #include <glib/gi18n.h>
25 #include <glib/gstdio.h>
27 #include <sys/types.h>
29 #include <curl/curl.h>
34 #include "litehtml/litehtml.h"
37 #include "lh_widget.h"
38 #include "lh_widget_wrapped.h"
41 const gchar *prefs_common_get_uri_cmd(void);
48 static gboolean expose_event_cb(GtkWidget *widget, GdkEvent *event,
50 static gboolean button_press_event(GtkWidget *widget, GdkEventButton *event,
52 static gboolean motion_notify_event(GtkWidget *widget, GdkEventButton *event,
54 static gboolean button_release_event(GtkWidget *widget, GdkEventButton *event,
56 static void open_link_cb(GtkMenuItem *item, gpointer user_data);
57 static void copy_link_cb(GtkMenuItem *item, gpointer user_data);
59 lh_widget::lh_widget()
64 m_scrolled_window = gtk_scrolled_window_new(NULL, NULL);
65 gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(m_scrolled_window),
66 GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
69 GtkScrolledWindow *scw = GTK_SCROLLED_WINDOW(m_scrolled_window);
70 m_viewport = gtk_viewport_new(
71 gtk_scrolled_window_get_hadjustment(scw),
72 gtk_scrolled_window_get_vadjustment(scw));
73 gtk_container_add(GTK_CONTAINER(m_scrolled_window), m_viewport);
76 m_drawing_area = gtk_drawing_area_new();
77 gtk_container_add(GTK_CONTAINER(m_viewport), m_drawing_area);
78 g_signal_connect(m_drawing_area, "expose-event",
79 G_CALLBACK(expose_event_cb), this);
80 g_signal_connect(m_drawing_area, "motion_notify_event",
81 G_CALLBACK(motion_notify_event), this);
82 g_signal_connect(m_drawing_area, "button_press_event",
83 G_CALLBACK(button_press_event), this);
84 g_signal_connect(m_drawing_area, "button_release_event",
85 G_CALLBACK(button_release_event), this);
87 gtk_widget_show_all(m_scrolled_window);
90 m_context_menu = gtk_menu_new();
92 item = gtk_menu_item_new_with_label(_("Open Link"));
93 g_signal_connect(G_OBJECT(item), "activate", G_CALLBACK(open_link_cb), this);
94 gtk_menu_shell_append(GTK_MENU_SHELL(m_context_menu), item);
96 item = gtk_menu_item_new_with_label(_("Copy Link Location"));
97 g_signal_connect(G_OBJECT(item), "activate", G_CALLBACK(copy_link_cb), this);
98 gtk_menu_shell_append(GTK_MENU_SHELL(m_context_menu), item);
101 m_rendered_width = 0;
102 m_context.load_master_stylesheet(master_css);
109 gtk_widget_set_events(m_drawing_area,
110 GDK_BUTTON_RELEASE_MASK
111 | GDK_BUTTON_PRESS_MASK
112 | GDK_POINTER_MOTION_MASK);
115 lh_widget::~lh_widget()
117 g_object_unref(m_drawing_area);
118 m_drawing_area = NULL;
119 g_object_unref(m_scrolled_window);
120 m_scrolled_window = NULL;
124 GtkWidget *lh_widget::get_widget() const
126 return m_scrolled_window;
129 void lh_widget::set_caption(const litehtml::tchar_t* caption)
131 debug_print("lh_widget set_caption\n");
135 void lh_widget::set_base_url(const litehtml::tchar_t* base_url)
137 debug_print("lh_widget set_base_url '%s'\n",
138 (base_url ? base_url : "(null)"));
139 m_base_url = base_url;
143 void lh_widget::on_anchor_click(const litehtml::tchar_t* url, const litehtml::element::ptr& el)
145 debug_print("lh_widget on_anchor_click. url -> %s\n", url);
147 m_clicked_url = fullurl(url);
151 void lh_widget::import_css(litehtml::tstring& text, const litehtml::tstring& url, litehtml::tstring& baseurl)
153 debug_print("lh_widget import_css\n");
154 baseurl = master_css;
157 void lh_widget::get_client_rect(litehtml::position& client) const
159 if (m_drawing_area == NULL)
162 client.width = m_rendered_width;
163 client.height = m_height;
167 // debug_print("lh_widget::get_client_rect: %dx%d\n",
168 // client.width, client.height);
171 void lh_widget::open_html(const gchar *contents)
173 gint num = clear_images(lh_prefs_get()->image_cache_size * 1024 * 1000);
176 debug_print("LH: cleared %d images from image cache\n", num);
180 lh_widget_statusbar_push("Loading HTML part ...");
181 m_html = litehtml::document::createFromString(contents, this, &m_context);
182 m_rendered_width = 0;
183 if (m_html != NULL) {
184 debug_print("lh_widget::open_html created document\n");
185 adj = gtk_scrolled_window_get_hadjustment(
186 GTK_SCROLLED_WINDOW(m_scrolled_window));
187 gtk_adjustment_set_value(adj, 0.0);
188 adj = gtk_scrolled_window_get_vadjustment(
189 GTK_SCROLLED_WINDOW(m_scrolled_window));
190 gtk_adjustment_set_value(adj, 0.0);
193 lh_widget_statusbar_pop();
196 void lh_widget::draw(cairo_t *cr)
198 double x1, x2, y1, y2;
199 double width, height;
204 cairo_clip_extents(cr, &x1, &y1, &x2, &y2);
209 litehtml::position pos;
210 pos.width = (int)width;
211 pos.height = (int)height;
215 m_html->draw((litehtml::uint_ptr)cr, 0, 0, &pos);
218 void lh_widget::redraw(gboolean force_render)
230 /* Get width of the viewport. */
231 gdkwin = gtk_viewport_get_view_window(GTK_VIEWPORT(m_viewport));
232 width = gdk_window_get_width(gdkwin);
233 m_height = gdk_window_get_height(gdkwin);
235 /* If the available width has changed, rerender the HTML content. */
236 if (m_rendered_width != width || force_render) {
237 debug_print("lh_widget::redraw: width changed: %d != %d\n",
238 m_rendered_width, width);
240 /* Update our internally stored width, mainly so that
241 * lh_widget::get_client_rect() gives correct width during the
243 m_rendered_width = width;
245 /* Re-render HTML for this width. */
246 m_html->media_changed();
247 m_html->render(m_rendered_width);
248 debug_print("render is %dx%d\n", m_html->width(), m_html->height());
250 /* Change drawing area's size to match what was rendered. */
251 gtk_widget_set_size_request(m_drawing_area,
252 m_html->width(), m_html->height());
255 /* Paint the rendered HTML. */
256 gdkwin = gtk_widget_get_window(m_drawing_area);
257 if (gdkwin == NULL) {
258 g_warning("lh_widget::redraw: No GdkWindow to draw on!");
261 cr = gdk_cairo_create(GDK_DRAWABLE(gdkwin));
267 void lh_widget::paint_white()
269 GdkWindow *gdkwin = gtk_widget_get_window(m_drawing_area);
270 if (gdkwin == NULL) {
271 g_warning("lh_widget::clear: No GdkWindow to draw on!");
274 cairo_t *cr = gdk_cairo_create(GDK_DRAWABLE(gdkwin));
276 /* Paint white background. */
278 gdk_drawable_get_size(gdkwin, &width, &height);
279 cairo_rectangle(cr, 0, 0, width, height);
280 cairo_set_source_rgb(cr, 255, 255, 255);
285 void lh_widget::clear()
289 m_rendered_width = 0;
291 m_clicked_url.clear();
294 void lh_widget::set_cursor(const litehtml::tchar_t* cursor)
297 if (m_cursor != cursor) {
304 void lh_widget::update_cursor()
307 const litehtml::tchar_t *href;
308 GdkWindow *w = gdk_display_get_window_at_pointer(gdk_display_get_default(),
310 GdkCursorType cursType = GDK_ARROW;
312 if (m_cursor == _t("pointer")) {
313 cursType = GDK_HAND2;
316 if (cursType == GDK_ARROW) {
317 gdk_window_set_cursor(gtk_widget_get_window(m_drawing_area), NULL);
319 gdk_window_set_cursor(gtk_widget_get_window(m_drawing_area), gdk_cursor_new(cursType));
322 if (w != gtk_widget_get_window(m_drawing_area))
325 /* If it's an anchor, show its "href" attribute in statusbar,
326 * otherwise clear statusbar. */
327 if ((href = get_href_at(x, y)) != NULL) {
328 lh_widget_statusbar_push(fullurl(href).c_str());
330 lh_widget_statusbar_pop();
334 const litehtml::tchar_t *lh_widget::get_href_at(const gint x, const gint y) const
336 litehtml::element::ptr over_el, el;
341 over_el = m_html->root()->get_element_by_point(x, y, x, y);
345 /* If it's not an anchor, check if it has a parent anchor
346 * (e.g. it's an image within an anchor) and grab a pointer
348 if (strcmp(over_el->get_tagName(), "a") && over_el->parent()) {
349 el = over_el->parent();
350 while (el && el != m_html->root() && strcmp(el->get_tagName(), "a")) {
354 if (el && el != m_html->root())
360 /* At this point, over_el is pointing at an anchor tag, so let's
361 * grab its href attribute. */
362 return over_el->get_attr(_t("href"));
365 void lh_widget::print()
367 debug_print("lh_widget print\n");
368 gtk_widget_realize(GTK_WIDGET(m_drawing_area));
371 void lh_widget::popup_context_menu(const litehtml::tchar_t *url,
372 GdkEventButton *event)
374 cm_return_if_fail(url != NULL);
375 cm_return_if_fail(event != NULL);
377 debug_print("lh_widget showing context menu for '%s'\n", url);
380 gtk_widget_show_all(m_context_menu);
381 gtk_menu_popup(GTK_MENU(m_context_menu), NULL, NULL, NULL, NULL,
382 event->button, event->time);
385 void lh_widget::update_font()
387 PangoFontDescription *pd =
388 pango_font_description_from_string(lh_prefs_get()->default_font);
389 gboolean absolute = pango_font_description_get_size_is_absolute(pd);
392 m_font_name = g_strdup(pango_font_description_get_family(pd));
393 m_font_size = pango_font_description_get_size(pd);
395 pango_font_description_free(pd);
398 m_font_size /= PANGO_SCALE;
400 debug_print("Font set to '%s', size %d\n", m_font_name, m_font_size);
403 const litehtml::tstring lh_widget::fullurl(const litehtml::tchar_t *url) const
405 if (*url == '#' && !m_base_url.empty())
406 return m_base_url + url;
411 void lh_widget::set_partinfo(MimeInfo *partinfo)
413 m_partinfo = partinfo;
416 GdkPixbuf *lh_widget::get_local_image(const litehtml::tstring url) const
420 MimeInfo *p = m_partinfo;
422 if (strncmp(url.c_str(), "cid:", 4) != 0) {
423 debug_print("lh_widget::get_local_image: '%s' is not a local URI, ignoring\n", url.c_str());
427 name = url.c_str() + 4;
428 debug_print("getting message part '%s'\n", name);
430 while ((p = procmime_mimeinfo_next(p)) != NULL) {
431 size_t len = strlen(name);
433 /* p->id is in format "<partname>" */
434 if (!strncasecmp(name, p->id + 1, len) &&
435 strlen(p->id) >= len + 2 &&
436 *(p->id + len + 1) == '>') {
437 GInputStream *stream;
438 GError *error = NULL;
440 stream = procmime_get_part_as_inputstream(p, &error);
442 g_warning("Couldn't get image MIME part: %s\n", error->message);
447 pixbuf = gdk_pixbuf_new_from_stream(stream, NULL, &error);
448 g_object_unref(stream);
450 g_warning("Couldn't load image: %s\n", error->message);
459 /* MIME part with requested name was not found */
463 ////////////////////////////////////////////////
464 static gboolean expose_event_cb(GtkWidget *widget, GdkEvent *event,
467 lh_widget *w = (lh_widget *)user_data;
472 static gboolean button_press_event(GtkWidget *widget, GdkEventButton *event,
475 litehtml::position::vector redraw_boxes;
476 lh_widget *w = (lh_widget *)user_data;
478 if (w->m_html == NULL)
481 //debug_print("lh_widget on_button_press_event\n");
483 if (event->type == GDK_2BUTTON_PRESS ||
484 event->type == GDK_3BUTTON_PRESS)
488 if (event->button == 3) {
489 const litehtml::tchar_t *url = w->get_href_at((gint)event->x, (gint)event->y);
492 w->popup_context_menu(url, event);
497 if(w->m_html->on_lbutton_down((int) event->x, (int) event->y,
498 (int) event->x, (int) event->y, redraw_boxes)) {
499 for(auto& pos : redraw_boxes) {
500 debug_print("x: %d y:%d w: %d h: %d\n", pos.x, pos.y, pos.width, pos.height);
501 gtk_widget_queue_draw_area(widget, pos.x, pos.y, pos.width, pos.height);
508 static gboolean motion_notify_event(GtkWidget *widget, GdkEventButton *event,
511 litehtml::position::vector redraw_boxes;
512 lh_widget *w = (lh_widget *)user_data;
514 //debug_print("lh_widget on_motion_notify_event\n");
518 if(w->m_html->on_mouse_over((int) event->x, (int) event->y, (int) event->x, (int) event->y, redraw_boxes))
520 for (auto& pos : redraw_boxes)
522 debug_print("x: %d y:%d w: %d h: %d\n", pos.x, pos.y, pos.width, pos.height);
523 gtk_widget_queue_draw_area(widget, pos.x, pos.y, pos.width, pos.height);
531 static gboolean button_release_event(GtkWidget *widget, GdkEventButton *event,
534 litehtml::position::vector redraw_boxes;
535 lh_widget *w = (lh_widget *)user_data;
536 GError* error = NULL;
538 if (w->m_html == NULL)
541 //debug_print("lh_widget on_button_release_event\n");
543 if (event->type == GDK_2BUTTON_PRESS ||
544 event->type == GDK_3BUTTON_PRESS)
548 if (event->button == 3)
551 w->m_clicked_url.clear();
553 if(w->m_html->on_lbutton_up((int) event->x, (int) event->y, (int) event->x, (int) event->y, redraw_boxes))
555 for (auto& pos : redraw_boxes)
557 debug_print("x: %d y:%d w: %d h: %d\n", pos.x, pos.y, pos.width, pos.height);
558 gtk_widget_queue_draw_area(widget, pos.x, pos.y, pos.width, pos.height);
562 if (!w->m_clicked_url.empty())
564 debug_print("Open in browser: %s\n", w->m_clicked_url.c_str());
565 open_uri(w->m_clicked_url.c_str(), prefs_common_get_uri_cmd());
571 static void open_link_cb(GtkMenuItem *item, gpointer user_data)
573 lh_widget_wrapped *w = (lh_widget_wrapped *)user_data;
575 open_uri(w->m_clicked_url.c_str(), prefs_common_get_uri_cmd());
578 static void copy_link_cb(GtkMenuItem *item, gpointer user_data)
580 lh_widget_wrapped *w = (lh_widget_wrapped *)user_data;
582 gtk_clipboard_set_text(gtk_clipboard_get(GDK_SELECTION_PRIMARY),
583 w->m_clicked_url.c_str(), -1);
584 gtk_clipboard_set_text(gtk_clipboard_get(GDK_SELECTION_CLIPBOARD),
585 w->m_clicked_url.c_str(), -1);
588 ///////////////////////////////////////////////////////////
591 lh_widget_wrapped *lh_widget_new()
593 return new lh_widget;
596 GtkWidget *lh_widget_get_widget(lh_widget_wrapped *w)
598 return w->get_widget();
601 void lh_widget_open_html(lh_widget_wrapped *w, const gchar *path)
606 void lh_widget_clear(lh_widget_wrapped *w)
611 void lh_widget_destroy(lh_widget_wrapped *w)
616 void lh_widget_print(lh_widget_wrapped *w) {
620 void lh_widget_set_partinfo(lh_widget_wrapped *w, MimeInfo *partinfo)
622 w->set_partinfo(partinfo);