35ef205e245d7ece41c7600f73917a7b863976bf
[claws.git] / src / gtkutils.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2002 Hiroyuki Yamamoto
4  *
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 2 of the License, or
8  * (at your option) any later version.
9  *
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.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include <glib.h>
25 #include <gdk/gdkkeysyms.h>
26 #include <gdk/gdk.h>
27 #include <gtk/gtkwidget.h>
28 #include <gtk/gtkhbbox.h>
29 #include <gtk/gtkbutton.h>
30 #include <gtk/gtkctree.h>
31 #include <gtk/gtkcombo.h>
32 #include <gtk/gtkthemes.h>
33 #include <gtk/gtkbindings.h>
34 #include <stdlib.h>
35 #include <stdarg.h>
36 #include <sys/stat.h>
37
38 #if (HAVE_WCTYPE_H && HAVE_WCHAR_H)
39 #  include <wchar.h>
40 #  include <wctype.h>
41 #endif
42
43 #include "intl.h"
44 #include "gtkutils.h"
45 #include "utils.h"
46 #include "gtksctree.h"
47 #include "codeconv.h"
48 #include "stock_pixmap.h"
49 #include "menu.h"
50 #include "prefs_account.h"
51
52 gint gtkut_get_font_width(GdkFont *font)
53 {
54         gchar *str;
55         gint width;
56
57         if (conv_get_current_charset() == C_UTF_8)
58                 str = "Abcdef";
59         else
60                 str = _("Abcdef");
61
62         width = gdk_string_width(font, str);
63         width /= strlen(str);
64
65         return width;
66 }
67
68 gint gtkut_get_font_height(GdkFont *font)
69 {
70         gchar *str;
71         gint height;
72
73         if (conv_get_current_charset() == C_UTF_8)
74                 str = "Abcdef";
75         else
76                 str = _("Abcdef");
77
78         height = gdk_string_height(font, str);
79
80         return height;
81 }
82
83 GdkFont *gtkut_font_load(const gchar *fontset_name)
84 {
85         GdkFont *font;
86
87         g_return_val_if_fail(fontset_name != NULL, NULL);
88
89         if (conv_get_current_charset() == C_US_ASCII)
90                 font = gtkut_font_load_from_fontset(fontset_name);
91         else
92                 font = gdk_fontset_load(fontset_name);
93
94         return font;
95 }
96
97 GdkFont *gtkut_font_load_from_fontset(const gchar *fontset_name)
98 {
99         GdkFont *font = NULL;
100
101         if (strchr(fontset_name, ',') == NULL) {
102                 font = gdk_font_load(fontset_name);
103         } else {
104                 gchar **fonts;
105                 gint i;
106
107                 fonts = g_strsplit(fontset_name, ",", -1);
108                 for (i = 0; fonts[i] != NULL && fonts[i][0] != '\0';
109                      i++) {
110                         font = gdk_font_load(fonts[i]);
111                         if (font) break;
112                 }
113                 g_strfreev(fonts);
114         }
115
116         return font;
117 }
118
119 void gtkut_convert_int_to_gdk_color(gint rgbvalue, GdkColor *color)
120 {
121         g_return_if_fail(color != NULL);
122
123         color->pixel = 0L;
124         color->red   = (int) (((gdouble)((rgbvalue & 0xff0000) >> 16) / 255.0) * 65535.0);
125         color->green = (int) (((gdouble)((rgbvalue & 0x00ff00) >>  8) / 255.0) * 65535.0);
126         color->blue  = (int) (((gdouble) (rgbvalue & 0x0000ff)        / 255.0) * 65535.0);
127 }
128
129 void gtkut_button_set_create(GtkWidget **bbox,
130                              GtkWidget **button1, const gchar *label1,
131                              GtkWidget **button2, const gchar *label2,
132                              GtkWidget **button3, const gchar *label3)
133 {
134         g_return_if_fail(bbox != NULL);
135         g_return_if_fail(button1 != NULL);
136
137         *bbox = gtk_hbutton_box_new();
138         gtk_button_box_set_layout(GTK_BUTTON_BOX(*bbox), GTK_BUTTONBOX_END);
139         gtk_button_box_set_spacing(GTK_BUTTON_BOX(*bbox), 5);
140
141         *button1 = gtk_button_new_with_label(label1);
142         GTK_WIDGET_SET_FLAGS(*button1, GTK_CAN_DEFAULT);
143         gtk_box_pack_start(GTK_BOX(*bbox), *button1, TRUE, TRUE, 0);
144         gtk_widget_show(*button1);
145
146         if (button2) {
147                 *button2 = gtk_button_new_with_label(label2);
148                 GTK_WIDGET_SET_FLAGS(*button2, GTK_CAN_DEFAULT);
149                 gtk_box_pack_start(GTK_BOX(*bbox), *button2, TRUE, TRUE, 0);
150                 gtk_widget_show(*button2);
151         }
152
153         if (button3) {
154                 *button3 = gtk_button_new_with_label(label3);
155                 GTK_WIDGET_SET_FLAGS(*button3, GTK_CAN_DEFAULT);
156                 gtk_box_pack_start(GTK_BOX(*bbox), *button3, TRUE, TRUE, 0);
157                 gtk_widget_show(*button3);
158         }
159 }
160
161 #define CELL_SPACING 1
162 #define ROW_TOP_YPIXEL(clist, row) (((clist)->row_height * (row)) + \
163                                     (((row) + 1) * CELL_SPACING) + \
164                                     (clist)->voffset)
165 #define ROW_FROM_YPIXEL(clist, y) (((y) - (clist)->voffset) / \
166                                    ((clist)->row_height + CELL_SPACING))
167
168 void gtkut_ctree_node_move_if_on_the_edge(GtkCTree *ctree, GtkCTreeNode *node)
169 {
170         GtkCList *clist = GTK_CLIST(ctree);
171         gint row;
172         GtkVisibility row_visibility, prev_row_visibility, next_row_visibility;
173
174         g_return_if_fail(ctree != NULL);
175         g_return_if_fail(node != NULL);
176
177         row = g_list_position(clist->row_list, (GList *)node);
178         if (row < 0 || row >= clist->rows || clist->row_height == 0) return;
179         row_visibility = gtk_clist_row_is_visible(clist, row);
180         prev_row_visibility = gtk_clist_row_is_visible(clist, row - 1);
181         next_row_visibility = gtk_clist_row_is_visible(clist, row + 1);
182
183         if (row_visibility == GTK_VISIBILITY_NONE) {
184                 gtk_clist_moveto(clist, row, -1, 0.5, 0);
185                 return;
186         }
187         if (row_visibility == GTK_VISIBILITY_FULL &&
188             prev_row_visibility == GTK_VISIBILITY_FULL &&
189             next_row_visibility == GTK_VISIBILITY_FULL)
190                 return;
191         if (prev_row_visibility != GTK_VISIBILITY_FULL &&
192             next_row_visibility != GTK_VISIBILITY_FULL)
193                 return;
194
195         if (prev_row_visibility != GTK_VISIBILITY_FULL) {
196                 gtk_clist_moveto(clist, row, -1, 0.2, 0);
197                 return;
198         }
199         if (next_row_visibility != GTK_VISIBILITY_FULL) {
200                 gtk_clist_moveto(clist, row, -1, 0.8, 0);
201                 return;
202         }
203 }
204
205 #undef CELL_SPACING
206 #undef ROW_TOP_YPIXEL
207 #undef ROW_FROM_YPIXEL
208
209 gint gtkut_ctree_get_nth_from_node(GtkCTree *ctree, GtkCTreeNode *node)
210 {
211         g_return_val_if_fail(ctree != NULL, -1);
212         g_return_val_if_fail(node != NULL, -1);
213
214         return g_list_position(GTK_CLIST(ctree)->row_list, (GList *)node);
215 }
216
217 /* get the next node, including the invisible one */
218 GtkCTreeNode *gtkut_ctree_node_next(GtkCTree *ctree, GtkCTreeNode *node)
219 {
220         GtkCTreeNode *parent;
221
222         if (!node) return NULL;
223
224         if (GTK_CTREE_ROW(node)->children)
225                 return GTK_CTREE_ROW(node)->children;
226
227         if (GTK_CTREE_ROW(node)->sibling)
228                 return GTK_CTREE_ROW(node)->sibling;
229
230         for (parent = GTK_CTREE_ROW(node)->parent; parent != NULL;
231              parent = GTK_CTREE_ROW(parent)->parent) {
232                 if (GTK_CTREE_ROW(parent)->sibling)
233                         return GTK_CTREE_ROW(parent)->sibling;
234         }
235
236         return NULL;
237 }
238
239 GtkCTreeNode *gtkut_ctree_find_collapsed_parent(GtkCTree *ctree,
240                                                 GtkCTreeNode *node)
241 {
242         if (!node) return NULL;
243
244         while ((node = GTK_CTREE_ROW(node)->parent) != NULL) {
245                 if (!GTK_CTREE_ROW(node)->expanded)
246                         return node;
247         }
248
249         return NULL;
250 }
251
252 void gtkut_ctree_expand_parent_all(GtkCTree *ctree, GtkCTreeNode *node)
253 {
254         while ((node = gtkut_ctree_find_collapsed_parent(ctree, node)) != NULL)
255                 gtk_ctree_expand(ctree, node);
256 }
257
258 gboolean gtkut_ctree_node_is_parent(GtkCTreeNode *parent, GtkCTreeNode *node)
259 {
260         GtkCTreeNode *tmp;
261         g_return_val_if_fail(node != NULL, FALSE);
262         g_return_val_if_fail(parent != NULL, FALSE);
263         tmp = node;
264         
265         while (tmp) {
266                 if(GTK_CTREE_ROW(tmp)->parent && GTK_CTREE_ROW(tmp)->parent == parent)
267                         return TRUE;
268                 tmp = GTK_CTREE_ROW(tmp)->parent;
269         }
270         
271         return FALSE;
272 }
273
274 void gtkut_ctree_set_focus_row(GtkCTree *ctree, GtkCTreeNode *node)
275 {
276         gtkut_clist_set_focus_row(GTK_CLIST(ctree),
277                                   gtkut_ctree_get_nth_from_node(ctree, node));
278 }
279
280 void gtkut_clist_set_focus_row(GtkCList *clist, gint row)
281 {
282         clist->focus_row = row;
283         GTKUT_CTREE_REFRESH(clist);
284 }
285
286 void gtkut_combo_set_items(GtkCombo *combo, const gchar *str1, ...)
287 {
288         va_list args;
289         gchar *s;
290         GList *combo_items = NULL;
291
292         g_return_if_fail(str1 != NULL);
293
294         combo_items = g_list_append(combo_items, (gpointer)str1);
295         va_start(args, str1);
296         s = va_arg(args, gchar*);
297         while (s) {
298                 combo_items = g_list_append(combo_items, (gpointer)s);
299                 s = va_arg(args, gchar*);
300         }
301         va_end(args);
302
303         gtk_combo_set_popdown_strings(combo, combo_items);
304
305         g_list_free(combo_items);
306 }
307
308 gchar *gtkut_editable_get_selection(GtkEditable *editable)
309 {
310         guint start_pos, end_pos;
311
312         g_return_val_if_fail(editable != NULL, NULL);
313
314         if (!editable->has_selection) return NULL;
315
316         if (editable->selection_start_pos == editable->selection_end_pos)
317                 return NULL;
318
319         if (editable->selection_start_pos < editable->selection_end_pos) {
320                 start_pos = editable->selection_start_pos;
321                 end_pos = editable->selection_end_pos;
322         } else {
323                 start_pos = editable->selection_end_pos;
324                 end_pos = editable->selection_start_pos;
325         }
326
327         return gtk_editable_get_chars(editable, start_pos, end_pos);
328 }
329
330 /*
331  * Walk through the widget tree and disclaim the selection from all currently
332  * realized GtkEditable widgets.
333  */
334 static void gtkut_check_before_remove(GtkWidget *widget, gpointer unused)
335 {
336         g_return_if_fail(widget != NULL);
337
338         if (!GTK_WIDGET_REALIZED(widget))
339                 return; /* all nested widgets must be unrealized too */
340         if (GTK_IS_CONTAINER(widget))
341                 gtk_container_forall(GTK_CONTAINER(widget),
342                                      gtkut_check_before_remove, NULL);
343         if (GTK_IS_EDITABLE(widget))
344                 gtk_editable_claim_selection(GTK_EDITABLE(widget),
345                                              FALSE, GDK_CURRENT_TIME);
346 }
347
348 /*
349  * Wrapper around gtk_container_remove to work around a bug in GtkText and
350  * GtkEntry (in all GTK+ versions up to and including at least 1.2.10).
351  *
352  * The problem is that unrealizing a GtkText or GtkEntry widget which has the
353  * active selection completely messes up selection handling, leading to
354  * non-working selections and crashes.  Removing a widget from its container
355  * implies unrealizing it and all its child widgets; this triggers the bug if
356  * the removed widget or any of its children is GtkText or GtkEntry.  As a
357  * workaround, this function walks through the widget subtree before removing
358  * and disclaims the selection from all GtkEditable widgets found.
359  *
360  * A similar workaround may be needed for gtk_widget_reparent(); currently it
361  * is not necessary because Sylpheed does not use gtk_widget_reparent() for
362  * GtkEditable widgets or containers holding such widgets.
363  */
364 void gtkut_container_remove(GtkContainer *container, GtkWidget *widget)
365 {
366         gtkut_check_before_remove(widget, NULL);
367         gtk_container_remove(container, widget);
368 }
369
370 gboolean gtkut_stext_match_string(GtkSText *text, gint pos, wchar_t *wcs,
371                                   gint len, gboolean case_sens)
372 {
373         gint match_count = 0;
374
375         for (; match_count < len; pos++, match_count++) {
376                 if (case_sens) {
377                         if (GTK_STEXT_INDEX(text, pos) != wcs[match_count])
378                                 break;
379                 } else {
380                         if (towlower(GTK_STEXT_INDEX(text, pos)) !=
381                             towlower(wcs[match_count]))
382                                 break;
383                 }
384         }
385
386         if (match_count == len)
387                 return TRUE;
388         else
389                 return FALSE;
390 }
391
392 guint gtkut_stext_str_compare_n(GtkSText *text, guint pos1, guint pos2,
393                                 guint len, guint text_len)
394 {
395         guint i;
396         GdkWChar ch1, ch2;
397
398         for (i = 0; i < len && pos1 + i < text_len && pos2 + i < text_len; i++) {
399                 ch1 = GTK_STEXT_INDEX(text, pos1 + i);
400                 ch2 = GTK_STEXT_INDEX(text, pos2 + i);
401                 if (ch1 != ch2)
402                         break;
403         }
404
405         return i;
406 }
407
408 guint gtkut_stext_str_compare(GtkSText *text, guint start_pos, guint text_len,
409                               const gchar *str)
410 {
411         wchar_t *wcs;
412         guint len;
413         gboolean result;
414
415         if (!str) return 0;
416
417         wcs = strdup_mbstowcs(str);
418         if (!wcs) return 0;
419         len = wcslen(wcs);
420
421         if (len > text_len - start_pos)
422                 result = FALSE;
423         else
424                 result = gtkut_stext_match_string(text, start_pos, wcs, len,
425                                                   TRUE);
426
427         g_free(wcs);
428
429         return result ? len : 0;
430 }
431
432 gboolean gtkut_stext_is_uri_string(GtkSText *text,
433                                    guint start_pos, guint text_len)
434 {
435         if (gtkut_stext_str_compare(text, start_pos, text_len, "http://")  ||
436             gtkut_stext_str_compare(text, start_pos, text_len, "ftp://")   ||
437             gtkut_stext_str_compare(text, start_pos, text_len, "https://") ||
438             gtkut_stext_str_compare(text, start_pos, text_len, "www."))
439                 return TRUE;
440
441         return FALSE;
442 }
443
444 void gtk_stext_clear(GtkSText *text)
445 {
446         gtk_stext_freeze(text);
447         gtk_stext_set_point(text, 0);
448         gtk_stext_forward_delete(text, gtk_stext_get_length(text));
449         gtk_stext_thaw(text);
450 }
451
452 void gtkut_widget_disable_theme_engine(GtkWidget *widget)
453 {
454         GtkStyle *style, *new_style;
455
456         style = gtk_widget_get_style(widget);
457
458         if (style->engine) {
459                 GtkThemeEngine *engine;
460
461                 engine = style->engine;
462                 style->engine = NULL;
463                 new_style = gtk_style_copy(style);
464                 style->engine = engine;
465                 gtk_widget_set_style(widget, new_style);
466         }
467 }
468
469 static void gtkut_widget_draw_cb(GtkWidget *widget, GdkRectangle *area,
470                                  gboolean *flag)
471 {
472         *flag = TRUE;
473         gtk_signal_disconnect_by_data(GTK_OBJECT(widget), flag);
474 }
475
476 void gtkut_widget_wait_for_draw(GtkWidget *widget)
477 {
478         gboolean flag = FALSE;
479
480         if (!GTK_WIDGET_VISIBLE(widget) || !GTK_WIDGET_MAPPED(widget)) return;
481
482         gtk_signal_connect(GTK_OBJECT(widget), "draw",
483                            GTK_SIGNAL_FUNC(gtkut_widget_draw_cb), &flag);
484         while (!flag)
485                 gtk_main_iteration();
486 }
487
488 void gtkut_widget_get_uposition(GtkWidget *widget, gint *px, gint *py)
489 {
490         gint x, y;
491         gint sx, sy;
492
493         g_return_if_fail(widget != NULL);
494         g_return_if_fail(widget->window != NULL);
495
496         /* gdk_window_get_root_origin ever return *rootwindow*'s position*/
497         gdk_window_get_root_origin(widget->window, &x, &y);
498
499         sx = gdk_screen_width();
500         sy = gdk_screen_height();
501         x %= sx; if (x < 0) x = 0;
502         y %= sy; if (y < 0) y = 0;
503         *px = x;
504         *py = y;
505 }
506
507 void gtkut_window_popup(GtkWidget *window)
508 {
509         gint x, y, sx, sy, new_x, new_y;
510
511         g_return_if_fail(window != NULL);
512         g_return_if_fail(window->window != NULL);
513
514         gdk_window_get_origin(window->window, &x, &y);
515         sx = gdk_screen_width();
516         sy = gdk_screen_height();
517         new_x = x % sx; if (new_x < 0) new_x = 0;
518         new_y = y % sy; if (new_y < 0) new_y = 0;
519         if (new_x != x || new_y != y)
520                 gdk_window_move(window->window, new_x, new_y);
521
522         gdk_window_raise(window->window);
523         gdk_window_show(window->window);
524 }
525
526
527 static void gtkut_clist_bindings_add(GtkWidget *clist)
528 {
529         GtkBindingSet *binding_set;
530
531         binding_set = gtk_binding_set_by_class
532                 (GTK_CLIST_CLASS(GTK_OBJECT(clist)->klass));
533
534         gtk_binding_entry_add_signal(binding_set, GDK_n, GDK_CONTROL_MASK,
535                                      "scroll_vertical", 2,
536                                      GTK_TYPE_ENUM, GTK_SCROLL_STEP_FORWARD,
537                                      GTK_TYPE_FLOAT, 0.0);
538         gtk_binding_entry_add_signal(binding_set, GDK_p, GDK_CONTROL_MASK,
539                                      "scroll_vertical", 2,
540                                      GTK_TYPE_ENUM, GTK_SCROLL_STEP_BACKWARD,
541                                      GTK_TYPE_FLOAT, 0.0);
542 }
543
544 void gtkut_widget_init(void)
545 {
546         GtkWidget *clist;
547
548         clist = gtk_clist_new(1);
549         gtkut_clist_bindings_add(clist);
550         gtk_widget_unref(clist);
551
552         clist = gtk_ctree_new(1, 0);
553         gtkut_clist_bindings_add(clist);
554         gtk_widget_unref(clist);
555
556         clist = gtk_sctree_new_with_titles(1, 0, NULL);
557         gtkut_clist_bindings_add(clist);
558         gtk_widget_unref(clist);
559 }
560
561 void gtkut_widget_set_app_icon(GtkWidget *widget)
562 {
563 #include "pixmaps/sylpheed.xpm" 
564         static GdkPixmap *sylpheedxpm;
565         static GdkBitmap *sylpheedxpmmask;
566         
567         g_return_if_fail(widget != NULL);
568         g_return_if_fail(widget->window != NULL);
569         if (!sylpheedxpm) {
570                 PIXMAP_CREATE(widget, sylpheedxpm, sylpheedxpmmask, sylpheed_xpm);
571         }               
572         gdk_window_set_icon(widget->window, NULL, sylpheedxpm, sylpheedxpmmask);
573 }
574
575 void gtkut_widget_set_composer_icon(GtkWidget *widget)
576 {
577         static GdkPixmap *xpm;
578         static GdkBitmap *bmp;
579
580         g_return_if_fail(widget != NULL);
581         g_return_if_fail(widget->window != NULL);
582         if (!xpm) {
583                 stock_pixmap_gdk(widget, STOCK_PIXMAP_MAIL_COMPOSE, &xpm, &bmp);
584         }
585         gdk_window_set_icon(widget->window, NULL, xpm, bmp);    
586 }
587
588 GtkWidget *gtkut_account_menu_new(GList                 *ac_list,
589                                   GtkSignalFunc          callback,
590                                   gpointer               data)
591 {
592         GList *cur_ac;
593         GtkWidget *menu;
594         
595         g_return_val_if_fail(ac_list != NULL, NULL);
596
597         menu = gtk_menu_new();
598
599         for (cur_ac = ac_list; cur_ac != NULL; cur_ac = cur_ac->next) {
600                 gchar *name;
601                 GtkWidget *menuitem;
602                 PrefsAccount *account;
603                 
604                 account = (PrefsAccount *) cur_ac->data;
605                 if (account->name)
606                         name = g_strdup_printf("%s: %s <%s>",
607                                                account->account_name,
608                                                account->name,
609                                                account->address);
610                 else
611                         name = g_strdup_printf("%s: %s",
612                                                account->account_name,
613                                                account->address);
614                 MENUITEM_ADD(menu, menuitem, name, account->account_id);
615                 g_free(name);
616                 if (callback != NULL)
617                         gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
618                                            callback,
619                                            data);
620         }
621         return menu;
622 }