]> Pileus Git - ~andy/gtk/blob - gdk/win32/gdkcursor-win32.c
Implement it. Obscure bit manipulation needed.
[~andy/gtk] / 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, width32, height32;
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   width32 = ((width-1)/32+1)*32;
170   height32 = ((height-1)/32+1)*32;
171
172   residue = (1 << ((8-(width%8))%8)) - 1;
173
174   source_image = gdk_image_get (source, 0, 0, width, height);
175   mask_image = gdk_image_get (mask, 0, 0, width, height);
176
177   if (source_image->depth != 1 || mask_image->depth != 1)
178     {
179     gdk_image_destroy (source_image);
180     gdk_image_destroy (mask_image);
181     g_return_val_if_fail (source_image->depth == 1 && mask_image->depth == 1,
182                           NULL);
183     }
184
185   /* Such complex bit manipulation for this simple task, sigh.
186    * The X cursor and Windows cursor concepts are quite different.
187    * We assume here that we are always called with fg == black and
188    * bg == white.
189    */
190
191   /* First set masked-out source bits, as all source bits matter on Windoze.
192    * As we invert them below, they will be clear in the final XORmask.
193    */
194   for (iy = 0; iy < height; iy++)
195     {
196       p = source_image->mem + iy*source_image->bpl;
197       q = mask_image->mem + iy*mask_image->bpl;
198       
199       for (ix = 0; ix < ((width-1)/8+1); ix++)
200         *p++ |= ~(*q++);
201     }
202
203   /* XOR mask is initialized to zero */
204   XORmask = g_malloc0 (width32/8 * height32);
205
206   for (iy = 0; iy < height; iy++)
207     {
208       p = source_image->mem + iy*source_image->bpl;
209       q = XORmask + iy*width32/8;
210
211       for (ix = 0; ix < ((width-1)/8+1); ix++)
212         *q++ = ~(*p++);
213       q[-1] &= ~residue;        /* Clear left-over bits */
214     }
215       
216   /* AND mask is initialized to ones */
217   ANDmask = g_malloc (width32/8 * height32);
218   memset (ANDmask, 0xFF, width32/8 * height32);
219
220   for (iy = 0; iy < height; iy++)
221     {
222       p = mask_image->mem + iy*mask_image->bpl;
223       q = ANDmask + iy*width32/8;
224
225       for (ix = 0; ix < ((width-1)/8+1); ix++)
226         *q++ = ~(*p++);
227       q[-1] |= residue; /* Set left-over bits */
228     }
229       
230   xcursor = CreateCursor (gdk_ProgInstance, x, y, width32, height32,
231                           ANDmask, XORmask);
232
233   GDK_NOTE (MISC, g_print ("gdk_cursor_new_from_pixmap: "
234                            "%#x (%dx%d) %#x (%dx%d) = %#x (%dx%d)\n",
235                            source_private->xwindow,
236                            source_private->width, source_private->height,
237                            mask_private->xwindow,
238                            mask_private->width, mask_private->height,
239                            xcursor, width32, height32));
240
241   g_free (XORmask);
242   g_free (ANDmask);
243
244   gdk_image_destroy (source_image);
245   gdk_image_destroy (mask_image);
246
247   private = g_new (GdkCursorPrivate, 1);
248   private->xcursor = xcursor;
249   cursor = (GdkCursor*) private;
250   cursor->type = GDK_CURSOR_IS_PIXMAP;
251
252   return cursor;
253 }
254
255 void
256 gdk_cursor_destroy (GdkCursor *cursor)
257 {
258   GdkCursorPrivate *private;
259
260   g_return_if_fail (cursor != NULL);
261   private = (GdkCursorPrivate *) cursor;
262
263   GDK_NOTE (MISC, g_print ("gdk_cursor_destroy: %#x\n",
264                            (cursor->type == GDK_CURSOR_IS_PIXMAP) ? private->xcursor : 0));
265
266   if (cursor->type == GDK_CURSOR_IS_PIXMAP)
267     if (!DestroyIcon (private->xcursor))
268       g_warning ("gdk_cursor_destroy: DestroyIcon failed");
269
270   g_free (private);
271 }