blob: 6544244ddeb1e7ee7cd8b614e045211883fd1a4d [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 Moolenaar9372a112005-12-06 19:59:18 +0000161#if defined(NO_CONSOLE) || defined(FEAT_GUI_GTK) || defined(FEAT_GUI_X11)
Bram Moolenaar071d4272004-06-13 20:20:40 +0000162# define NO_CONSOLE_INPUT /* use no_console_input() to check if there
163 is no console input possible */
164#endif
165
166typedef struct GuiScrollbar
167{
168 long ident; /* Unique identifier for each scrollbar */
Bram Moolenaar1d2ba7f2006-02-14 22:29:30 +0000169 win_T *wp; /* Scrollbar's window, NULL for bottom */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000170 int type; /* one of SBAR_{LEFT,RIGHT,BOTTOM} */
171 long value; /* Represents top line number visible */
172#ifdef FEAT_GUI_ATHENA
173 int pixval; /* pixel count of value */
174#endif
175 long size; /* Size of scrollbar thumb */
176 long max; /* Number of lines in buffer */
177
178 /* Values measured in characters: */
179 int top; /* Top of scroll bar (chars from row 0) */
180 int height; /* Current height of scroll bar in rows */
181#ifdef FEAT_VERTSPLIT
182 int width; /* Current width of scroll bar in cols */
183#endif
184 int status_height; /* Height of status line */
185#ifdef FEAT_GUI_X11
186 Widget id; /* Id of real scroll bar */
187#endif
188#ifdef FEAT_GUI_GTK
189 GtkWidget *id; /* Id of real scroll bar */
190 unsigned long handler_id; /* Id of "value_changed" signal handler */
191#endif
192
193#ifdef FEAT_GUI_MSWIN
194 HWND id; /* Id of real scroll bar */
195 int scroll_shift; /* The scrollbar stuff can handle only up to
196 32767 lines. When the file is longer,
197 scroll_shift is set to the number of shifts
198 to reduce the count. */
199#endif
Bram Moolenaar071d4272004-06-13 20:20:40 +0000200#ifdef FEAT_GUI_MAC
201 ControlHandle id; /* A handle to the scrollbar */
202#endif
203#ifdef RISCOS
204 int id; /* Window handle of scrollbar window */
205#endif
206#ifdef FEAT_GUI_PHOTON
207 PtWidget_t *id;
208#endif
209} scrollbar_T;
210
211typedef long guicolor_T; /* handle for a GUI color; for X11 this should
212 be "Pixel", but that's an unsigned and we
213 need a signed value */
214#define INVALCOLOR (guicolor_T)-11111 /* number for invalid color; on 32 bit
215 displays there is a tiny chance this is an
216 actual color */
217
218#ifdef FEAT_GUI_GTK
219# ifdef HAVE_GTK2
220 typedef PangoFontDescription *GuiFont; /* handle for a GUI font */
221 typedef PangoFontDescription *GuiFontset; /* handle for a GUI fontset */
222# else
223 typedef GdkFont *GuiFont; /* handle for a GUI font */
224 typedef GdkFont *GuiFontset; /* handle for a GUI fontset */
225# endif
226# define NOFONT (GuiFont)NULL
227# define NOFONTSET (GuiFontset)NULL
228#else
229# ifdef FEAT_GUI_PHOTON
230 typedef char *GuiFont;
231 typedef char *GuiFontset;
232# define NOFONT (GuiFont)NULL
233# define NOFONTSET (GuiFontset)NULL
234# else
235# ifdef FEAT_GUI_X11
236 typedef XFontStruct *GuiFont; /* handle for a GUI font */
237 typedef XFontSet GuiFontset; /* handle for a GUI fontset */
238# define NOFONT (GuiFont)0
239# define NOFONTSET (GuiFontset)0
240# else
241 typedef long_u GuiFont; /* handle for a GUI font */
242 typedef long_u GuiFontset; /* handle for a GUI fontset */
243# define NOFONT (GuiFont)0
244# define NOFONTSET (GuiFontset)0
245# endif
246# endif
247#endif
248
249typedef struct Gui
250{
251 int in_focus; /* Vim has input focus */
252 int in_use; /* Is the GUI being used? */
253 int starting; /* GUI will start in a little while */
254 int shell_created; /* Has the shell been created yet? */
255 int dying; /* Is vim dying? Then output to terminal */
256 int dofork; /* Use fork() when GUI is starting */
257 int dragged_sb; /* Which scrollbar being dragged, if any? */
258 win_T *dragged_wp; /* Which WIN's sb being dragged, if any? */
259 int pointer_hidden; /* Is the mouse pointer hidden? */
260 int col; /* Current cursor column in GUI display */
261 int row; /* Current cursor row in GUI display */
262 int cursor_col; /* Physical cursor column in GUI display */
263 int cursor_row; /* Physical cursor row in GUI display */
264 char cursor_is_valid; /* There is a cursor at cursor_row/col */
265 int num_cols; /* Number of columns */
266 int num_rows; /* Number of rows */
267 int scroll_region_top; /* Top (first) line of scroll region */
268 int scroll_region_bot; /* Bottom (last) line of scroll region */
269 int scroll_region_left; /* Left (first) column of scroll region */
270 int scroll_region_right; /* Right (last) col. of scroll region */
271 int highlight_mask; /* Highlight attribute mask */
272 int scrollbar_width; /* Width of vertical scrollbars */
273 int scrollbar_height; /* Height of horizontal scrollbar */
274 int left_sbar_x; /* Calculated x coord for left scrollbar */
275 int right_sbar_x; /* Calculated x coord for right scrollbar */
276
277#ifdef FEAT_MENU
278# ifndef FEAT_GUI_GTK
279 int menu_height; /* Height of the menu bar */
280 int menu_width; /* Width of the menu bar */
281# endif
282 char menu_is_active; /* TRUE if menu is present */
283# ifdef FEAT_GUI_ATHENA
284 char menu_height_fixed; /* TRUE if menu height fixed */
285# endif
286#endif
287
288 scrollbar_T bottom_sbar; /* Bottom scrollbar */
289 int which_scrollbars[3];/* Which scrollbar boxes are active? */
290 int prev_wrap; /* For updating the horizontal scrollbar */
Bram Moolenaar02743632005-07-25 20:42:36 +0000291 int char_width; /* Width of char cell in pixels */
292 int char_height; /* Height of char cell in pixels, includes
293 'linespace' */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000294 int char_ascent; /* Ascent of char in pixels */
295 int border_width; /* Width of our border around text area */
296 int border_offset; /* Total pixel offset for all borders */
297
298 GuiFont norm_font; /* Normal font */
299#ifndef HAVE_GTK2
300 GuiFont bold_font; /* Bold font */
301 GuiFont ital_font; /* Italic font */
302 GuiFont boldital_font; /* Bold-Italic font */
303#else
304 int font_can_bold; /* Whether norm_font supports bold weight.
305 * The styled font variants are not used. */
306#endif
307
308#if defined(FEAT_MENU) && !defined(HAVE_GTK2)
309# ifdef FONTSET_ALWAYS
310 GuiFontset menu_fontset; /* set of fonts for multi-byte chars */
311# else
312 GuiFont menu_font; /* menu item font */
313# endif
314#endif
315#ifdef FEAT_MBYTE
316 GuiFont wide_font; /* 'guifontwide' font */
317#endif
318#ifdef FEAT_XFONTSET
319 GuiFontset fontset; /* set of fonts for multi-byte chars */
320#endif
321 guicolor_T back_pixel; /* Color of background */
322 guicolor_T norm_pixel; /* Color of normal text */
323 guicolor_T def_back_pixel; /* default Color of background */
324 guicolor_T def_norm_pixel; /* default Color of normal text */
325
326#ifdef FEAT_GUI_X11
327 char *rsrc_menu_fg_name; /* Color of menu and dialog foregound */
328 guicolor_T menu_fg_pixel; /* Same in Pixel format */
329 char *rsrc_menu_bg_name; /* Color of menu and dialog backgound */
330 guicolor_T menu_bg_pixel; /* Same in Pixel format */
331 char *rsrc_scroll_fg_name; /* Color of scrollbar foreground */
332 guicolor_T scroll_fg_pixel; /* Same in Pixel format */
333 char *rsrc_scroll_bg_name; /* Color of scrollbar background */
334 guicolor_T scroll_bg_pixel; /* Same in Pixel format */
335
336# ifdef FEAT_GUI_MOTIF
337 guicolor_T menu_def_fg_pixel; /* Default menu foreground */
338 guicolor_T menu_def_bg_pixel; /* Default menu background */
339 guicolor_T scroll_def_fg_pixel; /* Default scrollbar foreground */
340 guicolor_T scroll_def_bg_pixel; /* Default scrollbar background */
341# endif
342 Display *dpy; /* X display */
343 Window wid; /* Window id of text area */
344 int visibility; /* Is shell partially/fully obscured? */
345 GC text_gc;
346 GC back_gc;
347 GC invert_gc;
348 Cursor blank_pointer; /* Blank pointer */
349
350 /* X Resources */
351 char_u *rsrc_font_name; /* Resource font name, used if 'guifont'
352 not set */
353 char_u *rsrc_bold_font_name; /* Resource bold font name */
354 char_u *rsrc_ital_font_name; /* Resource italic font name */
355 char_u *rsrc_boldital_font_name; /* Resource bold-italic font name */
356 char_u *rsrc_menu_font_name; /* Resource menu Font name */
357 Bool rsrc_rev_video; /* Use reverse video? */
358
359 char_u *geom; /* Geometry, eg "80x24" */
360 Bool color_approx; /* Some color was approximated */
361#endif
362
363#ifdef FEAT_GUI_GTK
364 int visibility; /* Is shell partially/fully obscured? */
365 GdkCursor *blank_pointer; /* Blank pointer */
366
367 /* X Resources */
368 char_u *geom; /* Geometry, eg "80x24" */
369
370 GtkWidget *mainwin; /* top level GTK window */
371 GtkWidget *formwin; /* manages all the windows below */
372 GtkWidget *drawarea; /* the "text" area */
373# ifdef FEAT_MENU
374 GtkWidget *menubar; /* menubar */
375# endif
376# ifdef FEAT_TOOLBAR
377 GtkWidget *toolbar; /* toolbar */
378# endif
379# ifdef FEAT_GUI_GNOME
380 GtkWidget *menubar_h; /* menubar handle */
381 GtkWidget *toolbar_h; /* toolbar handle */
382# endif
383 GdkColor *fgcolor; /* GDK-styled foreground color */
384 GdkColor *bgcolor; /* GDK-styled background color */
Bram Moolenaar3918c952005-03-15 22:34:55 +0000385 GdkColor *spcolor; /* GDK-styled special color */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000386# ifndef HAVE_GTK2
387 GuiFont current_font;
388# endif
389 GdkGC *text_gc; /* cached GC for normal text */
390# ifdef HAVE_GTK2
391 PangoContext *text_context; /* the context used for all text */
392 PangoFont *ascii_font; /* cached font for ASCII strings */
393 PangoGlyphString *ascii_glyphs; /* cached code point -> glyph map */
Bram Moolenaar362e1a32006-03-06 23:29:24 +0000394# endif
395# ifdef FEAT_GUI_TABLINE
Bram Moolenaar32466aa2006-02-24 23:53:04 +0000396 GtkWidget *tabline; /* tab pages line handle */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000397# endif
398
399 GtkAccelGroup *accel_group;
400# ifndef HAVE_GTK2
401 GtkWidget *fontdlg; /* font selection dialog window */
402 char_u *fontname; /* font name from font selection dialog */
403# endif
404 GtkWidget *filedlg; /* file selection dialog */
405 char_u *browse_fname; /* file name from filedlg */
406#endif /* FEAT_GUI_GTK */
407
408#ifdef FEAT_FOOTER
409 int footer_height; /* height of the message footer */
410#endif
411
412#if defined(FEAT_TOOLBAR) \
413 && (defined(FEAT_GUI_ATHENA) || defined(FEAT_GUI_MOTIF))
414 int toolbar_height; /* height of the toolbar */
415#endif
416
417#ifdef FEAT_BEVAL_TIP
418 /* Tooltip properties; also used for balloon evaluation */
419 char_u *rsrc_tooltip_font_name; /* tooltip font name */
420 char *rsrc_tooltip_fg_name; /* tooltip foreground color name */
421 char *rsrc_tooltip_bg_name; /* tooltip background color name */
422 guicolor_T tooltip_fg_pixel; /* tooltip foreground color */
423 guicolor_T tooltip_bg_pixel; /* tooltip background color */
424 XFontSet tooltip_fontset; /* tooltip fontset */
425#endif
426
427#ifdef FEAT_GUI_MSWIN
428 GuiFont currFont; /* Current font */
429 guicolor_T currFgColor; /* Current foreground text color */
430 guicolor_T currBgColor; /* Current background text color */
Bram Moolenaar3918c952005-03-15 22:34:55 +0000431 guicolor_T currSpColor; /* Current special text color */
Bram Moolenaar071d4272004-06-13 20:20:40 +0000432#endif
433
Bram Moolenaar071d4272004-06-13 20:20:40 +0000434#ifdef FEAT_GUI_MAC
435 WindowPtr VimWindow;
436 MenuHandle MacOSHelpMenu; /* Help menu provided by the MacOS */
437 int MacOSHelpItems; /* Nr of help-items supplied by MacOS */
438 int MacOSHaveCntxMenu; /* Contextual menu available */
439 WindowPtr wid; /* Window id of text area */
440 int visibility; /* Is window partially/fully obscured? */
441#endif
442
Bram Moolenaar071d4272004-06-13 20:20:40 +0000443#ifdef RISCOS
444 int window_handle;
445 char_u *window_title;
446 int window_title_size;
447 int fg_colour; /* in 0xBBGGRR format */
448 int bg_colour;
449#endif
450
451#ifdef FEAT_GUI_PHOTON
452 PtWidget_t *vimWindow; /* PtWindow */
453 PtWidget_t *vimTextArea; /* PtRaw */
454 PtWidget_t *vimContainer; /* PtPanel */
455# if defined(FEAT_MENU) || defined(FEAT_TOOLBAR)
456 PtWidget_t *vimToolBarGroup;
457# endif
458# ifdef FEAT_MENU
459 PtWidget_t *vimMenuBar;
460# endif
461# ifdef FEAT_TOOLBAR
462 PtWidget_t *vimToolBar;
463 int toolbar_height;
464# endif
465 PhEvent_t *event_buffer;
466#endif
467
468#ifdef FEAT_XIM
469 char *rsrc_input_method;
470 char *rsrc_preedit_type_name;
471#endif
472} gui_T;
473
474extern gui_T gui; /* this is defined in gui.c */
475
476/* definitions of available window positionings for gui_*_position_in_parent()
477 */
478typedef enum
479{
480 VW_POS_MOUSE,
481 VW_POS_CENTER,
482 VW_POS_TOP_CENTER
Bram Moolenaar8348ea62005-06-14 22:05:40 +0000483} gui_win_pos_T;
Bram Moolenaar071d4272004-06-13 20:20:40 +0000484
Bram Moolenaar7171abe2004-10-11 10:06:20 +0000485#ifdef FIND_REPLACE_DIALOG
Bram Moolenaar071d4272004-06-13 20:20:40 +0000486/*
487 * Flags used to distinguish the different contexts in which the
488 * find/replace callback may be called.
489 */
490# define FRD_FINDNEXT 1 /* Find next in find dialog */
491# define FRD_R_FINDNEXT 2 /* Find next in repl dialog */
492# define FRD_REPLACE 3 /* Replace once */
493# define FRD_REPLACEALL 4 /* Replace remaining matches */
494# define FRD_UNDO 5 /* Undo replaced text */
495# define FRD_TYPE_MASK 7 /* Mask for the callback type */
496/* Flags which change the way searching is done. */
497# define FRD_WHOLE_WORD 0x08 /* match whole word only */
498# define FRD_MATCH_CASE 0x10 /* match case */
499#endif