git.chise.org Git - chise/xemacs-chise.git.1/blob - src/glyphs-gtk.h

   1 /* Gtk-specific glyphs and related.
   2    Copyright (C) 1993, 1994 Free Software Foundation, Inc.
   3    Copyright (C) 1995 Board of Trustees, University of Illinois.
   4    Copyright (C) 1995, 1996 Ben Wing
   5    Copyright (C) 1995 Sun Microsystems, Inc.
   6
   7 This file is part of XEmacs.
   8
   9 XEmacs is free software; you can redistribute it and/or modify it
  10 under the terms of the GNU General Public License as published by the
  11 Free Software Foundation; either version 2, or (at your option) any
  12 later version.
  13
  14 XEmacs is distributed in the hope that it will be useful, but WITHOUT
  15 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  16 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  17 for more details.
  18
  19 You should have received a copy of the GNU General Public License
  20 along with XEmacs; see the file COPYING.  If not, write to
  21 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  22 Boston, MA 02111-1307, USA.  */
  23
  24 /* Synched up with:  Not in FSF. */
  25 /* Gtk version by William Perry */
  26
  27 #ifndef _XEMACS_GLYPHS_GTK_H_
  28 #define _XEMACS_GLYPHS_GTK_H_
  29
  30 #include "glyphs.h"
  31
  32 #ifdef HAVE_GTK
  33
  34 #include <gtk/gtk.h>
  35
  36 /****************************************************************************
  37  *                         Image-Instance Object                            *
  38  ****************************************************************************/
  39
  40 struct gtk_image_instance_data
  41 {
  42   GdkPixmap **pixmaps;
  43   GdkPixmap *mask;
  44   GdkCursor *cursor;
  45
  46   /* If depth>0, then that means that other colors were allocated when
  47      this pixmap was loaded.  These are they; we need to free them when
  48      finalizing the image instance. */
  49   GdkColormap *colormap;
  50   unsigned long *pixels;
  51   int npixels;
  52
  53   /* Should we hang on to the extra info from the XpmAttributes, like
  54      the textual color table and the comments?   Is that useful? */
  55 };
  56
  57 struct gtk_subwindow_data
  58 {
  59   union
  60   {
  61     struct
  62     {
  63       GtkWidget *parent_window;
  64       GtkWidget *clip_window;
  65     } sub;
  66     struct
  67     {
  68       GtkWidget *clip_window;
  69       Lisp_Object widget;
  70       guint x_offset;
  71       guint y_offset;
  72       gboolean added_to_fixed;
  73     } wid;
  74   } data;
  75 };
  76
  77 void init_image_instance_from_gdk_pixmap (struct Lisp_Image_Instance *ii,
  78                                           struct device *device,
  79                                           GdkPixmap *gdk_pixmap,
  80                                           int dest_mask,
  81                                           Lisp_Object instantiator);
  82
  83 #define GTK_IMAGE_INSTANCE_DATA(i) ((struct gtk_image_instance_data *) (i)->data)
  84
  85 #define IMAGE_INSTANCE_GTK_PIXMAP(i) (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps[0])
  86 #define IMAGE_INSTANCE_GTK_PIXMAP_SLICE(i,slice) \
  87      (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps[slice])
  88 #define IMAGE_INSTANCE_GTK_PIXMAP_SLICES(i) \
  89      (GTK_IMAGE_INSTANCE_DATA (i)->pixmaps)
  90 #define IMAGE_INSTANCE_GTK_MASK(i) (GTK_IMAGE_INSTANCE_DATA (i)->mask)
  91 #define IMAGE_INSTANCE_GTK_CURSOR(i) (GTK_IMAGE_INSTANCE_DATA (i)->cursor)
  92 #define IMAGE_INSTANCE_GTK_COLORMAP(i) (GTK_IMAGE_INSTANCE_DATA (i)->colormap)
  93 #define IMAGE_INSTANCE_GTK_PIXELS(i) (GTK_IMAGE_INSTANCE_DATA (i)->pixels)
  94 #define IMAGE_INSTANCE_GTK_NPIXELS(i) (GTK_IMAGE_INSTANCE_DATA (i)->npixels)
  95
  96 #define XIMAGE_INSTANCE_GTK_PIXMAP(i) \
  97   IMAGE_INSTANCE_GTK_PIXMAP (XIMAGE_INSTANCE (i))
  98 #define XIMAGE_INSTANCE_GTK_PIXMAP_SLICE(i) \
  99   IMAGE_INSTANCE_GTK_PIXMAP_SLICE (XIMAGE_INSTANCE (i))
 100 #define XIMAGE_INSTANCE_GTK_PIXMAP_SLICES(i) \
 101   IMAGE_INSTANCE_GTK_PIXMAP_SLICES (XIMAGE_INSTANCE (i))
 102 #define XIMAGE_INSTANCE_GTK_MASK(i) \
 103   IMAGE_INSTANCE_GTK_MASK (XIMAGE_INSTANCE (i))
 104 #define XIMAGE_INSTANCE_GTK_CURSOR(i) \
 105   IMAGE_INSTANCE_GTK_CURSOR (XIMAGE_INSTANCE (i))
 106 #define XIMAGE_INSTANCE_GTK_PIXELS(i) \
 107   IMAGE_INSTANCE_GTK_PIXELS (XIMAGE_INSTANCE (i))
 108 #define XIMAGE_INSTANCE_GTK_NPIXELS(i) \
 109   IMAGE_INSTANCE_GTK_NPIXELS (XIMAGE_INSTANCE (i))
 110
 111 /* Subwindow / widget stuff */
 112 #define GTK_SUBWINDOW_INSTANCE_DATA(i) ((struct gtk_subwindow_data *) (i)->data)
 113
 114 #define IMAGE_INSTANCE_GTK_SUBWINDOW_PARENT(i) \
 115   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.sub.parent_window)
 116 #define IMAGE_INSTANCE_GTK_CLIPWINDOW(i) \
 117   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.sub.clip_window)
 118 #define IMAGE_INSTANCE_GTK_WIDGET_XOFFSET(i) \
 119   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.x_offset)
 120 #define IMAGE_INSTANCE_GTK_WIDGET_YOFFSET(i) \
 121   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.y_offset)
 122 #define IMAGE_INSTANCE_GTK_WIDGET_LWID(i) \
 123   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.id)
 124 #define IMAGE_INSTANCE_GTK_CLIPWIDGET(i) \
 125   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.clip_window)
 126 #define IMAGE_INSTANCE_GTK_ALREADY_PUT(i) \
 127   (GTK_SUBWINDOW_INSTANCE_DATA (i)->data.wid.added_to_fixed)
 128 #define IMAGE_INSTANCE_GTK_SUBWINDOW_ID(i) \
 129   ((GdkWindow *) & IMAGE_INSTANCE_SUBWINDOW_ID (i))
 130 #define IMAGE_INSTANCE_GTK_WIDGET_ID(i) \
 131   ((GtkWidget *) & IMAGE_INSTANCE_SUBWINDOW_ID (i))
 132
 133 #define XIMAGE_INSTANCE_GTK_SUBWINDOW_PARENT(i) \
 134   IMAGE_INSTANCE_GTK_SUBWINDOW_PARENT (XIMAGE_INSTANCE (i))
 135 #define XIMAGE_INSTANCE_GTK_SUBWINDOW_DISPLAY(i) \
 136   IMAGE_INSTANCE_GTK_SUBWINDOW_DISPLAY (XIMAGE_INSTANCE (i))
 137 #define XIMAGE_INSTANCE_GTK_WIDGET_XOFFSET(i) \
 138   IMAGE_INSTANCE_GTK_WIDGET_XOFFSET (XIMAGE_INSTANCE (i))
 139 #define XIMAGE_INSTANCE_GTK_WIDGET_YOFFSET(i) \
 140   IMAGE_INSTANCE_GTK_WIDGET_YOFFSET (XIMAGE_INSTANCE (i))
 141 #define XIMAGE_INSTANCE_GTK_WIDGET_LWID(i) \
 142   IMAGE_INSTANCE_GTK_WIDGET_LWID (XIMAGE_INSTANCE (i))
 143 #define XIMAGE_INSTANCE_GTK_CLIPWIDGET(i) \
 144   IMAGE_INSTANCE_GTK_CLIPWIDGET (XIMAGE_INSTANCE (i))
 145 #define XIMAGE_INSTANCE_GTK_CLIPWINDOW(i) \
 146   IMAGE_INSTANCE_GTK_CLIPWINDOW (XIMAGE_INSTANCE (i))
 147 #define XIMAGE_INSTANCE_GTK_WIDGET_ID(i) \
 148   IMAGE_INSTANCE_GTK_WIDGET_ID (XIMAGE_INSTANCE (i))
 149
 150 #define DOMAIN_GTK_WIDGET(domain) \
 151   ((IMAGE_INSTANCEP (domain) && \
 152   GTK_SUBWINDOW_INSTANCE_DATA (XIMAGE_INSTANCE (domain))) ? \
 153    XIMAGE_INSTANCE_GTK_WIDGET_ID (domain) : \
 154    FRAME_GTK_CONTAINER_WIDGET (f) (DOMAIN_XFRAME (domain)))
 155
 156 #endif /* HAVE_GTK */
 157 #endif /* _XEMACS_GLYPHS_GTK_H_ */