Pileus Git - ~andy/gtk/blob - gdk/win32/gdkcursor-win32.c

   1 /* GDK - The GIMP Drawing Kit
   2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include "config.h"
  21
  22 #include <gdk/gdk.h>
  23 #include "gdkprivate.h"
  24
  25 static const struct { const char *name; int type; } cursors[] = {
  26   { "x_cursor", 0 },
  27   { "arrow", 2 },
  28   { "based_arrow_down", 4 },
  29   { "based_arrow_up", 6 },
  30   { "boat", 8 },
  31   { "bogosity", 10 },
  32   { "bottom_left_corner", 12 },
  33   { "bottom_right_corner", 14 },
  34   { "bottom_side", 16 },
  35   { "bottom_tee", 18 },
  36   { "box_spiral", 20 },
  37   { "center_ptr", 22 },
  38   { "circle", 24 },
  39   { "clock", 26 },
  40   { "coffee_mug", 28 },
  41   { "cross", 30 },
  42   { "cross_reverse", 32 },
  43   { "crosshair", 34 },
  44   { "diamond_cross", 36 },
  45   { "dot", 38 },
  46   { "dotbox", 40 },
  47   { "double_arrow", 42 },
  48   { "draft_large", 44 },
  49   { "draft_small", 46 },
  50   { "draped_box", 48 },
  51   { "exchange", 50 },
  52   { "fleur", 52 },
  53   { "gobbler", 54 },
  54   { "gumby", 56 },
  55   { "hand1", 58 },
  56   { "hand2", 60 },
  57   { "heart", 62 },
  58   { "icon", 64 },
  59   { "iron_cross", 66 },
  60   { "left_ptr", 68 },
  61   { "left_side", 70 },
  62   { "left_tee", 72 },
  63   { "leftbutton", 74 },
  64   { "ll_angle", 76 },
  65   { "lr_angle", 78 },
  66   { "man", 80 },
  67   { "middlebutton", 82 },
  68   { "mouse", 84 },
  69   { "pencil", 86 },
  70   { "pirate", 88 },
  71   { "plus", 90 },
  72   { "question_arrow", 92 },
  73   { "right_ptr", 94 },
  74   { "right_side", 96 },
  75   { "right_tee", 98 },
  76   { "rightbutton", 100 },
  77   { "rtl_logo", 102 },
  78   { "sailboat", 104 },
  79   { "sb_down_arrow", 106 },
  80   { "sb_h_double_arrow", 108 },
  81   { "sb_left_arrow", 110 },
  82   { "sb_right_arrow", 112 },
  83   { "sb_up_arrow", 114 },
  84   { "sb_v_double_arrow", 116 },
  85   { "shuttle", 118 },
  86   { "sizing", 120 },
  87   { "spider", 122 },
  88   { "spraycan", 124 },
  89   { "star", 126 },
  90   { "target", 128 },
  91   { "tcross", 130 },
  92   { "top_left_arrow", 132 },
  93   { "top_left_corner", 134 },
  94   { "top_right_corner", 136 },
  95   { "top_side", 138 },
  96   { "top_tee", 140 },
  97   { "trek", 142 },
  98   { "ul_angle", 144 },
  99   { "umbrella", 146 },
 100   { "ur_angle", 148 },
 101   { "watch", 150 },
 102   { "xterm", 152 },
 103   { NULL, 0 }
 104 };
 105
 106 GdkCursor*
 107 gdk_cursor_new (GdkCursorType cursor_type)
 108 {
 109   GdkCursorPrivate *private;
 110   GdkCursor *cursor;
 111   HCURSOR xcursor;
 112
 113   int i;
 114
 115   for (i = 0; cursors[i].name != NULL && cursors[i].type != cursor_type; i++)
 116     ;
 117   if (cursors[i].name != NULL)
 118     {
 119       xcursor = LoadCursor (gdk_DLLInstance, cursors[i].name);
 120       if (xcursor == NULL)
 121         g_warning ("gdk_cursor_new: LoadCursor failed");
 122       GDK_NOTE (MISC, g_print ("gdk_cursor_new: %#x %d\n",
 123                                xcursor, cursor_type));
 124     }
 125   else
 126     {
 127       g_warning ("gdk_cursor_new: no cursor %d found",
 128                  cursor_type);
 129       xcursor = NULL;
 130     }
 131
 132   private = g_new (GdkCursorPrivate, 1);
 133   private->xcursor = xcursor;
 134   cursor = (GdkCursor*) private;
 135   cursor->type = cursor_type;
 136
 137   return cursor;
 138 }
 139
 140 GdkCursor*
 141 gdk_cursor_new_from_pixmap (GdkPixmap *source,
 142                             GdkPixmap *mask,
 143                             GdkColor  *fg,
 144                             GdkColor  *bg,
 145                             gint       x,
 146                             gint       y)
 147 {
 148   GdkCursorPrivate *private;
 149   GdkCursor *cursor;
 150   GdkPixmapPrivate *source_private, *mask_private;
 151   GdkImage *source_image, *mask_image;
 152   HCURSOR xcursor;
 153   guchar *p, *q, *XORmask, *ANDmask;
 154   gint width, height, cursor_width, cursor_height;
 155   guchar residue;
 156   gint ix, iy;
 157
 158   g_return_val_if_fail (source != NULL, NULL);
 159   g_return_val_if_fail (mask != NULL, NULL);
 160
 161   source_private = (GdkPixmapPrivate *) source;
 162   mask_private   = (GdkPixmapPrivate *) mask;
 163
 164   g_return_val_if_fail (source_private->width == mask_private->width
 165                         && source_private->height == mask_private->height,
 166                         NULL);
 167   width = source_private->width;
 168   height = source_private->height;
 169   cursor_width = GetSystemMetrics (SM_CXCURSOR);
 170   cursor_height = GetSystemMetrics (SM_CYCURSOR);
 171
 172   g_return_val_if_fail (width <= cursor_width
 173                         && height <= cursor_height, NULL);
 174
 175   residue = (1 << ((8-(width%8))%8)) - 1;
 176
 177   source_image = gdk_image_get (source, 0, 0, width, height);
 178   mask_image = gdk_image_get (mask, 0, 0, width, height);
 179
 180   if (source_image->depth != 1 || mask_image->depth != 1)
 181     {
 182     gdk_image_destroy (source_image);
 183     gdk_image_destroy (mask_image);
 184     g_return_val_if_fail (source_image->depth == 1 && mask_image->depth == 1,
 185                           NULL);
 186     }
 187
 188   /* Such complex bit manipulation for this simple task, sigh.
 189    * The X cursor and Windows cursor concepts are quite different.
 190    * We assume here that we are always called with fg == black and
 191    * bg == white.
 192    */
 193
 194   /* First set masked-out source bits, as all source bits matter on Windoze.
 195    * As we invert them below, they will be clear in the final XORmask.
 196    */
 197   for (iy = 0; iy < height; iy++)
 198     {
 199       p = (guchar *) source_image->mem + iy*source_image->bpl;
 200       q = (guchar *) mask_image->mem + iy*mask_image->bpl;
 201
 202       for (ix = 0; ix < ((width-1)/8+1); ix++)
 203         *p++ |= ~(*q++);
 204     }
 205
 206   /* XOR mask is initialized to zero */
 207   XORmask = g_malloc0 (cursor_width/8 * cursor_height);
 208
 209   for (iy = 0; iy < height; iy++)
 210     {
 211       p = (guchar *) source_image->mem + iy*source_image->bpl;
 212       q = XORmask + iy*cursor_width/8;
 213
 214       for (ix = 0; ix < ((width-1)/8+1); ix++)
 215         *q++ = ~(*p++);
 216       q[-1] &= ~residue;        /* Clear left-over bits */
 217     }
 218
 219   /* AND mask is initialized to ones */
 220   ANDmask = g_malloc (cursor_width/8 * cursor_height);
 221   memset (ANDmask, 0xFF, cursor_width/8 * cursor_height);
 222
 223   for (iy = 0; iy < height; iy++)
 224     {
 225       p = (guchar *) mask_image->mem + iy*mask_image->bpl;
 226       q = ANDmask + iy*cursor_width/8;
 227
 228       for (ix = 0; ix < ((width-1)/8+1); ix++)
 229         *q++ = ~(*p++);
 230       q[-1] |= residue; /* Set left-over bits */
 231     }
 232
 233   xcursor = CreateCursor (gdk_ProgInstance, x, y, cursor_width, cursor_height,
 234                           ANDmask, XORmask);
 235
 236   GDK_NOTE (MISC, g_print ("gdk_cursor_new_from_pixmap: "
 237                            "%#x (%dx%d) %#x (%dx%d) = %#x (%dx%d)\n",
 238                            source_private->xwindow,
 239                            source_private->width, source_private->height,
 240                            mask_private->xwindow,
 241                            mask_private->width, mask_private->height,
 242                            xcursor, cursor_width, cursor_height));
 243
 244   g_free (XORmask);
 245   g_free (ANDmask);
 246
 247   gdk_image_destroy (source_image);
 248   gdk_image_destroy (mask_image);
 249
 250   private = g_new (GdkCursorPrivate, 1);
 251   private->xcursor = xcursor;
 252   cursor = (GdkCursor*) private;
 253   cursor->type = GDK_CURSOR_IS_PIXMAP;
 254
 255   return cursor;
 256 }
 257
 258 void
 259 gdk_cursor_destroy (GdkCursor *cursor)
 260 {
 261   GdkCursorPrivate *private;
 262
 263   g_return_if_fail (cursor != NULL);
 264   private = (GdkCursorPrivate *) cursor;
 265
 266   GDK_NOTE (MISC, g_print ("gdk_cursor_destroy: %#x\n",
 267                            (cursor->type == GDK_CURSOR_IS_PIXMAP) ? private->xcursor : 0));
 268
 269   if (cursor->type == GDK_CURSOR_IS_PIXMAP)
 270     if (!DestroyIcon (private->xcursor))
 271       g_warning ("gdk_cursor_destroy: DestroyIcon failed");
 272
 273   g_free (private);
 274 }