Mercurial > hg > RemoteEditor > vim7
annotate src/gui_gtk.c @ 34:e170173ecb68 current-release
before ack base protocol.
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Wed, 26 Nov 2008 15:02:10 +0900 (2008-11-26) |
parents | 76efa0be13f1 |
children | c16898406ff2 |
rev | line source |
---|---|
0 | 1 /* vi:set ts=8 sts=4 sw=4: |
2 * | |
3 * VIM - Vi IMproved by Bram Moolenaar | |
4 * | |
5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
6 * Do ":help credits" in Vim to see a list of people who contributed. | |
7 * See README.txt for an overview of the Vim source code. | |
8 */ | |
9 | |
10 /* | |
11 * Porting to GTK+ was done by: | |
12 * | |
13 * (C) 1998,1999,2000 by Marcin Dalecki <martin@dalecki.de> | |
14 * | |
15 * With GREAT support and continuous encouragements by Andy Kahn and of | |
16 * course Bram Moolenaar! | |
17 * | |
18 * Support for GTK+ 2 was added by: | |
19 * | |
20 * (C) 2002,2003 Jason Hildebrand <jason@peaceworks.ca> | |
21 * Daniel Elstner <daniel.elstner@gmx.net> | |
22 * | |
23 * Best supporting actor (He helped somewhat, aesthetically speaking): | |
24 * Maxime Romano <verbophobe@hotmail.com> | |
25 */ | |
26 | |
27 #ifdef FEAT_GUI_GTK | |
28 # include "gui_gtk_f.h" | |
29 #endif | |
30 | |
31 /* GTK defines MAX and MIN, but some system header files as well. Undefine | |
32 * them and don't use them. */ | |
33 #ifdef MIN | |
34 # undef MIN | |
35 #endif | |
36 #ifdef MAX | |
37 # undef MAX | |
38 #endif | |
39 | |
40 #include "vim.h" | |
41 | |
42 #ifdef FEAT_GUI_GNOME | |
43 /* Gnome redefines _() and N_(). Grrr... */ | |
44 # ifdef _ | |
45 # undef _ | |
46 # endif | |
47 # ifdef N_ | |
48 # undef N_ | |
49 # endif | |
50 # ifdef textdomain | |
51 # undef textdomain | |
52 # endif | |
53 # ifdef bindtextdomain | |
54 # undef bindtextdomain | |
55 # endif | |
56 # ifdef bind_textdomain_codeset | |
57 # undef bind_textdomain_codeset | |
58 # endif | |
59 # if defined(FEAT_GETTEXT) && !defined(ENABLE_NLS) | |
60 # define ENABLE_NLS /* so the texts in the dialog boxes are translated */ | |
61 # endif | |
62 # include <gnome.h> | |
63 #endif | |
64 | |
65 #if defined(FEAT_GUI_DIALOG) && !defined(HAVE_GTK2) | |
66 # include "../pixmaps/alert.xpm" | |
67 # include "../pixmaps/error.xpm" | |
68 # include "../pixmaps/generic.xpm" | |
69 # include "../pixmaps/info.xpm" | |
70 # include "../pixmaps/quest.xpm" | |
71 #endif | |
72 | |
73 #if defined(FEAT_TOOLBAR) && !defined(HAVE_GTK2) | |
74 /* | |
75 * Icons used by the toolbar code. | |
76 */ | |
77 #include "../pixmaps/tb_new.xpm" | |
78 #include "../pixmaps/tb_open.xpm" | |
79 #include "../pixmaps/tb_close.xpm" | |
80 #include "../pixmaps/tb_save.xpm" | |
81 #include "../pixmaps/tb_print.xpm" | |
82 #include "../pixmaps/tb_cut.xpm" | |
83 #include "../pixmaps/tb_copy.xpm" | |
84 #include "../pixmaps/tb_paste.xpm" | |
85 #include "../pixmaps/tb_find.xpm" | |
86 #include "../pixmaps/tb_find_next.xpm" | |
87 #include "../pixmaps/tb_find_prev.xpm" | |
88 #include "../pixmaps/tb_find_help.xpm" | |
89 #include "../pixmaps/tb_exit.xpm" | |
90 #include "../pixmaps/tb_undo.xpm" | |
91 #include "../pixmaps/tb_redo.xpm" | |
92 #include "../pixmaps/tb_help.xpm" | |
93 #include "../pixmaps/tb_macro.xpm" | |
94 #include "../pixmaps/tb_make.xpm" | |
95 #include "../pixmaps/tb_save_all.xpm" | |
96 #include "../pixmaps/tb_jump.xpm" | |
97 #include "../pixmaps/tb_ctags.xpm" | |
98 #include "../pixmaps/tb_load_session.xpm" | |
99 #include "../pixmaps/tb_save_session.xpm" | |
100 #include "../pixmaps/tb_new_session.xpm" | |
101 #include "../pixmaps/tb_blank.xpm" | |
102 #include "../pixmaps/tb_maximize.xpm" | |
103 #include "../pixmaps/tb_split.xpm" | |
104 #include "../pixmaps/tb_minimize.xpm" | |
105 #include "../pixmaps/tb_shell.xpm" | |
106 #include "../pixmaps/tb_replace.xpm" | |
107 #include "../pixmaps/tb_vsplit.xpm" | |
108 #include "../pixmaps/tb_maxwidth.xpm" | |
109 #include "../pixmaps/tb_minwidth.xpm" | |
110 #endif /* FEAT_TOOLBAR && !HAVE_GTK2 */ | |
111 | |
112 #ifdef FEAT_GUI_GTK | |
113 # include <gdk/gdkkeysyms.h> | |
114 # include <gdk/gdk.h> | |
115 # ifdef WIN3264 | |
116 # include <gdk/gdkwin32.h> | |
117 # else | |
118 # include <gdk/gdkx.h> | |
119 # endif | |
120 | |
121 # include <gtk/gtk.h> | |
122 #else | |
123 /* define these items to be able to generate prototypes without GTK */ | |
124 typedef int GtkWidget; | |
125 # define gpointer int | |
126 # define guint8 int | |
127 # define GdkPixmap int | |
128 # define GdkBitmap int | |
129 # define GtkIconFactory int | |
130 # define GtkToolbar int | |
131 # define GtkAdjustment int | |
132 # define gboolean int | |
133 # define GdkEventKey int | |
134 # define CancelData int | |
135 #endif | |
136 | |
137 static void entry_activate_cb(GtkWidget *widget, gpointer data); | |
138 static void entry_changed_cb(GtkWidget *entry, GtkWidget *dialog); | |
139 static void find_replace_cb(GtkWidget *widget, gpointer data); | |
140 #ifndef HAVE_GTK2 | |
141 static void gui_gtk_position_in_parent(GtkWidget *parent, GtkWidget *child, gui_win_pos_T where); | |
142 #endif | |
143 | |
144 #if defined(FEAT_TOOLBAR) && defined(HAVE_GTK2) | |
145 /* | |
146 * Table from BuiltIn## icon indices to GTK+ stock IDs. Order must exactly | |
147 * match toolbar_names[] in menu.c! All stock icons including the "vim-*" | |
148 * ones can be overridden in your gtkrc file. | |
149 */ | |
150 static const char * const menu_stock_ids[] = | |
151 { | |
152 /* 00 */ GTK_STOCK_NEW, | |
153 /* 01 */ GTK_STOCK_OPEN, | |
154 /* 02 */ GTK_STOCK_SAVE, | |
155 /* 03 */ GTK_STOCK_UNDO, | |
156 /* 04 */ GTK_STOCK_REDO, | |
157 /* 05 */ GTK_STOCK_CUT, | |
158 /* 06 */ GTK_STOCK_COPY, | |
159 /* 07 */ GTK_STOCK_PASTE, | |
160 /* 08 */ GTK_STOCK_PRINT, | |
161 /* 09 */ GTK_STOCK_HELP, | |
162 /* 10 */ GTK_STOCK_FIND, | |
163 /* 11 */ "vim-save-all", | |
164 /* 12 */ "vim-session-save", | |
165 /* 13 */ "vim-session-new", | |
166 /* 14 */ "vim-session-load", | |
167 /* 15 */ GTK_STOCK_EXECUTE, | |
168 /* 16 */ GTK_STOCK_FIND_AND_REPLACE, | |
169 /* 17 */ GTK_STOCK_CLOSE, /* FIXME: fuzzy */ | |
170 /* 18 */ "vim-window-maximize", | |
171 /* 19 */ "vim-window-minimize", | |
172 /* 20 */ "vim-window-split", | |
173 /* 21 */ "vim-shell", | |
174 /* 22 */ GTK_STOCK_GO_BACK, | |
175 /* 23 */ GTK_STOCK_GO_FORWARD, | |
176 /* 24 */ "vim-find-help", | |
177 /* 25 */ GTK_STOCK_CONVERT, | |
178 /* 26 */ GTK_STOCK_JUMP_TO, | |
179 /* 27 */ "vim-build-tags", | |
180 /* 28 */ "vim-window-split-vertical", | |
181 /* 29 */ "vim-window-maximize-width", | |
182 /* 30 */ "vim-window-minimize-width", | |
183 /* 31 */ GTK_STOCK_QUIT | |
184 }; | |
185 | |
186 static void | |
187 add_stock_icon(GtkIconFactory *factory, | |
188 const char *stock_id, | |
189 const guint8 *inline_data, | |
190 int data_length) | |
191 { | |
192 GdkPixbuf *pixbuf; | |
193 GtkIconSet *icon_set; | |
194 | |
195 pixbuf = gdk_pixbuf_new_from_inline(data_length, inline_data, FALSE, NULL); | |
196 icon_set = gtk_icon_set_new_from_pixbuf(pixbuf); | |
197 | |
198 gtk_icon_factory_add(factory, stock_id, icon_set); | |
199 | |
200 gtk_icon_set_unref(icon_set); | |
201 g_object_unref(pixbuf); | |
202 } | |
203 | |
204 static int | |
205 lookup_menu_iconfile(char_u *iconfile, char_u *dest) | |
206 { | |
207 expand_env(iconfile, dest, MAXPATHL); | |
208 | |
209 if (mch_isFullName(dest)) | |
210 { | |
211 return vim_fexists(dest); | |
212 } | |
213 else | |
214 { | |
215 static const char suffixes[][4] = {"png", "xpm", "bmp"}; | |
216 char_u buf[MAXPATHL]; | |
217 unsigned int i; | |
218 | |
219 for (i = 0; i < G_N_ELEMENTS(suffixes); ++i) | |
220 if (gui_find_bitmap(dest, buf, (char *)suffixes[i]) == OK) | |
221 { | |
222 STRCPY(dest, buf); | |
223 return TRUE; | |
224 } | |
225 | |
226 return FALSE; | |
227 } | |
228 } | |
229 | |
230 static GtkWidget * | |
231 load_menu_iconfile(char_u *name, GtkIconSize icon_size) | |
232 { | |
233 GtkWidget *image = NULL; | |
234 GtkIconSet *icon_set; | |
235 GtkIconSource *icon_source; | |
236 | |
237 /* | |
238 * Rather than loading the icon directly into a GtkImage, create | |
239 * a new GtkIconSet and put it in there. This way we can easily | |
240 * scale the toolbar icons on the fly when needed. | |
241 */ | |
242 icon_set = gtk_icon_set_new(); | |
243 icon_source = gtk_icon_source_new(); | |
244 | |
245 gtk_icon_source_set_filename(icon_source, (const char *)name); | |
246 gtk_icon_set_add_source(icon_set, icon_source); | |
247 | |
248 image = gtk_image_new_from_icon_set(icon_set, icon_size); | |
249 | |
250 gtk_icon_source_free(icon_source); | |
251 gtk_icon_set_unref(icon_set); | |
252 | |
253 return image; | |
254 } | |
255 | |
256 static GtkWidget * | |
257 create_menu_icon(vimmenu_T *menu, GtkIconSize icon_size) | |
258 { | |
259 GtkWidget *image = NULL; | |
260 char_u buf[MAXPATHL]; | |
261 | |
262 /* First use a specified "icon=" argument. */ | |
263 if (menu->iconfile != NULL && lookup_menu_iconfile(menu->iconfile, buf)) | |
264 image = load_menu_iconfile(buf, icon_size); | |
265 | |
266 /* If not found and not builtin specified try using the menu name. */ | |
267 if (image == NULL && !menu->icon_builtin | |
268 && lookup_menu_iconfile(menu->name, buf)) | |
269 image = load_menu_iconfile(buf, icon_size); | |
270 | |
271 /* Still not found? Then use a builtin icon, a blank one as fallback. */ | |
272 if (image == NULL) | |
273 { | |
274 const char *stock_id; | |
275 const int n_ids = G_N_ELEMENTS(menu_stock_ids); | |
276 | |
277 if (menu->iconidx >= 0 && menu->iconidx < n_ids) | |
278 stock_id = menu_stock_ids[menu->iconidx]; | |
279 else | |
280 stock_id = GTK_STOCK_MISSING_IMAGE; | |
281 | |
282 image = gtk_image_new_from_stock(stock_id, icon_size); | |
283 } | |
284 | |
285 return image; | |
286 } | |
287 | |
288 /*ARGSUSED*/ | |
289 static gint | |
290 toolbar_button_focus_in_event(GtkWidget *widget, GdkEventFocus *event, gpointer data) | |
291 { | |
292 /* When we're in a GtkPlug, we don't have window focus events, only widget focus. | |
293 * To emulate stand-alone gvim, if a button gets focus (e.g., <Tab> into GtkPlug) | |
294 * immediately pass it to mainwin. | |
295 */ | |
296 if (gtk_socket_id != 0) | |
297 gtk_widget_grab_focus(gui.drawarea); | |
298 | |
299 return TRUE; | |
300 } | |
301 #endif /* FEAT_TOOLBAR && HAVE_GTK2 */ | |
302 | |
303 #if (defined(FEAT_TOOLBAR) && defined(HAVE_GTK2)) || defined(PROTO) | |
304 | |
305 void | |
306 gui_gtk_register_stock_icons(void) | |
307 { | |
308 # include "../pixmaps/stock_icons.h" | |
309 GtkIconFactory *factory; | |
310 | |
311 factory = gtk_icon_factory_new(); | |
312 # define ADD_ICON(Name, Data) add_stock_icon(factory, Name, Data, (int)sizeof(Data)) | |
313 | |
314 ADD_ICON("vim-build-tags", stock_vim_build_tags); | |
315 ADD_ICON("vim-find-help", stock_vim_find_help); | |
316 ADD_ICON("vim-save-all", stock_vim_save_all); | |
317 ADD_ICON("vim-session-load", stock_vim_session_load); | |
318 ADD_ICON("vim-session-new", stock_vim_session_new); | |
319 ADD_ICON("vim-session-save", stock_vim_session_save); | |
320 ADD_ICON("vim-shell", stock_vim_shell); | |
321 ADD_ICON("vim-window-maximize", stock_vim_window_maximize); | |
322 ADD_ICON("vim-window-maximize-width", stock_vim_window_maximize_width); | |
323 ADD_ICON("vim-window-minimize", stock_vim_window_minimize); | |
324 ADD_ICON("vim-window-minimize-width", stock_vim_window_minimize_width); | |
325 ADD_ICON("vim-window-split", stock_vim_window_split); | |
326 ADD_ICON("vim-window-split-vertical", stock_vim_window_split_vertical); | |
327 | |
328 # undef ADD_ICON | |
329 gtk_icon_factory_add_default(factory); | |
330 g_object_unref(factory); | |
331 } | |
332 | |
333 #endif /* FEAT_TOOLBAR && HAVE_GTK2 */ | |
334 | |
335 | |
336 /* | |
337 * Only use accelerators when gtk_menu_ensure_uline_accel_group() is | |
338 * available, which is in version 1.2.1. That was the first version where | |
339 * accelerators properly worked (according to the change log). | |
340 */ | |
341 #ifdef GTK_CHECK_VERSION | |
342 # if GTK_CHECK_VERSION(1, 2, 1) | |
343 # define GTK_USE_ACCEL | |
344 # endif | |
345 #endif | |
346 | |
347 #if defined(FEAT_MENU) || defined(PROTO) | |
348 | |
349 /* | |
350 * Translate Vim's mnemonic tagging to GTK+ style and convert to UTF-8 | |
351 * if necessary. The caller must vim_free() the returned string. | |
352 * | |
353 * Input Output | |
354 * _ __ | |
355 * && & | |
356 * & _ stripped if use_mnemonic == FALSE | |
357 * <Tab> end of menu label text | |
358 */ | |
359 static char_u * | |
360 translate_mnemonic_tag(char_u *name, int use_mnemonic) | |
361 { | |
362 char_u *buf; | |
363 char_u *psrc; | |
364 char_u *pdest; | |
365 int n_underscores = 0; | |
366 | |
367 # ifdef HAVE_GTK2 | |
368 name = CONVERT_TO_UTF8(name); | |
369 # endif | |
370 if (name == NULL) | |
371 return NULL; | |
372 | |
373 for (psrc = name; *psrc != NUL && *psrc != TAB; ++psrc) | |
374 if (*psrc == '_') | |
375 ++n_underscores; | |
376 | |
377 buf = alloc((unsigned)(psrc - name + n_underscores + 1)); | |
378 if (buf != NULL) | |
379 { | |
380 pdest = buf; | |
381 for (psrc = name; *psrc != NUL && *psrc != TAB; ++psrc) | |
382 { | |
383 if (*psrc == '_') | |
384 { | |
385 *pdest++ = '_'; | |
386 *pdest++ = '_'; | |
387 } | |
388 else if (*psrc != '&') | |
389 { | |
390 *pdest++ = *psrc; | |
391 } | |
392 else if (*(psrc + 1) == '&') | |
393 { | |
394 *pdest++ = *psrc++; | |
395 } | |
396 else if (use_mnemonic) | |
397 { | |
398 *pdest++ = '_'; | |
399 } | |
400 } | |
401 *pdest = NUL; | |
402 } | |
403 | |
404 # ifdef HAVE_GTK2 | |
405 CONVERT_TO_UTF8_FREE(name); | |
406 # endif | |
407 return buf; | |
408 } | |
409 | |
410 # ifdef HAVE_GTK2 | |
411 | |
412 static void | |
413 menu_item_new(vimmenu_T *menu, GtkWidget *parent_widget) | |
414 { | |
415 GtkWidget *box; | |
416 char_u *text; | |
417 int use_mnemonic; | |
418 | |
419 /* It would be neat to have image menu items, but that would require major | |
420 * changes to Vim's menu system. Not to mention that all the translations | |
421 * had to be updated. */ | |
422 menu->id = gtk_menu_item_new(); | |
423 box = gtk_hbox_new(FALSE, 20); | |
424 | |
425 use_mnemonic = (p_wak[0] != 'n' || !GTK_IS_MENU_BAR(parent_widget)); | |
426 text = translate_mnemonic_tag(menu->name, use_mnemonic); | |
427 | |
428 menu->label = gtk_label_new_with_mnemonic((const char *)text); | |
429 vim_free(text); | |
430 | |
431 gtk_box_pack_start(GTK_BOX(box), menu->label, FALSE, FALSE, 0); | |
432 | |
433 if (menu->actext != NULL && menu->actext[0] != NUL) | |
434 { | |
435 text = CONVERT_TO_UTF8(menu->actext); | |
436 | |
437 gtk_box_pack_end(GTK_BOX(box), | |
438 gtk_label_new((const char *)text), | |
439 FALSE, FALSE, 0); | |
440 | |
441 CONVERT_TO_UTF8_FREE(text); | |
442 } | |
443 | |
444 gtk_container_add(GTK_CONTAINER(menu->id), box); | |
445 gtk_widget_show_all(menu->id); | |
446 } | |
447 | |
448 # else /* !HAVE_GTK2 */ | |
449 | |
450 /* | |
451 * Create a highly customized menu item by hand instead of by using: | |
452 * | |
453 * gtk_menu_item_new_with_label(menu->dname); | |
454 * | |
455 * This is necessary, since there is no other way in GTK+ 1 to get the | |
456 * not automatically parsed accelerator stuff right. | |
457 */ | |
458 static void | |
459 menu_item_new(vimmenu_T *menu, GtkWidget *parent_widget) | |
460 { | |
461 GtkWidget *widget; | |
462 GtkWidget *bin; | |
463 GtkWidget *label; | |
464 char_u *name; | |
465 guint accel_key; | |
466 | |
467 widget = gtk_widget_new(GTK_TYPE_MENU_ITEM, | |
468 "GtkWidget::visible", TRUE, | |
469 "GtkWidget::sensitive", TRUE, | |
470 /* "GtkWidget::parent", parent->submenu_id, */ | |
471 NULL); | |
472 bin = gtk_widget_new(GTK_TYPE_HBOX, | |
473 "GtkWidget::visible", TRUE, | |
474 "GtkWidget::parent", widget, | |
475 "GtkBox::spacing", 16, | |
476 NULL); | |
477 label = gtk_widget_new(GTK_TYPE_ACCEL_LABEL, | |
478 "GtkWidget::visible", TRUE, | |
479 "GtkWidget::parent", bin, | |
480 "GtkAccelLabel::accel_widget", widget, | |
481 "GtkMisc::xalign", 0.0, | |
482 NULL); | |
483 menu->label = label; | |
484 | |
485 if (menu->actext) | |
486 gtk_widget_new(GTK_TYPE_LABEL, | |
487 "GtkWidget::visible", TRUE, | |
488 "GtkWidget::parent", bin, | |
489 "GtkLabel::label", menu->actext, | |
490 "GtkMisc::xalign", 1.0, | |
491 NULL); | |
492 | |
493 /* | |
494 * Translate VIM accelerator tagging into GTK+'s. Note that since GTK uses | |
495 * underscores as the accelerator key, we need to add an additional under- | |
496 * score for each understore that appears in the menu name. | |
497 */ | |
498 # ifdef GTK_USE_ACCEL | |
499 name = translate_mnemonic_tag(menu->name, | |
500 (p_wak[0] != 'n' || !GTK_IS_MENU_BAR(parent_widget))); | |
501 # else | |
502 name = translate_mnemonic_tag(menu->name, FALSE); | |
503 # endif | |
504 | |
505 /* let GTK do its thing */ | |
506 accel_key = gtk_label_parse_uline(GTK_LABEL(label), (const char *)name); | |
507 vim_free(name); | |
508 | |
509 # ifdef GTK_USE_ACCEL | |
510 /* Don't add accelator if 'winaltkeys' is "no". */ | |
511 if (accel_key != GDK_VoidSymbol) | |
512 { | |
513 if (GTK_IS_MENU_BAR(parent_widget)) | |
514 { | |
515 if (*p_wak != 'n') | |
516 gtk_widget_add_accelerator(widget, | |
517 "activate_item", | |
518 gui.accel_group, | |
519 accel_key, GDK_MOD1_MASK, | |
520 (GtkAccelFlags)0); | |
521 } | |
522 else | |
523 { | |
524 gtk_widget_add_accelerator(widget, | |
525 "activate_item", | |
526 gtk_menu_ensure_uline_accel_group(GTK_MENU(parent_widget)), | |
527 accel_key, 0, | |
528 (GtkAccelFlags)0); | |
529 } | |
530 } | |
531 # endif /* GTK_USE_ACCEL */ | |
532 | |
533 menu->id = widget; | |
534 } | |
535 | |
536 # endif /* !HAVE_GTK2 */ | |
537 | |
538 void | |
539 gui_mch_add_menu(vimmenu_T *menu, int idx) | |
540 { | |
541 vimmenu_T *parent; | |
542 GtkWidget *parent_widget; | |
543 | |
544 if (menu->name[0] == ']' || menu_is_popup(menu->name)) | |
545 { | |
546 menu->submenu_id = gtk_menu_new(); | |
547 return; | |
548 } | |
549 | |
550 parent = menu->parent; | |
551 | |
552 if ((parent != NULL && parent->submenu_id == NULL) | |
553 || !menu_is_menubar(menu->name)) | |
554 return; | |
555 | |
556 parent_widget = (parent != NULL) ? parent->submenu_id : gui.menubar; | |
557 menu_item_new(menu, parent_widget); | |
558 | |
559 /* since the tearoff should always appear first, increment idx */ | |
560 if (parent != NULL && !menu_is_popup(parent->name)) | |
561 ++idx; | |
562 | |
563 gtk_menu_shell_insert(GTK_MENU_SHELL(parent_widget), menu->id, idx); | |
564 | |
565 #ifndef HAVE_GTK2 | |
566 /* | |
567 * The "Help" menu is a special case, and should be placed at the far | |
568 * right hand side of the menu-bar. It's detected by its high priority. | |
569 * | |
570 * Right-aligning "Help" is considered bad UI design nowadays. | |
571 * Thus lets disable this for GTK+ 2 to match the environment. | |
572 */ | |
573 if (parent == NULL && menu->priority >= 9999) | |
574 gtk_menu_item_right_justify(GTK_MENU_ITEM(menu->id)); | |
575 #endif | |
576 | |
577 menu->submenu_id = gtk_menu_new(); | |
578 | |
579 gtk_menu_set_accel_group(GTK_MENU(menu->submenu_id), gui.accel_group); | |
580 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menu->id), menu->submenu_id); | |
581 | |
582 menu->tearoff_handle = gtk_tearoff_menu_item_new(); | |
583 if (vim_strchr(p_go, GO_TEAROFF) != NULL) | |
584 gtk_widget_show(menu->tearoff_handle); | |
585 gtk_menu_prepend(GTK_MENU(menu->submenu_id), menu->tearoff_handle); | |
586 } | |
587 | |
588 /*ARGSUSED*/ | |
589 static void | |
590 menu_item_activate(GtkWidget *widget, gpointer data) | |
591 { | |
592 gui_menu_cb((vimmenu_T *)data); | |
593 | |
594 # ifndef HAVE_GTK2 | |
595 /* Work around a bug in GTK+ 1: we don't seem to get a focus-in | |
596 * event after clicking a menu item shown via :popup. */ | |
597 if (!gui.in_focus) | |
598 gui_focus_change(TRUE); | |
599 # endif | |
600 | |
601 /* make sure the menu action is taken immediately */ | |
602 if (gtk_main_level() > 0) | |
603 gtk_main_quit(); | |
604 } | |
605 | |
606 # if defined(FEAT_TOOLBAR) && !defined(HAVE_GTK2) | |
607 /* | |
608 * These are the pixmaps used for the default buttons. | |
609 * Order must exactly match toolbar_names[] in menu.c! | |
610 */ | |
611 static char **(built_in_pixmaps[]) = | |
612 { | |
613 tb_new_xpm, | |
614 tb_open_xpm, | |
615 tb_save_xpm, | |
616 tb_undo_xpm, | |
617 tb_redo_xpm, | |
618 tb_cut_xpm, | |
619 tb_copy_xpm, | |
620 tb_paste_xpm, | |
621 tb_print_xpm, | |
622 tb_help_xpm, | |
623 tb_find_xpm, | |
624 tb_save_all_xpm, | |
625 tb_save_session_xpm, | |
626 tb_new_session_xpm, | |
627 tb_load_session_xpm, | |
628 tb_macro_xpm, | |
629 tb_replace_xpm, | |
630 tb_close_xpm, | |
631 tb_maximize_xpm, | |
632 tb_minimize_xpm, | |
633 tb_split_xpm, | |
634 tb_shell_xpm, | |
635 tb_find_prev_xpm, | |
636 tb_find_next_xpm, | |
637 tb_find_help_xpm, | |
638 tb_make_xpm, | |
639 tb_jump_xpm, | |
640 tb_ctags_xpm, | |
641 tb_vsplit_xpm, | |
642 tb_maxwidth_xpm, | |
643 tb_minwidth_xpm, | |
644 tb_exit_xpm | |
645 }; | |
646 | |
647 /* | |
648 * creates a blank pixmap using tb_blank | |
649 */ | |
650 static void | |
651 pixmap_create_from_xpm(char **xpm, GdkPixmap **pixmap, GdkBitmap **mask) | |
652 { | |
653 *pixmap = gdk_pixmap_colormap_create_from_xpm_d( | |
654 NULL, | |
655 gtk_widget_get_colormap(gui.mainwin), | |
656 mask, | |
657 NULL, | |
658 xpm); | |
659 } | |
660 | |
661 /* | |
662 * creates a pixmap by using a built-in number | |
663 */ | |
664 static void | |
665 pixmap_create_by_num(int pixmap_num, GdkPixmap **pixmap, GdkBitmap **mask) | |
666 { | |
667 if (pixmap_num >= 0 && pixmap_num < (sizeof(built_in_pixmaps) | |
668 / sizeof(built_in_pixmaps[0]))) | |
669 pixmap_create_from_xpm(built_in_pixmaps[pixmap_num], pixmap, mask); | |
670 } | |
671 | |
672 /* | |
673 * Creates a pixmap by using the pixmap "name" found in 'runtimepath'/bitmaps/ | |
674 */ | |
675 static void | |
676 pixmap_create_by_dir(char_u *name, GdkPixmap **pixmap, GdkBitmap **mask) | |
677 { | |
678 char_u full_pathname[MAXPATHL + 1]; | |
679 | |
680 if (gui_find_bitmap(name, full_pathname, "xpm") == OK) | |
681 *pixmap = gdk_pixmap_colormap_create_from_xpm( | |
682 NULL, | |
683 gtk_widget_get_colormap(gui.mainwin), | |
684 mask, | |
685 &gui.mainwin->style->bg[GTK_STATE_NORMAL], | |
686 (const char *)full_pathname); | |
687 } | |
688 | |
689 /* | |
690 * Creates a pixmap by using the pixmap "fname". | |
691 */ | |
692 static void | |
693 pixmap_create_from_file(char_u *fname, GdkPixmap **pixmap, GdkBitmap **mask) | |
694 { | |
695 *pixmap = gdk_pixmap_colormap_create_from_xpm( | |
696 NULL, | |
697 gtk_widget_get_colormap(gui.mainwin), | |
698 mask, | |
699 &gui.mainwin->style->bg[GTK_STATE_NORMAL], | |
700 (const char *)fname); | |
701 } | |
702 | |
703 # endif /* FEAT_TOOLBAR && !HAVE_GTK2 */ | |
704 | |
705 void | |
706 gui_mch_add_menu_item(vimmenu_T *menu, int idx) | |
707 { | |
708 vimmenu_T *parent; | |
709 | |
710 parent = menu->parent; | |
711 | |
712 # ifdef FEAT_TOOLBAR | |
713 if (menu_is_toolbar(parent->name)) | |
714 { | |
715 GtkToolbar *toolbar; | |
716 | |
717 toolbar = GTK_TOOLBAR(gui.toolbar); | |
718 menu->submenu_id = NULL; | |
719 | |
720 if (menu_is_separator(menu->name)) | |
721 { | |
722 gtk_toolbar_insert_space(toolbar, idx); | |
723 menu->id = NULL; | |
724 } | |
725 else | |
726 { | |
727 # ifdef HAVE_GTK2 | |
728 char_u *text; | |
729 char_u *tooltip; | |
730 | |
731 text = CONVERT_TO_UTF8(menu->dname); | |
732 tooltip = CONVERT_TO_UTF8(menu->strings[MENU_INDEX_TIP]); | |
733 if (tooltip != NULL && !utf_valid_string(tooltip, NULL)) | |
734 /* Invalid text, can happen when 'encoding' is changed. Avoid | |
735 * a nasty GTK error message, skip the tooltip. */ | |
736 CONVERT_TO_UTF8_FREE(tooltip); | |
737 | |
738 menu->id = gtk_toolbar_insert_item( | |
739 toolbar, | |
740 (const char *)text, | |
741 (const char *)tooltip, | |
742 NULL, | |
743 create_menu_icon(menu, gtk_toolbar_get_icon_size(toolbar)), | |
744 G_CALLBACK(&menu_item_activate), | |
745 menu, | |
746 idx); | |
747 | |
748 if (gtk_socket_id != 0) | |
749 gtk_signal_connect(GTK_OBJECT(menu->id), "focus_in_event", | |
750 GTK_SIGNAL_FUNC(toolbar_button_focus_in_event), NULL); | |
751 | |
752 CONVERT_TO_UTF8_FREE(text); | |
753 CONVERT_TO_UTF8_FREE(tooltip); | |
754 | |
755 # else /* !HAVE_GTK2 */ | |
756 | |
757 GdkPixmap *pixmap = NULL; | |
758 GdkBitmap *mask = NULL; | |
759 | |
760 /* First try user specified bitmap, then builtin, the a blank. */ | |
761 if (menu->iconfile != NULL) | |
762 { | |
763 char_u buf[MAXPATHL + 1]; | |
764 | |
765 gui_find_iconfile(menu->iconfile, buf, "xpm"); | |
766 pixmap_create_from_file(buf, &pixmap, &mask); | |
767 } | |
768 if (pixmap == NULL && !menu->icon_builtin) | |
769 pixmap_create_by_dir(menu->name, &pixmap, &mask); | |
770 if (pixmap == NULL && menu->iconidx >= 0) | |
771 pixmap_create_by_num(menu->iconidx, &pixmap, &mask); | |
772 if (pixmap == NULL) | |
773 pixmap_create_from_xpm(tb_blank_xpm, &pixmap, &mask); | |
774 if (pixmap == NULL) | |
775 return; /* should at least have blank pixmap, but if not... */ | |
776 | |
777 menu->id = gtk_toolbar_insert_item( | |
778 toolbar, | |
779 (char *)(menu->dname), | |
780 (char *)(menu->strings[MENU_INDEX_TIP]), | |
781 (char *)(menu->dname), | |
782 gtk_pixmap_new(pixmap, mask), | |
783 GTK_SIGNAL_FUNC(menu_item_activate), | |
784 (gpointer)menu, | |
785 idx); | |
786 # endif /* !HAVE_GTK2 */ | |
787 } | |
788 } | |
789 else | |
790 # endif /* FEAT_TOOLBAR */ | |
791 { | |
792 /* No parent, must be a non-menubar menu */ | |
793 if (parent == NULL || parent->submenu_id == NULL) | |
794 return; | |
795 | |
796 /* Make place for the possible tearoff handle item. Not in the popup | |
797 * menu, it doesn't have a tearoff item. */ | |
798 if (!menu_is_popup(parent->name)) | |
799 ++idx; | |
800 | |
801 if (menu_is_separator(menu->name)) | |
802 { | |
803 /* Separator: Just add it */ | |
804 menu->id = gtk_menu_item_new(); | |
805 gtk_widget_set_sensitive(menu->id, FALSE); | |
806 gtk_widget_show(menu->id); | |
807 gtk_menu_insert(GTK_MENU(parent->submenu_id), menu->id, idx); | |
808 | |
809 return; | |
810 } | |
811 | |
812 /* Add textual menu item. */ | |
813 menu_item_new(menu, parent->submenu_id); | |
814 gtk_widget_show(menu->id); | |
815 gtk_menu_insert(GTK_MENU(parent->submenu_id), menu->id, idx); | |
816 | |
817 if (menu->id != NULL) | |
818 gtk_signal_connect(GTK_OBJECT(menu->id), "activate", | |
819 GTK_SIGNAL_FUNC(menu_item_activate), menu); | |
820 } | |
821 } | |
822 #endif /* FEAT_MENU */ | |
823 | |
824 | |
825 void | |
826 gui_mch_set_text_area_pos(int x, int y, int w, int h) | |
827 { | |
828 gtk_form_move_resize(GTK_FORM(gui.formwin), gui.drawarea, x, y, w, h); | |
829 } | |
830 | |
831 | |
832 #if defined(FEAT_MENU) || defined(PROTO) | |
833 /* | |
834 * Enable or disable accelerators for the toplevel menus. | |
835 */ | |
836 void | |
837 gui_gtk_set_mnemonics(int enable) | |
838 { | |
839 vimmenu_T *menu; | |
840 char_u *name; | |
841 # if !defined(HAVE_GTK2) && defined(GTK_USE_ACCEL) | |
842 guint accel_key; | |
843 # endif | |
844 | |
845 for (menu = root_menu; menu != NULL; menu = menu->next) | |
846 { | |
847 if (menu->id == NULL) | |
848 continue; | |
849 | |
850 # if defined(HAVE_GTK2) | |
851 name = translate_mnemonic_tag(menu->name, enable); | |
852 gtk_label_set_text_with_mnemonic(GTK_LABEL(menu->label), | |
853 (const char *)name); | |
854 vim_free(name); | |
855 # else | |
856 # if defined(GTK_USE_ACCEL) | |
857 name = translate_mnemonic_tag(menu->name, TRUE); | |
858 if (name != NULL) | |
859 { | |
860 accel_key = gtk_label_parse_uline(GTK_LABEL(menu->label), | |
861 (const char *)name); | |
862 if (accel_key != GDK_VoidSymbol) | |
863 gtk_widget_remove_accelerator(menu->id, gui.accel_group, | |
864 accel_key, GDK_MOD1_MASK); | |
865 if (enable && accel_key != GDK_VoidSymbol) | |
866 gtk_widget_add_accelerator(menu->id, "activate_item", | |
867 gui.accel_group, | |
868 accel_key, GDK_MOD1_MASK, | |
869 (GtkAccelFlags)0); | |
870 vim_free(name); | |
871 } | |
872 if (!enable) | |
873 { | |
874 name = translate_mnemonic_tag(menu->name, FALSE); | |
875 gtk_label_parse_uline(GTK_LABEL(menu->label), (const char *)name); | |
876 vim_free(name); | |
877 } | |
878 # endif | |
879 # endif | |
880 } | |
881 } | |
882 | |
883 static void | |
884 recurse_tearoffs(vimmenu_T *menu, int val) | |
885 { | |
886 for (; menu != NULL; menu = menu->next) | |
887 { | |
888 if (menu->submenu_id != NULL && menu->tearoff_handle != NULL | |
889 && menu->name[0] != ']' && !menu_is_popup(menu->name)) | |
890 { | |
891 if (val) | |
892 gtk_widget_show(menu->tearoff_handle); | |
893 else | |
894 gtk_widget_hide(menu->tearoff_handle); | |
895 } | |
896 recurse_tearoffs(menu->children, val); | |
897 } | |
898 } | |
899 | |
900 void | |
901 gui_mch_toggle_tearoffs(int enable) | |
902 { | |
903 recurse_tearoffs(root_menu, enable); | |
904 } | |
905 #endif /* FEAT_MENU */ | |
906 | |
907 | |
908 #if defined(FEAT_TOOLBAR) && !defined(HAVE_GTK2) | |
909 /* | |
910 * Seems like there's a hole in the GTK Toolbar API: there's no provision for | |
911 * removing an item from the toolbar. Therefore I need to resort to going | |
912 * really deeply into the internal widget structures. | |
913 * | |
914 * <danielk> I'm not sure the statement above is true -- at least with | |
915 * GTK+ 2 one can just call gtk_widget_destroy() and be done with it. | |
916 * It is true though that you couldn't remove space items before GTK+ 2 | |
917 * (without digging into the internals that is). But the code below | |
918 * doesn't seem to handle those either. Well, it's obsolete anyway. | |
919 */ | |
920 static void | |
921 toolbar_remove_item_by_text(GtkToolbar *tb, const char *text) | |
922 { | |
923 GtkContainer *container; | |
924 GList *childl; | |
925 GtkToolbarChild *gtbc; | |
926 | |
927 g_return_if_fail(tb != NULL); | |
928 g_return_if_fail(GTK_IS_TOOLBAR(tb)); | |
929 container = GTK_CONTAINER(&tb->container); | |
930 | |
931 for (childl = tb->children; childl; childl = childl->next) | |
932 { | |
933 gtbc = (GtkToolbarChild *)childl->data; | |
934 | |
935 if (gtbc->type != GTK_TOOLBAR_CHILD_SPACE | |
936 && strcmp(GTK_LABEL(gtbc->label)->label, text) == 0) | |
937 { | |
938 gboolean was_visible; | |
939 | |
940 was_visible = GTK_WIDGET_VISIBLE(gtbc->widget); | |
941 gtk_widget_unparent(gtbc->widget); | |
942 | |
943 tb->children = g_list_remove_link(tb->children, childl); | |
944 g_free(gtbc); | |
945 g_list_free(childl); | |
946 tb->num_children--; | |
947 | |
948 if (was_visible && GTK_WIDGET_VISIBLE(container)) | |
949 gtk_widget_queue_resize(GTK_WIDGET(container)); | |
950 | |
951 break; | |
952 } | |
953 } | |
954 } | |
955 #endif /* FEAT_TOOLBAR && !HAVE_GTK2 */ | |
956 | |
957 | |
958 #if defined(FEAT_TOOLBAR) && defined(HAVE_GTK2) | |
959 static int | |
960 get_menu_position(vimmenu_T *menu) | |
961 { | |
962 vimmenu_T *node; | |
963 int idx = 0; | |
964 | |
965 for (node = menu->parent->children; node != menu; node = node->next) | |
966 { | |
967 g_return_val_if_fail(node != NULL, -1); | |
968 ++idx; | |
969 } | |
970 | |
971 return idx; | |
972 } | |
973 #endif /* FEAT_TOOLBAR && HAVE_GTK2 */ | |
974 | |
975 | |
976 #if defined(FEAT_TOOLBAR) || defined(PROTO) | |
977 void | |
978 gui_mch_menu_set_tip(vimmenu_T *menu) | |
979 { | |
980 if (menu->id != NULL && menu->parent != NULL | |
981 && gui.toolbar != NULL && menu_is_toolbar(menu->parent->name)) | |
982 { | |
983 char_u *tooltip; | |
984 | |
985 # ifdef HAVE_GTK2 | |
986 tooltip = CONVERT_TO_UTF8(menu->strings[MENU_INDEX_TIP]); | |
987 if (tooltip == NULL || utf_valid_string(tooltip, NULL)) | |
988 /* Only set the tooltip when it's valid utf-8. */ | |
989 # else | |
990 tooltip = menu->strings[MENU_INDEX_TIP]; | |
991 # endif | |
992 gtk_tooltips_set_tip(GTK_TOOLBAR(gui.toolbar)->tooltips, | |
993 menu->id, (const char *)tooltip, NULL); | |
994 # ifdef HAVE_GTK2 | |
995 CONVERT_TO_UTF8_FREE(tooltip); | |
996 # endif | |
997 } | |
998 } | |
999 #endif /* FEAT_TOOLBAR */ | |
1000 | |
1001 | |
1002 #if defined(FEAT_MENU) || defined(PROTO) | |
1003 /* | |
1004 * Destroy the machine specific menu widget. | |
1005 */ | |
1006 void | |
1007 gui_mch_destroy_menu(vimmenu_T *menu) | |
1008 { | |
1009 # ifdef FEAT_TOOLBAR | |
1010 if (menu->parent != NULL && menu_is_toolbar(menu->parent->name)) | |
1011 { | |
1012 # ifdef HAVE_GTK2 | |
1013 if (menu_is_separator(menu->name)) | |
1014 gtk_toolbar_remove_space(GTK_TOOLBAR(gui.toolbar), | |
1015 get_menu_position(menu)); | |
1016 else if (menu->id != NULL) | |
1017 gtk_widget_destroy(menu->id); | |
1018 # else | |
1019 toolbar_remove_item_by_text(GTK_TOOLBAR(gui.toolbar), | |
1020 (const char *)menu->dname); | |
1021 # endif | |
1022 } | |
1023 else | |
1024 # endif /* FEAT_TOOLBAR */ | |
1025 { | |
1026 if (menu->submenu_id != NULL) | |
1027 gtk_widget_destroy(menu->submenu_id); | |
1028 | |
1029 if (menu->id != NULL) | |
1030 gtk_widget_destroy(menu->id); | |
1031 } | |
1032 | |
1033 menu->submenu_id = NULL; | |
1034 menu->id = NULL; | |
1035 } | |
1036 #endif /* FEAT_MENU */ | |
1037 | |
1038 | |
1039 /* | |
1040 * Scrollbar stuff. | |
1041 */ | |
1042 void | |
1043 gui_mch_set_scrollbar_thumb(scrollbar_T *sb, long val, long size, long max) | |
1044 { | |
1045 if (sb->id != NULL) | |
1046 { | |
1047 GtkAdjustment *adjustment; | |
1048 | |
1049 adjustment = gtk_range_get_adjustment(GTK_RANGE(sb->id)); | |
1050 | |
1051 adjustment->lower = 0.0; | |
1052 adjustment->value = val; | |
1053 adjustment->upper = max + 1; | |
1054 adjustment->page_size = size; | |
1055 adjustment->page_increment = size < 3L ? 1L : size - 2L; | |
1056 adjustment->step_increment = 1.0; | |
1057 | |
1058 #ifdef HAVE_GTK2 | |
1059 g_signal_handler_block(GTK_OBJECT(adjustment), | |
1060 (gulong)sb->handler_id); | |
1061 #else | |
1062 gtk_signal_handler_block(GTK_OBJECT(adjustment), | |
1063 (guint)sb->handler_id); | |
1064 #endif | |
1065 gtk_adjustment_changed(adjustment); | |
1066 #ifdef HAVE_GTK2 | |
1067 g_signal_handler_unblock(GTK_OBJECT(adjustment), | |
1068 (gulong)sb->handler_id); | |
1069 #else | |
1070 gtk_signal_handler_unblock(GTK_OBJECT(adjustment), | |
1071 (guint)sb->handler_id); | |
1072 #endif | |
1073 } | |
1074 } | |
1075 | |
1076 void | |
1077 gui_mch_set_scrollbar_pos(scrollbar_T *sb, int x, int y, int w, int h) | |
1078 { | |
1079 if (sb->id != NULL) | |
1080 gtk_form_move_resize(GTK_FORM(gui.formwin), sb->id, x, y, w, h); | |
1081 } | |
1082 | |
1083 /* | |
1084 * Take action upon scrollbar dragging. | |
1085 */ | |
1086 static void | |
1087 adjustment_value_changed(GtkAdjustment *adjustment, gpointer data) | |
1088 { | |
1089 scrollbar_T *sb; | |
1090 long value; | |
1091 int dragging = FALSE; | |
1092 | |
1093 #ifdef FEAT_XIM | |
1094 /* cancel any preediting */ | |
1095 if (im_is_preediting()) | |
1096 xim_reset(); | |
1097 #endif | |
1098 | |
1099 sb = gui_find_scrollbar((long)data); | |
1100 value = (long)adjustment->value; | |
1101 /* | |
1102 * The dragging argument must be right for the scrollbar to work with | |
1103 * closed folds. This isn't documented, hopefully this will keep on | |
1104 * working in later GTK versions. | |
1105 * | |
1106 * FIXME: Well, it doesn't work in GTK2. :) | |
1107 * HACK: Get the mouse pointer position, if it appears to be on an arrow | |
1108 * button set "dragging" to FALSE. This assumes square buttons! | |
1109 */ | |
1110 if (sb != NULL) | |
1111 { | |
1112 #ifdef HAVE_GTK2 | |
1113 dragging = TRUE; | |
1114 | |
1115 if (sb->wp != NULL) | |
1116 { | |
1117 int x; | |
1118 int y; | |
1119 GdkModifierType state; | |
1120 int width; | |
1121 int height; | |
1122 | |
1123 /* vertical scrollbar: need to set "dragging" properly in case | |
1124 * there are closed folds. */ | |
1125 gdk_window_get_pointer(sb->id->window, &x, &y, &state); | |
1126 gdk_window_get_size(sb->id->window, &width, &height); | |
1127 if (x >= 0 && x < width && y >= 0 && y < height) | |
1128 { | |
1129 if (y < width) | |
1130 { | |
1131 /* up arrow: move one (closed fold) line up */ | |
1132 dragging = FALSE; | |
1133 value = sb->wp->w_topline - 2; | |
1134 } | |
1135 else if (y > height - width) | |
1136 { | |
1137 /* down arrow: move one (closed fold) line down */ | |
1138 dragging = FALSE; | |
1139 value = sb->wp->w_topline; | |
1140 } | |
1141 } | |
1142 } | |
1143 #else | |
1144 dragging = (GTK_RANGE(sb->id)->scroll_type == GTK_SCROLL_NONE); | |
1145 #endif | |
1146 } | |
1147 | |
1148 gui_drag_scrollbar(sb, value, dragging); | |
1149 | |
1150 if (gtk_main_level() > 0) | |
1151 gtk_main_quit(); | |
1152 } | |
1153 | |
1154 /* SBAR_VERT or SBAR_HORIZ */ | |
1155 void | |
1156 gui_mch_create_scrollbar(scrollbar_T *sb, int orient) | |
1157 { | |
1158 if (orient == SBAR_HORIZ) | |
1159 sb->id = gtk_hscrollbar_new(NULL); | |
1160 else if (orient == SBAR_VERT) | |
1161 sb->id = gtk_vscrollbar_new(NULL); | |
1162 | |
1163 if (sb->id != NULL) | |
1164 { | |
1165 GtkAdjustment *adjustment; | |
1166 | |
1167 GTK_WIDGET_UNSET_FLAGS(sb->id, GTK_CAN_FOCUS); | |
1168 gtk_form_put(GTK_FORM(gui.formwin), sb->id, 0, 0); | |
1169 | |
1170 adjustment = gtk_range_get_adjustment(GTK_RANGE(sb->id)); | |
1171 | |
1172 sb->handler_id = gtk_signal_connect( | |
1173 GTK_OBJECT(adjustment), "value_changed", | |
1174 GTK_SIGNAL_FUNC(adjustment_value_changed), | |
1175 GINT_TO_POINTER(sb->ident)); | |
1176 gui_mch_update(); | |
1177 } | |
1178 } | |
1179 | |
1180 #if defined(FEAT_WINDOWS) || defined(PROTO) | |
1181 void | |
1182 gui_mch_destroy_scrollbar(scrollbar_T *sb) | |
1183 { | |
1184 if (sb->id != NULL) | |
1185 { | |
1186 gtk_widget_destroy(sb->id); | |
1187 sb->id = NULL; | |
1188 } | |
1189 gui_mch_update(); | |
1190 } | |
1191 #endif | |
1192 | |
1193 #if defined(FEAT_BROWSE) || defined(PROTO) | |
1194 /* | |
1195 * Implementation of the file selector related stuff | |
1196 */ | |
1197 #if defined(HAVE_GTK2) && GTK_CHECK_VERSION(2,4,0) | |
34
e170173ecb68
before ack base protocol.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
1198 /* This has been disabled, because the GTK library rewrites |
e170173ecb68
before ack base protocol.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
1199 * ~/.recently-used.xbel every time the main loop is quit. For Vim that means |
e170173ecb68
before ack base protocol.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
1200 * on just about any event. */ |
e170173ecb68
before ack base protocol.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
1201 /* # define USE_FILE_CHOOSER */ |
0 | 1202 #endif |
1203 | |
1204 #ifndef USE_FILE_CHOOSER | |
1205 /*ARGSUSED*/ | |
1206 static void | |
1207 browse_ok_cb(GtkWidget *widget, gpointer cbdata) | |
1208 { | |
1209 gui_T *vw = (gui_T *)cbdata; | |
1210 | |
1211 if (vw->browse_fname != NULL) | |
1212 g_free(vw->browse_fname); | |
1213 | |
1214 vw->browse_fname = (char_u *)g_strdup(gtk_file_selection_get_filename( | |
1215 GTK_FILE_SELECTION(vw->filedlg))); | |
1216 gtk_widget_hide(vw->filedlg); | |
1217 if (gtk_main_level() > 0) | |
1218 gtk_main_quit(); | |
1219 } | |
1220 | |
1221 /*ARGSUSED*/ | |
1222 static void | |
1223 browse_cancel_cb(GtkWidget *widget, gpointer cbdata) | |
1224 { | |
1225 gui_T *vw = (gui_T *)cbdata; | |
1226 | |
1227 if (vw->browse_fname != NULL) | |
1228 { | |
1229 g_free(vw->browse_fname); | |
1230 vw->browse_fname = NULL; | |
1231 } | |
1232 gtk_widget_hide(vw->filedlg); | |
1233 if (gtk_main_level() > 0) | |
1234 gtk_main_quit(); | |
1235 } | |
1236 | |
1237 /*ARGSUSED*/ | |
1238 static gboolean | |
1239 browse_destroy_cb(GtkWidget * widget) | |
1240 { | |
1241 if (gui.browse_fname != NULL) | |
1242 { | |
1243 g_free(gui.browse_fname); | |
1244 gui.browse_fname = NULL; | |
1245 } | |
1246 gui.filedlg = NULL; | |
1247 | |
1248 if (gtk_main_level() > 0) | |
1249 gtk_main_quit(); | |
1250 | |
1251 return FALSE; | |
1252 } | |
1253 #endif | |
1254 | |
1255 /* | |
1256 * Put up a file requester. | |
1257 * Returns the selected name in allocated memory, or NULL for Cancel. | |
1258 * saving, select file to write | |
1259 * title title for the window | |
1260 * dflt default name | |
1261 * ext not used (extension added) | |
1262 * initdir initial directory, NULL for current dir | |
1263 * filter not used (file name filter) | |
1264 */ | |
1265 /*ARGSUSED*/ | |
1266 char_u * | |
1267 gui_mch_browse(int saving, | |
1268 char_u *title, | |
1269 char_u *dflt, | |
1270 char_u *ext, | |
1271 char_u *initdir, | |
1272 char_u *filter) | |
1273 { | |
1274 #ifdef USE_FILE_CHOOSER | |
1275 GtkWidget *fc; | |
1276 #endif | |
1277 char_u dirbuf[MAXPATHL]; | |
1278 | |
1279 # ifdef HAVE_GTK2 | |
1280 title = CONVERT_TO_UTF8(title); | |
1281 # endif | |
1282 | |
1283 /* GTK has a bug, it only works with an absolute path. */ | |
1284 if (initdir == NULL || *initdir == NUL) | |
1285 mch_dirname(dirbuf, MAXPATHL); | |
1286 else if (vim_FullName(initdir, dirbuf, MAXPATHL - 2, FALSE) == FAIL) | |
1287 dirbuf[0] = NUL; | |
1288 /* Always need a trailing slash for a directory. */ | |
1289 add_pathsep(dirbuf); | |
1290 | |
1291 /* If our pointer is currently hidden, then we should show it. */ | |
1292 gui_mch_mousehide(FALSE); | |
1293 | |
1294 #ifdef USE_FILE_CHOOSER | |
1295 /* We create the dialog each time, so that the button text can be "Open" | |
1296 * or "Save" according to the action. */ | |
1297 fc = gtk_file_chooser_dialog_new((const gchar *)title, | |
1298 GTK_WINDOW(gui.mainwin), | |
1299 saving ? GTK_FILE_CHOOSER_ACTION_SAVE | |
1300 : GTK_FILE_CHOOSER_ACTION_OPEN, | |
1301 GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, | |
1302 saving ? GTK_STOCK_SAVE : GTK_STOCK_OPEN, GTK_RESPONSE_ACCEPT, | |
1303 NULL); | |
1304 gtk_file_chooser_set_current_folder(GTK_FILE_CHOOSER(fc), | |
1305 (const gchar *)dirbuf); | |
1306 | |
1307 gui.browse_fname = NULL; | |
1308 if (gtk_dialog_run(GTK_DIALOG(fc)) == GTK_RESPONSE_ACCEPT) | |
1309 { | |
1310 char *filename; | |
1311 | |
1312 filename = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(fc)); | |
1313 gui.browse_fname = (char_u *)g_strdup(filename); | |
1314 g_free(filename); | |
1315 } | |
1316 gtk_widget_destroy(GTK_WIDGET(fc)); | |
1317 | |
1318 #else | |
1319 | |
1320 if (gui.filedlg == NULL) | |
1321 { | |
1322 GtkFileSelection *fs; /* shortcut */ | |
1323 | |
1324 gui.filedlg = gtk_file_selection_new((const gchar *)title); | |
1325 gtk_window_set_modal(GTK_WINDOW(gui.filedlg), TRUE); | |
1326 gtk_window_set_transient_for(GTK_WINDOW(gui.filedlg), | |
1327 GTK_WINDOW(gui.mainwin)); | |
1328 fs = GTK_FILE_SELECTION(gui.filedlg); | |
1329 | |
1330 gtk_container_border_width(GTK_CONTAINER(fs), 4); | |
1331 | |
1332 gtk_signal_connect(GTK_OBJECT(fs->ok_button), | |
1333 "clicked", GTK_SIGNAL_FUNC(browse_ok_cb), &gui); | |
1334 gtk_signal_connect(GTK_OBJECT(fs->cancel_button), | |
1335 "clicked", GTK_SIGNAL_FUNC(browse_cancel_cb), &gui); | |
1336 /* gtk_signal_connect() doesn't work for destroy, it causes a hang */ | |
1337 gtk_signal_connect_object(GTK_OBJECT(gui.filedlg), | |
1338 "destroy", GTK_SIGNAL_FUNC(browse_destroy_cb), | |
1339 GTK_OBJECT(gui.filedlg)); | |
1340 } | |
1341 else | |
1342 gtk_window_set_title(GTK_WINDOW(gui.filedlg), (const gchar *)title); | |
1343 | |
1344 /* Concatenate "initdir" and "dflt". */ | |
1345 if (dflt != NULL && *dflt != NUL | |
1346 && STRLEN(dirbuf) + 2 + STRLEN(dflt) < MAXPATHL) | |
1347 STRCAT(dirbuf, dflt); | |
1348 | |
1349 gtk_file_selection_set_filename(GTK_FILE_SELECTION(gui.filedlg), | |
1350 (const gchar *)dirbuf); | |
1351 # ifndef HAVE_GTK2 | |
1352 gui_gtk_position_in_parent(GTK_WIDGET(gui.mainwin), | |
1353 GTK_WIDGET(gui.filedlg), VW_POS_MOUSE); | |
1354 # endif | |
1355 | |
1356 gtk_widget_show(gui.filedlg); | |
1357 while (gui.filedlg && GTK_WIDGET_DRAWABLE(gui.filedlg)) | |
1358 gtk_main_iteration_do(TRUE); | |
1359 #endif | |
1360 | |
1361 # ifdef HAVE_GTK2 | |
1362 CONVERT_TO_UTF8_FREE(title); | |
1363 # endif | |
1364 if (gui.browse_fname == NULL) | |
1365 return NULL; | |
1366 | |
1367 /* shorten the file name if possible */ | |
1368 return vim_strsave(shorten_fname1(gui.browse_fname)); | |
1369 } | |
1370 | |
1371 #if defined(HAVE_GTK2) || defined(PROTO) | |
1372 | |
1373 /* | |
1374 * Put up a directory selector | |
1375 * Returns the selected name in allocated memory, or NULL for Cancel. | |
1376 * title title for the window | |
1377 * dflt default name | |
1378 * initdir initial directory, NULL for current dir | |
1379 */ | |
1380 /*ARGSUSED*/ | |
1381 char_u * | |
1382 gui_mch_browsedir( | |
1383 char_u *title, | |
1384 char_u *initdir) | |
1385 { | |
1386 # if defined(GTK_FILE_CHOOSER) /* Only in GTK 2.4 and later. */ | |
1387 char_u dirbuf[MAXPATHL]; | |
1388 char_u *p; | |
1389 GtkWidget *dirdlg; /* file selection dialog */ | |
1390 char_u *dirname = NULL; | |
1391 | |
1392 title = CONVERT_TO_UTF8(title); | |
1393 | |
1394 dirdlg = gtk_file_chooser_dialog_new( | |
1395 (const gchar *)title, | |
1396 GTK_WINDOW(gui.mainwin), | |
1397 GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER, | |
1398 GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, | |
1399 GTK_STOCK_OK, GTK_RESPONSE_ACCEPT, | |
1400 NULL); | |
1401 | |
1402 CONVERT_TO_UTF8_FREE(title); | |
1403 | |
1404 /* if our pointer is currently hidden, then we should show it. */ | |
1405 gui_mch_mousehide(FALSE); | |
1406 | |
1407 /* GTK appears to insist on an absolute path. */ | |
1408 if (initdir == NULL || *initdir == NUL | |
1409 || vim_FullName(initdir, dirbuf, MAXPATHL - 10, FALSE) == FAIL) | |
1410 mch_dirname(dirbuf, MAXPATHL - 10); | |
1411 | |
1412 /* Always need a trailing slash for a directory. | |
1413 * Also add a dummy file name, so that we get to the directory. */ | |
1414 add_pathsep(dirbuf); | |
1415 STRCAT(dirbuf, "@zd(*&1|"); | |
1416 gtk_file_chooser_set_filename(GTK_FILE_CHOOSER(dirdlg), | |
1417 (const gchar *)dirbuf); | |
1418 | |
1419 /* Run the dialog. */ | |
1420 if (gtk_dialog_run(GTK_DIALOG(dirdlg)) == GTK_RESPONSE_ACCEPT) | |
1421 dirname = (char_u *)gtk_file_chooser_get_filename( | |
1422 GTK_FILE_CHOOSER(dirdlg)); | |
1423 gtk_widget_destroy(dirdlg); | |
1424 if (dirname == NULL) | |
1425 return NULL; | |
1426 | |
1427 /* shorten the file name if possible */ | |
1428 p = vim_strsave(shorten_fname1(dirname)); | |
1429 g_free(dirname); | |
1430 return p; | |
1431 | |
1432 # else | |
1433 /* For GTK 2.2 and earlier: fall back to ordinary file selector. */ | |
1434 return gui_mch_browse(0, title, NULL, NULL, initdir, NULL); | |
1435 # endif | |
1436 } | |
1437 #endif | |
1438 | |
1439 | |
1440 #endif /* FEAT_BROWSE */ | |
1441 | |
1442 #if defined(FEAT_GUI_DIALOG) && !defined(HAVE_GTK2) | |
1443 | |
1444 static char_u *dialog_textfield = NULL; | |
1445 static GtkWidget *dialog_textentry; | |
1446 | |
1447 static void | |
1448 dlg_destroy(GtkWidget *dlg) | |
1449 { | |
1450 if (dialog_textfield != NULL) | |
1451 { | |
1452 const char *text; | |
1453 | |
1454 text = gtk_entry_get_text(GTK_ENTRY(dialog_textentry)); | |
1455 vim_strncpy(dialog_textfield, (char_u *)text, IOSIZE - 1); | |
1456 } | |
1457 | |
1458 /* Destroy the dialog, will break the waiting loop. */ | |
1459 gtk_widget_destroy(dlg); | |
1460 } | |
1461 | |
1462 # ifdef FEAT_GUI_GNOME | |
1463 /* ARGSUSED */ | |
1464 static int | |
1465 gui_gnome_dialog( int type, | |
1466 char_u *title, | |
1467 char_u *message, | |
1468 char_u *buttons, | |
1469 int dfltbutton, | |
1470 char_u *textfield) | |
1471 { | |
1472 GtkWidget *dlg; | |
1473 char *gdtype; | |
1474 char_u *buttons_copy, *p, *next; | |
1475 char **buttons_list; | |
1476 int butcount, cur; | |
1477 | |
1478 /* make a copy, so that we can insert NULs */ | |
1479 if ((buttons_copy = vim_strsave(buttons)) == NULL) | |
1480 return -1; | |
1481 | |
1482 /* determine exact number of buttons and allocate array to hold them */ | |
1483 for (butcount = 0, p = buttons; *p; p++) | |
1484 { | |
1485 if (*p == '\n') | |
1486 butcount++; | |
1487 } | |
1488 butcount++; | |
1489 buttons_list = g_new0(char *, butcount + 1); | |
1490 | |
1491 /* Add pixmap */ | |
1492 switch (type) | |
1493 { | |
1494 case VIM_ERROR: | |
1495 gdtype = GNOME_MESSAGE_BOX_ERROR; | |
1496 break; | |
1497 case VIM_WARNING: | |
1498 gdtype = GNOME_MESSAGE_BOX_WARNING; | |
1499 break; | |
1500 case VIM_INFO: | |
1501 gdtype = GNOME_MESSAGE_BOX_INFO; | |
1502 break; | |
1503 case VIM_QUESTION: | |
1504 gdtype = GNOME_MESSAGE_BOX_QUESTION; | |
1505 break; | |
1506 default: | |
1507 gdtype = GNOME_MESSAGE_BOX_GENERIC; | |
1508 }; | |
1509 | |
1510 p = buttons_copy; | |
1511 for (cur = 0; cur < butcount; ++cur) | |
1512 { | |
1513 for (next = p; *next; ++next) | |
1514 { | |
1515 if (*next == DLG_HOTKEY_CHAR) | |
34
e170173ecb68
before ack base protocol.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
1516 STRMOVE(next, next + 1); |
0 | 1517 if (*next == DLG_BUTTON_SEP) |
1518 { | |
1519 *next++ = NUL; | |
1520 break; | |
1521 } | |
1522 } | |
1523 | |
1524 /* this should probably go into a table, but oh well */ | |
1525 if (g_strcasecmp((char *)p, "Ok") == 0) | |
1526 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_OK); | |
1527 else if (g_strcasecmp((char *)p, "Cancel") == 0) | |
1528 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_CANCEL); | |
1529 else if (g_strcasecmp((char *)p, "Yes") == 0) | |
1530 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_YES); | |
1531 else if (g_strcasecmp((char *)p, "No") == 0) | |
1532 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_NO); | |
1533 else if (g_strcasecmp((char *)p, "Close") == 0) | |
1534 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_CLOSE); | |
1535 else if (g_strcasecmp((char *)p, "Help") == 0) | |
1536 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_HELP); | |
1537 else if (g_strcasecmp((char *)p, "Apply") == 0) | |
1538 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_APPLY); | |
1539 #if 0 | |
1540 /* | |
1541 * these aren't really used that often anyway, but are listed here as | |
1542 * placeholders in case we need them. | |
1543 */ | |
1544 else if (g_strcasecmp((char *)p, "Next") == 0) | |
1545 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_NEXT); | |
1546 else if (g_strcasecmp((char *)p, "Prev") == 0) | |
1547 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_PREV); | |
1548 else if (g_strcasecmp((char *)p, "Up") == 0) | |
1549 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_UP); | |
1550 else if (g_strcasecmp((char *)p, "Down") == 0) | |
1551 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_DOWN); | |
1552 else if (g_strcasecmp((char *)p, "Font") == 0) | |
1553 buttons_list[cur] = g_strdup(GNOME_STOCK_BUTTON_FONT); | |
1554 #endif | |
1555 else | |
1556 buttons_list[cur] = g_strdup((char *)p); | |
1557 | |
1558 if (*next == NUL) | |
1559 break; | |
1560 | |
1561 p = next; | |
1562 } | |
1563 vim_free(buttons_copy); | |
1564 | |
1565 dlg = gnome_message_box_newv((const char *)message, | |
1566 (const char *)gdtype, | |
1567 (const char **)buttons_list); | |
1568 for (cur = 0; cur < butcount; ++cur) | |
1569 g_free(buttons_list[cur]); | |
1570 g_free(buttons_list); | |
1571 | |
1572 dialog_textfield = textfield; | |
1573 if (textfield != NULL) | |
1574 { | |
1575 /* Add text entry field */ | |
1576 dialog_textentry = gtk_entry_new(); | |
1577 gtk_box_pack_start(GTK_BOX(GNOME_DIALOG(dlg)->vbox), dialog_textentry, | |
1578 TRUE, TRUE, 0); | |
1579 gtk_entry_set_text(GTK_ENTRY(dialog_textentry), | |
1580 (const gchar *)textfield); | |
1581 gtk_entry_select_region(GTK_ENTRY(dialog_textentry), 0, | |
1582 STRLEN(textfield)); | |
1583 gtk_entry_set_max_length(GTK_ENTRY(dialog_textentry), IOSIZE - 1); | |
1584 gtk_entry_set_position(GTK_ENTRY(dialog_textentry), STRLEN(textfield)); | |
1585 gtk_widget_show(dialog_textentry); | |
1586 gtk_window_set_focus(GTK_WINDOW(dlg), dialog_textentry); | |
1587 } | |
1588 | |
1589 gtk_signal_connect_object(GTK_OBJECT(dlg), "destroy", | |
1590 GTK_SIGNAL_FUNC(dlg_destroy), GTK_OBJECT(dlg)); | |
1591 gnome_dialog_set_default(GNOME_DIALOG(dlg), dfltbutton + 1); | |
1592 gui_gtk_position_in_parent(GTK_WIDGET(gui.mainwin), | |
1593 GTK_WIDGET(dlg), VW_POS_MOUSE); | |
1594 | |
1595 return (1 + gnome_dialog_run_and_close(GNOME_DIALOG(dlg))); | |
1596 } | |
1597 | |
1598 # endif /* FEAT_GUI_GNOME */ | |
1599 | |
1600 typedef struct _ButtonData | |
1601 { | |
1602 int *status; | |
1603 int index; | |
1604 GtkWidget *dialog; | |
1605 } ButtonData; | |
1606 | |
1607 typedef struct _CancelData | |
1608 { | |
1609 int *status; | |
1610 int ignore_enter; | |
1611 GtkWidget *dialog; | |
1612 } CancelData; | |
1613 | |
1614 /* ARGSUSED */ | |
1615 static void | |
1616 dlg_button_clicked(GtkWidget * widget, ButtonData *data) | |
1617 { | |
1618 *(data->status) = data->index + 1; | |
1619 dlg_destroy(data->dialog); | |
1620 } | |
1621 | |
1622 /* | |
1623 * This makes the Escape key equivalent to the cancel button. | |
1624 */ | |
1625 /*ARGSUSED*/ | |
1626 static int | |
1627 dlg_key_press_event(GtkWidget *widget, GdkEventKey *event, CancelData *data) | |
1628 { | |
1629 /* Ignore hitting Enter (or Space) when there is no default button. */ | |
1630 if (data->ignore_enter && (event->keyval == GDK_Return | |
1631 || event->keyval == ' ')) | |
1632 return TRUE; | |
1633 else /* A different key was pressed, return to normal behavior */ | |
1634 data->ignore_enter = FALSE; | |
1635 | |
1636 if (event->keyval != GDK_Escape && event->keyval != GDK_Return) | |
1637 return FALSE; | |
1638 | |
1639 /* The result value of 0 from a dialog is signaling cancelation. | |
1640 * 1 means OK. */ | |
1641 *(data->status) = (event->keyval == GDK_Return); | |
1642 dlg_destroy(data->dialog); | |
1643 | |
1644 return TRUE; | |
1645 } | |
1646 | |
1647 /* | |
1648 * Callback function for when the dialog was destroyed by a window manager. | |
1649 */ | |
1650 static void | |
1651 dlg_destroy_cb(int *p) | |
1652 { | |
1653 *p = TRUE; /* set dialog_destroyed to break out of the loop */ | |
1654 if (gtk_main_level() > 0) | |
1655 gtk_main_quit(); | |
1656 } | |
1657 | |
1658 /* ARGSUSED */ | |
1659 int | |
1660 gui_mch_dialog( int type, /* type of dialog */ | |
1661 char_u *title, /* title of dialog */ | |
1662 char_u *message, /* message text */ | |
1663 char_u *buttons, /* names of buttons */ | |
1664 int def_but, /* default button */ | |
1665 char_u *textfield) /* text for textfield or NULL */ | |
1666 { | |
1667 char_u *names; | |
1668 char_u *p; | |
1669 int i; | |
1670 int butcount; | |
1671 int dialog_status = -1; | |
1672 int dialog_destroyed = FALSE; | |
1673 int vertical; | |
1674 | |
1675 GtkWidget *dialog; | |
1676 GtkWidget *frame; | |
1677 GtkWidget *vbox; | |
1678 GtkWidget *table; | |
1679 GtkWidget *dialogmessage; | |
1680 GtkWidget *action_area; | |
1681 GtkWidget *sub_area; | |
1682 GtkWidget *separator; | |
1683 GtkAccelGroup *accel_group; | |
1684 GtkWidget *pixmap; | |
1685 GdkPixmap *icon = NULL; | |
1686 GdkBitmap *mask = NULL; | |
1687 char **icon_data = NULL; | |
1688 | |
1689 GtkWidget **button; | |
1690 ButtonData *data; | |
1691 CancelData cancel_data; | |
1692 | |
1693 /* if our pointer is currently hidden, then we should show it. */ | |
1694 gui_mch_mousehide(FALSE); | |
1695 | |
1696 # ifdef FEAT_GUI_GNOME | |
1697 /* If Gnome is available, use it for the dialog. */ | |
1698 if (gtk_socket_id == 0) | |
1699 return gui_gnome_dialog(type, title, message, buttons, def_but, | |
1700 textfield); | |
1701 # endif | |
1702 | |
1703 if (title == NULL) | |
1704 title = (char_u *)_("Vim dialog..."); | |
1705 | |
1706 if ((type < 0) || (type > VIM_LAST_TYPE)) | |
1707 type = VIM_GENERIC; | |
1708 | |
1709 /* Check 'v' flag in 'guioptions': vertical button placement. */ | |
1710 vertical = (vim_strchr(p_go, GO_VERTICAL) != NULL); | |
1711 | |
1712 dialog = gtk_window_new(GTK_WINDOW_DIALOG); | |
1713 gtk_window_set_title(GTK_WINDOW(dialog), (const gchar *)title); | |
1714 gtk_window_set_transient_for(GTK_WINDOW(dialog), GTK_WINDOW(gui.mainwin)); | |
1715 gtk_widget_realize(dialog); | |
1716 gdk_window_set_decorations(dialog->window, GDK_DECOR_BORDER); | |
1717 gdk_window_set_functions(dialog->window, GDK_FUNC_MOVE); | |
1718 | |
1719 cancel_data.status = &dialog_status; | |
1720 cancel_data.dialog = dialog; | |
1721 gtk_signal_connect_after(GTK_OBJECT(dialog), "key_press_event", | |
1722 GTK_SIGNAL_FUNC(dlg_key_press_event), | |
1723 (gpointer) &cancel_data); | |
1724 /* Catch the destroy signal, otherwise we don't notice a window manager | |
1725 * destroying the dialog window. */ | |
1726 gtk_signal_connect_object(GTK_OBJECT(dialog), "destroy", | |
1727 GTK_SIGNAL_FUNC(dlg_destroy_cb), | |
1728 (gpointer)&dialog_destroyed); | |
1729 | |
1730 gtk_grab_add(dialog); | |
1731 | |
1732 /* this makes it look beter on Motif style window managers */ | |
1733 frame = gtk_frame_new(NULL); | |
1734 gtk_container_add(GTK_CONTAINER(dialog), frame); | |
1735 gtk_widget_show(frame); | |
1736 | |
1737 vbox = gtk_vbox_new(FALSE, 0); | |
1738 gtk_container_add(GTK_CONTAINER(frame), vbox); | |
1739 gtk_widget_show(vbox); | |
1740 | |
1741 table = gtk_table_new(1, 3, FALSE); | |
1742 gtk_table_set_row_spacings(GTK_TABLE(table), 4); | |
1743 gtk_table_set_col_spacings(GTK_TABLE(table), 8); | |
1744 gtk_container_border_width(GTK_CONTAINER(table), 4); | |
1745 gtk_box_pack_start(GTK_BOX(vbox), table, 4, 4, 0); | |
1746 gtk_widget_show(table); | |
1747 | |
1748 /* Add pixmap */ | |
1749 switch (type) | |
1750 { | |
1751 case VIM_GENERIC: | |
1752 icon_data = generic_xpm; | |
1753 break; | |
1754 case VIM_ERROR: | |
1755 icon_data = error_xpm; | |
1756 break; | |
1757 case VIM_WARNING: | |
1758 icon_data = alert_xpm; | |
1759 break; | |
1760 case VIM_INFO: | |
1761 icon_data = info_xpm; | |
1762 break; | |
1763 case VIM_QUESTION: | |
1764 icon_data = quest_xpm; | |
1765 break; | |
1766 default: | |
1767 icon_data = generic_xpm; | |
1768 }; | |
1769 icon = gdk_pixmap_colormap_create_from_xpm_d(NULL, | |
1770 gtk_widget_get_colormap(dialog), | |
1771 &mask, NULL, icon_data); | |
1772 if (icon) | |
1773 { | |
1774 pixmap = gtk_pixmap_new(icon, mask); | |
1775 /* gtk_misc_set_alignment(GTK_MISC(pixmap), 0.5, 0.5); */ | |
1776 gtk_table_attach_defaults(GTK_TABLE(table), pixmap, 0, 1, 0, 1); | |
1777 gtk_widget_show(pixmap); | |
1778 } | |
1779 | |
1780 /* Add label */ | |
1781 dialogmessage = gtk_label_new((const gchar *)message); | |
1782 gtk_table_attach_defaults(GTK_TABLE(table), dialogmessage, 1, 2, 0, 1); | |
1783 gtk_widget_show(dialogmessage); | |
1784 | |
1785 dialog_textfield = textfield; | |
1786 if (textfield != NULL) | |
1787 { | |
1788 /* Add text entry field */ | |
1789 dialog_textentry = gtk_entry_new(); | |
1790 gtk_widget_set_usize(dialog_textentry, 400, -2); | |
1791 gtk_box_pack_start(GTK_BOX(vbox), dialog_textentry, TRUE, TRUE, 0); | |
1792 gtk_entry_set_text(GTK_ENTRY(dialog_textentry), | |
1793 (const gchar *)textfield); | |
1794 gtk_entry_select_region(GTK_ENTRY(dialog_textentry), 0, | |
1795 STRLEN(textfield)); | |
1796 gtk_entry_set_max_length(GTK_ENTRY(dialog_textentry), IOSIZE - 1); | |
1797 gtk_entry_set_position(GTK_ENTRY(dialog_textentry), STRLEN(textfield)); | |
1798 gtk_widget_show(dialog_textentry); | |
1799 } | |
1800 | |
1801 /* Add box for buttons */ | |
1802 action_area = gtk_hbox_new(FALSE, 0); | |
1803 gtk_container_border_width(GTK_CONTAINER(action_area), 4); | |
1804 gtk_box_pack_end(GTK_BOX(vbox), action_area, FALSE, TRUE, 0); | |
1805 gtk_widget_show(action_area); | |
1806 | |
1807 /* Add a [vh]box in the hbox to center the buttons in the dialog. */ | |
1808 if (vertical) | |
1809 sub_area = gtk_vbox_new(FALSE, 0); | |
1810 else | |
1811 sub_area = gtk_hbox_new(FALSE, 0); | |
1812 gtk_container_set_border_width(GTK_CONTAINER(sub_area), 0); | |
1813 gtk_box_pack_start(GTK_BOX(action_area), sub_area, TRUE, FALSE, 0); | |
1814 gtk_widget_show(sub_area); | |
1815 | |
1816 /* | |
1817 * Create the buttons. | |
1818 */ | |
1819 | |
1820 /* | |
1821 * Translate the Vim accelerator character into an underscore for GTK+. | |
1822 * Double underscores to keep them in the label. | |
1823 */ | |
1824 /* count the number of underscores */ | |
1825 i = 1; | |
1826 for (p = buttons; *p; ++p) | |
1827 if (*p == '_') | |
1828 ++i; | |
1829 | |
1830 /* make a copy of "buttons" with the translated characters */ | |
1831 names = alloc(STRLEN(buttons) + i); | |
1832 if (names == NULL) | |
1833 return -1; | |
1834 | |
1835 p = names; | |
1836 for (i = 0; buttons[i]; ++i) | |
1837 { | |
1838 if (buttons[i] == DLG_HOTKEY_CHAR) | |
1839 *p++ = '_'; | |
1840 else | |
1841 { | |
1842 if (buttons[i] == '_') | |
1843 *p++ = '_'; | |
1844 *p++ = buttons[i]; | |
1845 } | |
1846 } | |
1847 *p = NUL; | |
1848 | |
1849 /* Count the number of buttons and allocate button[] and data[]. */ | |
1850 butcount = 1; | |
1851 for (p = names; *p; ++p) | |
1852 if (*p == DLG_BUTTON_SEP) | |
1853 ++butcount; | |
1854 button = (GtkWidget **)alloc((unsigned)(butcount * sizeof(GtkWidget *))); | |
1855 data = (ButtonData *)alloc((unsigned)(butcount * sizeof(ButtonData))); | |
1856 if (button == NULL || data == NULL) | |
1857 { | |
1858 vim_free(names); | |
1859 vim_free(button); | |
1860 vim_free(data); | |
1861 return -1; | |
1862 } | |
1863 | |
1864 /* Attach the new accelerator group to the window. */ | |
1865 accel_group = gtk_accel_group_new(); | |
1866 gtk_accel_group_attach(accel_group, GTK_OBJECT(dialog)); | |
1867 | |
1868 p = names; | |
1869 for (butcount = 0; *p; ++butcount) | |
1870 { | |
1871 char_u *next; | |
1872 GtkWidget *label; | |
1873 # ifdef GTK_USE_ACCEL | |
1874 guint accel_key; | |
1875 # endif | |
1876 | |
1877 /* Chunk out this single button. */ | |
1878 for (next = p; *next; ++next) | |
1879 { | |
1880 if (*next == DLG_BUTTON_SEP) | |
1881 { | |
1882 *next++ = NUL; | |
1883 break; | |
1884 } | |
1885 } | |
1886 | |
1887 button[butcount] = gtk_button_new(); | |
1888 GTK_WIDGET_SET_FLAGS(button[butcount], GTK_CAN_DEFAULT); | |
1889 | |
1890 label = gtk_accel_label_new(""); | |
1891 gtk_accel_label_set_accel_widget(GTK_ACCEL_LABEL(label), dialog); | |
1892 | |
1893 # ifdef GTK_USE_ACCEL | |
1894 accel_key = gtk_label_parse_uline(GTK_LABEL(label), (const gchar *)p); | |
1895 /* Don't add accelator if 'winaltkeys' is "no". */ | |
1896 if (accel_key != GDK_VoidSymbol) | |
1897 { | |
1898 gtk_widget_add_accelerator(button[butcount], | |
1899 "clicked", | |
1900 accel_group, | |
1901 accel_key, 0, | |
1902 (GtkAccelFlags)0); | |
1903 } | |
1904 # else | |
1905 (void)gtk_label_parse_uline(GTK_LABEL(label), (const gchar *)p); | |
1906 # endif | |
1907 | |
1908 gtk_container_add(GTK_CONTAINER(button[butcount]), label); | |
1909 gtk_widget_show_all(button[butcount]); | |
1910 | |
1911 data[butcount].status = &dialog_status; | |
1912 data[butcount].index = butcount; | |
1913 data[butcount].dialog = dialog; | |
1914 gtk_signal_connect(GTK_OBJECT(button[butcount]), | |
1915 (const char *)"clicked", | |
1916 GTK_SIGNAL_FUNC(dlg_button_clicked), | |
1917 (gpointer) &data[butcount]); | |
1918 | |
1919 gtk_box_pack_start(GTK_BOX(sub_area), button[butcount], | |
1920 TRUE, FALSE, 0); | |
1921 p = next; | |
1922 } | |
1923 | |
1924 vim_free(names); | |
1925 | |
1926 cancel_data.ignore_enter = FALSE; | |
1927 if (butcount > 0) | |
1928 { | |
1929 --def_but; /* 1 is first button */ | |
1930 if (def_but >= butcount) | |
1931 def_but = -1; | |
1932 if (def_but >= 0) | |
1933 { | |
1934 gtk_widget_grab_focus(button[def_but]); | |
1935 gtk_widget_grab_default(button[def_but]); | |
1936 } | |
1937 else | |
1938 /* No default, ignore hitting Enter. */ | |
1939 cancel_data.ignore_enter = TRUE; | |
1940 } | |
1941 | |
1942 if (textfield != NULL) | |
1943 gtk_window_set_focus(GTK_WINDOW(dialog), dialog_textentry); | |
1944 | |
1945 separator = gtk_hseparator_new(); | |
1946 gtk_box_pack_end(GTK_BOX(vbox), separator, FALSE, TRUE, 0); | |
1947 gtk_widget_show(separator); | |
1948 | |
1949 dialog_status = -1; | |
1950 | |
1951 gui_gtk_position_in_parent(GTK_WIDGET(gui.mainwin), | |
1952 GTK_WIDGET(dialog), VW_POS_MOUSE); | |
1953 | |
1954 gtk_widget_show(dialog); | |
1955 | |
1956 /* loop here until the dialog goes away */ | |
1957 while (dialog_status == -1 && !dialog_destroyed | |
1958 && GTK_WIDGET_DRAWABLE(dialog)) | |
1959 gtk_main_iteration_do(TRUE); | |
1960 | |
1961 if (dialog_status < 0) | |
1962 dialog_status = 0; | |
1963 if (dialog_status != 1 && textfield != NULL) | |
1964 *textfield = NUL; /* dialog was cancelled */ | |
1965 | |
1966 /* let the garbage collector know that we don't need it any longer */ | |
1967 gtk_accel_group_unref(accel_group); | |
1968 | |
1969 vim_free(button); | |
1970 vim_free(data); | |
1971 | |
1972 return dialog_status; | |
1973 } | |
1974 | |
1975 #endif /* FEAT_GUI_DIALOG && !HAVE_GTK2 */ | |
1976 | |
1977 | |
1978 #if (defined(FEAT_GUI_DIALOG) && defined(HAVE_GTK2)) || defined(PROTO) | |
1979 | |
1980 static GtkWidget * | |
1981 create_message_dialog(int type, char_u *title, char_u *message) | |
1982 { | |
1983 GtkWidget *dialog; | |
1984 GtkMessageType message_type; | |
1985 | |
1986 switch (type) | |
1987 { | |
1988 case VIM_ERROR: message_type = GTK_MESSAGE_ERROR; break; | |
1989 case VIM_WARNING: message_type = GTK_MESSAGE_WARNING; break; | |
1990 case VIM_QUESTION: message_type = GTK_MESSAGE_QUESTION; break; | |
1991 default: message_type = GTK_MESSAGE_INFO; break; | |
1992 } | |
1993 | |
1994 message = CONVERT_TO_UTF8(message); | |
1995 dialog = gtk_message_dialog_new(GTK_WINDOW(gui.mainwin), | |
1996 GTK_DIALOG_DESTROY_WITH_PARENT, | |
1997 message_type, | |
1998 GTK_BUTTONS_NONE, | |
1999 "%s", (const char *)message); | |
2000 CONVERT_TO_UTF8_FREE(message); | |
2001 | |
2002 if (title != NULL) | |
2003 { | |
2004 title = CONVERT_TO_UTF8(title); | |
2005 gtk_window_set_title(GTK_WINDOW(dialog), (const char *)title); | |
2006 CONVERT_TO_UTF8_FREE(title); | |
2007 } | |
2008 else if (type == VIM_GENERIC) | |
2009 { | |
2010 gtk_window_set_title(GTK_WINDOW(dialog), "VIM"); | |
2011 } | |
2012 | |
2013 return dialog; | |
2014 } | |
2015 | |
2016 /* | |
2017 * Split up button_string into individual button labels by inserting | |
2018 * NUL bytes. Also replace the Vim-style mnemonic accelerator prefix | |
2019 * '&' with '_'. button_string must point to allocated memory! | |
2020 * Return an allocated array of pointers into button_string. | |
2021 */ | |
2022 static char ** | |
2023 split_button_string(char_u *button_string, int *n_buttons) | |
2024 { | |
2025 char **array; | |
2026 char_u *p; | |
2027 unsigned int count = 1; | |
2028 | |
2029 for (p = button_string; *p != NUL; ++p) | |
2030 if (*p == DLG_BUTTON_SEP) | |
2031 ++count; | |
2032 | |
2033 array = (char **)alloc((count + 1) * sizeof(char *)); | |
2034 count = 0; | |
2035 | |
2036 if (array != NULL) | |
2037 { | |
2038 array[count++] = (char *)button_string; | |
2039 for (p = button_string; *p != NUL; ) | |
2040 { | |
2041 if (*p == DLG_BUTTON_SEP) | |
2042 { | |
2043 *p++ = NUL; | |
2044 array[count++] = (char *)p; | |
2045 } | |
2046 else if (*p == DLG_HOTKEY_CHAR) | |
2047 *p++ = '_'; | |
2048 else | |
2049 mb_ptr_adv(p); | |
2050 } | |
2051 array[count] = NULL; /* currently not relied upon, but doesn't hurt */ | |
2052 } | |
2053 | |
2054 *n_buttons = count; | |
2055 return array; | |
2056 } | |
2057 | |
2058 static char ** | |
2059 split_button_translation(const char *message) | |
2060 { | |
2061 char **buttons = NULL; | |
2062 char_u *str; | |
2063 int n_buttons = 0; | |
2064 int n_expected = 1; | |
2065 | |
2066 for (str = (char_u *)message; *str != NUL; ++str) | |
2067 if (*str == DLG_BUTTON_SEP) | |
2068 ++n_expected; | |
2069 | |
2070 str = (char_u *)_(message); | |
2071 if (str != NULL) | |
2072 { | |
2073 if (output_conv.vc_type != CONV_NONE) | |
2074 str = string_convert(&output_conv, str, NULL); | |
2075 else | |
2076 str = vim_strsave(str); | |
2077 | |
2078 if (str != NULL) | |
2079 buttons = split_button_string(str, &n_buttons); | |
2080 } | |
2081 /* | |
2082 * Uh-oh... this should never ever happen. But we don't wanna crash | |
2083 * if the translation is broken, thus fall back to the untranslated | |
2084 * buttons string in case of emergency. | |
2085 */ | |
2086 if (buttons == NULL || n_buttons != n_expected) | |
2087 { | |
2088 vim_free(buttons); | |
2089 vim_free(str); | |
2090 buttons = NULL; | |
2091 str = vim_strsave((char_u *)message); | |
2092 | |
2093 if (str != NULL) | |
2094 buttons = split_button_string(str, &n_buttons); | |
2095 if (buttons == NULL) | |
2096 vim_free(str); | |
2097 } | |
2098 | |
2099 return buttons; | |
2100 } | |
2101 | |
2102 static int | |
2103 button_equal(const char *a, const char *b) | |
2104 { | |
2105 while (*a != '\0' && *b != '\0') | |
2106 { | |
2107 if (*a == '_' && *++a == '\0') | |
2108 break; | |
2109 if (*b == '_' && *++b == '\0') | |
2110 break; | |
2111 | |
2112 if (g_unichar_tolower(g_utf8_get_char(a)) | |
2113 != g_unichar_tolower(g_utf8_get_char(b))) | |
2114 return FALSE; | |
2115 | |
2116 a = g_utf8_next_char(a); | |
2117 b = g_utf8_next_char(b); | |
2118 } | |
2119 | |
2120 return (*a == '\0' && *b == '\0'); | |
2121 } | |
2122 | |
2123 static void | |
2124 dialog_add_buttons(GtkDialog *dialog, char_u *button_string) | |
2125 { | |
2126 char **ok; | |
2127 char **ync; /* "yes no cancel" */ | |
2128 char **buttons; | |
2129 int n_buttons = 0; | |
2130 int idx; | |
2131 | |
2132 button_string = vim_strsave(button_string); /* must be writable */ | |
2133 if (button_string == NULL) | |
2134 return; | |
2135 | |
2136 /* Check 'v' flag in 'guioptions': vertical button placement. */ | |
2137 if (vim_strchr(p_go, GO_VERTICAL) != NULL) | |
2138 { | |
2139 GtkWidget *vbutton_box; | |
2140 | |
2141 vbutton_box = gtk_vbutton_box_new(); | |
2142 gtk_widget_show(vbutton_box); | |
2143 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(dialog)->vbox), | |
2144 vbutton_box, TRUE, FALSE, 0); | |
2145 /* Overrule the "action_area" value, hopefully this works... */ | |
2146 GTK_DIALOG(dialog)->action_area = vbutton_box; | |
2147 } | |
2148 | |
2149 /* | |
2150 * Yes this is ugly, I don't particularly like it either. But doing it | |
2151 * this way has the compelling advantage that translations need not to | |
2152 * be touched at all. See below what 'ok' and 'ync' are used for. | |
2153 */ | |
2154 ok = split_button_translation(N_("&Ok")); | |
2155 ync = split_button_translation(N_("&Yes\n&No\n&Cancel")); | |
2156 buttons = split_button_string(button_string, &n_buttons); | |
2157 | |
2158 /* | |
2159 * Yes, the buttons are in reversed order to match the GNOME 2 desktop | |
2160 * environment. Don't hit me -- it's all about consistency. | |
2161 * Well, apparently somebody changed his mind: with GTK 2.2.4 it works the | |
2162 * other way around... | |
2163 */ | |
2164 for (idx = 1; idx <= n_buttons; ++idx) | |
2165 { | |
2166 char *label; | |
2167 char_u *label8; | |
2168 | |
2169 label = buttons[idx - 1]; | |
2170 /* | |
2171 * Perform some guesswork to find appropriate stock items for the | |
2172 * buttons. We have to compare with a sample of the translated | |
2173 * button string to get things right. Yes, this is hackish :/ | |
2174 * | |
2175 * But even the common button labels aren't necessarily translated, | |
2176 * since anyone can create their own dialogs using Vim functions. | |
2177 * Thus we have to check for those too. | |
2178 */ | |
2179 if (ok != NULL && ync != NULL) /* almost impossible to fail */ | |
2180 { | |
2181 if (button_equal(label, ok[0])) label = GTK_STOCK_OK; | |
2182 else if (button_equal(label, ync[0])) label = GTK_STOCK_YES; | |
2183 else if (button_equal(label, ync[1])) label = GTK_STOCK_NO; | |
2184 else if (button_equal(label, ync[2])) label = GTK_STOCK_CANCEL; | |
2185 else if (button_equal(label, "Ok")) label = GTK_STOCK_OK; | |
2186 else if (button_equal(label, "Yes")) label = GTK_STOCK_YES; | |
2187 else if (button_equal(label, "No")) label = GTK_STOCK_NO; | |
2188 else if (button_equal(label, "Cancel")) label = GTK_STOCK_CANCEL; | |
2189 } | |
2190 label8 = CONVERT_TO_UTF8((char_u *)label); | |
2191 gtk_dialog_add_button(dialog, (const gchar *)label8, idx); | |
2192 CONVERT_TO_UTF8_FREE(label8); | |
2193 } | |
2194 | |
2195 if (ok != NULL) | |
2196 vim_free(*ok); | |
2197 if (ync != NULL) | |
2198 vim_free(*ync); | |
2199 vim_free(ok); | |
2200 vim_free(ync); | |
2201 vim_free(buttons); | |
2202 vim_free(button_string); | |
2203 } | |
2204 | |
2205 /* | |
2206 * Allow mnemonic accelerators to be activated without pressing <Alt>. | |
2207 * I'm not sure if it's a wise idea to do this. However, the old GTK+ 1.2 | |
2208 * GUI used to work this way, and I consider the impact on UI consistency | |
2209 * low enough to justify implementing this as a special Vim feature. | |
2210 */ | |
2211 typedef struct _DialogInfo | |
2212 { | |
2213 int ignore_enter; /* no default button, ignore "Enter" */ | |
2214 int noalt; /* accept accelerators without Alt */ | |
2215 GtkDialog *dialog; /* Widget of the dialog */ | |
2216 } DialogInfo; | |
2217 | |
2218 /*ARGSUSED2*/ | |
2219 static gboolean | |
2220 dialog_key_press_event_cb(GtkWidget *widget, GdkEventKey *event, gpointer data) | |
2221 { | |
2222 DialogInfo *di = (DialogInfo *)data; | |
2223 | |
2224 /* Ignore hitting Enter (or Space) when there is no default button. */ | |
2225 if (di->ignore_enter && (event->keyval == GDK_Return | |
2226 || event->keyval == ' ')) | |
2227 return TRUE; | |
2228 else /* A different key was pressed, return to normal behavior */ | |
2229 di->ignore_enter = FALSE; | |
2230 | |
2231 /* Close the dialog when hitting "Esc". */ | |
2232 if (event->keyval == GDK_Escape) | |
2233 { | |
2234 gtk_dialog_response(di->dialog, GTK_RESPONSE_REJECT); | |
2235 return TRUE; | |
2236 } | |
2237 | |
2238 if (di->noalt | |
2239 && (event->state & gtk_accelerator_get_default_mod_mask()) == 0) | |
2240 { | |
2241 return gtk_window_mnemonic_activate( | |
2242 GTK_WINDOW(widget), event->keyval, | |
2243 gtk_window_get_mnemonic_modifier(GTK_WINDOW(widget))); | |
2244 } | |
2245 | |
2246 return FALSE; /* continue emission */ | |
2247 } | |
2248 | |
2249 int | |
2250 gui_mch_dialog(int type, /* type of dialog */ | |
2251 char_u *title, /* title of dialog */ | |
2252 char_u *message, /* message text */ | |
2253 char_u *buttons, /* names of buttons */ | |
2254 int def_but, /* default button */ | |
2255 char_u *textfield) /* text for textfield or NULL */ | |
2256 { | |
2257 GtkWidget *dialog; | |
2258 GtkWidget *entry = NULL; | |
2259 char_u *text; | |
2260 int response; | |
2261 DialogInfo dialoginfo; | |
2262 | |
2263 dialog = create_message_dialog(type, title, message); | |
2264 dialoginfo.dialog = GTK_DIALOG(dialog); | |
2265 dialog_add_buttons(GTK_DIALOG(dialog), buttons); | |
2266 | |
2267 if (textfield != NULL) | |
2268 { | |
2269 GtkWidget *alignment; | |
2270 | |
2271 entry = gtk_entry_new(); | |
2272 gtk_widget_show(entry); | |
2273 | |
2274 text = CONVERT_TO_UTF8(textfield); | |
2275 gtk_entry_set_text(GTK_ENTRY(entry), (const char *)text); | |
2276 CONVERT_TO_UTF8_FREE(text); | |
2277 | |
2278 alignment = gtk_alignment_new((float)0.5, (float)0.5, | |
2279 (float)1.0, (float)1.0); | |
2280 gtk_container_add(GTK_CONTAINER(alignment), entry); | |
2281 gtk_container_set_border_width(GTK_CONTAINER(alignment), 5); | |
2282 gtk_widget_show(alignment); | |
2283 | |
2284 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dialog)->vbox), | |
2285 alignment, TRUE, FALSE, 0); | |
2286 dialoginfo.noalt = FALSE; | |
2287 } | |
2288 else | |
2289 dialoginfo.noalt = TRUE; | |
2290 | |
2291 /* Allow activation of mnemonic accelerators without pressing <Alt> when | |
2292 * there is no textfield. Handle pressing Esc. */ | |
2293 g_signal_connect(G_OBJECT(dialog), "key_press_event", | |
2294 G_CALLBACK(&dialog_key_press_event_cb), &dialoginfo); | |
2295 | |
2296 if (def_but > 0) | |
2297 { | |
2298 gtk_dialog_set_default_response(GTK_DIALOG(dialog), def_but); | |
2299 dialoginfo.ignore_enter = FALSE; | |
2300 } | |
2301 else | |
2302 /* No default button, ignore pressing Enter. */ | |
2303 dialoginfo.ignore_enter = TRUE; | |
2304 | |
2305 /* Show the mouse pointer if it's currently hidden. */ | |
2306 gui_mch_mousehide(FALSE); | |
2307 | |
2308 response = gtk_dialog_run(GTK_DIALOG(dialog)); | |
2309 | |
2310 /* GTK_RESPONSE_NONE means the dialog was programmatically destroyed. */ | |
2311 if (response != GTK_RESPONSE_NONE) | |
2312 { | |
2313 if (response == GTK_RESPONSE_ACCEPT) /* Enter pressed */ | |
2314 response = def_but; | |
2315 if (textfield != NULL) | |
2316 { | |
2317 text = (char_u *)gtk_entry_get_text(GTK_ENTRY(entry)); | |
2318 text = CONVERT_FROM_UTF8(text); | |
2319 | |
2320 vim_strncpy(textfield, text, IOSIZE - 1); | |
2321 | |
2322 CONVERT_FROM_UTF8_FREE(text); | |
2323 } | |
2324 gtk_widget_destroy(dialog); | |
2325 } | |
2326 | |
2327 /* Terrible hack: When the text area still has focus when we remove the | |
2328 * dialog, somehow gvim loses window focus. This is with "point to type" | |
2329 * in the KDE 3.1 window manager. Warp the mouse pointer to outside the | |
2330 * window and back to avoid that. */ | |
2331 if (!gui.in_focus) | |
2332 { | |
2333 int x, y; | |
2334 | |
2335 gdk_window_get_pointer(gui.drawarea->window, &x, &y, NULL); | |
2336 gui_mch_setmouse(-100, -100); | |
2337 gui_mch_setmouse(x, y); | |
2338 } | |
2339 | |
2340 return response > 0 ? response : 0; | |
2341 } | |
2342 | |
2343 #endif /* FEAT_GUI_DIALOG && HAVE_GTK2 */ | |
2344 | |
2345 | |
2346 #if defined(FEAT_MENU) || defined(PROTO) | |
2347 | |
2348 void | |
2349 gui_mch_show_popupmenu(vimmenu_T *menu) | |
2350 { | |
2351 # if defined(FEAT_XIM) && defined(HAVE_GTK2) | |
2352 /* | |
2353 * Append a submenu for selecting an input method. This is | |
2354 * currently the only way to switch input methods at runtime. | |
2355 */ | |
2356 if (xic != NULL && g_object_get_data(G_OBJECT(menu->submenu_id), | |
2357 "vim-has-im-menu") == NULL) | |
2358 { | |
2359 GtkWidget *menuitem; | |
2360 GtkWidget *submenu; | |
2361 char_u *name; | |
2362 | |
2363 menuitem = gtk_separator_menu_item_new(); | |
2364 gtk_widget_show(menuitem); | |
2365 gtk_menu_shell_append(GTK_MENU_SHELL(menu->submenu_id), menuitem); | |
2366 | |
2367 name = (char_u *)_("Input _Methods"); | |
2368 name = CONVERT_TO_UTF8(name); | |
2369 menuitem = gtk_menu_item_new_with_mnemonic((const char *)name); | |
2370 CONVERT_TO_UTF8_FREE(name); | |
2371 gtk_widget_show(menuitem); | |
2372 | |
2373 submenu = gtk_menu_new(); | |
2374 gtk_menu_item_set_submenu(GTK_MENU_ITEM(menuitem), submenu); | |
2375 gtk_menu_shell_append(GTK_MENU_SHELL(menu->submenu_id), menuitem); | |
2376 | |
2377 gtk_im_multicontext_append_menuitems(GTK_IM_MULTICONTEXT(xic), | |
2378 GTK_MENU_SHELL(submenu)); | |
2379 g_object_set_data(G_OBJECT(menu->submenu_id), | |
2380 "vim-has-im-menu", GINT_TO_POINTER(TRUE)); | |
2381 } | |
2382 # endif /* FEAT_XIM && HAVE_GTK2 */ | |
2383 | |
2384 gtk_menu_popup(GTK_MENU(menu->submenu_id), | |
2385 NULL, NULL, | |
2386 (GtkMenuPositionFunc)NULL, NULL, | |
2387 3U, (guint32)GDK_CURRENT_TIME); | |
2388 } | |
2389 | |
2390 /* Ugly global variable to pass "mouse_pos" flag from gui_make_popup() to | |
2391 * popup_menu_position_func(). */ | |
2392 static int popup_mouse_pos; | |
2393 | |
2394 /* | |
2395 * Menu position callback; used by gui_make_popup() to place the menu | |
2396 * at the current text cursor position. | |
2397 * | |
2398 * Note: The push_in output argument seems to affect scrolling of huge | |
2399 * menus that don't fit on the screen. Leave it at the default for now. | |
2400 */ | |
2401 /*ARGSUSED0*/ | |
2402 static void | |
2403 popup_menu_position_func(GtkMenu *menu, | |
2404 gint *x, gint *y, | |
2405 # ifdef HAVE_GTK2 | |
2406 gboolean *push_in, | |
2407 # endif | |
2408 gpointer user_data) | |
2409 { | |
2410 gdk_window_get_origin(gui.drawarea->window, x, y); | |
2411 | |
2412 if (popup_mouse_pos) | |
2413 { | |
2414 int mx, my; | |
2415 | |
2416 gui_mch_getmouse(&mx, &my); | |
2417 *x += mx; | |
2418 *y += my; | |
2419 } | |
2420 else if (curwin != NULL && gui.drawarea != NULL && gui.drawarea->window != NULL) | |
2421 { | |
2422 /* Find the cursor position in the current window */ | |
2423 *x += FILL_X(W_WINCOL(curwin) + curwin->w_wcol + 1) + 1; | |
2424 *y += FILL_Y(W_WINROW(curwin) + curwin->w_wrow + 1) + 1; | |
2425 } | |
2426 } | |
2427 | |
2428 void | |
2429 gui_make_popup(char_u *path_name, int mouse_pos) | |
2430 { | |
2431 vimmenu_T *menu; | |
2432 | |
2433 popup_mouse_pos = mouse_pos; | |
2434 | |
2435 menu = gui_find_menu(path_name); | |
2436 | |
2437 if (menu != NULL && menu->submenu_id != NULL) | |
2438 { | |
2439 gtk_menu_popup(GTK_MENU(menu->submenu_id), | |
2440 NULL, NULL, | |
2441 &popup_menu_position_func, NULL, | |
2442 0U, (guint32)GDK_CURRENT_TIME); | |
2443 } | |
2444 } | |
2445 | |
2446 #endif /* FEAT_MENU */ | |
2447 | |
2448 | |
2449 /* | |
2450 * We don't create it twice. | |
2451 */ | |
2452 | |
2453 typedef struct _SharedFindReplace | |
2454 { | |
2455 GtkWidget *dialog; /* the main dialog widget */ | |
2456 GtkWidget *wword; /* 'Whole word only' check button */ | |
2457 GtkWidget *mcase; /* 'Match case' check button */ | |
2458 GtkWidget *up; /* search direction 'Up' radio button */ | |
2459 GtkWidget *down; /* search direction 'Down' radio button */ | |
2460 GtkWidget *what; /* 'Find what' entry text widget */ | |
2461 GtkWidget *with; /* 'Replace with' entry text widget */ | |
2462 GtkWidget *find; /* 'Find Next' action button */ | |
2463 GtkWidget *replace; /* 'Replace With' action button */ | |
2464 GtkWidget *all; /* 'Replace All' action button */ | |
2465 } SharedFindReplace; | |
2466 | |
2467 static SharedFindReplace find_widgets = { NULL, }; | |
2468 static SharedFindReplace repl_widgets = { NULL, }; | |
2469 | |
2470 /* ARGSUSED */ | |
2471 static int | |
2472 find_key_press_event( | |
2473 GtkWidget *widget, | |
2474 GdkEventKey *event, | |
2475 SharedFindReplace *frdp) | |
2476 { | |
2477 /* If the user is holding one of the key modifiers we will just bail out, | |
2478 * thus preserving the possibility of normal focus traversal. | |
2479 */ | |
2480 if (event->state & (GDK_CONTROL_MASK | GDK_SHIFT_MASK)) | |
2481 return FALSE; | |
2482 | |
2483 /* the Escape key synthesizes a cancellation action */ | |
2484 if (event->keyval == GDK_Escape) | |
2485 { | |
2486 gtk_widget_hide(frdp->dialog); | |
2487 | |
2488 return TRUE; | |
2489 } | |
2490 /* | |
2491 * What the **** is this for? Disabled for GTK+ 2 because due to | |
2492 * gtk_signal_connect_after() it doesn't have any effect anyway. | |
2493 * (Fortunately.) | |
2494 */ | |
2495 #ifndef HAVE_GTK2 | |
2496 /* block traversal resulting from those keys */ | |
2497 if (event->keyval == GDK_Left | |
2498 || event->keyval == GDK_Right | |
2499 || event->keyval == GDK_space) | |
2500 return TRUE; | |
2501 #endif | |
2502 | |
2503 /* It would be delightful if it where possible to do search history | |
2504 * operations on the K_UP and K_DOWN keys here. | |
2505 */ | |
2506 | |
2507 return FALSE; | |
2508 } | |
2509 | |
2510 #ifdef HAVE_GTK2 | |
2511 static GtkWidget * | |
2512 create_image_button(const char *stock_id, const char *label) | |
2513 { | |
2514 char_u *text; | |
2515 GtkWidget *box; | |
2516 GtkWidget *alignment; | |
2517 GtkWidget *button; | |
2518 | |
2519 text = CONVERT_TO_UTF8((char_u *)label); | |
2520 | |
2521 box = gtk_hbox_new(FALSE, 3); | |
2522 gtk_box_pack_start(GTK_BOX(box), | |
2523 gtk_image_new_from_stock(stock_id, GTK_ICON_SIZE_BUTTON), | |
2524 FALSE, FALSE, 0); | |
2525 gtk_box_pack_start(GTK_BOX(box), | |
2526 gtk_label_new((const char *)text), | |
2527 FALSE, FALSE, 0); | |
2528 | |
2529 CONVERT_TO_UTF8_FREE(text); | |
2530 | |
2531 alignment = gtk_alignment_new((float)0.5, (float)0.5, | |
2532 (float)0.0, (float)0.0); | |
2533 gtk_container_add(GTK_CONTAINER(alignment), box); | |
2534 gtk_widget_show_all(alignment); | |
2535 | |
2536 button = gtk_button_new(); | |
2537 gtk_container_add(GTK_CONTAINER(button), alignment); | |
2538 | |
2539 return button; | |
2540 } | |
2541 | |
2542 /* | |
2543 * This is currently only used by find_replace_dialog_create(), and | |
2544 * I'd really like to keep it at that. In other words: don't spread | |
2545 * this nasty hack all over the code. Think twice. | |
2546 */ | |
2547 static const char * | |
2548 convert_localized_message(char_u **buffer, const char *message) | |
2549 { | |
2550 if (output_conv.vc_type == CONV_NONE) | |
2551 return message; | |
2552 | |
2553 vim_free(*buffer); | |
2554 *buffer = string_convert(&output_conv, (char_u *)message, NULL); | |
2555 | |
2556 return (const char *)*buffer; | |
2557 } | |
2558 #endif /* HAVE_GTK2 */ | |
2559 | |
2560 static void | |
2561 find_replace_dialog_create(char_u *arg, int do_replace) | |
2562 { | |
2563 #ifndef HAVE_GTK2 | |
2564 GtkWidget *frame; | |
2565 #endif | |
2566 GtkWidget *hbox; /* main top down box */ | |
2567 GtkWidget *actionarea; | |
2568 GtkWidget *table; | |
2569 GtkWidget *tmp; | |
2570 GtkWidget *vbox; | |
2571 gboolean sensitive; | |
2572 SharedFindReplace *frdp; | |
2573 char_u *entry_text; | |
2574 int wword = FALSE; | |
2575 int mcase = !p_ic; | |
2576 #ifdef HAVE_GTK2 | |
2577 char_u *conv_buffer = NULL; | |
2578 # define CONV(message) convert_localized_message(&conv_buffer, (message)) | |
2579 #else | |
2580 # define CONV(message) (message) | |
2581 #endif | |
2582 | |
2583 frdp = (do_replace) ? (&repl_widgets) : (&find_widgets); | |
2584 | |
2585 /* Get the search string to use. */ | |
2586 entry_text = get_find_dialog_text(arg, &wword, &mcase); | |
2587 | |
2588 #ifdef HAVE_GTK2 | |
2589 if (entry_text != NULL && output_conv.vc_type != CONV_NONE) | |
2590 { | |
2591 char_u *old_text = entry_text; | |
2592 entry_text = string_convert(&output_conv, entry_text, NULL); | |
2593 vim_free(old_text); | |
2594 } | |
2595 #endif | |
2596 | |
2597 /* | |
2598 * If the dialog already exists, just raise it. | |
2599 */ | |
2600 if (frdp->dialog) | |
2601 { | |
2602 #ifndef HAVE_GTK2 | |
2603 /* always make the dialog appear where you want it even if the mainwin | |
2604 * has moved -- dbv */ | |
2605 gui_gtk_position_in_parent(GTK_WIDGET(gui.mainwin), | |
2606 GTK_WIDGET(frdp->dialog), VW_POS_MOUSE); | |
2607 gui_gtk_synch_fonts(); | |
2608 | |
2609 if (!GTK_WIDGET_VISIBLE(frdp->dialog)) | |
2610 { | |
2611 gtk_widget_grab_focus(frdp->what); | |
2612 gtk_widget_show(frdp->dialog); | |
2613 } | |
2614 #endif | |
2615 if (entry_text != NULL) | |
2616 { | |
2617 gtk_entry_set_text(GTK_ENTRY(frdp->what), (char *)entry_text); | |
2618 gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(frdp->wword), | |
2619 (gboolean)wword); | |
2620 gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(frdp->mcase), | |
2621 (gboolean)mcase); | |
2622 } | |
2623 #ifdef HAVE_GTK2 | |
2624 gtk_window_present(GTK_WINDOW(frdp->dialog)); | |
2625 #else | |
2626 gdk_window_raise(frdp->dialog->window); | |
2627 #endif | |
2628 vim_free(entry_text); | |
2629 return; | |
2630 } | |
2631 | |
2632 #ifdef HAVE_GTK2 | |
2633 frdp->dialog = gtk_dialog_new(); | |
2634 gtk_dialog_set_has_separator(GTK_DIALOG(frdp->dialog), FALSE); | |
2635 gtk_window_set_transient_for(GTK_WINDOW(frdp->dialog), GTK_WINDOW(gui.mainwin)); | |
2636 gtk_window_set_destroy_with_parent(GTK_WINDOW(frdp->dialog), TRUE); | |
2637 #else | |
2638 frdp->dialog = gtk_window_new(GTK_WINDOW_DIALOG); | |
2639 #endif | |
2640 | |
2641 if (do_replace) | |
2642 { | |
2643 #ifndef HAVE_GTK2 | |
2644 gtk_window_set_wmclass(GTK_WINDOW(frdp->dialog), "searchrepl", "gvim"); | |
2645 #endif | |
2646 gtk_window_set_title(GTK_WINDOW(frdp->dialog), | |
2647 CONV(_("VIM - Search and Replace..."))); | |
2648 } | |
2649 else | |
2650 { | |
2651 #ifndef HAVE_GTK2 | |
2652 gtk_window_set_wmclass(GTK_WINDOW(frdp->dialog), "search", "gvim"); | |
2653 #endif | |
2654 gtk_window_set_title(GTK_WINDOW(frdp->dialog), | |
2655 CONV(_("VIM - Search..."))); | |
2656 } | |
2657 | |
2658 #ifndef HAVE_GTK2 /* Utter crack. Shudder. */ | |
2659 gtk_widget_realize(frdp->dialog); | |
2660 gdk_window_set_decorations(frdp->dialog->window, | |
2661 GDK_DECOR_TITLE | GDK_DECOR_BORDER | GDK_DECOR_RESIZEH); | |
2662 gdk_window_set_functions(frdp->dialog->window, | |
2663 GDK_FUNC_RESIZE | GDK_FUNC_MOVE); | |
2664 #endif | |
2665 | |
2666 #ifndef HAVE_GTK2 | |
2667 /* this makes it look better on Motif style window managers */ | |
2668 frame = gtk_frame_new(NULL); | |
2669 gtk_container_add(GTK_CONTAINER(frdp->dialog), frame); | |
2670 #endif | |
2671 | |
2672 hbox = gtk_hbox_new(FALSE, 0); | |
2673 #ifdef HAVE_GTK2 | |
2674 gtk_container_set_border_width(GTK_CONTAINER(hbox), 10); | |
2675 gtk_container_add(GTK_CONTAINER(GTK_DIALOG(frdp->dialog)->vbox), hbox); | |
2676 #else | |
2677 gtk_container_add(GTK_CONTAINER(frame), hbox); | |
2678 #endif | |
2679 | |
2680 if (do_replace) | |
2681 table = gtk_table_new(1024, 4, FALSE); | |
2682 else | |
2683 table = gtk_table_new(1024, 3, FALSE); | |
2684 gtk_box_pack_start(GTK_BOX(hbox), table, TRUE, TRUE, 0); | |
2685 gtk_container_border_width(GTK_CONTAINER(table), 4); | |
2686 | |
2687 tmp = gtk_label_new(CONV(_("Find what:"))); | |
2688 gtk_misc_set_alignment(GTK_MISC(tmp), (gfloat)0.0, (gfloat)0.5); | |
2689 gtk_table_attach(GTK_TABLE(table), tmp, 0, 1, 0, 1, | |
2690 GTK_FILL, GTK_EXPAND, 2, 2); | |
2691 frdp->what = gtk_entry_new(); | |
2692 sensitive = (entry_text != NULL && entry_text[0] != NUL); | |
2693 if (entry_text != NULL) | |
2694 gtk_entry_set_text(GTK_ENTRY(frdp->what), (char *)entry_text); | |
2695 gtk_signal_connect(GTK_OBJECT(frdp->what), "changed", | |
2696 GTK_SIGNAL_FUNC(entry_changed_cb), frdp->dialog); | |
2697 gtk_signal_connect_after(GTK_OBJECT(frdp->what), "key_press_event", | |
2698 GTK_SIGNAL_FUNC(find_key_press_event), | |
2699 (gpointer) frdp); | |
2700 gtk_table_attach(GTK_TABLE(table), frdp->what, 1, 1024, 0, 1, | |
2701 GTK_EXPAND | GTK_FILL, GTK_EXPAND, 2, 2); | |
2702 | |
2703 if (do_replace) | |
2704 { | |
2705 tmp = gtk_label_new(CONV(_("Replace with:"))); | |
2706 gtk_misc_set_alignment(GTK_MISC(tmp), (gfloat)0.0, (gfloat)0.5); | |
2707 gtk_table_attach(GTK_TABLE(table), tmp, 0, 1, 1, 2, | |
2708 GTK_FILL, GTK_EXPAND, 2, 2); | |
2709 frdp->with = gtk_entry_new(); | |
2710 gtk_signal_connect(GTK_OBJECT(frdp->with), "activate", | |
2711 GTK_SIGNAL_FUNC(find_replace_cb), | |
2712 GINT_TO_POINTER(FRD_R_FINDNEXT)); | |
2713 gtk_signal_connect_after(GTK_OBJECT(frdp->with), "key_press_event", | |
2714 GTK_SIGNAL_FUNC(find_key_press_event), | |
2715 (gpointer) frdp); | |
2716 gtk_table_attach(GTK_TABLE(table), frdp->with, 1, 1024, 1, 2, | |
2717 GTK_EXPAND | GTK_FILL, GTK_EXPAND, 2, 2); | |
2718 | |
2719 /* | |
2720 * Make the entry activation only change the input focus onto the | |
2721 * with item. | |
2722 */ | |
2723 gtk_signal_connect(GTK_OBJECT(frdp->what), "activate", | |
2724 GTK_SIGNAL_FUNC(entry_activate_cb), frdp->with); | |
2725 } | |
2726 else | |
2727 { | |
2728 /* | |
2729 * Make the entry activation do the search. | |
2730 */ | |
2731 gtk_signal_connect(GTK_OBJECT(frdp->what), "activate", | |
2732 GTK_SIGNAL_FUNC(find_replace_cb), | |
2733 GINT_TO_POINTER(FRD_FINDNEXT)); | |
2734 } | |
2735 | |
2736 /* whole word only button */ | |
2737 frdp->wword = gtk_check_button_new_with_label(CONV(_("Match whole word only"))); | |
2738 gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(frdp->wword), | |
2739 (gboolean)wword); | |
2740 if (do_replace) | |
2741 gtk_table_attach(GTK_TABLE(table), frdp->wword, 0, 1023, 2, 3, | |
2742 GTK_FILL, GTK_EXPAND, 2, 2); | |
2743 else | |
2744 gtk_table_attach(GTK_TABLE(table), frdp->wword, 0, 1023, 1, 2, | |
2745 GTK_FILL, GTK_EXPAND, 2, 2); | |
2746 | |
2747 /* match case button */ | |
2748 frdp->mcase = gtk_check_button_new_with_label(CONV(_("Match case"))); | |
2749 gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(frdp->mcase), | |
2750 (gboolean)mcase); | |
2751 if (do_replace) | |
2752 gtk_table_attach(GTK_TABLE(table), frdp->mcase, 0, 1023, 3, 4, | |
2753 GTK_FILL, GTK_EXPAND, 2, 2); | |
2754 else | |
2755 gtk_table_attach(GTK_TABLE(table), frdp->mcase, 0, 1023, 2, 3, | |
2756 GTK_FILL, GTK_EXPAND, 2, 2); | |
2757 | |
2758 tmp = gtk_frame_new(CONV(_("Direction"))); | |
2759 if (do_replace) | |
2760 gtk_table_attach(GTK_TABLE(table), tmp, 1023, 1024, 2, 4, | |
2761 GTK_FILL, GTK_FILL, 2, 2); | |
2762 else | |
2763 gtk_table_attach(GTK_TABLE(table), tmp, 1023, 1024, 1, 3, | |
2764 GTK_FILL, GTK_FILL, 2, 2); | |
2765 vbox = gtk_vbox_new(FALSE, 0); | |
2766 gtk_container_border_width(GTK_CONTAINER(vbox), 0); | |
2767 gtk_container_add(GTK_CONTAINER(tmp), vbox); | |
2768 | |
2769 /* 'Up' and 'Down' buttons */ | |
2770 frdp->up = gtk_radio_button_new_with_label(NULL, CONV(_("Up"))); | |
2771 gtk_box_pack_start(GTK_BOX(vbox), frdp->up, TRUE, TRUE, 0); | |
2772 frdp->down = gtk_radio_button_new_with_label( | |
2773 gtk_radio_button_group(GTK_RADIO_BUTTON(frdp->up)), | |
2774 CONV(_("Down"))); | |
2775 gtk_toggle_button_set_state(GTK_TOGGLE_BUTTON(frdp->down), TRUE); | |
2776 #ifdef HAVE_GTK2 | |
2777 gtk_container_set_border_width(GTK_CONTAINER(vbox), 2); | |
2778 #endif | |
2779 gtk_box_pack_start(GTK_BOX(vbox), frdp->down, TRUE, TRUE, 0); | |
2780 | |
2781 /* vbox to hold the action buttons */ | |
2782 actionarea = gtk_vbutton_box_new(); | |
2783 gtk_container_border_width(GTK_CONTAINER(actionarea), 2); | |
2784 #ifndef HAVE_GTK2 | |
2785 if (do_replace) | |
2786 { | |
2787 gtk_button_box_set_layout(GTK_BUTTON_BOX(actionarea), | |
2788 GTK_BUTTONBOX_END); | |
2789 gtk_button_box_set_spacing(GTK_BUTTON_BOX(actionarea), 0); | |
2790 } | |
2791 #endif | |
2792 gtk_box_pack_end(GTK_BOX(hbox), actionarea, FALSE, FALSE, 0); | |
2793 | |
2794 /* 'Find Next' button */ | |
2795 #ifdef HAVE_GTK2 | |
2796 frdp->find = create_image_button(GTK_STOCK_FIND, _("Find Next")); | |
2797 #else | |
2798 frdp->find = gtk_button_new_with_label(_("Find Next")); | |
2799 #endif | |
2800 gtk_widget_set_sensitive(frdp->find, sensitive); | |
2801 | |
2802 gtk_signal_connect(GTK_OBJECT(frdp->find), "clicked", | |
2803 GTK_SIGNAL_FUNC(find_replace_cb), | |
2804 (do_replace) ? GINT_TO_POINTER(FRD_R_FINDNEXT) | |
2805 : GINT_TO_POINTER(FRD_FINDNEXT)); | |
2806 | |
2807 GTK_WIDGET_SET_FLAGS(frdp->find, GTK_CAN_DEFAULT); | |
2808 gtk_box_pack_start(GTK_BOX(actionarea), frdp->find, FALSE, FALSE, 0); | |
2809 gtk_widget_grab_default(frdp->find); | |
2810 | |
2811 if (do_replace) | |
2812 { | |
2813 /* 'Replace' button */ | |
2814 #ifdef HAVE_GTK2 | |
2815 frdp->replace = create_image_button(GTK_STOCK_CONVERT, _("Replace")); | |
2816 #else | |
2817 frdp->replace = gtk_button_new_with_label(_("Replace")); | |
2818 #endif | |
2819 gtk_widget_set_sensitive(frdp->replace, sensitive); | |
2820 GTK_WIDGET_SET_FLAGS(frdp->replace, GTK_CAN_DEFAULT); | |
2821 gtk_box_pack_start(GTK_BOX(actionarea), frdp->replace, FALSE, FALSE, 0); | |
2822 gtk_signal_connect(GTK_OBJECT(frdp->replace), "clicked", | |
2823 GTK_SIGNAL_FUNC(find_replace_cb), | |
2824 GINT_TO_POINTER(FRD_REPLACE)); | |
2825 | |
2826 /* 'Replace All' button */ | |
2827 #ifdef HAVE_GTK2 | |
2828 frdp->all = create_image_button(GTK_STOCK_CONVERT, _("Replace All")); | |
2829 #else | |
2830 frdp->all = gtk_button_new_with_label(_("Replace All")); | |
2831 #endif | |
2832 gtk_widget_set_sensitive(frdp->all, sensitive); | |
2833 GTK_WIDGET_SET_FLAGS(frdp->all, GTK_CAN_DEFAULT); | |
2834 gtk_box_pack_start(GTK_BOX(actionarea), frdp->all, FALSE, FALSE, 0); | |
2835 gtk_signal_connect(GTK_OBJECT(frdp->all), "clicked", | |
2836 GTK_SIGNAL_FUNC(find_replace_cb), | |
2837 GINT_TO_POINTER(FRD_REPLACEALL)); | |
2838 } | |
2839 | |
2840 /* 'Cancel' button */ | |
2841 #ifdef HAVE_GTK2 | |
2842 tmp = gtk_button_new_from_stock(GTK_STOCK_CLOSE); | |
2843 #else | |
2844 tmp = gtk_button_new_with_label(_("Cancel")); | |
2845 #endif | |
2846 GTK_WIDGET_SET_FLAGS(tmp, GTK_CAN_DEFAULT); | |
2847 gtk_box_pack_end(GTK_BOX(actionarea), tmp, FALSE, FALSE, 0); | |
2848 gtk_signal_connect_object(GTK_OBJECT(tmp), | |
2849 "clicked", GTK_SIGNAL_FUNC(gtk_widget_hide), | |
2850 GTK_OBJECT(frdp->dialog)); | |
2851 gtk_signal_connect_object(GTK_OBJECT(frdp->dialog), | |
2852 "delete_event", GTK_SIGNAL_FUNC(gtk_widget_hide_on_delete), | |
2853 GTK_OBJECT(frdp->dialog)); | |
2854 | |
2855 tmp = gtk_vseparator_new(); | |
2856 #ifdef HAVE_GTK2 | |
2857 gtk_box_pack_end(GTK_BOX(hbox), tmp, FALSE, FALSE, 10); | |
2858 #else | |
2859 gtk_box_pack_end(GTK_BOX(hbox), tmp, FALSE, TRUE, 0); | |
2860 #endif | |
2861 | |
2862 #ifndef HAVE_GTK2 | |
2863 gtk_widget_grab_focus(frdp->what); | |
2864 | |
2865 /* show the frame and realize the frdp->dialog this gives us a window size | |
2866 * request that we'll use to position the window within the boundary of | |
2867 * the mainwin --dbv */ | |
2868 gtk_widget_show_all(frame); | |
2869 gui_gtk_position_in_parent(GTK_WIDGET(gui.mainwin), | |
2870 GTK_WIDGET(frdp->dialog), VW_POS_MOUSE); | |
2871 gui_gtk_synch_fonts(); | |
2872 gtk_widget_show_all(frdp->dialog); | |
2873 #endif | |
2874 | |
2875 #ifdef HAVE_GTK2 | |
2876 /* Suppress automatic show of the unused action area */ | |
2877 gtk_widget_hide(GTK_DIALOG(frdp->dialog)->action_area); | |
2878 gtk_widget_show_all(hbox); | |
2879 gtk_widget_show(frdp->dialog); | |
2880 #endif | |
2881 | |
2882 vim_free(entry_text); | |
2883 #ifdef HAVE_GTK2 | |
2884 vim_free(conv_buffer); | |
2885 #endif | |
2886 #undef CONV | |
2887 } | |
2888 | |
2889 void | |
2890 gui_mch_find_dialog(exarg_T *eap) | |
2891 { | |
2892 if (gui.in_use) | |
2893 find_replace_dialog_create(eap->arg, FALSE); | |
2894 } | |
2895 | |
2896 void | |
2897 gui_mch_replace_dialog(exarg_T *eap) | |
2898 { | |
2899 if (gui.in_use) | |
2900 find_replace_dialog_create(eap->arg, TRUE); | |
2901 } | |
2902 | |
2903 | |
2904 #if !defined(HAVE_GTK2) || defined(PROTO) | |
2905 /* | |
2906 * Synchronize all gui elements, which are dependant upon the | |
2907 * main text font used. Those are in esp. the find/replace dialogs. | |
2908 * If you don't understand why this should be needed, please try to | |
2909 * search for "pięść" in iso8859-2. | |
2910 * | |
2911 * (<danielk> I converted the comment above to UTF-8 to put | |
2912 * a stopper to the encoding mess. Forgive me :) | |
2913 * | |
2914 * Obsolete with GTK2. | |
2915 */ | |
2916 void | |
2917 gui_gtk_synch_fonts(void) | |
2918 { | |
2919 SharedFindReplace *frdp; | |
2920 int do_replace; | |
2921 | |
2922 /* OK this loop is a bit tricky... */ | |
2923 for (do_replace = 0; do_replace <= 1; ++do_replace) | |
2924 { | |
2925 frdp = (do_replace) ? (&repl_widgets) : (&find_widgets); | |
2926 if (frdp->dialog) | |
2927 { | |
2928 GtkStyle *style; | |
2929 | |
2930 /* synch the font with whats used by the text itself */ | |
2931 style = gtk_style_copy(gtk_widget_get_style(frdp->what)); | |
2932 gdk_font_unref(style->font); | |
2933 # ifdef FEAT_XFONTSET | |
2934 if (gui.fontset != NOFONTSET) | |
2935 style->font = gui.fontset; | |
2936 else | |
2937 # endif | |
2938 style->font = gui.norm_font; | |
2939 gdk_font_ref(style->font); | |
2940 gtk_widget_set_style(frdp->what, style); | |
2941 gtk_style_unref(style); | |
2942 if (do_replace) | |
2943 { | |
2944 style = gtk_style_copy(gtk_widget_get_style(frdp->with)); | |
2945 gdk_font_unref(style->font); | |
2946 # ifdef FEAT_XFONTSET | |
2947 if (gui.fontset != NOFONTSET) | |
2948 style->font = gui.fontset; | |
2949 else | |
2950 # endif | |
2951 style->font = gui.norm_font; | |
2952 gdk_font_ref(style->font); | |
2953 gtk_widget_set_style(frdp->with, style); | |
2954 gtk_style_unref(style); | |
2955 } | |
2956 } | |
2957 } | |
2958 } | |
2959 #endif /* !HAVE_GTK2 */ | |
2960 | |
2961 | |
2962 /* | |
2963 * Callback for actions of the find and replace dialogs | |
2964 */ | |
2965 /*ARGSUSED*/ | |
2966 static void | |
2967 find_replace_cb(GtkWidget *widget, gpointer data) | |
2968 { | |
2969 int flags; | |
2970 char_u *find_text; | |
2971 char_u *repl_text; | |
2972 gboolean direction_down; | |
2973 SharedFindReplace *sfr; | |
2974 int rc; | |
2975 | |
2976 flags = (int)(long)data; /* avoid a lint warning here */ | |
2977 | |
2978 /* Get the search/replace strings from the dialog */ | |
2979 if (flags == FRD_FINDNEXT) | |
2980 { | |
2981 repl_text = NULL; | |
2982 sfr = &find_widgets; | |
2983 } | |
2984 else | |
2985 { | |
2986 repl_text = (char_u *)gtk_entry_get_text(GTK_ENTRY(repl_widgets.with)); | |
2987 sfr = &repl_widgets; | |
2988 } | |
2989 | |
2990 find_text = (char_u *)gtk_entry_get_text(GTK_ENTRY(sfr->what)); | |
2991 direction_down = GTK_TOGGLE_BUTTON(sfr->down)->active; | |
2992 | |
2993 if (GTK_TOGGLE_BUTTON(sfr->wword)->active) | |
2994 flags |= FRD_WHOLE_WORD; | |
2995 if (GTK_TOGGLE_BUTTON(sfr->mcase)->active) | |
2996 flags |= FRD_MATCH_CASE; | |
2997 | |
2998 #ifdef HAVE_GTK2 | |
2999 repl_text = CONVERT_FROM_UTF8(repl_text); | |
3000 find_text = CONVERT_FROM_UTF8(find_text); | |
3001 #endif | |
3002 rc = gui_do_findrepl(flags, find_text, repl_text, direction_down); | |
3003 #ifdef HAVE_GTK2 | |
3004 CONVERT_FROM_UTF8_FREE(repl_text); | |
3005 CONVERT_FROM_UTF8_FREE(find_text); | |
3006 #endif | |
3007 | |
3008 if (rc && gtk_main_level() > 0) | |
3009 gtk_main_quit(); /* make sure cmd will be handled immediately */ | |
3010 } | |
3011 | |
3012 /* our usual callback function */ | |
3013 /*ARGSUSED*/ | |
3014 static void | |
3015 entry_activate_cb(GtkWidget *widget, gpointer data) | |
3016 { | |
3017 gtk_widget_grab_focus(GTK_WIDGET(data)); | |
3018 } | |
3019 | |
3020 /* | |
3021 * Syncing the find/replace dialogs on the fly is utterly useless crack, | |
3022 * and causes nothing but problems. Please tell me a use case for which | |
3023 * you'd need both a find dialog and a find/replace one at the same time, | |
3024 * without being able to actually use them separately since they're syncing | |
3025 * all the time. I don't think it's worthwhile to fix this nonsense, | |
3026 * particularly evil incarnation of braindeadness, whatever; I'd much rather | |
3027 * see it extinguished from this planet. Thanks for listening. Sorry. | |
3028 */ | |
3029 static void | |
3030 entry_changed_cb(GtkWidget * entry, GtkWidget * dialog) | |
3031 { | |
3032 const gchar *entry_text; | |
3033 gboolean nonempty; | |
3034 | |
3035 entry_text = gtk_entry_get_text(GTK_ENTRY(entry)); | |
3036 | |
3037 if (!entry_text) | |
3038 return; /* shouldn't happen */ | |
3039 | |
3040 nonempty = (entry_text[0] != '\0'); | |
3041 | |
3042 if (dialog == find_widgets.dialog) | |
3043 { | |
3044 gtk_widget_set_sensitive(find_widgets.find, nonempty); | |
3045 } | |
3046 | |
3047 if (dialog == repl_widgets.dialog) | |
3048 { | |
3049 gtk_widget_set_sensitive(repl_widgets.find, nonempty); | |
3050 gtk_widget_set_sensitive(repl_widgets.replace, nonempty); | |
3051 gtk_widget_set_sensitive(repl_widgets.all, nonempty); | |
3052 } | |
3053 } | |
3054 | |
3055 /* | |
3056 * ":helpfind" | |
3057 */ | |
3058 /*ARGSUSED*/ | |
3059 void | |
3060 ex_helpfind(eap) | |
3061 exarg_T *eap; | |
3062 { | |
3063 /* This will fail when menus are not loaded. Well, it's only for | |
3064 * backwards compatibility anyway. */ | |
3065 do_cmdline_cmd((char_u *)"emenu ToolBar.FindHelp"); | |
3066 } | |
3067 | |
3068 #if !defined(HAVE_GTK2) || defined(PROTO) /* Crack crack crack. Brrrr. */ | |
3069 | |
3070 /* gui_gtk_position_in_parent | |
3071 * | |
3072 * this function causes a child window to be placed within the boundary of | |
3073 * the parent (mainwin) window. | |
3074 * | |
3075 * you can specify where the window will be positioned by the third argument | |
3076 * (defined in gui.h): | |
3077 * VW_POS_CENTER at center of parent window | |
3078 * VW_POS_MOUSE center of child at mouse position | |
3079 * VW_POS_TOP_CENTER top of child at top of parent centered | |
3080 * horizontally about the mouse. | |
3081 * | |
3082 * NOTE: for this function to act as desired the child window must have a | |
3083 * window size requested. this can be accomplished by packing/placing | |
3084 * child widgets onto a gtk_frame widget rather than the gtk_window | |
3085 * widget... | |
3086 * | |
3087 * brent -- dbv | |
3088 */ | |
3089 static void | |
3090 gui_gtk_position_in_parent( | |
3091 GtkWidget *parent, | |
3092 GtkWidget *child, | |
3093 gui_win_pos_T where) | |
3094 { | |
3095 GtkRequisition c_size; | |
3096 gint xPm, yPm; | |
3097 gint xP, yP, wP, hP, pos_x, pos_y; | |
3098 | |
3099 /* make sure the child widget is set up then get its size. */ | |
3100 gtk_widget_size_request(child, &c_size); | |
3101 | |
3102 /* get origin and size of parent window */ | |
3103 gdk_window_get_origin((GdkWindow *)(parent->window), &xP, &yP); | |
3104 gdk_window_get_size((GdkWindow *)(parent->window), &wP, &hP); | |
3105 | |
3106 if (c_size.width > wP || c_size.height > hP) | |
3107 { | |
3108 /* doh! maybe the user should consider giving gVim a little more | |
3109 * screen real estate */ | |
3110 gtk_widget_set_uposition(child , xP + 2 , yP + 2); | |
3111 return; | |
3112 } | |
3113 | |
3114 if (where == VW_POS_MOUSE) | |
3115 { | |
3116 /* position window at mouse pointer */ | |
3117 gtk_widget_get_pointer(parent, &xPm, &yPm); | |
3118 pos_x = xP + xPm - (c_size.width) / 2; | |
3119 pos_y = yP + yPm - (c_size.height) / 2; | |
3120 } | |
3121 else | |
3122 { | |
3123 /* set child x origin so it is in center of Vim window */ | |
3124 pos_x = xP + (wP - c_size.width) / 2; | |
3125 | |
3126 if (where == VW_POS_TOP_CENTER) | |
3127 pos_y = yP + 2; | |
3128 else | |
3129 /* where == VW_POS_CENTER */ | |
3130 pos_y = yP + (hP - c_size.height) / 2; | |
3131 } | |
3132 | |
3133 /* now, make sure the window will be inside the Vim window... */ | |
3134 if (pos_x < xP) | |
3135 pos_x = xP + 2; | |
3136 if (pos_y < yP) | |
3137 pos_y = yP + 2; | |
3138 if ((pos_x + c_size.width) > (wP + xP)) | |
3139 pos_x = xP + wP - c_size.width - 2; | |
3140 /* Assume 'guiheadroom' indicates the title bar height... */ | |
3141 if ((pos_y + c_size.height + p_ghr / 2) > (hP + yP)) | |
3142 | |
3143 gtk_widget_set_uposition(child, pos_x, pos_y); | |
3144 } | |
3145 | |
3146 #endif /* !HAVE_GTK2 */ |