blob: f221c2981f4b40bf657cef5e3d53bd12dd00b69d [file] [log] [blame]
Bram Moolenaar071d4272004-06-13 20:20:40 +00001/* vi:set ts=8 sts=4 sw=4:
2 *
3 * VIM - Vi IMproved by Bram Moolenaar
4 * Motif support by Robert Webb
5 *
6 * Do ":help uganda" in Vim to read copying and usage conditions.
7 * Do ":help credits" in Vim to see a list of people who contributed.
8 */
9
Bram Moolenaar071d4272004-06-13 20:20:40 +000010#ifdef FEAT_GUI_MOTIF
Bram Moolenaar071d4272004-06-13 20:20:40 +000011# include <Xm/Xm.h>
12#endif
13
14#ifdef FEAT_GUI_ATHENA
Bram Moolenaar071d4272004-06-13 20:20:40 +000015# include <X11/Intrinsic.h>
16# include <X11/StringDefs.h>
17#endif
18
19#ifdef FEAT_BEVAL
20# include "gui_beval.h"
21#endif
22
23#ifdef FEAT_GUI_GTK
24# include <X11/Intrinsic.h>
25# include <gtk/gtk.h>
26#endif
27
Bram Moolenaar071d4272004-06-13 20:20:40 +000028#ifdef FEAT_GUI_MAC
29# include <Types.h>
30/*# include <Memory.h>*/
31# include <Quickdraw.h>
32# include <Fonts.h>
33# include <Events.h>
34# include <Menus.h>
35# if !(defined (TARGET_API_MAC_CARBON) && (TARGET_API_MAC_CARBON))
36# include <Windows.h>
37# endif
38# include <Controls.h>
39/*# include <TextEdit.h>*/
40# include <Dialogs.h>
41# include <OSUtils.h>
42/*
43# include <ToolUtils.h>
44# include <SegLoad.h>*/
45#endif
46
47#ifdef RISCOS
48# include "gui_riscos.h"
49#endif
50
51#ifdef FEAT_GUI_PHOTON
52# include <Ph.h>
53# include <Pt.h>
54# include "photon/PxProto.h"
55#endif
56
57/*
58 * On some systems, when we compile with the GUI, we always use it. On Mac
59 * there is no terminal version, and on Windows we can't figure out how to
60 * fork one off with :gui.
61 */
62#if defined(FEAT_GUI_MSWIN) || (defined(FEAT_GUI_MAC) && !defined(MACOS_X_UNIX))
63# define ALWAYS_USE_GUI
64#endif
65
66#if defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_MAC) || defined(HAVE_GTK2)
67# define USE_ON_FLY_SCROLL
68#endif
69
70/*
71 * GUIs that support dropping files on a running Vim.
72 */
73#if defined(FEAT_GUI_MSWIN) || defined(FEAT_GUI_MAC) \
Bram Moolenaar9372a112005-12-06 19:59:18 +000074 || defined(FEAT_GUI_GTK)
Bram Moolenaar071d4272004-06-13 20:20:40 +000075# define HAVE_DROP_FILE
76#endif
77
78/*
79 * This define makes menus always use a fontset.
80 * We're not sure if this code always works, thus it can be disabled.
81 */
82#ifdef FEAT_XFONTSET
83# define FONTSET_ALWAYS
84#endif
85
86/*
87 * These macros convert between character row/column and pixel coordinates.
88 * TEXT_X - Convert character column into X pixel coord for drawing strings.
89 * TEXT_Y - Convert character row into Y pixel coord for drawing strings.
90 * FILL_X - Convert character column into X pixel coord for filling the area
91 * under the character.
92 * FILL_Y - Convert character row into Y pixel coord for filling the area
93 * under the character.
94 * X_2_COL - Convert X pixel coord into character column.
95 * Y_2_ROW - Convert Y pixel coord into character row.
96 */
97#ifdef FEAT_GUI_W32
98# define TEXT_X(col) ((col) * gui.char_width)
99# define TEXT_Y(row) ((row) * gui.char_height + gui.char_ascent)
100# define FILL_X(col) ((col) * gui.char_width)
101# define FILL_Y(row) ((row) * gui.char_height)
102# define X_2_COL(x) ((x) / gui.char_width)
103# define Y_2_ROW(y) ((y) / gui.char_height)
104#else
105# define TEXT_X(col) ((col) * gui.char_width + gui.border_offset)
106# define FILL_X(col) ((col) * gui.char_width + gui.border_offset)
107# define X_2_COL(x) (((x) - gui.border_offset) / gui.char_width)
108# define TEXT_Y(row) ((row) * gui.char_height + gui.char_ascent \
109 + gui.border_offset)
110# define FILL_Y(row) ((row) * gui.char_height + gui.border_offset)
111# define Y_2_ROW(y) (((y) - gui.border_offset) / gui.char_height)
112#endif
113
114/* Indices for arrays of scrollbars */
115#define SBAR_NONE -1
116#define SBAR_LEFT 0
117#define SBAR_RIGHT 1
118#define SBAR_BOTTOM 2
119
120/* Orientations for scrollbars */
121#define SBAR_VERT 0
122#define SBAR_HORIZ 1
123
124/* Default size of scrollbar */
125#define SB_DEFAULT_WIDTH 16
126
127/* Default height of the menu bar */
128#define MENU_DEFAULT_HEIGHT 1 /* figure it out at runtime */
129
130/* Flags for gui_mch_outstr_nowrap() */
131#define GUI_MON_WRAP_CURSOR 0x01 /* wrap cursor at end of line */
132#define GUI_MON_INVERT 0x02 /* invert the characters */
133#define GUI_MON_IS_CURSOR 0x04 /* drawing cursor */
134#define GUI_MON_TRS_CURSOR 0x08 /* drawing transparent cursor */
135#define GUI_MON_NOCLEAR 0x10 /* don't clear selection */
136
137/* Flags for gui_mch_draw_string() */
138#define DRAW_TRANSP 0x01 /* draw with transparant bg */
139#define DRAW_BOLD 0x02 /* draw bold text */
140#define DRAW_UNDERL 0x04 /* draw underline text */
Bram Moolenaar3918c952005-03-15 22:34:55 +0000141#define DRAW_UNDERC 0x08 /* draw undercurl text */
Bram Moolenaar9372a112005-12-06 19:59:18 +0000142#if defined(RISCOS) || defined(HAVE_GTK2)
Bram Moolenaar3918c952005-03-15 22:34:55 +0000143# define DRAW_ITALIC 0x10 /* draw italic text */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000144#endif
Bram Moolenaar3918c952005-03-15 22:34:55 +0000145#define DRAW_CURSOR 0x20 /* drawing block cursor (win32) */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000146
147/* For our own tearoff menu item */
148#define TEAR_STRING "-->Detach"
149#define TEAR_LEN (9) /* length of above string */
150
151/* for the toolbar */
152#ifdef FEAT_GUI_W16
153# define TOOLBAR_BUTTON_HEIGHT 15
154# define TOOLBAR_BUTTON_WIDTH 16
155#else
156# define TOOLBAR_BUTTON_HEIGHT 18
157# define TOOLBAR_BUTTON_WIDTH 18
158#endif
159#define TOOLBAR_BORDER_HEIGHT 12 /* room above+below buttons for MSWindows */
160
Bram Moolenaar3991dab2006-03-27 17:01:56 +0000161#ifdef FEAT_GUI_MSWIN
Bram Moolenaar2e2a2812006-03-27 20:55:21 +0000162# define TABLINE_HEIGHT 22
Bram Moolenaar3991dab2006-03-27 17:01:56 +0000163#endif
Bram Moolenaar910f66f2006-04-05 20:41:53 +0000164#ifdef FEAT_GUI_MOTIF
165# define TABLINE_HEIGHT 30
166#endif
Bram Moolenaar3991dab2006-03-27 17:01:56 +0000167
Bram Moolenaar9372a112005-12-06 19:59:18 +0000168#if defined(NO_CONSOLE) || defined(FEAT_GUI_GTK) || defined(FEAT_GUI_X11)
Bram Moolenaar071d4272004-06-13 20:20:40 +0000169# define NO_CONSOLE_INPUT /* use no_console_input() to check if there
170 is no console input possible */
171#endif
172
173typedef struct GuiScrollbar
174{
175 long ident; /* Unique identifier for each scrollbar */
Bram Moolenaar1d2ba7f2006-02-14 22:29:30 +0000176 win_T *wp; /* Scrollbar's window, NULL for bottom */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000177 int type; /* one of SBAR_{LEFT,RIGHT,BOTTOM} */
178 long value; /* Represents top line number visible */
179#ifdef FEAT_GUI_ATHENA
180 int pixval; /* pixel count of value */
181#endif
182 long size; /* Size of scrollbar thumb */
183 long max; /* Number of lines in buffer */
184
185 /* Values measured in characters: */
186 int top; /* Top of scroll bar (chars from row 0) */
187 int height; /* Current height of scroll bar in rows */
188#ifdef FEAT_VERTSPLIT
189 int width; /* Current width of scroll bar in cols */
190#endif
191 int status_height; /* Height of status line */
192#ifdef FEAT_GUI_X11
193 Widget id; /* Id of real scroll bar */
194#endif
195#ifdef FEAT_GUI_GTK
196 GtkWidget *id; /* Id of real scroll bar */
197 unsigned long handler_id; /* Id of "value_changed" signal handler */
198#endif
199
200#ifdef FEAT_GUI_MSWIN
201 HWND id; /* Id of real scroll bar */
202 int scroll_shift; /* The scrollbar stuff can handle only up to
203 32767 lines. When the file is longer,
204 scroll_shift is set to the number of shifts
205 to reduce the count. */
206#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000207#ifdef FEAT_GUI_MAC
208 ControlHandle id; /* A handle to the scrollbar */
209#endif
210#ifdef RISCOS
211 int id; /* Window handle of scrollbar window */
212#endif
213#ifdef FEAT_GUI_PHOTON
214 PtWidget_t *id;
215#endif
216} scrollbar_T;
217
218typedef long guicolor_T; /* handle for a GUI color; for X11 this should
219 be "Pixel", but that's an unsigned and we
220 need a signed value */
221#define INVALCOLOR (guicolor_T)-11111 /* number for invalid color; on 32 bit
222 displays there is a tiny chance this is an
223 actual color */
224
225#ifdef FEAT_GUI_GTK
226# ifdef HAVE_GTK2
227 typedef PangoFontDescription *GuiFont; /* handle for a GUI font */
228 typedef PangoFontDescription *GuiFontset; /* handle for a GUI fontset */
229# else
230 typedef GdkFont *GuiFont; /* handle for a GUI font */
231 typedef GdkFont *GuiFontset; /* handle for a GUI fontset */
232# endif
233# define NOFONT (GuiFont)NULL
234# define NOFONTSET (GuiFontset)NULL
235#else
236# ifdef FEAT_GUI_PHOTON
237 typedef char *GuiFont;
238 typedef char *GuiFontset;
239# define NOFONT (GuiFont)NULL
240# define NOFONTSET (GuiFontset)NULL
241# else
242# ifdef FEAT_GUI_X11
243 typedef XFontStruct *GuiFont; /* handle for a GUI font */
244 typedef XFontSet GuiFontset; /* handle for a GUI fontset */
245# define NOFONT (GuiFont)0
246# define NOFONTSET (GuiFontset)0
247# else
248 typedef long_u GuiFont; /* handle for a GUI font */
249 typedef long_u GuiFontset; /* handle for a GUI fontset */
250# define NOFONT (GuiFont)0
251# define NOFONTSET (GuiFontset)0
252# endif
253# endif
254#endif
255
256typedef struct Gui
257{
258 int in_focus; /* Vim has input focus */
259 int in_use; /* Is the GUI being used? */
260 int starting; /* GUI will start in a little while */
261 int shell_created; /* Has the shell been created yet? */
262 int dying; /* Is vim dying? Then output to terminal */
263 int dofork; /* Use fork() when GUI is starting */
264 int dragged_sb; /* Which scrollbar being dragged, if any? */
265 win_T *dragged_wp; /* Which WIN's sb being dragged, if any? */
266 int pointer_hidden; /* Is the mouse pointer hidden? */
267 int col; /* Current cursor column in GUI display */
268 int row; /* Current cursor row in GUI display */
269 int cursor_col; /* Physical cursor column in GUI display */
270 int cursor_row; /* Physical cursor row in GUI display */
271 char cursor_is_valid; /* There is a cursor at cursor_row/col */
272 int num_cols; /* Number of columns */
273 int num_rows; /* Number of rows */
274 int scroll_region_top; /* Top (first) line of scroll region */
275 int scroll_region_bot; /* Bottom (last) line of scroll region */
276 int scroll_region_left; /* Left (first) column of scroll region */
277 int scroll_region_right; /* Right (last) col. of scroll region */
278 int highlight_mask; /* Highlight attribute mask */
279 int scrollbar_width; /* Width of vertical scrollbars */
280 int scrollbar_height; /* Height of horizontal scrollbar */
281 int left_sbar_x; /* Calculated x coord for left scrollbar */
282 int right_sbar_x; /* Calculated x coord for right scrollbar */
283
284#ifdef FEAT_MENU
285# ifndef FEAT_GUI_GTK
286 int menu_height; /* Height of the menu bar */
287 int menu_width; /* Width of the menu bar */
288# endif
289 char menu_is_active; /* TRUE if menu is present */
290# ifdef FEAT_GUI_ATHENA
291 char menu_height_fixed; /* TRUE if menu height fixed */
292# endif
293#endif
294
295 scrollbar_T bottom_sbar; /* Bottom scrollbar */
296 int which_scrollbars[3];/* Which scrollbar boxes are active? */
297 int prev_wrap; /* For updating the horizontal scrollbar */
Bram Moolenaar02743632005-07-25 20:42:36 +0000298 int char_width; /* Width of char cell in pixels */
299 int char_height; /* Height of char cell in pixels, includes
300 'linespace' */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000301 int char_ascent; /* Ascent of char in pixels */
302 int border_width; /* Width of our border around text area */
303 int border_offset; /* Total pixel offset for all borders */
304
305 GuiFont norm_font; /* Normal font */
306#ifndef HAVE_GTK2
307 GuiFont bold_font; /* Bold font */
308 GuiFont ital_font; /* Italic font */
309 GuiFont boldital_font; /* Bold-Italic font */
310#else
311 int font_can_bold; /* Whether norm_font supports bold weight.
312 * The styled font variants are not used. */
313#endif
314
315#if defined(FEAT_MENU) && !defined(HAVE_GTK2)
316# ifdef FONTSET_ALWAYS
317 GuiFontset menu_fontset; /* set of fonts for multi-byte chars */
318# else
319 GuiFont menu_font; /* menu item font */
320# endif
321#endif
322#ifdef FEAT_MBYTE
323 GuiFont wide_font; /* 'guifontwide' font */
324#endif
325#ifdef FEAT_XFONTSET
326 GuiFontset fontset; /* set of fonts for multi-byte chars */
327#endif
328 guicolor_T back_pixel; /* Color of background */
329 guicolor_T norm_pixel; /* Color of normal text */
330 guicolor_T def_back_pixel; /* default Color of background */
331 guicolor_T def_norm_pixel; /* default Color of normal text */
332
333#ifdef FEAT_GUI_X11
334 char *rsrc_menu_fg_name; /* Color of menu and dialog foregound */
335 guicolor_T menu_fg_pixel; /* Same in Pixel format */
336 char *rsrc_menu_bg_name; /* Color of menu and dialog backgound */
337 guicolor_T menu_bg_pixel; /* Same in Pixel format */
338 char *rsrc_scroll_fg_name; /* Color of scrollbar foreground */
339 guicolor_T scroll_fg_pixel; /* Same in Pixel format */
340 char *rsrc_scroll_bg_name; /* Color of scrollbar background */
341 guicolor_T scroll_bg_pixel; /* Same in Pixel format */
342
343# ifdef FEAT_GUI_MOTIF
344 guicolor_T menu_def_fg_pixel; /* Default menu foreground */
345 guicolor_T menu_def_bg_pixel; /* Default menu background */
346 guicolor_T scroll_def_fg_pixel; /* Default scrollbar foreground */
347 guicolor_T scroll_def_bg_pixel; /* Default scrollbar background */
348# endif
349 Display *dpy; /* X display */
350 Window wid; /* Window id of text area */
351 int visibility; /* Is shell partially/fully obscured? */
352 GC text_gc;
353 GC back_gc;
354 GC invert_gc;
355 Cursor blank_pointer; /* Blank pointer */
356
357 /* X Resources */
358 char_u *rsrc_font_name; /* Resource font name, used if 'guifont'
359 not set */
360 char_u *rsrc_bold_font_name; /* Resource bold font name */
361 char_u *rsrc_ital_font_name; /* Resource italic font name */
362 char_u *rsrc_boldital_font_name; /* Resource bold-italic font name */
363 char_u *rsrc_menu_font_name; /* Resource menu Font name */
364 Bool rsrc_rev_video; /* Use reverse video? */
365
366 char_u *geom; /* Geometry, eg "80x24" */
367 Bool color_approx; /* Some color was approximated */
368#endif
369
370#ifdef FEAT_GUI_GTK
371 int visibility; /* Is shell partially/fully obscured? */
372 GdkCursor *blank_pointer; /* Blank pointer */
373
374 /* X Resources */
375 char_u *geom; /* Geometry, eg "80x24" */
376
377 GtkWidget *mainwin; /* top level GTK window */
378 GtkWidget *formwin; /* manages all the windows below */
379 GtkWidget *drawarea; /* the "text" area */
380# ifdef FEAT_MENU
381 GtkWidget *menubar; /* menubar */
382# endif
383# ifdef FEAT_TOOLBAR
384 GtkWidget *toolbar; /* toolbar */
385# endif
386# ifdef FEAT_GUI_GNOME
387 GtkWidget *menubar_h; /* menubar handle */
388 GtkWidget *toolbar_h; /* toolbar handle */
389# endif
390 GdkColor *fgcolor; /* GDK-styled foreground color */
391 GdkColor *bgcolor; /* GDK-styled background color */
Bram Moolenaar3918c952005-03-15 22:34:55 +0000392 GdkColor *spcolor; /* GDK-styled special color */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000393# ifndef HAVE_GTK2
394 GuiFont current_font;
395# endif
396 GdkGC *text_gc; /* cached GC for normal text */
397# ifdef HAVE_GTK2
398 PangoContext *text_context; /* the context used for all text */
399 PangoFont *ascii_font; /* cached font for ASCII strings */
400 PangoGlyphString *ascii_glyphs; /* cached code point -> glyph map */
Bram Moolenaar362e1a32006-03-06 23:29:24 +0000401# endif
402# ifdef FEAT_GUI_TABLINE
Bram Moolenaar32466aa2006-02-24 23:53:04 +0000403 GtkWidget *tabline; /* tab pages line handle */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000404# endif
405
406 GtkAccelGroup *accel_group;
407# ifndef HAVE_GTK2
408 GtkWidget *fontdlg; /* font selection dialog window */
409 char_u *fontname; /* font name from font selection dialog */
410# endif
411 GtkWidget *filedlg; /* file selection dialog */
412 char_u *browse_fname; /* file name from filedlg */
413#endif /* FEAT_GUI_GTK */
414
415#ifdef FEAT_FOOTER
416 int footer_height; /* height of the message footer */
417#endif
418
419#if defined(FEAT_TOOLBAR) \
420 && (defined(FEAT_GUI_ATHENA) || defined(FEAT_GUI_MOTIF))
421 int toolbar_height; /* height of the toolbar */
422#endif
423
424#ifdef FEAT_BEVAL_TIP
425 /* Tooltip properties; also used for balloon evaluation */
426 char_u *rsrc_tooltip_font_name; /* tooltip font name */
427 char *rsrc_tooltip_fg_name; /* tooltip foreground color name */
428 char *rsrc_tooltip_bg_name; /* tooltip background color name */
429 guicolor_T tooltip_fg_pixel; /* tooltip foreground color */
430 guicolor_T tooltip_bg_pixel; /* tooltip background color */
431 XFontSet tooltip_fontset; /* tooltip fontset */
432#endif
433
434#ifdef FEAT_GUI_MSWIN
435 GuiFont currFont; /* Current font */
436 guicolor_T currFgColor; /* Current foreground text color */
437 guicolor_T currBgColor; /* Current background text color */
Bram Moolenaar3918c952005-03-15 22:34:55 +0000438 guicolor_T currSpColor; /* Current special text color */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000439#endif
440
Bram Moolenaar071d4272004-06-13 20:20:40 +0000441#ifdef FEAT_GUI_MAC
442 WindowPtr VimWindow;
443 MenuHandle MacOSHelpMenu; /* Help menu provided by the MacOS */
444 int MacOSHelpItems; /* Nr of help-items supplied by MacOS */
445 int MacOSHaveCntxMenu; /* Contextual menu available */
446 WindowPtr wid; /* Window id of text area */
447 int visibility; /* Is window partially/fully obscured? */
448#endif
449
Bram Moolenaar071d4272004-06-13 20:20:40 +0000450#ifdef RISCOS
451 int window_handle;
452 char_u *window_title;
453 int window_title_size;
454 int fg_colour; /* in 0xBBGGRR format */
455 int bg_colour;
456#endif
457
458#ifdef FEAT_GUI_PHOTON
459 PtWidget_t *vimWindow; /* PtWindow */
460 PtWidget_t *vimTextArea; /* PtRaw */
461 PtWidget_t *vimContainer; /* PtPanel */
462# if defined(FEAT_MENU) || defined(FEAT_TOOLBAR)
463 PtWidget_t *vimToolBarGroup;
464# endif
465# ifdef FEAT_MENU
466 PtWidget_t *vimMenuBar;
467# endif
468# ifdef FEAT_TOOLBAR
469 PtWidget_t *vimToolBar;
470 int toolbar_height;
471# endif
472 PhEvent_t *event_buffer;
473#endif
474
475#ifdef FEAT_XIM
476 char *rsrc_input_method;
477 char *rsrc_preedit_type_name;
478#endif
479} gui_T;
480
481extern gui_T gui; /* this is defined in gui.c */
482
483/* definitions of available window positionings for gui_*_position_in_parent()
484 */
485typedef enum
486{
487 VW_POS_MOUSE,
488 VW_POS_CENTER,
489 VW_POS_TOP_CENTER
Bram Moolenaar8348ea62005-06-14 22:05:40 +0000490} gui_win_pos_T;
Bram Moolenaar071d4272004-06-13 20:20:40 +0000491
Bram Moolenaar7171abe2004-10-11 10:06:20 +0000492#ifdef FIND_REPLACE_DIALOG
Bram Moolenaar071d4272004-06-13 20:20:40 +0000493/*
494 * Flags used to distinguish the different contexts in which the
495 * find/replace callback may be called.
496 */
497# define FRD_FINDNEXT 1 /* Find next in find dialog */
498# define FRD_R_FINDNEXT 2 /* Find next in repl dialog */
499# define FRD_REPLACE 3 /* Replace once */
500# define FRD_REPLACEALL 4 /* Replace remaining matches */
501# define FRD_UNDO 5 /* Undo replaced text */
502# define FRD_TYPE_MASK 7 /* Mask for the callback type */
503/* Flags which change the way searching is done. */
504# define FRD_WHOLE_WORD 0x08 /* match whole word only */
505# define FRD_MATCH_CASE 0x10 /* match case */
506#endif