annotate src/redisplay.h @ 337:fbbf69b4e8a7 r21-0-66

Import from CVS: tag r21-0-66
author cvs
date Mon, 13 Aug 2007 10:51:02 +0200
parents 558f606b08ae
children 8626e4521993
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 /* Redisplay data structures.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 Copyright (C) 1994, 1995 Board of Trustees, University of Illinois.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3 Copyright (C) 1996 Chuck Thompson.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 Copyright (C) 1995, 1996 Ben Wing.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 This file is part of XEmacs.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 XEmacs is free software; you can redistribute it and/or modify it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 under the terms of the GNU General Public License as published by the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10 Free Software Foundation; either version 2, or (at your option) any
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11 later version.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 XEmacs is distributed in the hope that it will be useful, but WITHOUT
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 for more details.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 You should have received a copy of the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 along with XEmacs; see the file COPYING. If not, write to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 Boston, MA 02111-1307, USA. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 /* Synched up with: Not in FSF. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25 #ifndef _XEMACS_REDISPLAY_H_
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
26 #define _XEMACS_REDISPLAY_H_
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 /* Redisplay DASSERT types */
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
29 #define DB_DISP_POS 1
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
30 #define DB_DISP_TEXT_LAYOUT 2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
31 #define DB_DISP_REDISPLAY 4
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33 /* These are the possible return values from pixel_to_glyph_translation. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 #define OVER_MODELINE 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 #define OVER_TEXT 1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 #define OVER_OUTSIDE 2
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37 #define OVER_NOTHING 3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 #define OVER_BORDER 4
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 #define OVER_TOOLBAR 5
284
558f606b08ae Import from CVS: tag r21-0b40
cvs
parents: 272
diff changeset
40 #define OVER_V_DIVIDER 6
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 #define NO_BLOCK -1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 /* Imagine that the text in the buffer is displayed on a piece of paper
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 the width of the frame and very very tall. The line start cache is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 an array of struct line_start_cache's, describing the start and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 end buffer positions for a contiguous set of lines on that piece
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48 of paper. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
50 typedef struct line_start_cache line_start_cache;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51 struct line_start_cache
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53 Bufpos start, end;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 int height;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
57 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
59 Dynarr_declare (line_start_cache);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60 } line_start_cache_dynarr;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 /* The possible types of runes.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64 #### The Lisp_Glyph type is broken. There should instead be a pixmap
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 type. Currently the device-specific output routines have to worry
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66 about whether the glyph is textual or not, etc. For Mule this is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67 a big problem because you might need multiple fonts to display the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68 text. It also eliminates optimizations that could come from glumping
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 the text of multiple text glyphs together -- this makes displaying
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
70 binary files (with lots of control chars, etc.) very very slow. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
71
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72 #define RUNE_BLANK 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 #define RUNE_CHAR 1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74 #define RUNE_DGLYPH 2
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75 #define RUNE_HLINE 3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76 #define RUNE_VLINE 4
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78 #define CURSOR_ON 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79 #define CURSOR_OFF 1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80 #define NO_CURSOR 2
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 #define NEXT_CURSOR 3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82 #define IGNORE_CURSOR 4
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84 #define DEFAULT_INDEX (face_index) 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
85 #define MODELINE_INDEX (face_index) 1
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
86
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
87 /* A rune is a single display element, such as a printable character
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88 or pixmap. Any single character in a buffer has one or more runes
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 (or zero, if the character is invisible) corresponding to it.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90 (Printable characters typically have one rune associated with them,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91 but control characters have two -- a ^ and a letter -- and other
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 non-printing characters (those displayed in octal) have four. */
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
93
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
94 typedef struct rune rune;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95 struct rune
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 face_index findex; /* face rune is displayed with. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98 face_index is an index into a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 window-specific array of face cache
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
100 elements. Each face cache element
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
101 corresponds to one "merged face"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
102 (the result of merging all the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
103 faces that overlap the rune) and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
104 contains the instance values for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
105 each of the face properties in this
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
106 particular window. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
107
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
108 short xpos; /* horizontal starting position in pixels */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
109 short width; /* pixel width of rune */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
110
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
111
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
112 Bufpos bufpos; /* buffer position this rune is displaying;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
113 for the modeline, the value here is a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
114 Charcount, but who's looking? */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
115 Bufpos endpos; /* if set this rune covers a range of pos */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
116 /* #### Chuck, what does it mean for a rune
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
117 to cover a range of pos? I don't get
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
118 this. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
119 unsigned int cursor_type :3; /* is this rune covered by the cursor? */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
120 unsigned int type :3; /* type of rune object */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
121
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
122 union /* Information specific to the type of rune */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
123 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
124 /* DGLYPH */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
125 struct
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
126 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
127 Lisp_Object glyph;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
128 Lisp_Object extent; /* extent rune is attached to, if any.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
129 If this is a rune in the modeline
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
130 then this might be nil. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
131
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
132 int xoffset; /* Number of pixels that need to be
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
133 chopped off the left of the glyph.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
134 This has the effect of shifting the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
135 glyph to the left while still clipping
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
136 at XPOS. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
137 } dglyph;
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
138
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
139 /* CHAR */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
140 struct
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
141 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
142 Emchar ch; /* Cbaracter of this rune. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
143 } chr;
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
144
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
145 /* HLINE */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
146 struct
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
147 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
148 int thickness; /* how thick to make hline */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
149 int yoffset; /* how far down from top of line to put top */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
150 } hline;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
151 } object; /* actual rune object */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
152 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
153
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
154 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
155 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
156 Dynarr_declare (rune);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
157 } rune_dynarr;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
158
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
159 /* These must have distinct values. Note that the ordering actually
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
160 represents priority levels. TEXT has the lowest priority level. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
161 enum display_type
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
162 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
163 TEXT,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
164 LEFT_OUTSIDE_MARGIN,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
165 LEFT_INSIDE_MARGIN,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
166 RIGHT_INSIDE_MARGIN,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
167 RIGHT_OUTSIDE_MARGIN,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
168 OVERWRITE
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
169 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
170
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
171 /* A display block represents a run of text on a single line.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
172 Apparently there is only one display block per line for each
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
173 of the types listed in `enum display_type'.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
174
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
175 A display block consists mostly of an array of runes, one per
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
176 atomic display element (printable character, pixmap, etc.). */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
177
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
178 /* #### Yuckity yuckity yuck yuck yuck yuck yuck!!
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
179
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
180 Chuck, I think you should redo this. It should not be the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
181 responsibility of the device-specific code to worry about
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
182 the different faces. The generic stuff in redisplay-output.c
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
183 should glump things up into sub-blocks, each of which
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
184 corresponds to a single pixmap or a single run of text in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
185 the same font.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
186
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
187 It might still make sense for the device-specific output routine
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
188 to get passed an entire display line. That way, it can make
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
189 calls to XDrawText() (which draws multiple runs of single-font
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
190 data) instead of XDrawString(). The reason for this is to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
191 reduce the amount of X traffic, which will help things significantly
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
192 on a slow line. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
193
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
194 typedef struct display_block display_block;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
195 struct display_block
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
196 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
197 enum display_type type; /* type of display block */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
198
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
199 int start_pos; /* starting pixel position of block */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
200 int end_pos; /* ending pixel position of block */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
201
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
202 rune_dynarr *runes; /* Dynamic array of runes */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
203 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
204
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
205 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
206 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
207 Dynarr_declare (display_block);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
208 } display_block_dynarr;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
209
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
210 typedef struct layout_bounds_type
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
211 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
212 int left_out;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
213 int left_in;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
214 int left_white;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
215 int right_white;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
216 int right_in;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
217 int right_out;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
218 } layout_bounds;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
219
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
220 typedef struct glyph_block glyph_block;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
221 struct glyph_block
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
222 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
223 Lisp_Object glyph;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
224 Lisp_Object extent;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
225 /* The rest are only used by margin routines. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
226 face_index findex;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
227 int active;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
228 int width;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
229 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
230
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
231 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
232 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
233 Dynarr_declare (glyph_block);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
234 } glyph_block_dynarr;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
235
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
236 typedef struct display_line display_line;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
237 struct display_line
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
238 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
239 short ypos; /* vertical position in pixels
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
240 of the baseline for this line. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
241 unsigned short ascent, descent; /* maximum values for this line.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
242 The ascent is the number of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
243 pixels above the baseline, and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
244 the descent is the number of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
245 pixels below the baseline.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
246 The descent includes the baseline
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
247 pixel-row itself, I think. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
248 unsigned short clip; /* amount of bottom of line to clip
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
249 in pixels.*/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
250 Bufpos bufpos; /* first buffer position on line */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
251 Bufpos end_bufpos; /* last buffer position on line */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
252 Charcount offset; /* adjustment to bufpos vals */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
253 Charcount num_chars; /* # of chars on line
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
254 including expansion of tabs
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
255 and control chars */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
256 int cursor_elt; /* rune block of TEXT display
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
257 block cursor is at or -1 */
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
258 char used_prop_data; /* can't incrementally update if line
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
259 used propogation data */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
260
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
261 layout_bounds bounds; /* line boundary positions */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
262
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
263 char modeline; /* t if this line is a modeline */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
264
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
265 /* Dynamic array of display blocks */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
266 display_block_dynarr *display_blocks;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
267
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
268 /* Dynamic arrays of left and right glyph blocks */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
269 glyph_block_dynarr *left_glyphs;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
270 glyph_block_dynarr *right_glyphs;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
271 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
272
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
273 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
274 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
275 Dynarr_declare (display_line);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
276 } display_line_dynarr;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
277
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
278 /* It could be argued that the following two structs belong in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
279 extents.h, but they're only used by redisplay and it simplifies
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
280 the header files to put them here. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
281
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
282 typedef struct
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
283 {
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
284 Dynarr_declare (EXTENT);
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
285 } EXTENT_dynarr;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
286
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
287 struct font_metric_info
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
288 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
289 int width;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
290 int height; /* always ascent + descent; for convenience */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
291 int ascent;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
292 int descent;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
293
183
e121b013d1f0 Import from CVS: tag r20-3b18
cvs
parents: 2
diff changeset
294 int proportional_p;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
295 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
296
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
297 /* NOTE NOTE NOTE: Currently the positions in an extent fragment
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
298 structure are Bytind's, not Bufpos's. This could change. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
299
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
300 struct extent_fragment
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
301 {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
302 Lisp_Object object; /* buffer or string */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
303 struct frame *frm;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
304 Bytind pos, end;
185
3d6bfa290dbd Import from CVS: tag r20-3b19
cvs
parents: 183
diff changeset
305 EXTENT_dynarr *extents;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
306 glyph_block_dynarr *begin_glyphs, *end_glyphs;
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
307 unsigned int invisible:1;
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
308 unsigned int invisible_ellipses:1;
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
309 unsigned int previously_invisible:1;
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
310 unsigned int invisible_ellipses_already_displayed:1;
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
311 };
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
312
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
313
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
314 /*************************************************************************/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
315 /* change flags */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
316 /*************************************************************************/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
317
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
318 /* Quick flags to signal redisplay. redisplay() sets them all to 0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
319 when it finishes. If none of them are set when it starts, it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
320 assumes that nothing needs to be done. Functions that make a change
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
321 that is (potentially) visible on the screen should set the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
322 appropriate flag.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
323
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
324 If any of these flags are set, redisplay will look more carefully
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
325 to see if anything has really changed. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
326
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
327 /* non-nil if the contents of a buffer have changed since the last time
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
328 redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
329 extern int buffers_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
330 extern int buffers_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
331
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
332 /* Nonzero if head_clip or tail_clip of a buffer has changed
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
333 since last redisplay that finished */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
334 extern int clip_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
335 extern int clip_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
336
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
337 /* non-nil if any extent has changed since the last time redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
338 extern int extents_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
339 extern int extents_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
340
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
341 /* non-nil if any face has changed since the last time redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
342 extern int faces_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
343
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
344 /* Nonzero means one or more frames have been marked as garbaged */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
345 extern int frame_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
346
269
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
347 /* True if any of the builtin display glyphs (continuation,
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
348 hscroll, control-arrow, etc) is in need of updating
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
349 somewhere. */
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
350 extern int glyphs_changed;
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
351 extern int glyphs_changed_set;
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
352
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
353 /* True if an icon is in need of updating somewhere. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
354 extern int icon_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
355 extern int icon_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
356
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
357 /* True if a menubar is in need of updating somewhere. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
358 extern int menubar_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
359 extern int menubar_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
360
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
361 /* true iff we should redraw the modelines on the next redisplay */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
362 extern int modeline_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
363 extern int modeline_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
364
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
365 /* non-nil if point has changed in some buffer since the last time
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
366 redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
367 extern int point_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
368 extern int point_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
369
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
370 /* non-nil if some frame has changed its size */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
371 extern int size_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
372
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
373 /* non-nil if some device has signaled that it wants to change size */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
374 extern int asynch_device_change_pending;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
375
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
376 /* non-nil if any toolbar has changed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
377 extern int toolbar_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
378 extern int toolbar_changed_set;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
379
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
380 /* non-nil if any window has changed since the last time redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
381 extern int windows_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
382
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
383 /* non-nil if any frame's window structure has changed since the last
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
384 time redisplay completed */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
385 extern int windows_structure_changed;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
386
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
387 /* These macros can be relatively expensive. Since they are often
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
388 called numerous times between each call to redisplay, we keep track
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
389 if each has already been called and don't bother doing most of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
390 work if it is currently set. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
391
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
392 #define MARK_TYPE_CHANGED(object) do { \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
393 if (!object##_changed_set) { \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
394 Lisp_Object _devcons_, _concons_; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
395 DEVICE_LOOP_NO_BREAK (_devcons_, _concons_) \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
396 { \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
397 Lisp_Object _frmcons_; \
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
398 struct device *_d_ = XDEVICE (XCAR (_devcons_)); \
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
399 DEVICE_FRAME_LOOP (_frmcons_, _d_) \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
400 { \
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
401 struct frame *_f_ = XFRAME (XCAR (_frmcons_)); \
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
402 _f_->object##_changed = 1; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
403 _f_->modiff++; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
404 } \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
405 _d_->object##_changed = 1; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
406 } \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
407 object##_changed = 1; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
408 object##_changed_set = 1; } \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
409 } while (0)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
410
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
411 #define MARK_BUFFERS_CHANGED MARK_TYPE_CHANGED (buffers)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
412 #define MARK_CLIP_CHANGED MARK_TYPE_CHANGED (clip)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
413 #define MARK_EXTENTS_CHANGED MARK_TYPE_CHANGED (extents)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
414 #define MARK_ICON_CHANGED MARK_TYPE_CHANGED (icon)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
415 #define MARK_MENUBAR_CHANGED MARK_TYPE_CHANGED (menubar)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
416 #define MARK_MODELINE_CHANGED MARK_TYPE_CHANGED (modeline)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
417 #define MARK_POINT_CHANGED MARK_TYPE_CHANGED (point)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
418 #define MARK_TOOLBAR_CHANGED MARK_TYPE_CHANGED (toolbar)
269
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
419 #define MARK_GLYPHS_CHANGED MARK_TYPE_CHANGED (glyphs)
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
420
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
421 /* Anytime a console, device or frame is added or deleted we need to reset
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
422 these flags. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
423 #define RESET_CHANGED_SET_FLAGS \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
424 do { \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
425 buffers_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
426 clip_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
427 extents_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
428 icon_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
429 menubar_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
430 modeline_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
431 point_changed_set = 0; \
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
432 toolbar_changed_set = 0; \
269
b2472a1930f2 Import from CVS: tag r20-5b33
cvs
parents: 185
diff changeset
433 glyphs_changed_set = 0; \
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
434 } while (0)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
435
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
436
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
437 /*************************************************************************/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
438 /* redisplay global variables */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
439 /*************************************************************************/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
440
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
441 /* redisplay structre used by various utility routines. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
442 extern display_line_dynarr *cmotion_display_lines;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
443
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
444 /* Nonzero means truncate lines in all windows less wide than the frame. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
445 extern int truncate_partial_width_windows;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
446
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
447 /* Nonzero if we're in a display critical section. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
448 extern int in_display;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
449
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
450 /* Nonzero means no need to redraw the entire frame on resuming
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
451 a suspended Emacs. This is useful on terminals with multiple pages,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
452 where one page is used for Emacs and another for all else. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
453 extern int no_redraw_on_reenter;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
454
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
455 /* Nonzero means flash the frame instead of ringing the bell. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
456 extern int visible_bell;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
457
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
458 /* Thickness of shadow border around 3D modelines. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
459 extern Lisp_Object Vmodeline_shadow_thickness;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
460
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
461 /* Scroll if point lands on the bottom line and that line is partially
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
462 clipped. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
463 extern int scroll_on_clipped_lines;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
464
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
465 extern Lisp_Object Vglobal_mode_string;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
466
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
467 /* The following two variables are defined in emacs.c and are used
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
468 to convey information discovered on the command line way early
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
469 (before *anything* is initialized). */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
470
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
471 /* If non-zero, a window-system was specified on the command line.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
472 Defined in emacs.c. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
473 extern int display_arg;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
474
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
475 /* Type of display specified. Defined in emacs.c. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
476 extern char *display_use;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
477
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
478 /* Nonzero means reading single-character input with prompt
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
479 so put cursor on minibuffer after the prompt. */
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
480
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
481 extern int cursor_in_echo_area;
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
482
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
483 extern Lisp_Object Qbar_cursor, Qcursor_in_echo_area, Vwindow_system;
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
484
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
485
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
486 /*************************************************************************/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
487 /* redisplay exported functions */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
488 /*************************************************************************/
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 269
diff changeset
489 EXFUN (Fredraw_frame, 2);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
490
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
491 int redisplay_text_width_string (struct window *w, int findex,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
492 Bufbyte *nonreloc, Lisp_Object reloc,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
493 Bytecount offset, Bytecount len);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
494 int redisplay_frame_text_width_string (struct frame *f,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
495 Lisp_Object face,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
496 Bufbyte *nonreloc,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
497 Lisp_Object reloc,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
498 Bytecount offset, Bytecount len);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
499 void redisplay (void);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
500 struct display_block *get_display_block_from_line (struct display_line *dl,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
501 enum display_type type);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
502 layout_bounds calculate_display_line_boundaries (struct window *w,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
503 int modeline);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
504 Bufpos point_at_center (struct window *w, int type, Bufpos start,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
505 Bufpos point);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
506 int line_at_center (struct window *w, int type, Bufpos start, Bufpos point);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
507 int window_half_pixpos (struct window *w);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
508 void redisplay_echo_area (void);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
509 void free_display_structs (struct window_mirror *mir);
2
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
510 Bufbyte *generate_formatted_string (struct window *w, Lisp_Object format_str,
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
511 Lisp_Object result_str, face_index findex,
ac2d302a0011 Import from CVS: tag r19-15b2
cvs
parents: 0
diff changeset
512 int type);
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
513 int real_current_modeline_height (struct window *w);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
514 int pixel_to_glyph_translation (struct frame *f, int x_coord,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
515 int y_coord, int *col, int *row,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
516 int *obj_x, int *obj_y,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
517 struct window **w, Bufpos *bufpos,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
518 Bufpos *closest, Charcount *modeline_closest,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
519 Lisp_Object *obj1, Lisp_Object *obj2);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
520 void glyph_to_pixel_translation (struct window *w, int char_x,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
521 int char_y, int *pix_x, int *pix_y);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
522 void mark_redisplay (void (*) (Lisp_Object));
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
523 int point_in_line_start_cache (struct window *w, Bufpos point,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
524 int min_past);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
525 int point_would_be_visible (struct window *w, Bufpos startp,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
526 Bufpos point);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
527 Bufpos start_of_last_line (struct window *w, Bufpos startp);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
528 Bufpos end_of_last_line (struct window *w, Bufpos startp);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
529 Bufpos start_with_line_at_pixpos (struct window *w, Bufpos point,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
530 int pixpos);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
531 Bufpos start_with_point_on_display_line (struct window *w, Bufpos point,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
532 int line);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
533 int redisplay_variable_changed (Lisp_Object sym, Lisp_Object *val,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
534 Lisp_Object in_object, int flags);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
535 void redisplay_glyph_changed (Lisp_Object glyph, Lisp_Object property,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
536 Lisp_Object locale);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
537
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
538 #ifdef MEMORY_USAGE_STATS
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
539 int compute_display_line_dynarr_usage (display_line_dynarr *dyn,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
540 struct overhead_stats *ovstats);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
541 int compute_line_start_cache_dynarr_usage (line_start_cache_dynarr *dyn,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
542 struct overhead_stats *ovstats);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
543 #endif
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
544
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
545
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
546 /* defined in redisplay-output.c */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
547 int get_next_display_block (layout_bounds bounds,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
548 display_block_dynarr *dba, int start_pos,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
549 int *next_start);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
550 void redisplay_clear_bottom_of_window (struct window *w,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
551 display_line_dynarr *ddla,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
552 int min_start, int max_end);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
553 void redisplay_update_line (struct window *w, int first_line,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
554 int last_line, int update_values);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
555 void redisplay_output_window (struct window *w);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
556 int redisplay_move_cursor (struct window *w, Bufpos new_point,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
557 int no_output_end);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
558 void redisplay_redraw_cursor (struct frame *f, int run_begin_end_meths);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
559 void output_display_line (struct window *w, display_line_dynarr *cdla,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
560 display_line_dynarr *ddla, int line,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
561 int force_start, int force_end);
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
562
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
563 #endif /* _XEMACS_REDISPLAY_H_ */