Commit | Line | Data |
---|---|---|
1a578e9b | 1 | /* Definitions and headers for communication on the Mac OS. |
e0f712ba | 2 | Copyright (C) 2000, 2001 Free Software Foundation, Inc. |
1a578e9b AC |
3 | |
4 | This file is part of GNU Emacs. | |
5 | ||
6 | GNU Emacs is free software; you can redistribute it and/or modify | |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 2, or (at your option) | |
9 | any later version. | |
10 | ||
11 | GNU Emacs is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with GNU Emacs; see the file COPYING. If not, write to | |
18 | the Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
19 | Boston, MA 02111-1307, USA. */ | |
20 | ||
e0f712ba | 21 | /* Contributed by Andrew Choi (akochoi@mac.com). */ |
1a578e9b AC |
22 | |
23 | #ifndef EMACS_MACGUI_H | |
24 | #define EMACS_MACGUI_H | |
25 | ||
1a578e9b AC |
26 | typedef int Display; /* fix later */ |
27 | ||
574bdd83 KS |
28 | typedef char * XrmDatabase; /* fix later */ |
29 | ||
1a578e9b | 30 | typedef unsigned long Time; |
e0f712ba AC |
31 | |
32 | #if MAC_OSX | |
e3564461 ST |
33 | #undef mktime |
34 | #undef DEBUG | |
35 | #undef Z | |
36 | #undef free | |
37 | #undef malloc | |
38 | #undef realloc | |
39 | /* Macros max and min defined in lisp.h conflict with those in | |
40 | precompiled header Carbon.h. */ | |
41 | #undef max | |
42 | #undef min | |
43 | #undef init_process | |
44 | #include <Carbon/Carbon.h> | |
45 | #undef Z | |
46 | #define Z (current_buffer->text->z) | |
47 | #undef free | |
48 | #define free unexec_free | |
49 | #undef malloc | |
50 | #define malloc unexec_malloc | |
51 | #undef realloc | |
52 | #define realloc unexec_realloc | |
53 | #undef min | |
54 | #define min(a, b) ((a) < (b) ? (a) : (b)) | |
55 | #undef max | |
56 | #define max(a, b) ((a) > (b) ? (a) : (b)) | |
57 | #undef init_process | |
58 | #define init_process emacs_init_process | |
59 | #undef INFINITY | |
e0f712ba | 60 | #else |
e3564461 ST |
61 | #include <QuickDraw.h> /* for WindowPtr */ |
62 | #include <QDOffscreen.h> /* for GWorldPtr */ | |
63 | #include <Controls.h> /* for ControlHandle in xdisp.c */ | |
50bf7673 | 64 | #include <Gestalt.h> |
e0f712ba | 65 | #endif |
1a578e9b | 66 | |
e3564461 ST |
67 | typedef GWorldPtr Pixmap; |
68 | ||
50bf7673 ST |
69 | #if TARGET_API_MAC_CARBON |
70 | typedef struct OpaqueWindowPtr *Window; | |
71 | #define Cursor ThemeCursor | |
72 | #define No_Cursor (-1) | |
73 | #else | |
74 | typedef WindowPtr Window; | |
75 | #define SetPortWindowPort(w) SetPort(w) | |
76 | #define Cursor CursHandle | |
77 | #define No_Cursor (0) | |
78 | extern CursPtr arrow_cursor; | |
79 | #endif | |
80 | ||
1a578e9b AC |
81 | #define FACE_DEFAULT (~0) |
82 | ||
83 | ||
84 | /* Emulate XCharStruct. */ | |
85 | typedef struct _XCharStruct | |
86 | { | |
87 | int rbearing; | |
88 | int lbearing; | |
89 | int width; | |
90 | int ascent; | |
91 | int descent; | |
92 | } XCharStruct; | |
93 | ||
94 | struct MacFontStruct { | |
95 | char *fontname; | |
96 | ||
e0f712ba | 97 | short mac_fontnum; /* font number of font used in this window */ |
1a578e9b | 98 | int mac_fontsize; /* size of font */ |
e0f712ba | 99 | short mac_fontface; /* plain, bold, italics, etc. */ |
1a578e9b AC |
100 | short mac_scriptcode; /* Mac OS script code for font used */ |
101 | ||
102 | #if 0 | |
103 | SInt16 mFontNum; /* font number of font used in this window */ | |
104 | short mScriptCode; /* Mac OS script code for font used */ | |
105 | int mFontSize; /* size of font */ | |
106 | Style mFontFace; /* plain, bold, italics, etc. */ | |
107 | int mHeight; /* height of one line of text in pixels */ | |
108 | int mWidth; /* width of one character in pixels */ | |
109 | int mAscent; | |
110 | int mDescent; | |
111 | int mLeading; | |
112 | char mTwoByte; /* true for two-byte font */ | |
e0f712ba | 113 | #endif /* 0 */ |
1a578e9b AC |
114 | |
115 | /* from Xlib.h */ | |
116 | #if 0 | |
117 | XExtData *ext_data; /* hook for extension to hang data */ | |
118 | Font fid; /* Font id for this font */ | |
119 | unsigned direction; /* hint about the direction font is painted */ | |
e0f712ba | 120 | #endif /* 0 */ |
1a578e9b AC |
121 | unsigned min_char_or_byte2;/* first character */ |
122 | unsigned max_char_or_byte2;/* last character */ | |
123 | unsigned min_byte1; /* first row that exists */ | |
124 | unsigned max_byte1; /* last row that exists */ | |
125 | #if 0 | |
126 | Bool all_chars_exist; /* flag if all characters have nonzero size */ | |
127 | unsigned default_char; /* char to print for undefined character */ | |
128 | int n_properties; /* how many properties there are */ | |
129 | XFontProp *properties; /* pointer to array of additional properties */ | |
e0f712ba | 130 | #endif /* 0 */ |
1a578e9b AC |
131 | XCharStruct min_bounds; /* minimum bounds over all existing char */ |
132 | XCharStruct max_bounds; /* maximum bounds over all existing char */ | |
133 | XCharStruct *per_char; /* first_char to last_char information */ | |
134 | int ascent; /* logical extent above baseline for spacing */ | |
135 | int descent; /* logical decent below baseline for spacing */ | |
136 | }; | |
137 | ||
138 | typedef struct MacFontStruct MacFontStruct; | |
139 | typedef struct MacFontStruct XFontStruct; | |
140 | ||
ec480ce0 KS |
141 | /* Structure borrowed from Xlib.h to represent two-byte characters. */ |
142 | ||
143 | typedef struct { | |
144 | unsigned char byte1; | |
145 | unsigned char byte2; | |
146 | } XChar2b; | |
147 | ||
148 | #define STORE_XCHAR2B(chp, b1, b2) \ | |
149 | ((chp)->byte1 = (b1), (chp)->byte2 = (b2)) | |
150 | ||
151 | #define XCHAR2B_BYTE1(chp) \ | |
152 | ((chp)->byte1) | |
153 | ||
154 | #define XCHAR2B_BYTE2(chp) \ | |
155 | ((chp)->byte2) | |
156 | ||
1a578e9b AC |
157 | |
158 | /* Emulate X GC's by keeping color and font info in a structure. */ | |
159 | typedef struct _XGCValues | |
160 | { | |
161 | unsigned long foreground; | |
162 | unsigned long background; | |
163 | XFontStruct *font; | |
164 | } XGCValues; | |
165 | ||
166 | typedef XGCValues *GC; | |
167 | ||
168 | extern XGCValues * | |
169 | XCreateGC (void *, Window, unsigned long, XGCValues *); | |
170 | ||
171 | #define GCForeground 0x01 | |
172 | #define GCBackground 0x02 | |
173 | #define GCFont 0x03 | |
174 | #define GCGraphicsExposures 0 | |
175 | ||
176 | /* Bit Gravity */ | |
177 | ||
178 | #define ForgetGravity 0 | |
179 | #define NorthWestGravity 1 | |
180 | #define NorthGravity 2 | |
181 | #define NorthEastGravity 3 | |
182 | #define WestGravity 4 | |
183 | #define CenterGravity 5 | |
184 | #define EastGravity 6 | |
185 | #define SouthWestGravity 7 | |
186 | #define SouthGravity 8 | |
187 | #define SouthEastGravity 9 | |
188 | #define StaticGravity 10 | |
189 | ||
190 | #define NoValue 0x0000 | |
191 | #define XValue 0x0001 | |
192 | #define YValue 0x0002 | |
193 | #define WidthValue 0x0004 | |
194 | #define HeightValue 0x0008 | |
195 | #define AllValues 0x000F | |
196 | #define XNegative 0x0010 | |
197 | #define YNegative 0x0020 | |
198 | ||
199 | #define USPosition (1L << 0) /* user specified x, y */ | |
200 | #define USSize (1L << 1) /* user specified width, height */ | |
201 | ||
202 | #define PPosition (1L << 2) /* program specified position */ | |
203 | #define PSize (1L << 3) /* program specified size */ | |
204 | #define PMinSize (1L << 4) /* program specified minimum size */ | |
205 | #define PMaxSize (1L << 5) /* program specified maximum size */ | |
206 | #define PResizeInc (1L << 6) /* program specified resize increments */ | |
207 | #define PAspect (1L << 7) /* program specified min and max aspect ratios */ | |
208 | #define PBaseSize (1L << 8) /* program specified base for incrementing */ | |
209 | #define PWinGravity (1L << 9) /* program specified window gravity */ | |
210 | ||
211 | extern int XParseGeometry (); | |
212 | ||
e119ad0d KS |
213 | typedef struct { |
214 | int x, y; | |
215 | unsigned width, height; | |
216 | } XRectangle; | |
217 | ||
218 | #define NativeRectangle Rect | |
219 | ||
220 | #define CONVERT_TO_XRECT(xr,nr) \ | |
221 | ((xr).x = (nr).left, \ | |
222 | (xr).y = (nr).top, \ | |
223 | (xr).width = ((nr).right - (nr).left), \ | |
224 | (xr).height = ((nr).bottom - (nr).top)) | |
225 | ||
226 | #define CONVERT_FROM_XRECT(xr,nr) \ | |
227 | ((nr).left = (xr).x, \ | |
228 | (nr).top = (xr).y, \ | |
229 | (nr).right = ((xr).x + (xr).width), \ | |
230 | (nr).bottom = ((xr).y + (xr).height)) | |
231 | ||
232 | #define STORE_NATIVE_RECT(nr,x,y,width,height) \ | |
233 | ((nr).left = (x), \ | |
234 | (nr).top = (y), \ | |
235 | (nr).right = ((nr).left + (width)), \ | |
236 | (nr).bottom = ((nr).top + (height))) | |
237 | ||
1a578e9b AC |
238 | #endif /* EMACS_MACGUI_H */ |
239 | ||
ab5796a9 MB |
240 | /* arch-tag: 5a0da49a-35e2-418b-a58c-8a55778ae849 |
241 | (do not change this comment) */ |