0.9.4claws11
[claws.git] / src / gtk / gtkutils.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2003 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 /* get the previous node, including the invisible one */
240 GtkCTreeNode *gtkut_ctree_node_prev(GtkCTree *ctree, GtkCTreeNode *node)
241 {
242         GtkCTreeNode *prev;
243         GtkCTreeNode *child;
244
245         if (!node) return NULL;
246
247         prev = GTK_CTREE_NODE_PREV(node);
248         if (prev == GTK_CTREE_ROW(node)->parent)
249                 return prev;
250
251         child = prev;
252         while (GTK_CTREE_ROW(child)->children != NULL) {
253                 child = GTK_CTREE_ROW(child)->children;
254                 while (GTK_CTREE_ROW(child)->sibling != NULL)
255                         child = GTK_CTREE_ROW(child)->sibling;
256         }
257
258         return child;
259 }
260
261 gboolean gtkut_ctree_node_is_selected(GtkCTree *ctree, GtkCTreeNode *node)
262 {
263         GtkCList *clist = GTK_CLIST(ctree);
264         GList *cur;
265
266         for (cur = clist->selection; cur != NULL; cur = cur->next) {
267                 if (node == GTK_CTREE_NODE(cur->data))
268                         return TRUE;
269         }
270
271         return FALSE;
272 }
273
274 GtkCTreeNode *gtkut_ctree_find_collapsed_parent(GtkCTree *ctree,
275                                                 GtkCTreeNode *node)
276 {
277         if (!node) return NULL;
278
279         while ((node = GTK_CTREE_ROW(node)->parent) != NULL) {
280                 if (!GTK_CTREE_ROW(node)->expanded)
281                         return node;
282         }
283
284         return NULL;
285 }
286
287 void gtkut_ctree_expand_parent_all(GtkCTree *ctree, GtkCTreeNode *node)
288 {
289         while ((node = gtkut_ctree_find_collapsed_parent(ctree, node)) != NULL)
290                 gtk_ctree_expand(ctree, node);
291 }
292
293 gboolean gtkut_ctree_node_is_parent(GtkCTreeNode *parent, GtkCTreeNode *node)
294 {
295         GtkCTreeNode *tmp;
296         g_return_val_if_fail(node != NULL, FALSE);
297         g_return_val_if_fail(parent != NULL, FALSE);
298         tmp = node;
299         
300         while (tmp) {
301                 if(GTK_CTREE_ROW(tmp)->parent && GTK_CTREE_ROW(tmp)->parent == parent)
302                         return TRUE;
303                 tmp = GTK_CTREE_ROW(tmp)->parent;
304         }
305         
306         return FALSE;
307 }
308
309 void gtkut_ctree_set_focus_row(GtkCTree *ctree, GtkCTreeNode *node)
310 {
311         gtkut_clist_set_focus_row(GTK_CLIST(ctree),
312                                   gtkut_ctree_get_nth_from_node(ctree, node));
313 }
314
315 void gtkut_clist_set_focus_row(GtkCList *clist, gint row)
316 {
317         clist->focus_row = row;
318         GTKUT_CTREE_REFRESH(clist);
319 }
320
321 void gtkut_combo_set_items(GtkCombo *combo, const gchar *str1, ...)
322 {
323         va_list args;
324         gchar *s;
325         GList *combo_items = NULL;
326
327         g_return_if_fail(str1 != NULL);
328
329         combo_items = g_list_append(combo_items, (gpointer)str1);
330         va_start(args, str1);
331         s = va_arg(args, gchar*);
332         while (s) {
333                 combo_items = g_list_append(combo_items, (gpointer)s);
334                 s = va_arg(args, gchar*);
335         }
336         va_end(args);
337
338         gtk_combo_set_popdown_strings(combo, combo_items);
339
340         g_list_free(combo_items);
341 }
342
343 gchar *gtkut_editable_get_selection(GtkEditable *editable)
344 {
345         guint start_pos, end_pos;
346
347         g_return_val_if_fail(editable != NULL, NULL);
348
349         if (!editable->has_selection) return NULL;
350
351         if (editable->selection_start_pos == editable->selection_end_pos)
352                 return NULL;
353
354         if (editable->selection_start_pos < editable->selection_end_pos) {
355                 start_pos = editable->selection_start_pos;
356                 end_pos = editable->selection_end_pos;
357         } else {
358                 start_pos = editable->selection_end_pos;
359                 end_pos = editable->selection_start_pos;
360         }
361
362         return gtk_editable_get_chars(editable, start_pos, end_pos);
363 }
364
365 /*
366  * Walk through the widget tree and disclaim the selection from all currently
367  * realized GtkEditable widgets.
368  */
369 static void gtkut_check_before_remove(GtkWidget *widget, gpointer unused)
370 {
371         g_return_if_fail(widget != NULL);
372
373         if (!GTK_WIDGET_REALIZED(widget))
374                 return; /* all nested widgets must be unrealized too */
375         if (GTK_IS_CONTAINER(widget))
376                 gtk_container_forall(GTK_CONTAINER(widget),
377                                      gtkut_check_before_remove, NULL);
378         if (GTK_IS_EDITABLE(widget))
379                 gtk_editable_claim_selection(GTK_EDITABLE(widget),
380                                              FALSE, GDK_CURRENT_TIME);
381 }
382
383 /*
384  * Wrapper around gtk_container_remove to work around a bug in GtkText and
385  * GtkEntry (in all GTK+ versions up to and including at least 1.2.10).
386  *
387  * The problem is that unrealizing a GtkText or GtkEntry widget which has the
388  * active selection completely messes up selection handling, leading to
389  * non-working selections and crashes.  Removing a widget from its container
390  * implies unrealizing it and all its child widgets; this triggers the bug if
391  * the removed widget or any of its children is GtkText or GtkEntry.  As a
392  * workaround, this function walks through the widget subtree before removing
393  * and disclaims the selection from all GtkEditable widgets found.
394  *
395  * A similar workaround may be needed for gtk_widget_reparent(); currently it
396  * is not necessary because Sylpheed does not use gtk_widget_reparent() for
397  * GtkEditable widgets or containers holding such widgets.
398  */
399 void gtkut_container_remove(GtkContainer *container, GtkWidget *widget)
400 {
401         gtkut_check_before_remove(widget, NULL);
402         gtk_container_remove(container, widget);
403 }
404
405 void gtkut_window_popup(GtkWidget *window)
406 {
407         gint x, y, sx, sy, new_x, new_y;
408
409         g_return_if_fail(window != NULL);
410         g_return_if_fail(window->window != NULL);
411
412         sx = gdk_screen_width();
413         sy = gdk_screen_height();
414
415         gdk_window_get_origin(window->window, &x, &y);
416         new_x = x % sx; if (new_x < 0) new_x = 0;
417         new_y = y % sy; if (new_y < 0) new_y = 0;
418         if (new_x != x || new_y != y)
419                 gdk_window_move(window->window, new_x, new_y);
420
421         gdk_window_raise(window->window);
422         gdk_window_show(window->window);
423 }
424
425 void gtkut_widget_get_uposition(GtkWidget *widget, gint *px, gint *py)
426 {
427         gint x, y;
428         gint sx, sy;
429
430         g_return_if_fail(widget != NULL);
431         g_return_if_fail(widget->window != NULL);
432
433         sx = gdk_screen_width();
434         sy = gdk_screen_height();
435
436         /* gdk_window_get_root_origin ever return *rootwindow*'s position */
437         gdk_window_get_root_origin(widget->window, &x, &y);
438
439         x %= sx; if (x < 0) x = 0;
440         y %= sy; if (y < 0) y = 0;
441         *px = x;
442         *py = y;
443 }
444
445 void gtkut_widget_disable_theme_engine(GtkWidget *widget)
446 {
447         GtkStyle *style, *new_style;
448
449         style = gtk_widget_get_style(widget);
450
451         if (style->engine) {
452                 GtkThemeEngine *engine;
453
454                 engine = style->engine;
455                 style->engine = NULL;
456                 new_style = gtk_style_copy(style);
457                 style->engine = engine;
458                 gtk_widget_set_style(widget, new_style);
459         }
460 }
461
462 static void gtkut_widget_draw_cb(GtkWidget *widget, GdkRectangle *area,
463                                  gboolean *flag)
464 {
465         *flag = TRUE;
466         gtk_signal_disconnect_by_data(GTK_OBJECT(widget), flag);
467 }
468
469 void gtkut_widget_wait_for_draw(GtkWidget *widget)
470 {
471         gboolean flag = FALSE;
472
473         if (!GTK_WIDGET_DRAWABLE(widget)) return;
474
475         gtk_signal_connect(GTK_OBJECT(widget), "draw",
476                            GTK_SIGNAL_FUNC(gtkut_widget_draw_cb), &flag);
477         while (!flag)
478                 gtk_main_iteration();
479 }
480
481 static void gtkut_clist_bindings_add(GtkWidget *clist)
482 {
483         GtkBindingSet *binding_set;
484
485         binding_set = gtk_binding_set_by_class
486                 (GTK_CLIST_CLASS(GTK_OBJECT(clist)->klass));
487
488         gtk_binding_entry_add_signal(binding_set, GDK_n, GDK_CONTROL_MASK,
489                                      "scroll_vertical", 2,
490                                      GTK_TYPE_ENUM, GTK_SCROLL_STEP_FORWARD,
491                                      GTK_TYPE_FLOAT, 0.0);
492         gtk_binding_entry_add_signal(binding_set, GDK_p, GDK_CONTROL_MASK,
493                                      "scroll_vertical", 2,
494                                      GTK_TYPE_ENUM, GTK_SCROLL_STEP_BACKWARD,
495                                      GTK_TYPE_FLOAT, 0.0);
496 }
497
498 void gtkut_widget_init(void)
499 {
500         GtkWidget *clist;
501
502         clist = gtk_clist_new(1);
503         gtkut_clist_bindings_add(clist);
504         gtk_widget_unref(clist);
505
506         clist = gtk_ctree_new(1, 0);
507         gtkut_clist_bindings_add(clist);
508         gtk_widget_unref(clist);
509
510         clist = gtk_sctree_new_with_titles(1, 0, NULL);
511         gtkut_clist_bindings_add(clist);
512         gtk_widget_unref(clist);
513 }
514
515 void gtkut_widget_set_app_icon(GtkWidget *widget)
516 {
517 #include "pixmaps/sylpheed.xpm" 
518         static GdkPixmap *sylpheedxpm;
519         static GdkBitmap *sylpheedxpmmask;
520         
521         g_return_if_fail(widget != NULL);
522         g_return_if_fail(widget->window != NULL);
523         if (!sylpheedxpm) {
524                 PIXMAP_CREATE(widget, sylpheedxpm, sylpheedxpmmask, sylpheed_xpm);
525         }               
526         gdk_window_set_icon(widget->window, NULL, sylpheedxpm, sylpheedxpmmask);
527 }
528
529 void gtkut_widget_set_composer_icon(GtkWidget *widget)
530 {
531         static GdkPixmap *xpm;
532         static GdkBitmap *bmp;
533
534         g_return_if_fail(widget != NULL);
535         g_return_if_fail(widget->window != NULL);
536         if (!xpm) {
537                 stock_pixmap_gdk(widget, STOCK_PIXMAP_MAIL_COMPOSE, &xpm, &bmp);
538         }
539         gdk_window_set_icon(widget->window, NULL, xpm, bmp);    
540 }
541
542 GtkWidget *gtkut_account_menu_new(GList                 *ac_list,
543                                   GtkSignalFunc          callback,
544                                   gpointer               data)
545 {
546         GList *cur_ac;
547         GtkWidget *menu;
548         
549         g_return_val_if_fail(ac_list != NULL, NULL);
550
551         menu = gtk_menu_new();
552
553         for (cur_ac = ac_list; cur_ac != NULL; cur_ac = cur_ac->next) {
554                 gchar *name;
555                 GtkWidget *menuitem;
556                 PrefsAccount *account;
557                 
558                 account = (PrefsAccount *) cur_ac->data;
559                 if (account->name)
560                         name = g_strdup_printf("%s: %s <%s>",
561                                                account->account_name,
562                                                account->name,
563                                                account->address);
564                 else
565                         name = g_strdup_printf("%s: %s",
566                                                account->account_name,
567                                                account->address);
568                 MENUITEM_ADD(menu, menuitem, name, account->account_id);
569                 g_free(name);
570                 if (callback != NULL)
571                         gtk_signal_connect(GTK_OBJECT(menuitem), "activate",
572                                            callback,
573                                            data);
574         }
575         return menu;
576 }
577
578 void gtkut_set_widget_bgcolor_rgb(GtkWidget *widget, guint rgbvalue)
579 {
580         GtkStyle *newstyle;
581         GdkColor gdk_color;
582
583         gtkut_convert_int_to_gdk_color(rgbvalue, &gdk_color);
584         newstyle = gtk_style_copy(gtk_widget_get_default_style());
585         newstyle->bg[GTK_STATE_NORMAL]   = gdk_color;
586         newstyle->bg[GTK_STATE_PRELIGHT] = gdk_color;
587         newstyle->bg[GTK_STATE_ACTIVE]   = gdk_color;
588         gtk_widget_set_style(widget, newstyle);
589 }
590