1 /* Definitions and headers for communication on the Mac OS.
2 Copyright (C) 2000, 2001, 2002, 2003, 2004,
3 2005, 2006 Free Software Foundation, Inc.
5 This file is part of GNU Emacs.
7 GNU Emacs is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GNU Emacs is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Emacs; see the file COPYING. If not, write to
19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
20 Boston, MA 02110-1301, USA. */
22 /* Contributed by Andrew Choi (akochoi@mac.com). */
24 #ifndef EMACS_MACGUI_H
25 #define EMACS_MACGUI_H
27 typedef int Display
; /* fix later */
29 typedef Lisp_Object XrmDatabase
;
31 typedef unsigned long Time
;
36 #if ! HAVE_MKTIME || BROKEN_MKTIME
43 /* Macros max and min defined in lisp.h conflict with those in
44 precompiled header Carbon.h. */
48 #include <Carbon/Carbon.h>
49 #if ! HAVE_MKTIME || BROKEN_MKTIME
51 #define mktime emacs_mktime
54 #define free unexec_free
56 #define malloc unexec_malloc
58 #define realloc unexec_realloc
60 #define min(a, b) ((a) < (b) ? (a) : (b))
62 #define max(a, b) ((a) > (b) ? (a) : (b))
64 #define init_process emacs_init_process
66 #else /* not MAC_OSX */
70 #endif /* not MAC_OSX */
72 #define Z (current_buffer->text->z)
73 #else /* not HAVE_CARBON */
74 #include <QuickDraw.h> /* for WindowPtr */
75 #include <QDOffscreen.h> /* for GWorldPtr */
76 #include <Appearance.h> /* for ThemeCursor */
80 #endif /* not HAVE_CARBON */
82 /* Whether to use ATSUI (Apple Type Services for Unicode Imaging) for
90 /* Whether to use low-level Quartz 2D (aka Core Graphics) text drawing
91 in preference to ATSUI for ASCII and Latin-1 characters. */
92 #ifndef USE_CG_TEXT_DRAWING
93 #if USE_ATSUI && MAC_OS_X_VERSION_MAX_ALLOWED >= 1030
94 #define USE_CG_TEXT_DRAWING 1
98 /* Whether to use Quartz 2D routines for drawing operations other than
100 #ifndef USE_CG_DRAWING
101 #if USE_ATSUI && MAC_OS_X_VERSION_MAX_ALLOWED >= 1020
102 #define USE_CG_DRAWING 1
106 typedef WindowPtr Window
;
107 typedef GWorldPtr Pixmap
;
109 #define Cursor ThemeCursor
110 #define No_Cursor (-1)
112 #define FACE_DEFAULT (~0)
114 #if !TARGET_API_MAC_CARBON
115 #define GetPixDepth(pmh) ((*(pmh))->pixelSize)
119 /* Emulate XCharStruct. */
120 /* If the sum of ascent and descent is negative, that means some
121 special status specified by enum pcm_status. */
122 typedef struct _XCharStruct
124 short lbearing
; /* origin to left edge of raster */
125 short rbearing
; /* origin to right edge of raster */
126 short width
; /* advance to next char's origin */
127 short ascent
; /* baseline to top edge of raster */
128 short descent
; /* baseline to bottom edge of raster */
130 unsigned short attributes
; /* per char flags (not predefined) */
136 PCM_VALID
= 0, /* pcm data is valid */
137 PCM_INVALID
= -1, /* pcm data is invalid */
140 #define STORE_XCHARSTRUCT(xcs, w, bds) \
141 ((xcs).width = (w), \
142 (xcs).lbearing = (bds).left, \
143 (xcs).rbearing = (bds).right, \
144 (xcs).ascent = -(bds).top, \
145 (xcs).descent = (bds).bottom)
147 struct MacFontStruct
{
150 short mac_fontnum
; /* font number of font used in this window */
151 int mac_fontsize
; /* size of font */
152 short mac_fontface
; /* plain, bold, italics, etc. */
153 #if TARGET_API_MAC_CARBON
154 int mac_scriptcode
; /* Mac OS script code for font used */
156 short mac_scriptcode
; /* Mac OS script code for font used */
159 ATSUStyle mac_style
; /* NULL if QuickDraw Text is used */
160 #if USE_CG_TEXT_DRAWING
161 CGFontRef cg_font
; /* NULL if ATSUI text drawing is used */
162 CGGlyph
*cg_glyphs
; /* Likewise */
168 XExtData
*ext_data
; /* hook for extension to hang data */
169 Font fid
; /* Font id for this font */
170 unsigned direction
; /* hint about the direction font is painted */
172 unsigned min_char_or_byte2
;/* first character */
173 unsigned max_char_or_byte2
;/* last character */
174 unsigned min_byte1
; /* first row that exists */
175 unsigned max_byte1
; /* last row that exists */
177 Bool all_chars_exist
; /* flag if all characters have nonzero size */
178 unsigned default_char
; /* char to print for undefined character */
179 int n_properties
; /* how many properties there are */
180 XFontProp
*properties
; /* pointer to array of additional properties */
182 XCharStruct min_bounds
; /* minimum bounds over all existing char */
183 XCharStruct max_bounds
; /* maximum bounds over all existing char */
185 XCharStruct
*per_char
; /* first_char to last_char information */
186 XCharStruct
**rows
; /* first row to last row information */
188 int ascent
; /* logical extent above baseline for spacing */
189 int descent
; /* logical decent below baseline for spacing */
192 typedef struct MacFontStruct MacFontStruct
;
193 typedef struct MacFontStruct XFontStruct
;
195 /* Structure borrowed from Xlib.h to represent two-byte characters. */
202 #define STORE_XCHAR2B(chp, b1, b2) \
203 ((chp)->byte1 = (b1), (chp)->byte2 = (b2))
205 #define XCHAR2B_BYTE1(chp) \
208 #define XCHAR2B_BYTE2(chp) \
212 /* Emulate X GC's by keeping color and font info in a structure. */
213 typedef struct _XGCValues
215 unsigned long foreground
;
216 unsigned long background
;
222 /* Original value. */
225 /* Cached data members follow. */
227 /* QuickDraw foreground color. */
230 /* QuickDraw background color. */
233 #define MAX_CLIP_RECTS 2
234 /* Number of clipping rectangles. */
237 /* QuickDraw clipping region. Ignored if n_clip_rects == 0. */
238 RgnHandle clip_region
;
240 #if defined (MAC_OSX) && (USE_ATSUI || USE_CG_DRAWING)
241 /* Clipping rectangles used in Quartz 2D drawing. The y-coordinate
242 is in QuickDraw's. */
243 CGRect clip_rects
[MAX_CLIP_RECTS
];
247 #define GCForeground (1L<<2)
248 #define GCBackground (1L<<3)
249 #define GCFont (1L<<14)
250 #define GCGraphicsExposures 0
254 #define ForgetGravity 0
255 #define NorthWestGravity 1
256 #define NorthGravity 2
257 #define NorthEastGravity 3
258 #define WestGravity 4
259 #define CenterGravity 5
260 #define EastGravity 6
261 #define SouthWestGravity 7
262 #define SouthGravity 8
263 #define SouthEastGravity 9
264 #define StaticGravity 10
266 #define NoValue 0x0000
267 #define XValue 0x0001
268 #define YValue 0x0002
269 #define WidthValue 0x0004
270 #define HeightValue 0x0008
271 #define AllValues 0x000F
272 #define XNegative 0x0010
273 #define YNegative 0x0020
276 long flags
; /* marks which fields in this structure are defined */
278 int x
, y
; /* obsolete for new window mgrs, but clients */
279 int width
, height
; /* should set so old wm's don't mess up */
281 int min_width
, min_height
;
283 int max_width
, max_height
;
285 int width_inc
, height_inc
;
288 int x
; /* numerator */
289 int y
; /* denominator */
290 } min_aspect
, max_aspect
;
292 int base_width
, base_height
; /* added by ICCCM version 1 */
294 int win_gravity
; /* added by ICCCM version 1 */
298 #define USPosition (1L << 0) /* user specified x, y */
299 #define USSize (1L << 1) /* user specified width, height */
301 #define PPosition (1L << 2) /* program specified position */
302 #define PSize (1L << 3) /* program specified size */
303 #define PMinSize (1L << 4) /* program specified minimum size */
304 #define PMaxSize (1L << 5) /* program specified maximum size */
305 #define PResizeInc (1L << 6) /* program specified resize increments */
306 #define PAspect (1L << 7) /* program specified min and max aspect ratios */
307 #define PBaseSize (1L << 8) /* program specified base for incrementing */
308 #define PWinGravity (1L << 9) /* program specified window gravity */
312 unsigned width
, height
;
315 #define NativeRectangle Rect
317 #define CONVERT_TO_XRECT(xr,nr) \
318 ((xr).x = (nr).left, \
320 (xr).width = ((nr).right - (nr).left), \
321 (xr).height = ((nr).bottom - (nr).top))
323 #define CONVERT_FROM_XRECT(xr,nr) \
324 ((nr).left = (xr).x, \
326 (nr).right = ((xr).x + (xr).width), \
327 (nr).bottom = ((xr).y + (xr).height))
329 #define STORE_NATIVE_RECT(nr,x,y,width,height) \
332 (nr).right = ((nr).left + (width)), \
333 (nr).bottom = ((nr).top + (height)))
335 #endif /* EMACS_MACGUI_H */
337 /* arch-tag: 5a0da49a-35e2-418b-a58c-8a55778ae849
338 (do not change this comment) */