src/macgui.h

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