annotate src/xterm.h @ 18147:ce128c810249 libc-970606 libc-970607

(*:Linux:*:*): Don't test for elf_i.86 or m68kelf.
author Richard M. Stallman <rms@gnu.org>
date Fri, 06 Jun 1997 01:21:12 +0000
parents 460d5452a852
children fb4c986db0e2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 /* Definitions and headers for communication with X protocol.
7307
cd81dba38a49 Update copyright.
Karl Heuer <kwzh@gnu.org>
parents: 7265
diff changeset
2 Copyright (C) 1989, 1993, 1994 Free Software Foundation, Inc.
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
3
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4 This file is part of GNU Emacs.
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
7 it under the terms of the GNU General Public License as published by
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
9 any later version.
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
10
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 GNU General Public License for more details.
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 14164
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 14164
diff changeset
19 Boston, MA 02111-1307, USA. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
20
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
21 #include <X11/Xlib.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
22 #include <X11/cursorfont.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
23 #include <X11/Xutil.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
24 #include <X11/keysym.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25 #include <X11/Xatom.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
26 #include <X11/Xresource.h>
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
27
5656
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
28 #ifdef USE_X_TOOLKIT
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
29 #include <X11/StringDefs.h>
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
30 #include <X11/IntrinsicP.h> /* CoreP.h needs this */
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
31 #include <X11/CoreP.h> /* foul, but we need this to use our own
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
32 window inside a widget instead of one
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
33 that Xt creates... */
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
34 #include <X11/StringDefs.h>
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
35 #endif
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
36
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
37 /* The class of this X application. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
38 #define EMACS_CLASS "Emacs"
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
39
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
40 /* Bookkeeping to distinguish X versions. */
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
41
1040
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
42 /* HAVE_X11R4 is defined if we have the features of X11R4. It should
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
43 be defined when we're using X11R5, since X11R5 has the features of
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
44 X11R4. If, in the future, we find we need more of these flags
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
45 (HAVE_X11R5, for example), code should always be written to test
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
46 the most recent flag first:
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
47
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
48 #ifdef HAVE_X11R5
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
49 ...
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
50 #elif HAVE_X11R4
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
51 ...
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
52 #elif HAVE_X11
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
53 ...
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
54 #endif
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
55
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
56 If you ever find yourself writing a "#ifdef HAVE_FOO" clause that
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
57 looks a lot like another one, consider moving the text into a macro
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
58 whose definition is configuration-dependent, but whose usage is
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
59 universal - like the stuff in systime.h.
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
60
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
61 It turns out that we can auto-detect whether we're being compiled
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
62 with X11R3 or X11R4 by looking for the flag macros for R4 structure
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
63 members that R3 doesn't have. */
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
64 #ifdef PBaseSize
4711
94fe4e71f7fc (HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents: 3883
diff changeset
65 /* AIX 3.1's X is somewhere between X11R3 and X11R4. It has
94fe4e71f7fc (HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents: 3883
diff changeset
66 PBaseSize, but not XWithdrawWindow, XSetWMName, XSetWMNormalHints,
6603
ec7c89180b65 Define HAVE_X11R4 if AIX3_2 is defined.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents: 6571
diff changeset
67 XSetWMIconName.
ec7c89180b65 Define HAVE_X11R4 if AIX3_2 is defined.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents: 6571
diff changeset
68 AIX 3.2 is at least X11R4. */
ec7c89180b65 Define HAVE_X11R4 if AIX3_2 is defined.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents: 6571
diff changeset
69 #if (!defined AIX) || (defined AIX3_2)
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
70 #define HAVE_X11R4
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
71 #endif
4711
94fe4e71f7fc (HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents: 3883
diff changeset
72 #endif
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
73
15529
f36477de186c Don't define HAVE_X11R5 here.
Richard M. Stallman <rms@gnu.org>
parents: 15043
diff changeset
74 #ifdef HAVE_X11R5
6870
4b783d429e6e (HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents: 6769
diff changeset
75 /* In case someone has X11R5 on AIX 3.1,
4b783d429e6e (HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents: 6769
diff changeset
76 make sure HAVE_X11R4 is defined as well as HAVE_X11R5. */
4b783d429e6e (HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents: 6769
diff changeset
77 #define HAVE_X11R4
2300
dfef2f43f4bf * xfns.c (Fx_open_connection): If we have X11R5, use
Jim Blandy <jimb@redhat.com>
parents: 2208
diff changeset
78 #endif
13346
620c6dc0329c Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents: 13315
diff changeset
79
620c6dc0329c Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents: 13315
diff changeset
80 #ifdef HAVE_X11R5
620c6dc0329c Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents: 13315
diff changeset
81 #define HAVE_X_I18N
620c6dc0329c Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents: 13315
diff changeset
82 #include <X11/Xlocale.h>
620c6dc0329c Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents: 13315
diff changeset
83 #endif
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
84
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
85 #define BLACK_PIX_DEFAULT(f) BlackPixel (FRAME_X_DISPLAY (f), \
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
86 XScreenNumberOfScreen (FRAME_X_SCREEN (f)))
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
87 #define WHITE_PIX_DEFAULT(f) WhitePixel (FRAME_X_DISPLAY (f), \
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
88 XScreenNumberOfScreen (FRAME_X_SCREEN (f)))
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
89
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
90 #define FONT_WIDTH(f) ((f)->max_bounds.width)
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
91 #define FONT_HEIGHT(f) ((f)->ascent + (f)->descent)
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
92 #define FONT_BASE(f) ((f)->ascent)
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
93
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
94 /* The mask of events that text windows always want to receive. This
15043
a0716ac97a83 (STANDARD_EVENT_SET): Remove PointerNotifyHintMask.
Richard M. Stallman <rms@gnu.org>
parents: 14829
diff changeset
95 includes mouse movement events, since handling the mouse-font text property
a0716ac97a83 (STANDARD_EVENT_SET): Remove PointerNotifyHintMask.
Richard M. Stallman <rms@gnu.org>
parents: 14829
diff changeset
96 means that we must track mouse motion all the time. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
97
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
98 #define STANDARD_EVENT_SET \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
99 (KeyPressMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
100 | ExposureMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
101 | ButtonPressMask \
424
a9b60e014edd *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 348
diff changeset
102 | ButtonReleaseMask \
a9b60e014edd *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 348
diff changeset
103 | PointerMotionMask \
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
104 | StructureNotifyMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
105 | FocusChangeMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
106 | LeaveWindowMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
107 | EnterWindowMask \
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
108 | VisibilityChangeMask)
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
109
5946
44d0bebba84d (check_x): Declare it.
Karl Heuer <kwzh@gnu.org>
parents: 5677
diff changeset
110 /* This checks to make sure we have a display. */
44d0bebba84d (check_x): Declare it.
Karl Heuer <kwzh@gnu.org>
parents: 5677
diff changeset
111 extern void check_x ();
44d0bebba84d (check_x): Declare it.
Karl Heuer <kwzh@gnu.org>
parents: 5677
diff changeset
112
771
538c0bcb418e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 642
diff changeset
113 extern struct frame *x_window_to_frame ();
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
114
5656
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
115 #ifdef USE_X_TOOLKIT
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
116 extern struct frame *x_any_window_to_frame ();
11612
00bf6e6098d4 Declare x_non_menubar_window_to_frame.
Karl Heuer <kwzh@gnu.org>
parents: 11538
diff changeset
117 extern struct frame *x_non_menubar_window_to_frame ();
6994
b43ec2effc1d (x_top_window_to_frame): Declare this function.
Karl Heuer <kwzh@gnu.org>
parents: 6933
diff changeset
118 extern struct frame *x_top_window_to_frame ();
5656
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
119 #endif
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
120
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
121 extern Visual *select_visual ();
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
122
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
123 enum text_cursor_kinds {
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
124 filled_box_cursor, hollow_box_cursor, bar_cursor
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
125 };
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
126
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
127 /* Structure recording X pixmap and reference count.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
128 If REFCOUNT is 0 then this record is free to be reused. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
129
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
130 struct x_bitmap_record
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
131 {
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
132 Pixmap pixmap;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
133 char *file;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
134 int refcount;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
135 /* Record some info about this pixmap. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
136 int height, width, depth;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
137 };
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
138
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
139 /* For each X display, we have a structure that records
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
140 information about it. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
141
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
142 struct x_display_info
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
143 {
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
144 /* Chain of all x_display_info structures. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
145 struct x_display_info *next;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
146 /* Connection number (normally a file descriptor number). */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
147 int connection;
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
148 /* This says how to access this display in Xlib. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
149 Display *display;
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
150 /* This is a cons cell of the form (NAME . FONT-LIST-CACHE).
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
151 The same cons cell also appears in x_display_name_list. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
152 Lisp_Object name_list_element;
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
153 /* Number of frames that are on this display. */
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
154 int reference_count;
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
155 /* The Screen this connection is connected to. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
156 Screen *screen;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
157 /* The Visual being used for this display. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
158 Visual *visual;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
159 /* Number of panes on this screen. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
160 int n_planes;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
161 /* Dimensions of this screen. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
162 int height, width;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
163 /* Mask of things that cause the mouse to be grabbed. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
164 int grabbed;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
165 /* Emacs bitmap-id of the default icon bitmap for this frame.
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
166 Or -1 if none has been allocated yet. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
167 int icon_bitmap_id;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
168 /* The root window of this screen. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
169 Window root_window;
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
170 /* The cursor to use for vertical scroll bars. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
171 Cursor vertical_scroll_bar_cursor;
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
172 /* X Resource data base */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
173 XrmDatabase xrdb;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
174
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
175 /* A table of all the fonts we have already loaded. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
176 struct font_info *font_table;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
177
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
178 /* The current capacity of x_font_table. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
179 int font_table_size;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
180
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
181 /* Reusable Graphics Context for drawing a cursor in a non-default face. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
182 GC scratch_cursor_gc;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
183
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
184 /* These variables describe the range of text currently shown
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
185 in its mouse-face, together with the window they apply to.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
186 As long as the mouse stays within this range, we need not
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
187 redraw anything on its account. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
188 int mouse_face_beg_row, mouse_face_beg_col;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
189 int mouse_face_end_row, mouse_face_end_col;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
190 int mouse_face_past_end;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
191 Lisp_Object mouse_face_window;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
192 int mouse_face_face_id;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
193
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
194 /* 1 if a mouse motion event came and we didn't handle it right away because
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
195 gc was in progress. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
196 int mouse_face_deferred_gc;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
197
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
198 /* FRAME and X, Y position of mouse when last checked for
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
199 highlighting. X and Y can be negative or out of range for the frame. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
200 struct frame *mouse_face_mouse_frame;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
201 int mouse_face_mouse_x, mouse_face_mouse_y;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
202
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
203 /* Nonzero means defer mouse-motion highlighting. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
204 int mouse_face_defer;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
205
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
206 char *x_id_name;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
207
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
208 /* The number of fonts actually stored in x_font_table.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
209 font_table[n] is used and valid iff 0 <= n < n_fonts.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
210 0 <= n_fonts <= font_table_size. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
211 int n_fonts;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
212
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
213 /* Pointer to bitmap records. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
214 struct x_bitmap_record *bitmaps;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
215
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
216 /* Allocated size of bitmaps field. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
217 int bitmaps_size;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
218
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
219 /* Last used bitmap index. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
220 int bitmaps_last;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
221
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
222 /* Which modifier keys are on which modifier bits?
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
223
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
224 With each keystroke, X returns eight bits indicating which modifier
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
225 keys were held down when the key was pressed. The interpretation
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
226 of the top five modifier bits depends on what keys are attached
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
227 to them. If the Meta_L and Meta_R keysyms are on mod5, then mod5
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
228 is the meta bit.
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
229
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
230 meta_mod_mask is a mask containing the bits used for the meta key.
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
231 It may have more than one bit set, if more than one modifier bit
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
232 has meta keys on it. Basically, if EVENT is a KeyPress event,
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
233 the meta key is pressed if (EVENT.state & meta_mod_mask) != 0.
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
234
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
235 shift_lock_mask is LockMask if the XK_Shift_Lock keysym is on the
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
236 lock modifier bit, or zero otherwise. Non-alphabetic keys should
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
237 only be affected by the lock modifier bit if XK_Shift_Lock is in
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
238 use; XK_Caps_Lock should only affect alphabetic keys. With this
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
239 arrangement, the lock modifier should shift the character if
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
240 (EVENT.state & shift_lock_mask) != 0. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
241 int meta_mod_mask, shift_lock_mask;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
242
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
243 /* These are like meta_mod_mask, but for different modifiers. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
244 int alt_mod_mask, super_mod_mask, hyper_mod_mask;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
245
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
246 /* Communication with window managers. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
247 Atom Xatom_wm_protocols;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
248 /* Kinds of protocol things we may receive. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
249 Atom Xatom_wm_take_focus;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
250 Atom Xatom_wm_save_yourself;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
251 Atom Xatom_wm_delete_window;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
252 /* Atom for indicating window state to the window manager. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
253 Atom Xatom_wm_change_state;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
254 /* Other WM communication */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
255 Atom Xatom_wm_configure_denied; /* When our config request is denied */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
256 Atom Xatom_wm_window_moved; /* When the WM moves us. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
257 /* EditRes protocol */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
258 Atom Xatom_editres;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
259
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
260 /* More atoms, which are selection types. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
261 Atom Xatom_CLIPBOARD, Xatom_TIMESTAMP, Xatom_TEXT, Xatom_DELETE,
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
262 Xatom_COMPOUND_TEXT,
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
263 Xatom_MULTIPLE, Xatom_INCR, Xatom_EMACS_TMP, Xatom_TARGETS, Xatom_NULL,
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
264 Xatom_ATOM_PAIR;
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
265
17104
b2a15ee1d181 (struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents: 17051
diff changeset
266 /* More atoms for font properties. The last three are private
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
267 properties, see the comments in src/fontset.h. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
268 Atom Xatom_PIXEL_SIZE,
17104
b2a15ee1d181 (struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents: 17051
diff changeset
269 Xatom_MULE_BASELINE_OFFSET, Xatom_MULE_RELATIVE_COMPOSE,
b2a15ee1d181 (struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents: 17051
diff changeset
270 Xatom_MULE_DEFAULT_ASCENT;
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
271
11013
f0fe22922005 (struct x_display_info): member kboard (formerly perdisplay) is now a pointer,
Karl Heuer <kwzh@gnu.org>
parents: 10741
diff changeset
272 #ifdef MULTI_KBOARD
11352
800e56de3795 (struct x_display_info): Use `struct kboard', not KBOARD.
Richard M. Stallman <rms@gnu.org>
parents: 11163
diff changeset
273 struct kboard *kboard;
11013
f0fe22922005 (struct x_display_info): member kboard (formerly perdisplay) is now a pointer,
Karl Heuer <kwzh@gnu.org>
parents: 10741
diff changeset
274 #endif
11163
d6b56a8f415b (struct x_display_info): New member cut_buffers_initialized.
Karl Heuer <kwzh@gnu.org>
parents: 11013
diff changeset
275 int cut_buffers_initialized; /* Whether we're sure they all exist */
11538
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
276
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
277 /* The frame (if any) which has the X window that has keyboard focus.
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
278 Zero if none. This is examined by Ffocus_frame in xfns.c. Note
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
279 that a mere EnterNotify event can set this; if you need to know the
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
280 last frame specified in a FocusIn or FocusOut event, use
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
281 x_focus_event_frame. */
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
282 struct frame *x_focus_frame;
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
283
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
284 /* The last frame mentioned in a FocusIn or FocusOut event. This is
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
285 separate from x_focus_frame, because whether or not LeaveNotify
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
286 events cause us to lose focus depends on whether or not we have
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
287 received a FocusIn event for it. */
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
288 struct frame *x_focus_event_frame;
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
289
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
290 /* The frame which currently has the visual highlight, and should get
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
291 keyboard input (other sorts of input have the frame encoded in the
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
292 event). It points to the X focus frame's selected window's
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
293 frame. It differs from x_focus_frame when we're using a global
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
294 minibuffer. */
d0bd2102adbc (struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents: 11352
diff changeset
295 struct frame *x_highlight_frame;
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
296
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
297 /* The null pixel used for filling a character background with
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
298 background color of a gc. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
299 Pixmap null_pixel;
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
300 };
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
301
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
302 /* This is a chain of structures for all the X displays currently in use. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
303 extern struct x_display_info *x_display_list;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
304
9692
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
305 /* This is a list of cons cells, each of the form (NAME . FONT-LIST-CACHE),
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
306 one for each element of x_display_list and in the same order.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
307 NAME is the name of the frame.
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
308 FONT-LIST-CACHE records previous values returned by x-list-fonts. */
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
309 extern Lisp_Object x_display_name_list;
f4fa600e345f Delete X10 code.
Richard M. Stallman <rms@gnu.org>
parents: 9655
diff changeset
310
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
311 /* Regexp matching a font name whose width is the same as `PIXEL_SIZE'. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
312 extern Lisp_Object Vx_pixel_size_width_font_regexp;
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
313
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
314 extern struct x_display_info *x_display_info_for_display ();
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
315 extern struct x_display_info *x_display_info_for_name ();
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
316
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
317 extern struct x_display_info *x_term_init ();
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
318
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
319 extern Lisp_Object x_list_fonts ();
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
320 extern struct font_info *x_get_font_info(), *x_load_font (), *x_query_font ();
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
321
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
322 /* Each X frame object points to its own struct x_output object
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
323 in the output_data.x field. The x_output structure contains
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
324 the information that is specific to X windows. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
325
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
326 struct x_output
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
327 {
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
328 /* Position of the X window (x and y offsets in root window). */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
329 int left_pos;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
330 int top_pos;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
331
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
332 /* Border width of the X window as known by the X window system. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
333 int border_width;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
334
7265
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
335 /* Size of the X window in pixels. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
336 int pixel_height, pixel_width;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
337
11899
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
338 /* Height of menu bar widget, in pixels.
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
339 Zero if not using the X toolkit.
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
340 When using the toolkit, this value is not meaningful
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
341 if the menubar is turned off. */
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
342 int menubar_height;
e1834fb53c35 (struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents: 11612
diff changeset
343
6769
55237bfe01e5 (struct x_display): New field line_height.
Richard M. Stallman <rms@gnu.org>
parents: 6758
diff changeset
344 /* Height of a line, in pixels. */
55237bfe01e5 (struct x_display): New field line_height.
Richard M. Stallman <rms@gnu.org>
parents: 6758
diff changeset
345 int line_height;
55237bfe01e5 (struct x_display): New field line_height.
Richard M. Stallman <rms@gnu.org>
parents: 6758
diff changeset
346
7265
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
347 /* The tiled border used when the mouse is out of the frame. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
348 Pixmap border_tile;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
349
7265
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
350 /* Here are the Graphics Contexts for the default font. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
351 GC normal_gc; /* Normal video */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
352 GC reverse_gc; /* Reverse video */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
353 GC cursor_gc; /* cursor drawing */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
354
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
355 /* Width of the internal border. This is a line of background color
771
538c0bcb418e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 642
diff changeset
356 just inside the window's border. When the frame is selected,
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
357 a highlighting is displayed inside the internal border. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
358 int internal_border_width;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
359
771
538c0bcb418e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 642
diff changeset
360 /* The X window used for this frame.
538c0bcb418e *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 642
diff changeset
361 May be zero while the frame object is being created
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
362 and the X window has not yet been created. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
363 Window window_desc;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
364
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
365 /* The X window used for the bitmap icon;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
366 or 0 if we don't have a bitmap icon. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
367 Window icon_desc;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
368
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
369 /* The X window that is the parent of this X window.
10171
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
370 Usually this is a window that was made by the window manager,
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
371 but it can be the root window, and it can be explicitly specified
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
372 (see the explicit_parent field, below). */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
373 Window parent_desc;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
374
5656
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
375 #ifdef USE_X_TOOLKIT
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
376 /* The widget of this screen. This is the window of a "shell" widget. */
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
377 Widget widget;
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
378 /* The XmPanedWindows... */
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
379 Widget column_widget;
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
380 /* The widget of the edit portion of this screen; the window in
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
381 "window_desc" is inside of this. */
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
382 Widget edit_widget;
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
383
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
384 Widget menubar_widget;
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
385 #endif
94f317eca45d [USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents: 4711
diff changeset
386
9544
1f8c357797a2 (x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents: 9259
diff changeset
387 /* If >=0, a bitmap index. The indicated bitmap is used for the
1f8c357797a2 (x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents: 9259
diff changeset
388 icon. */
1f8c357797a2 (x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents: 9259
diff changeset
389 int icon_bitmap;
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
390
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
391 /* Default ASCII font of this frame. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
392 XFontStruct *font;
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
393
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
394 /* The baseline position of the default ASCII font. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
395 int font_baseline;
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
396
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
397 /* If a fontset is specified for this frame instead of font, this
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
398 value contains an ID of the fontset, else -1. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
399 int fontset;
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
400
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
401 /* Pixel values used for various purposes.
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
402 border_pixel may be -1 meaning use a gray tile. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
403 unsigned long background_pixel;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
404 unsigned long foreground_pixel;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
405 unsigned long cursor_pixel;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
406 unsigned long border_pixel;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
407 unsigned long mouse_pixel;
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
408 unsigned long cursor_foreground_pixel;
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
409
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
410 /* Descriptor for the cursor in use for this window. */
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
411 Cursor text_cursor;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
412 Cursor nontext_cursor;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
413 Cursor modeline_cursor;
6758
2395a59123b8 (cross_cursor): New field for struct x_display.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents: 6603
diff changeset
414 Cursor cross_cursor;
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
415
7265
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
416 /* Flag to set when the X window needs to be completely repainted. */
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
417 int needs_exposure;
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
418
1821
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
419 /* What kind of text cursor is drawn in this window right now?
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
420 (If there is no cursor (phys_cursor_x < 0), then this means nothing.) */
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
421 enum text_cursor_kinds current_cursor;
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
422
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
423 /* What kind of text cursor should we draw in the future?
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
424 This should always be filled_box_cursor or bar_cursor. */
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
425 enum text_cursor_kinds desired_cursor;
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
426
10741
2bbb48f3dd0c (struct x_display): New element cursor_width.
Richard M. Stallman <rms@gnu.org>
parents: 10610
diff changeset
427 /* Width of bar cursor (if we are using that). */
2bbb48f3dd0c (struct x_display): New element cursor_width.
Richard M. Stallman <rms@gnu.org>
parents: 10610
diff changeset
428 int cursor_width;
2bbb48f3dd0c (struct x_display): New element cursor_width.
Richard M. Stallman <rms@gnu.org>
parents: 10610
diff changeset
429
999
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
430 /* These are the current window manager hints. It seems that
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
431 XSetWMHints, when presented with an unset bit in the `flags'
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
432 member of the hints structure, does not leave the corresponding
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
433 attribute unchanged; rather, it resets that attribute to its
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
434 default value. For example, unless you set the `icon_pixmap'
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
435 field and the `IconPixmapHint' bit, XSetWMHints will forget what
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
436 your icon pixmap was. This is rather troublesome, since some of
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
437 the members (for example, `input' and `icon_pixmap') want to stay
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
438 the same throughout the execution of Emacs. So, we keep this
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
439 structure around, just leaving values in it and adding new bits
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
440 to the mask as we go. */
d8d503897aa5 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 771
diff changeset
441 XWMHints wm_hints;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
442
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
443 /* The size of the extra width currently allotted for vertical
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
444 scroll bars, in pixels. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
445 int vertical_scroll_bar_extra;
2394
6ec15e6b2a08 (FRAME_FACES, FRAME_N_FACES, FRAME_DEFAULT_FACE)
Richard M. Stallman <rms@gnu.org>
parents: 2354
diff changeset
446
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
447 /* Table of parameter faces for this frame. Any X resources (pixel
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
448 values, fonts) referred to here have been allocated explicitly
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
449 for this face, and should be freed if we change the face. */
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
450 struct face **param_faces;
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
451 int n_param_faces;
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
452
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
453 /* Table of computed faces for this frame. These are the faces
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
454 whose indexes go into the upper bits of a glyph, computed by
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
455 combining the parameter faces specified by overlays, text
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
456 properties, and what have you. The X resources mentioned here
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
457 are all shared with parameter faces. */
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
458 struct face **computed_faces;
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
459 int n_computed_faces; /* How many are valid */
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
460 int size_computed_faces; /* How many are allocated */
6933
b5f510efd194 (x_display): New field win_gravity.
Richard M. Stallman <rms@gnu.org>
parents: 6870
diff changeset
461
b5f510efd194 (x_display): New field win_gravity.
Richard M. Stallman <rms@gnu.org>
parents: 6870
diff changeset
462 /* This is the gravity value for the specified window position. */
b5f510efd194 (x_display): New field win_gravity.
Richard M. Stallman <rms@gnu.org>
parents: 6870
diff changeset
463 int win_gravity;
7265
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
464
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
465 /* The geometry flags for this window. */
bca3fe63efec (struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents: 6994
diff changeset
466 int size_hint_flags;
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
467
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
468 /* This is the Emacs structure for the X display this frame is on. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
469 struct x_display_info *display_info;
10171
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
470
12658
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
471 /* This is a button event that wants to activate the menubar.
15709
32550876ed0f (struct x_output): Member saved_button_event replaced by
Karl Heuer <kwzh@gnu.org>
parents: 15529
diff changeset
472 We save it here until the command loop gets to think about it. */
32550876ed0f (struct x_output): Member saved_button_event replaced by
Karl Heuer <kwzh@gnu.org>
parents: 15529
diff changeset
473 XEvent *saved_menu_event;
12658
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
474
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
475 /* This is the widget id used for this frame's menubar in lwlib. */
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
476 #ifdef USE_X_TOOLKIT
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
477 int id;
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
478 #endif
dd26c4fb9999 (struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents: 12275
diff changeset
479
10171
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
480 /* Nonzero means our parent is another application's window
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
481 and was explicitly specified. */
3c022e99daab (struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents: 9961
diff changeset
482 char explicit_parent;
12191
33e8a9ef3cab (struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents: 12072
diff changeset
483
33e8a9ef3cab (struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents: 12072
diff changeset
484 /* Nonzero means tried already to make this frame visible. */
33e8a9ef3cab (struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents: 12072
diff changeset
485 char asked_for_visible;
13226
3b15cf8aa50d (HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 12666
diff changeset
486
18073
460d5452a852 (struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents: 17104
diff changeset
487 /* Nonzero if this frame was ever previously visible. */
460d5452a852 (struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents: 17104
diff changeset
488 char has_been_visible;
460d5452a852 (struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents: 17104
diff changeset
489
13226
3b15cf8aa50d (HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 12666
diff changeset
490 #ifdef HAVE_X_I18N
14829
13f71787615d (struct x_output): New member xim.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
491 /* Input method. */
13f71787615d (struct x_output): New member xim.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
492 XIM xim;
13226
3b15cf8aa50d (HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 12666
diff changeset
493 /* Input context (currently, this means Compose key handler setup). */
3b15cf8aa50d (HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 12666
diff changeset
494 XIC xic;
3b15cf8aa50d (HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 12666
diff changeset
495 #endif
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
496 };
1040
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
497
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
498 /* Get at the computed faces of an X window frame. */
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
499 #define FRAME_PARAM_FACES(f) ((f)->output_data.x->param_faces)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
500 #define FRAME_N_PARAM_FACES(f) ((f)->output_data.x->n_param_faces)
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
501 #define FRAME_DEFAULT_PARAM_FACE(f) (FRAME_PARAM_FACES (f)[0])
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
502 #define FRAME_MODE_LINE_PARAM_FACE(f) (FRAME_PARAM_FACES (f)[1])
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
503
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
504 #define FRAME_COMPUTED_FACES(f) ((f)->output_data.x->computed_faces)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
505 #define FRAME_N_COMPUTED_FACES(f) ((f)->output_data.x->n_computed_faces)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
506 #define FRAME_SIZE_COMPUTED_FACES(f) ((f)->output_data.x->size_computed_faces)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
507 #define FRAME_DEFAULT_FACE(f) ((f)->output_data.x->computed_faces[0])
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
508 #define FRAME_MODE_LINE_FACE(f) ((f)->output_data.x->computed_faces[1])
2394
6ec15e6b2a08 (FRAME_FACES, FRAME_N_FACES, FRAME_DEFAULT_FACE)
Richard M. Stallman <rms@gnu.org>
parents: 2354
diff changeset
509
1040
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
510 /* Return the window associated with the frame F. */
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
511 #define FRAME_X_WINDOW(f) ((f)->output_data.x->window_desc)
1040
eb7ebe86e885 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 999
diff changeset
512
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
513 #define FRAME_FOREGROUND_PIXEL(f) ((f)->output_data.x->foreground_pixel)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
514 #define FRAME_BACKGROUND_PIXEL(f) ((f)->output_data.x->background_pixel)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
515 #define FRAME_FONT(f) ((f)->output_data.x->font)
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
516 #define FRAME_FONTSET(f) ((f)->output_data.x->fontset)
13420
72e8212db4d9 (FRAME_INTERNAL_BORDER_WIDTH, FRAME_LINE_HEIGHT): New macros.
Geoff Voelker <voelker@cs.washington.edu>
parents: 13346
diff changeset
517 #define FRAME_INTERNAL_BORDER_WIDTH(f) ((f)->output_data.x->internal_border_width)
72e8212db4d9 (FRAME_INTERNAL_BORDER_WIDTH, FRAME_LINE_HEIGHT): New macros.
Geoff Voelker <voelker@cs.washington.edu>
parents: 13346
diff changeset
518 #define FRAME_LINE_HEIGHT(f) ((f)->output_data.x->line_height)
9547
b0cf6d689f7a (FRAME_FOREGROUND_PIXEL, FRAME_BACKGROUND_PIXEL)
Richard M. Stallman <rms@gnu.org>
parents: 9544
diff changeset
519
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
520 /* This gives the x_display_info structure for the display F is on. */
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
521 #define FRAME_X_DISPLAY_INFO(f) ((f)->output_data.x->display_info)
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
522
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
523 /* This is the `Display *' which frame F is on. */
9655
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
524 #define FRAME_X_DISPLAY(f) (FRAME_X_DISPLAY_INFO (f)->display)
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
525
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
526 /* This is the `Screen *' which frame F is on. */
93ccc7bbae8a (struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents: 9547
diff changeset
527 #define FRAME_X_SCREEN(f) (FRAME_X_DISPLAY_INFO (f)->screen)
9013
0ab80494b155 (FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 8947
diff changeset
528
17051
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
529 /* This is the 'font_info *' which frame F has. */
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
530 #define FRAME_X_FONT_TABLE(f) (FRAME_X_DISPLAY_INFO (f)->font_table)
fd0b17a79b07 (struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents: 16268
diff changeset
531
1821
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
532 /* These two really ought to be called FRAME_PIXEL_{WIDTH,HEIGHT}. */
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
533 #define PIXEL_WIDTH(f) ((f)->output_data.x->pixel_width)
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
534 #define PIXEL_HEIGHT(f) ((f)->output_data.x->pixel_height)
1821
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
535
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
536 #define FRAME_DESIRED_CURSOR(f) ((f)->output_data.x->desired_cursor)
1821
04fb1d3d6992 JimB's changes since January 18th
Jim Blandy <jimb@redhat.com>
parents: 1788
diff changeset
537
14829
13f71787615d (struct x_output): New member xim.
Richard M. Stallman <rms@gnu.org>
parents: 14186
diff changeset
538 #define FRAME_XIM(f) ((f)->output_data.x->xim)
13315
2edc6ae38a78 (FRAME_XIC): Fix wrong field name.
Richard M. Stallman <rms@gnu.org>
parents: 13226
diff changeset
539 #define FRAME_XIC(f) ((f)->output_data.x->xic)
259
470231fe99be Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
540
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
541 /* X-specific scroll bar stuff. */
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
542
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
543 /* We represent scroll bars as lisp vectors. This allows us to place
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
544 references to them in windows without worrying about whether we'll
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
545 end up with windows referring to dead scroll bars; the garbage
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
546 collector will free it when its time comes.
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
547
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
548 We use struct scroll_bar as a template for accessing fields of the
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
549 vector. */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
550
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
551 struct scroll_bar {
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
552
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
553 /* These fields are shared by all vectors. */
8837
a48847852901 (struct scroll_bar, SCROLL_BAR_VEC_SIZE): Use EMACS_INT.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
554 EMACS_INT size_from_Lisp_Vector_struct;
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
555 struct Lisp_Vector *next_from_Lisp_Vector_struct;
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
556
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
557 /* The window we're a scroll bar for. */
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
558 Lisp_Object window;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
559
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
560 /* The next and previous in the chain of scroll bars in this frame. */
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
561 Lisp_Object next, prev;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
562
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
563 /* The X window representing this scroll bar. Since this is a full
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
564 32-bit quantity, we store it split into two 32-bit values. */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
565 Lisp_Object x_window_low, x_window_high;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
566
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
567 /* The position and size of the scroll bar in pixels, relative to the
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
568 frame. */
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
569 Lisp_Object top, left, width, height;
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
570
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
571 /* The starting and ending positions of the handle, relative to the
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
572 handle area (i.e. zero is the top position, not
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
573 SCROLL_BAR_TOP_BORDER). If they're equal, that means the handle
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
574 hasn't been drawn yet.
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
575
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
576 These are not actually the locations where the beginning and end
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
577 are drawn; in order to keep handles from becoming invisible when
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
578 editing large files, we establish a minimum height by always
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
579 drawing handle bottoms VERTICAL_SCROLL_BAR_MIN_HANDLE pixels below
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
580 where they would be normally; the bottom and top are in a
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
581 different co-ordinate system. */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
582 Lisp_Object start, end;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
583
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
584 /* If the scroll bar handle is currently being dragged by the user,
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
585 this is the number of pixels from the top of the handle to the
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
586 place where the user grabbed it. If the handle isn't currently
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
587 being dragged, this is Qnil. */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
588 Lisp_Object dragging;
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
589 };
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
590
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
591 /* The number of elements a vector holding a struct scroll_bar needs. */
9961
5ecf054a8c8f (XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents: 9692
diff changeset
592 #define SCROLL_BAR_VEC_SIZE \
5ecf054a8c8f (XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents: 9692
diff changeset
593 ((sizeof (struct scroll_bar) \
5ecf054a8c8f (XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents: 9692
diff changeset
594 - sizeof (EMACS_INT) - sizeof (struct Lisp_Vector *)) \
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
595 / sizeof (Lisp_Object))
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
596
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
597 /* Turning a lisp vector value into a pointer to a struct scroll_bar. */
9961
5ecf054a8c8f (XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents: 9692
diff changeset
598 #define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
599
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
600
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
601 /* Building a 32-bit C integer from two 16-bit lisp integers. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
602 #define SCROLL_BAR_PACK(low, high) (XINT (high) << 16 | XINT (low))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
603
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
604 /* Setting two lisp integers to the low and high words of a 32-bit C int. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
605 #define SCROLL_BAR_UNPACK(low, high, int32) \
9259
df555d80f093 (SCROLL_BAR_UNPACK): Use new accessor macros instead of calling XSET directly.
Karl Heuer <kwzh@gnu.org>
parents: 9168
diff changeset
606 (XSETINT ((low), (int32) & 0xffff), \
df555d80f093 (SCROLL_BAR_UNPACK): Use new accessor macros instead of calling XSET directly.
Karl Heuer <kwzh@gnu.org>
parents: 9168
diff changeset
607 XSETINT ((high), ((int32) >> 16) & 0xffff))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
608
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
609
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
610 /* Extract the X window id of the scroll bar from a struct scroll_bar. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
611 #define SCROLL_BAR_X_WINDOW(ptr) \
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
612 ((Window) SCROLL_BAR_PACK ((ptr)->x_window_low, (ptr)->x_window_high))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
613
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
614 /* Store a window id in a struct scroll_bar. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
615 #define SET_SCROLL_BAR_X_WINDOW(ptr, id) \
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
616 (SCROLL_BAR_UNPACK ((ptr)->x_window_low, (ptr)->x_window_high, (int) id))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
617
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
618
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
619 /* Return the outside pixel height for a vertical scroll bar HEIGHT
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
620 rows high on frame F. */
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
621 #define VERTICAL_SCROLL_BAR_PIXEL_HEIGHT(f, height) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
622 ((height) * (f)->output_data.x->line_height)
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
623
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
624 /* Return the inside width of a vertical scroll bar, given the outside
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
625 width. */
16252
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
626 #define VERTICAL_SCROLL_BAR_INSIDE_WIDTH(f, width) \
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
627 ((width) \
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
628 - VERTICAL_SCROLL_BAR_LEFT_BORDER \
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
629 - VERTICAL_SCROLL_BAR_RIGHT_BORDER \
16268
eed1157f0587 (VERTICAL_SCROLL_BAR_WIDTH_TRIM): Renamed from
Richard M. Stallman <rms@gnu.org>
parents: 16252
diff changeset
630 - VERTICAL_SCROLL_BAR_WIDTH_TRIM * 2)
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
631
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
632 /* Return the length of the rectangle within which the top of the
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
633 handle must stay. This isn't equivalent to the inside height,
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
634 because the scroll bar handle has a minimum height.
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
635
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
636 This is the real range of motion for the scroll bar, so when we're
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
637 scaling buffer positions to scroll bar positions, we use this, not
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
638 VERTICAL_SCROLL_BAR_INSIDE_HEIGHT. */
16252
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
639 #define VERTICAL_SCROLL_BAR_TOP_RANGE(f, height) \
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
640 (VERTICAL_SCROLL_BAR_INSIDE_HEIGHT (f, height) - VERTICAL_SCROLL_BAR_MIN_HANDLE)
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
641
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
642 /* Return the inside height of vertical scroll bar, given the outside
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
643 height. See VERTICAL_SCROLL_BAR_TOP_RANGE too. */
16252
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
644 #define VERTICAL_SCROLL_BAR_INSIDE_HEIGHT(f, height) \
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
645 ((height) - VERTICAL_SCROLL_BAR_TOP_BORDER - VERTICAL_SCROLL_BAR_BOTTOM_BORDER)
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
646
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
647
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
648 /* Border widths for scroll bars.
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
649
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
650 Scroll bar windows don't have any X borders; their border width is
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
651 set to zero, and we redraw borders ourselves. This makes the code
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
652 a bit cleaner, since we don't have to convert between outside width
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
653 (used when relating to the rest of the screen) and inside width
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
654 (used when sizing and drawing the scroll bar window itself).
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
655
3591
507f64624555 Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents: 3195
diff changeset
656 The handle moves up and down/back and forth in a rectangle inset
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
657 from the edges of the scroll bar. These are widths by which we
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
658 inset the handle boundaries from the scroll bar edges. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
659 #define VERTICAL_SCROLL_BAR_LEFT_BORDER (2)
6357
fb5923ece02c (VERTICAL_SCROLL_BAR_RIGHT_BORDER): Change from 3 to 2.
Karl Heuer <kwzh@gnu.org>
parents: 5946
diff changeset
660 #define VERTICAL_SCROLL_BAR_RIGHT_BORDER (2)
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
661 #define VERTICAL_SCROLL_BAR_TOP_BORDER (2)
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
662 #define VERTICAL_SCROLL_BAR_BOTTOM_BORDER (2)
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
663
1994
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
664 /* Minimum lengths for scroll bar handles, in pixels. */
73ce9dd21093 Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents: 1821
diff changeset
665 #define VERTICAL_SCROLL_BAR_MIN_HANDLE (5)
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
666
16268
eed1157f0587 (VERTICAL_SCROLL_BAR_WIDTH_TRIM): Renamed from
Richard M. Stallman <rms@gnu.org>
parents: 16252
diff changeset
667 /* Trimming off a few pixels from each side prevents
16252
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
668 text from glomming up against the scroll bar */
16268
eed1157f0587 (VERTICAL_SCROLL_BAR_WIDTH_TRIM): Renamed from
Richard M. Stallman <rms@gnu.org>
parents: 16252
diff changeset
669 #define VERTICAL_SCROLL_BAR_WIDTH_TRIM (2)
16252
41c962c84de5 (VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents: 16049
diff changeset
670
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
671
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
672 /* Manipulating pixel sizes and character sizes.
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
673 Knowledge of which factors affect the overall size of the window should
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
674 be hidden in these macros, if that's possible.
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
675
9168
632d43f8cde2 Comment fix.
Karl Heuer <kwzh@gnu.org>
parents: 9013
diff changeset
676 Return the upper/left pixel position of the character cell on frame F
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
677 at ROW/COL. */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
678 #define CHAR_TO_PIXEL_ROW(f, row) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
679 ((f)->output_data.x->internal_border_width \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
680 + (row) * (f)->output_data.x->line_height)
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
681 #define CHAR_TO_PIXEL_COL(f, col) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
682 ((f)->output_data.x->internal_border_width \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
683 + (col) * FONT_WIDTH ((f)->output_data.x->font))
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
684
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
685 /* Return the pixel width/height of frame F if it has
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
686 WIDTH columns/HEIGHT rows. */
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
687 #define CHAR_TO_PIXEL_WIDTH(f, width) \
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
688 (CHAR_TO_PIXEL_COL (f, width) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
689 + (f)->output_data.x->vertical_scroll_bar_extra \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
690 + (f)->output_data.x->internal_border_width)
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
691 #define CHAR_TO_PIXEL_HEIGHT(f, height) \
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
692 (CHAR_TO_PIXEL_ROW (f, height) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
693 + (f)->output_data.x->internal_border_width)
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
694
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
695
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
696 /* Return the row/column (zero-based) of the character cell containing
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
697 the pixel on FRAME at ROW/COL. */
3195
1071243e14c7 (PIXEL_TO_CHAR_COL, PIXEL_TO_CHAR_ROW): Fix mismatch in arg names.
Richard M. Stallman <rms@gnu.org>
parents: 3077
diff changeset
698 #define PIXEL_TO_CHAR_ROW(f, row) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
699 (((row) - (f)->output_data.x->internal_border_width) \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
700 / (f)->output_data.x->line_height)
3195
1071243e14c7 (PIXEL_TO_CHAR_COL, PIXEL_TO_CHAR_ROW): Fix mismatch in arg names.
Richard M. Stallman <rms@gnu.org>
parents: 3077
diff changeset
701 #define PIXEL_TO_CHAR_COL(f, col) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
702 (((col) - (f)->output_data.x->internal_border_width) \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
703 / FONT_WIDTH ((f)->output_data.x->font))
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
704
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
705 /* How many columns/rows of text can we fit in WIDTH/HEIGHT pixels on
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
706 frame F? */
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
707 #define PIXEL_TO_CHAR_WIDTH(f, width) \
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
708 (PIXEL_TO_CHAR_COL (f, ((width) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
709 - (f)->output_data.x->internal_border_width \
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
710 - (f)->output_data.x->vertical_scroll_bar_extra)))
1721
6ba3bca4c3de * frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents: 1531
diff changeset
711 #define PIXEL_TO_CHAR_HEIGHT(f, height) \
1788
aaccd635fb71 Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents: 1721
diff changeset
712 (PIXEL_TO_CHAR_ROW (f, ((height) \
12666
47630952226e (struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents: 12658
diff changeset
713 - (f)->output_data.x->internal_border_width)))
2196
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
714
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
715 /* If a struct input_event has a kind which is selection_request_event
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
716 or selection_clear_event, then its contents are really described
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
717 by this structure. */
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
718
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
719 /* For an event of kind selection_request_event,
14164
519566ee8a29 Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14030
diff changeset
720 this structure really describes the contents.
519566ee8a29 Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14030
diff changeset
721 **Don't make this struct longer!**
519566ee8a29 Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14030
diff changeset
722 If it overlaps the frame_or_window field of struct input_event,
519566ee8a29 Comment change.
Richard M. Stallman <rms@gnu.org>
parents: 14030
diff changeset
723 that will cause GC to crash. */
2196
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
724 struct selection_input_event
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
725 {
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
726 int kind;
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
727 Display *display;
14030
33b3923c36b9 Undo previous change.
Richard M. Stallman <rms@gnu.org>
parents: 13939
diff changeset
728 /* We spell it with an "o" here because X does. */
33b3923c36b9 Undo previous change.
Richard M. Stallman <rms@gnu.org>
parents: 13939
diff changeset
729 Window requestor;
2196
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
730 Atom selection, target, property;
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
731 Time time;
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
732 };
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
733
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
734 #define SELECTION_EVENT_DISPLAY(eventp) \
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
735 (((struct selection_input_event *) (eventp))->display)
14030
33b3923c36b9 Undo previous change.
Richard M. Stallman <rms@gnu.org>
parents: 13939
diff changeset
736 /* We spell it with an "o" here because X does. */
33b3923c36b9 Undo previous change.
Richard M. Stallman <rms@gnu.org>
parents: 13939
diff changeset
737 #define SELECTION_EVENT_REQUESTOR(eventp) \
33b3923c36b9 Undo previous change.
Richard M. Stallman <rms@gnu.org>
parents: 13939
diff changeset
738 (((struct selection_input_event *) (eventp))->requestor)
2196
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
739 #define SELECTION_EVENT_SELECTION(eventp) \
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
740 (((struct selection_input_event *) (eventp))->selection)
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
741 #define SELECTION_EVENT_TARGET(eventp) \
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
742 (((struct selection_input_event *) (eventp))->target)
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
743 #define SELECTION_EVENT_PROPERTY(eventp) \
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
744 (((struct selection_input_event *) (eventp))->property)
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
745 #define SELECTION_EVENT_TIME(eventp) \
75e1f1ee83ad (SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents: 1994
diff changeset
746 (((struct selection_input_event *) (eventp))->time)
3077
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
747
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
748
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
749 /* Interface to the face code functions. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
750
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
751 /* Create the first two computed faces for a frame -- the ones that
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
752 have GC's. */
3077
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
753 extern void init_frame_faces (/* FRAME_PTR */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
754
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
755 /* Free the resources for the faces associated with a frame. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
756 extern void free_frame_faces (/* FRAME_PTR */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
757
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
758 /* Given a computed face, find or make an equivalent display face
3077
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
759 in face_vector, and return a pointer to it. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
760 extern struct face *intern_face (/* FRAME_PTR, struct face * */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
761
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
762 /* Given a frame and a face name, return the face's ID number, or
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
763 zero if it isn't a recognized face name. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
764 extern int face_name_id_number (/* FRAME_PTR, Lisp_Object */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
765
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
766 /* Return non-zero if FONT1 and FONT2 have the same size bounding box.
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
767 We assume that they're both character-cell fonts. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
768 extern int same_size_fonts (/* XFontStruct *, XFontStruct * */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
769
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
770 /* Recompute the GC's for the default and modeline faces.
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
771 We call this after changing frame parameters on which those GC's
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
772 depend. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
773 extern void recompute_basic_faces (/* FRAME_PTR */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
774
3883
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
775 /* Return the face ID associated with a buffer position POS. Store
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
776 into *ENDPTR the next position at which a different face is
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
777 needed. This does not take account of glyphs that specify their
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
778 own face codes. F is the frame in use for display, and W is a
b9e5a869b33e Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents: 3591
diff changeset
779 window displaying the current buffer.
3077
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
780
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
781 REGION_BEG, REGION_END delimit the region, so it can be highlighted. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
782 extern int compute_char_face (/* FRAME_PTR frame,
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
783 struct window *w,
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
784 int pos,
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
785 int region_beg, int region_end,
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
786 int *endptr */);
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
787 /* Return the face ID to use to display a special glyph which selects
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
788 FACE_CODE as the face ID, assuming that ordinarily the face would
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
789 be BASIC_FACE. F is the frame. */
8bba60752a32 * xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents: 2841
diff changeset
790 extern int compute_glyph_face (/* FRAME_PTR, int */);