src/w32gui.h

   1 /* Definitions and headers for communication on the Microsoft W32 API.
   2    Copyright (C) 1995, 2001, 2002, 2003, 2004, 2005,
   3                  2006, 2007, 2008  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 3 of the License, or
  10 (at your option) 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.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #ifndef EMACS_W32GUI_H
  21 #define EMACS_W32GUI_H
  22 #include <windows.h>
  23
  24 #include "w32bdf.h"
  25
  26 /* Emulate XCharStruct.  */
  27 typedef struct _XCharStruct
  28 {
  29   short rbearing;
  30   short lbearing;
  31   short width;
  32   short ascent;
  33   short descent;
  34 } XCharStruct;
  35
  36 /* Emulate widget_value from ../lwlib/lwlib.h, modified for Windows.  */
  37 typedef void * XtPointer;
  38 typedef char Boolean;
  39 enum button_type
  40 {
  41   BUTTON_TYPE_NONE,
  42   BUTTON_TYPE_TOGGLE,
  43   BUTTON_TYPE_RADIO
  44 };
  45 typedef struct _widget_value
  46 {
  47   /* name of widget */
  48   Lisp_Object   lname;
  49   char*         name;
  50   /* value (meaning depend on widget type) */
  51   char*         value;
  52   /* keyboard equivalent. no implications for XtTranslations */
  53   Lisp_Object   lkey;
  54   char*         key;
  55   /* Help string or nil if none.
  56      GC finds this string through the frame's menu_bar_vector
  57      or through menu_items.  */
  58   Lisp_Object   help;
  59   /* true if enabled */
  60   Boolean       enabled;
  61   /* true if selected */
  62   Boolean       selected;
  63   /* The type of a button.  */
  64   enum button_type button_type;
  65   /* true if menu title */
  66   Boolean       title;
  67 #if 0
  68   /* true if was edited (maintained by get_value) */
  69   Boolean       edited;
  70   /* true if has changed (maintained by lw library) */
  71   change_type   change;
  72   /* true if this widget itself has changed,
  73      but not counting the other widgets found in the `next' field.  */
  74   change_type   this_one_change;
  75 #endif
  76   /* Contents of the sub-widgets, also selected slot for checkbox */
  77   struct _widget_value* contents;
  78   /* data passed to callback */
  79   XtPointer     call_data;
  80   /* next one in the list */
  81   struct _widget_value* next;
  82 #if 0
  83   /* slot for the toolkit dependent part.  Always initialize to NULL. */
  84   void* toolkit_data;
  85   /* tell us if we should free the toolkit data slot when freeing the
  86      widget_value itself. */
  87   Boolean free_toolkit_data;
  88
  89   /* we resource the widget_value structures; this points to the next
  90      one on the free list if this one has been deallocated.
  91    */
  92   struct _widget_value *free_list;
  93 #endif
  94 } widget_value;
  95 /* Local memory management for menus.  */
  96 #define local_heap (GetProcessHeap ())
  97 #define local_alloc(n) (HeapAlloc (local_heap, HEAP_ZERO_MEMORY, (n)))
  98 #define local_free(p) (HeapFree (local_heap, 0, ((LPVOID) (p))))
  99
 100 #define malloc_widget_value() ((widget_value *) local_alloc (sizeof (widget_value)))
 101 #define free_widget_value(wv) (local_free ((wv)))
 102
 103
 104 enum w32_char_font_type
 105 {
 106   UNKNOWN_FONT = 0 /* FONT_TYPE_UNKNOWN */,
 107   ANSI_FONT,
 108   UNICODE_FONT,
 109   BDF_1D_FONT,
 110   BDF_2D_FONT
 111 };
 112
 113 typedef struct W32FontStruct {
 114   enum w32_char_font_type font_type;
 115   TEXTMETRIC tm;
 116   HFONT hfont;
 117   bdffont *bdf;
 118   int double_byte_p;
 119   XCharStruct max_bounds;
 120   XCharStruct scratch;
 121   /* Only store info for ascii chars, if not fixed pitch.  */
 122   XCharStruct * per_char;
 123 } W32FontStruct;
 124
 125 typedef struct W32FontStruct XFontStruct;
 126
 127 /* Emulate X GC's by keeping color and font info in a structure.  */
 128 typedef struct _XGCValues
 129 {
 130   COLORREF foreground;
 131   COLORREF background;
 132 #if OLD_FONT
 133   XFontStruct * font;
 134 #endif
 135   struct font *font;
 136 } XGCValues;
 137
 138 #define GCForeground 0x01
 139 #define GCBackground 0x02
 140 #define GCFont 0x03
 141
 142 typedef HBITMAP Pixmap;
 143 typedef HBITMAP Bitmap;
 144
 145 typedef char * XrmDatabase;
 146
 147 typedef XGCValues * GC;
 148 typedef COLORREF Color;
 149 typedef DWORD Time;
 150 typedef HWND Window;
 151 typedef HDC Display;  /* HDC so it doesn't conflict with xpm lib.  */
 152 typedef HCURSOR Cursor;
 153
 154 #define No_Cursor (0)
 155
 156 #define XChar2b wchar_t
 157
 158 /* Dealing with bits of wchar_t as if they were an XChar2b.  */
 159 #define STORE_XCHAR2B(chp, byte1, byte2) \
 160   ((*chp) = ((XChar2b)((((byte1) & 0x00ff) << 8) | ((byte2) & 0x00ff))))
 161
 162 #define XCHAR2B_BYTE1(chp) \
 163  (((*chp) & 0xff00) >> 8)
 164
 165 #define XCHAR2B_BYTE2(chp) \
 166  ((*chp) & 0x00ff)
 167
 168
 169 /* Windows equivalent of XImage.  */
 170 typedef struct _XImage
 171 {
 172   unsigned char * data;
 173   BITMAPINFO info;
 174   /* Optional RGBQUAD array for palette follows (see BITMAPINFO docs).  */
 175 } XImage;
 176
 177 #define FACE_DEFAULT (~0)
 178
 179 extern HINSTANCE hinst;
 180 extern HINSTANCE hprevinst;
 181 extern LPSTR lpCmdLine;
 182 extern int nCmdShow;
 183
 184 /* Bit Gravity */
 185
 186 #define ForgetGravity           0
 187 #define NorthWestGravity        1
 188 #define NorthGravity            2
 189 #define NorthEastGravity        3
 190 #define WestGravity             4
 191 #define CenterGravity           5
 192 #define EastGravity             6
 193 #define SouthWestGravity        7
 194 #define SouthGravity            8
 195 #define SouthEastGravity        9
 196 #define StaticGravity           10
 197
 198 #define NoValue         0x0000
 199 #define XValue          0x0001
 200 #define YValue          0x0002
 201 #define WidthValue      0x0004
 202 #define HeightValue     0x0008
 203 #define AllValues       0x000F
 204 #define XNegative       0x0010
 205 #define YNegative       0x0020
 206
 207 #define USPosition      (1L << 0) /* user specified x, y */
 208 #define USSize          (1L << 1) /* user specified width, height */
 209
 210 #define PPosition       (1L << 2) /* program specified position */
 211 #define PSize           (1L << 3) /* program specified size */
 212 #define PMinSize        (1L << 4) /* program specified minimum size */
 213 #define PMaxSize        (1L << 5) /* program specified maximum size */
 214 #define PResizeInc      (1L << 6) /* program specified resize increments */
 215 #define PAspect         (1L << 7) /* program specified min and max aspect ratios */
 216 #define PBaseSize       (1L << 8) /* program specified base for incrementing */
 217 #define PWinGravity     (1L << 9) /* program specified window gravity */
 218
 219 extern int XParseGeometry ();
 220
 221
 222 typedef struct {
 223     int x, y;
 224     unsigned width, height;
 225 } XRectangle;
 226
 227 #define NativeRectangle RECT
 228
 229 #define CONVERT_TO_XRECT(xr,nr)                 \
 230   ((xr).x = (nr).left,                          \
 231    (xr).y = (nr).top,                           \
 232    (xr).width = ((nr).right - (nr).left),       \
 233    (xr).height = ((nr).bottom - (nr).top))
 234
 235 #define CONVERT_FROM_XRECT(xr,nr)               \
 236   ((nr).left = (xr).x,                          \
 237    (nr).top = (xr).y,                           \
 238    (nr).right = ((xr).x + (xr).width),          \
 239    (nr).bottom = ((xr).y + (xr).height))
 240
 241 #define STORE_NATIVE_RECT(nr,x,y,width,height)  \
 242   ((nr).left = (x),                             \
 243    (nr).top = (y),                              \
 244    (nr).right = ((nr).left + (width)),          \
 245    (nr).bottom = ((nr).top + (height)))
 246
 247
 248 #endif /* EMACS_W32GUI_H */
 249
 250 /* arch-tag: 9172e5fb-45a5-4684-afd9-ca0e81324604
 251    (do not change this comment) */