code.delx.au - gnu-emacs/blob - src/macgui.h

   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.
   4
   5 This file is part of GNU Emacs.
   6
   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)
  10 any later version.
  11
  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.
  16
  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.  */
  21
  22 /* Contributed by Andrew Choi (akochoi@mac.com).  */
  23
  24 #ifndef EMACS_MACGUI_H
  25 #define EMACS_MACGUI_H
  26
  27 typedef int Display;  /* fix later */
  28
  29 typedef Lisp_Object XrmDatabase;
  30
  31 typedef unsigned long Time;
  32
  33 #ifdef HAVE_CARBON
  34 #undef Z
  35 #ifdef MAC_OSX
  36 #if ! HAVE_MKTIME || BROKEN_MKTIME
  37 #undef mktime
  38 #endif
  39 #undef DEBUG
  40 #undef free
  41 #undef malloc
  42 #undef realloc
  43 /* Macros max and min defined in lisp.h conflict with those in
  44    precompiled header Carbon.h.  */
  45 #undef max
  46 #undef min
  47 #undef init_process
  48 #include <Carbon/Carbon.h>
  49 #if ! HAVE_MKTIME || BROKEN_MKTIME
  50 #undef mktime
  51 #define mktime emacs_mktime
  52 #endif
  53 #undef free
  54 #define free unexec_free
  55 #undef malloc
  56 #define malloc unexec_malloc
  57 #undef realloc
  58 #define realloc unexec_realloc
  59 #undef min
  60 #define min(a, b) ((a) < (b) ? (a) : (b))
  61 #undef max
  62 #define max(a, b) ((a) > (b) ? (a) : (b))
  63 #undef init_process
  64 #define init_process emacs_init_process
  65 #undef INFINITY
  66 #else  /* not MAC_OSX */
  67 #undef SIGHUP
  68 #define OLDP2C 1
  69 #include <Carbon.h>
  70 #endif  /* not MAC_OSX */
  71 #undef Z
  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 */
  77 #include <Windows.h>
  78 #include <Controls.h>
  79 #include <Gestalt.h>
  80 #endif /* not HAVE_CARBON */
  81
  82 #ifndef USE_CG_TEXT_DRAWING
  83 #if USE_ATSUI && MAC_OS_X_VERSION_MAX_ALLOWED >= 1030
  84 #define USE_CG_TEXT_DRAWING 1
  85 #endif
  86 #endif
  87
  88 #ifndef USE_CG_DRAWING
  89 #if USE_ATSUI && defined (MAC_OSX)
  90 #define USE_CG_DRAWING 1
  91 #endif
  92 #endif
  93
  94 typedef WindowPtr Window;
  95 typedef GWorldPtr Pixmap;
  96
  97 #define Cursor ThemeCursor
  98 #define No_Cursor (-1)
  99
 100 #define FACE_DEFAULT (~0)
 101
 102 #if !TARGET_API_MAC_CARBON
 103 #define GetPixDepth(pmh) ((*(pmh))->pixelSize)
 104 #endif
 105
 106
 107 /* Emulate XCharStruct.  */
 108 typedef struct _XCharStruct
 109 {
 110   short lbearing;               /* origin to left edge of raster */
 111   short rbearing;               /* origin to right edge of raster */
 112   short width;                  /* advance to next char's origin */
 113   short ascent;                 /* baseline to top edge of raster */
 114   short descent;                /* baseline to bottom edge of raster */
 115 #if 0
 116   unsigned short attributes;    /* per char flags (not predefined) */
 117 #endif
 118 } XCharStruct;
 119
 120 #define STORE_XCHARSTRUCT(xcs, w, bds)                  \
 121   ((xcs).width = (w),                                   \
 122    (xcs).lbearing = (bds).left,                         \
 123    (xcs).rbearing = (bds).right,                        \
 124    (xcs).ascent = -(bds).top,                           \
 125    (xcs).descent = (bds).bottom)
 126
 127 typedef struct
 128 {
 129   char valid_bits[0x100 / 8];
 130   XCharStruct per_char[0x100];
 131 } XCharStructRow;
 132
 133 #define XCHARSTRUCTROW_CHAR_VALID_P(row, byte2) \
 134   ((row)->valid_bits[(byte2) / 8] & (1 << (byte2) % 8))
 135
 136 #define XCHARSTRUCTROW_SET_CHAR_VALID(row, byte2) \
 137   ((row)->valid_bits[(byte2) / 8] |= (1 << (byte2) % 8))
 138
 139 struct MacFontStruct {
 140   char *full_name;
 141
 142   short mac_fontnum;  /* font number of font used in this window */
 143   int mac_fontsize;  /* size of font */
 144   short mac_fontface;  /* plain, bold, italics, etc. */
 145 #if TARGET_API_MAC_CARBON
 146   int mac_scriptcode;  /* Mac OS script code for font used */
 147 #else
 148   short mac_scriptcode;  /* Mac OS script code for font used */
 149 #endif
 150 #if USE_ATSUI
 151   ATSUStyle mac_style;          /* NULL if QuickDraw Text is used */
 152 #if USE_CG_TEXT_DRAWING
 153   CGFontRef cg_font;            /* NULL if ATSUI text drawing is used */
 154   CGGlyph *cg_glyphs;           /* Likewise  */
 155 #endif
 156 #endif
 157
 158 /* from Xlib.h */
 159 #if 0
 160   XExtData *ext_data;      /* hook for extension to hang data */
 161   Font fid;                /* Font id for this font */
 162   unsigned direction;      /* hint about the direction font is painted */
 163 #endif /* 0 */
 164   unsigned min_char_or_byte2;/* first character */
 165   unsigned max_char_or_byte2;/* last character */
 166   unsigned min_byte1;      /* first row that exists */
 167   unsigned max_byte1;      /* last row that exists */
 168 #if 0
 169   Bool all_chars_exist;    /* flag if all characters have nonzero size */
 170   unsigned default_char;   /* char to print for undefined character */
 171   int n_properties;        /* how many properties there are */
 172   XFontProp *properties;   /* pointer to array of additional properties */
 173 #endif /* 0 */
 174   XCharStruct min_bounds;  /* minimum bounds over all existing char */
 175   XCharStruct max_bounds;  /* maximum bounds over all existing char */
 176   union {
 177     XCharStruct *per_char; /* first_char to last_char information */
 178     XCharStructRow **rows; /* first row to last row information */
 179   } bounds;
 180   int ascent;              /* logical extent above baseline for spacing */
 181   int descent;             /* logical decent below baseline for spacing */
 182 };
 183
 184 typedef struct MacFontStruct MacFontStruct;
 185 typedef struct MacFontStruct XFontStruct;
 186
 187 /* Structure borrowed from Xlib.h to represent two-byte characters.  */
 188
 189 typedef struct {
 190   unsigned char byte1;
 191   unsigned char byte2;
 192 } XChar2b;
 193
 194 #define STORE_XCHAR2B(chp, b1, b2) \
 195   ((chp)->byte1 = (b1), (chp)->byte2 = (b2))
 196
 197 #define XCHAR2B_BYTE1(chp) \
 198   ((chp)->byte1)
 199
 200 #define XCHAR2B_BYTE2(chp) \
 201   ((chp)->byte2)
 202
 203
 204 /* Emulate X GC's by keeping color and font info in a structure.  */
 205 typedef struct _XGCValues
 206 {
 207   unsigned long foreground;
 208   unsigned long background;
 209   XFontStruct *font;
 210 } XGCValues;
 211
 212 typedef struct _XGC
 213 {
 214   /* Original value.  */
 215   XGCValues xgcv;
 216
 217   /* Cached data members follow.  */
 218
 219   /* QuickDraw foreground color.  */
 220   RGBColor fore_color;
 221
 222   /* QuickDraw background color.  */
 223   RGBColor back_color;
 224
 225 #define MAX_CLIP_RECTS 2
 226   /* Number of clipping rectangles.  */
 227   int n_clip_rects;
 228
 229   /* QuickDraw clipping region.  Ignored if n_clip_rects == 0.  */
 230   RgnHandle clip_region;
 231
 232 #if defined (MAC_OSX) && USE_ATSUI
 233   /* Clipping rectangles used in Quartz 2D drawing.  The y-coordinate
 234      is in QuickDraw's.  */
 235   CGRect clip_rects[MAX_CLIP_RECTS];
 236 #endif
 237 } *GC;
 238
 239 #define GCForeground            (1L<<2)
 240 #define GCBackground            (1L<<3)
 241 #define GCFont                  (1L<<14)
 242 #define GCGraphicsExposures     0
 243
 244 /* Bit Gravity */
 245
 246 #define ForgetGravity           0
 247 #define NorthWestGravity        1
 248 #define NorthGravity            2
 249 #define NorthEastGravity        3
 250 #define WestGravity             4
 251 #define CenterGravity           5
 252 #define EastGravity             6
 253 #define SouthWestGravity        7
 254 #define SouthGravity            8
 255 #define SouthEastGravity        9
 256 #define StaticGravity           10
 257
 258 #define NoValue         0x0000
 259 #define XValue          0x0001
 260 #define YValue          0x0002
 261 #define WidthValue      0x0004
 262 #define HeightValue     0x0008
 263 #define AllValues       0x000F
 264 #define XNegative       0x0010
 265 #define YNegative       0x0020
 266
 267 typedef struct {
 268         long flags;     /* marks which fields in this structure are defined */
 269 #if 0
 270         int x, y;               /* obsolete for new window mgrs, but clients */
 271         int width, height;      /* should set so old wm's don't mess up */
 272 #endif
 273         int min_width, min_height;
 274 #if 0
 275         int max_width, max_height;
 276 #endif
 277         int width_inc, height_inc;
 278 #if 0
 279         struct {
 280                 int x;  /* numerator */
 281                 int y;  /* denominator */
 282         } min_aspect, max_aspect;
 283 #endif
 284         int base_width, base_height;            /* added by ICCCM version 1 */
 285 #if 0
 286         int win_gravity;                        /* added by ICCCM version 1 */
 287 #endif
 288 } XSizeHints;
 289
 290 #define USPosition      (1L << 0) /* user specified x, y */
 291 #define USSize          (1L << 1) /* user specified width, height */
 292
 293 #define PPosition       (1L << 2) /* program specified position */
 294 #define PSize           (1L << 3) /* program specified size */
 295 #define PMinSize        (1L << 4) /* program specified minimum size */
 296 #define PMaxSize        (1L << 5) /* program specified maximum size */
 297 #define PResizeInc      (1L << 6) /* program specified resize increments */
 298 #define PAspect         (1L << 7) /* program specified min and max aspect ratios */
 299 #define PBaseSize       (1L << 8) /* program specified base for incrementing */
 300 #define PWinGravity     (1L << 9) /* program specified window gravity */
 301
 302 typedef struct {
 303     int x, y;
 304     unsigned width, height;
 305 } XRectangle;
 306
 307 #define NativeRectangle Rect
 308
 309 #define CONVERT_TO_XRECT(xr,nr)                 \
 310   ((xr).x = (nr).left,                          \
 311    (xr).y = (nr).top,                           \
 312    (xr).width = ((nr).right - (nr).left),       \
 313    (xr).height = ((nr).bottom - (nr).top))
 314
 315 #define CONVERT_FROM_XRECT(xr,nr)               \
 316   ((nr).left = (xr).x,                          \
 317    (nr).top = (xr).y,                           \
 318    (nr).right = ((xr).x + (xr).width),          \
 319    (nr).bottom = ((xr).y + (xr).height))
 320
 321 #define STORE_NATIVE_RECT(nr,x,y,width,height)  \
 322   ((nr).left = (x),                             \
 323    (nr).top = (y),                              \
 324    (nr).right = ((nr).left + (width)),          \
 325    (nr).bottom = ((nr).top + (height)))
 326
 327 #endif /* EMACS_MACGUI_H */
 328
 329 /* arch-tag: 5a0da49a-35e2-418b-a58c-8a55778ae849
 330    (do not change this comment) */