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