gdi32: Implement the CopyBitmap entry point in the null driver.
[wine] / dlls / gdi32 / bitmap.c
1 /*
2  * GDI bitmap objects
3  *
4  * Copyright 1993 Alexandre Julliard
5  *           1998 Huw D M Davies
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library 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 GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include <stdarg.h>
23 #include <stdlib.h>
24 #include <string.h>
25
26 #include "windef.h"
27 #include "winbase.h"
28 #include "wingdi.h"
29 #include "gdi_private.h"
30 #include "wine/debug.h"
31
32 WINE_DEFAULT_DEBUG_CHANNEL(bitmap);
33
34
35 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, HDC hdc );
36 static INT BITMAP_GetObject( HGDIOBJ handle, INT count, LPVOID buffer );
37 static BOOL BITMAP_DeleteObject( HGDIOBJ handle );
38
39 static const struct gdi_obj_funcs bitmap_funcs =
40 {
41     BITMAP_SelectObject,  /* pSelectObject */
42     BITMAP_GetObject,     /* pGetObjectA */
43     BITMAP_GetObject,     /* pGetObjectW */
44     NULL,                 /* pUnrealizeObject */
45     BITMAP_DeleteObject   /* pDeleteObject */
46 };
47
48
49 /***********************************************************************
50  *           null driver fallback implementations
51  */
52
53 DWORD nulldrv_GetImage( PHYSDEV dev, HBITMAP hbitmap, BITMAPINFO *info,
54                         struct gdi_image_bits *bits, struct bitblt_coords *src )
55 {
56     if (!hbitmap) return ERROR_NOT_SUPPORTED;
57     return dib_driver.pGetImage( 0, hbitmap, info, bits, src );
58 }
59
60 DWORD nulldrv_PutImage( PHYSDEV dev, HBITMAP hbitmap, HRGN clip, BITMAPINFO *info,
61                         const struct gdi_image_bits *bits, struct bitblt_coords *src,
62                         struct bitblt_coords *dst, DWORD rop )
63 {
64     if (!hbitmap) return ERROR_SUCCESS;
65     return dib_driver.pPutImage( NULL, hbitmap, clip, info, bits, src, dst, rop );
66 }
67
68 BOOL nulldrv_CopyBitmap( HBITMAP src, HBITMAP dst )
69 {
70     BOOL ret = TRUE;
71     BITMAPOBJ *src_bmp = GDI_GetObjPtr( src, OBJ_BITMAP );
72
73     if (!src_bmp) return FALSE;
74     if (src_bmp->bitmap.bmBits)
75     {
76         BITMAPOBJ *dst_bmp = GDI_GetObjPtr( dst, OBJ_BITMAP );
77         int stride = get_dib_stride( dst_bmp->bitmap.bmWidth, dst_bmp->bitmap.bmBitsPixel );
78         dst_bmp->bitmap.bmBits = HeapAlloc( GetProcessHeap(), 0, dst_bmp->bitmap.bmHeight * stride );
79         if (dst_bmp->bitmap.bmBits)
80             memcpy( dst_bmp->bitmap.bmBits, src_bmp->bitmap.bmBits, dst_bmp->bitmap.bmHeight * stride );
81         else
82             ret = FALSE;
83         GDI_ReleaseObj( dst );
84     }
85     GDI_ReleaseObj( src );
86     return ret;
87 }
88
89
90 /******************************************************************************
91  * CreateBitmap [GDI32.@]
92  *
93  * Creates a bitmap with the specified info.
94  *
95  * PARAMS
96  *    width  [I] bitmap width
97  *    height [I] bitmap height
98  *    planes [I] Number of color planes
99  *    bpp    [I] Number of bits to identify a color
100  *    bits   [I] Pointer to array containing color data
101  *
102  * RETURNS
103  *    Success: Handle to bitmap
104  *    Failure: 0
105  */
106 HBITMAP WINAPI CreateBitmap( INT width, INT height, UINT planes,
107                              UINT bpp, LPCVOID bits )
108 {
109     BITMAP bm;
110
111     bm.bmType = 0;
112     bm.bmWidth = width;
113     bm.bmHeight = height;
114     bm.bmWidthBytes = get_bitmap_stride( width, bpp );
115     bm.bmPlanes = planes;
116     bm.bmBitsPixel = bpp;
117     bm.bmBits = (LPVOID)bits;
118
119     return CreateBitmapIndirect( &bm );
120 }
121
122 /******************************************************************************
123  * CreateCompatibleBitmap [GDI32.@]
124  *
125  * Creates a bitmap compatible with the DC.
126  *
127  * PARAMS
128  *    hdc    [I] Handle to device context
129  *    width  [I] Width of bitmap
130  *    height [I] Height of bitmap
131  *
132  * RETURNS
133  *    Success: Handle to bitmap
134  *    Failure: 0
135  */
136 HBITMAP WINAPI CreateCompatibleBitmap( HDC hdc, INT width, INT height)
137 {
138     HBITMAP hbmpRet = 0;
139
140     TRACE("(%p,%d,%d) =\n", hdc, width, height);
141
142     if (GetObjectType( hdc ) != OBJ_MEMDC)
143     {
144         hbmpRet = CreateBitmap(width, height,
145                                GetDeviceCaps(hdc, PLANES),
146                                GetDeviceCaps(hdc, BITSPIXEL),
147                                NULL);
148     }
149     else  /* Memory DC */
150     {
151         DIBSECTION dib;
152         HBITMAP bitmap = GetCurrentObject( hdc, OBJ_BITMAP );
153         INT size = GetObjectW( bitmap, sizeof(dib), &dib );
154
155         if (!size) return 0;
156
157         if (size == sizeof(BITMAP))
158         {
159             /* A device-dependent bitmap is selected in the DC */
160             hbmpRet = CreateBitmap(width, height,
161                                    dib.dsBm.bmPlanes,
162                                    dib.dsBm.bmBitsPixel,
163                                    NULL);
164         }
165         else
166         {
167             /* A DIB section is selected in the DC */
168             BITMAPINFO *bi;
169             void *bits;
170
171             /* Allocate memory for a BITMAPINFOHEADER structure and a
172                color table. The maximum number of colors in a color table
173                is 256 which corresponds to a bitmap with depth 8.
174                Bitmaps with higher depths don't have color tables. */
175             bi = HeapAlloc(GetProcessHeap(), 0, sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
176
177             if (bi)
178             {
179                 bi->bmiHeader.biSize          = sizeof(bi->bmiHeader);
180                 bi->bmiHeader.biWidth         = width;
181                 bi->bmiHeader.biHeight        = height;
182                 bi->bmiHeader.biPlanes        = dib.dsBmih.biPlanes;
183                 bi->bmiHeader.biBitCount      = dib.dsBmih.biBitCount;
184                 bi->bmiHeader.biCompression   = dib.dsBmih.biCompression;
185                 bi->bmiHeader.biSizeImage     = 0;
186                 bi->bmiHeader.biXPelsPerMeter = dib.dsBmih.biXPelsPerMeter;
187                 bi->bmiHeader.biYPelsPerMeter = dib.dsBmih.biYPelsPerMeter;
188                 bi->bmiHeader.biClrUsed       = dib.dsBmih.biClrUsed;
189                 bi->bmiHeader.biClrImportant  = dib.dsBmih.biClrImportant;
190
191                 if (bi->bmiHeader.biCompression == BI_BITFIELDS)
192                 {
193                     /* Copy the color masks */
194                     CopyMemory(bi->bmiColors, dib.dsBitfields, 3 * sizeof(DWORD));
195                 }
196                 else if (bi->bmiHeader.biBitCount <= 8)
197                 {
198                     /* Copy the color table */
199                     GetDIBColorTable(hdc, 0, 256, bi->bmiColors);
200                 }
201
202                 hbmpRet = CreateDIBSection(hdc, bi, DIB_RGB_COLORS, &bits, NULL, 0);
203                 HeapFree(GetProcessHeap(), 0, bi);
204             }
205         }
206     }
207
208     TRACE("\t\t%p\n", hbmpRet);
209     return hbmpRet;
210 }
211
212
213 /******************************************************************************
214  * CreateBitmapIndirect [GDI32.@]
215  *
216  * Creates a bitmap with the specified info.
217  *
218  * PARAMS
219  *  bmp [I] Pointer to the bitmap info describing the bitmap
220  *
221  * RETURNS
222  *    Success: Handle to bitmap
223  *    Failure: NULL. Use GetLastError() to determine the cause.
224  *
225  * NOTES
226  *  If a width or height of 0 are given, a 1x1 monochrome bitmap is returned.
227  */
228 HBITMAP WINAPI CreateBitmapIndirect( const BITMAP *bmp )
229 {
230     BITMAP bm;
231     BITMAPOBJ *bmpobj;
232     HBITMAP hbitmap;
233
234     if (!bmp || bmp->bmType)
235     {
236         SetLastError( ERROR_INVALID_PARAMETER );
237         return NULL;
238     }
239
240     if (bmp->bmWidth > 0x7ffffff || bmp->bmHeight > 0x7ffffff)
241     {
242         SetLastError( ERROR_INVALID_PARAMETER );
243         return 0;
244     }
245
246     bm = *bmp;
247
248     if (!bm.bmWidth || !bm.bmHeight)
249     {
250         return GetStockObject( DEFAULT_BITMAP );
251     }
252     else
253     {
254         if (bm.bmHeight < 0)
255             bm.bmHeight = -bm.bmHeight;
256         if (bm.bmWidth < 0)
257             bm.bmWidth = -bm.bmWidth;
258     }
259
260     if (bm.bmPlanes != 1)
261     {
262         FIXME("planes = %d\n", bm.bmPlanes);
263         SetLastError( ERROR_INVALID_PARAMETER );
264         return NULL;
265     }
266
267     /* Windows only uses 1, 4, 8, 16, 24 and 32 bpp */
268     if(bm.bmBitsPixel == 1)         bm.bmBitsPixel = 1;
269     else if(bm.bmBitsPixel <= 4)    bm.bmBitsPixel = 4;
270     else if(bm.bmBitsPixel <= 8)    bm.bmBitsPixel = 8;
271     else if(bm.bmBitsPixel <= 16)   bm.bmBitsPixel = 16;
272     else if(bm.bmBitsPixel <= 24)   bm.bmBitsPixel = 24;
273     else if(bm.bmBitsPixel <= 32)   bm.bmBitsPixel = 32;
274     else {
275         WARN("Invalid bmBitsPixel %d, returning ERROR_INVALID_PARAMETER\n", bm.bmBitsPixel);
276         SetLastError(ERROR_INVALID_PARAMETER);
277         return NULL;
278     }
279
280     /* Windows ignores the provided bm.bmWidthBytes */
281     bm.bmWidthBytes = get_bitmap_stride( bm.bmWidth, bm.bmBitsPixel );
282     /* XP doesn't allow to create bitmaps larger than 128 Mb */
283     if (bm.bmHeight > 128 * 1024 * 1024 / bm.bmWidthBytes)
284     {
285         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
286         return 0;
287     }
288
289     /* Create the BITMAPOBJ */
290     if (!(bmpobj = HeapAlloc( GetProcessHeap(), 0, sizeof(*bmpobj) )))
291     {
292         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
293         return 0;
294     }
295
296     bmpobj->size.cx = 0;
297     bmpobj->size.cy = 0;
298     bmpobj->bitmap = bm;
299     bmpobj->bitmap.bmBits = NULL;
300     bmpobj->funcs = &null_driver;
301     bmpobj->dib = NULL;
302     bmpobj->color_table = NULL;
303     bmpobj->nb_colors = 0;
304
305     if (!(hbitmap = alloc_gdi_handle( &bmpobj->header, OBJ_BITMAP, &bitmap_funcs )))
306     {
307         HeapFree( GetProcessHeap(), 0, bmpobj );
308         return 0;
309     }
310
311     if (bm.bmBits)
312         SetBitmapBits( hbitmap, bm.bmHeight * bm.bmWidthBytes, bm.bmBits );
313
314     TRACE("%dx%d, bpp %d planes %d: returning %p\n", bm.bmWidth, bm.bmHeight,
315           bm.bmBitsPixel, bm.bmPlanes, hbitmap);
316
317     return hbitmap;
318 }
319
320
321 /***********************************************************************
322  * GetBitmapBits [GDI32.@]
323  *
324  * Copies bitmap bits of bitmap to buffer.
325  *
326  * RETURNS
327  *    Success: Number of bytes copied
328  *    Failure: 0
329  */
330 LONG WINAPI GetBitmapBits(
331     HBITMAP hbitmap, /* [in]  Handle to bitmap */
332     LONG count,        /* [in]  Number of bytes to copy */
333     LPVOID bits)       /* [out] Pointer to buffer to receive bits */
334 {
335     char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
336     BITMAPINFO *info = (BITMAPINFO *)buffer;
337     struct gdi_image_bits src_bits;
338     struct bitblt_coords src;
339     int dst_stride, max, ret;
340     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
341     const struct gdi_dc_funcs *funcs;
342
343     if (!bmp) return 0;
344     funcs = get_bitmap_funcs( bmp );
345
346     if (bmp->dib) dst_stride = get_bitmap_stride( bmp->dib->dsBmih.biWidth, bmp->dib->dsBmih.biBitCount );
347     else dst_stride = get_bitmap_stride( bmp->bitmap.bmWidth, bmp->bitmap.bmBitsPixel );
348
349     ret = max = dst_stride * bmp->bitmap.bmHeight;
350     if (!bits) goto done;
351     if (count > max) count = max;
352     ret = count;
353
354     src.visrect.left = 0;
355     src.visrect.right = bmp->bitmap.bmWidth;
356     src.visrect.top = 0;
357     src.visrect.bottom = (count + dst_stride - 1) / dst_stride;
358     src.x = src.y = 0;
359     src.width = src.visrect.right - src.visrect.left;
360     src.height = src.visrect.bottom - src.visrect.top;
361
362     if (!funcs->pGetImage( NULL, hbitmap, info, &src_bits, &src ))
363     {
364         const char *src_ptr = src_bits.ptr;
365         int src_stride = get_dib_stride( info->bmiHeader.biWidth, info->bmiHeader.biBitCount );
366
367         /* GetBitmapBits returns 16-bit aligned data */
368
369         if (info->bmiHeader.biHeight > 0)
370         {
371             src_ptr += (info->bmiHeader.biHeight - 1) * src_stride;
372             src_stride = -src_stride;
373         }
374         src_ptr += src.visrect.top * src_stride;
375
376         if (src_stride == dst_stride) memcpy( bits, src_ptr, count );
377         else while (count > 0)
378         {
379             memcpy( bits, src_ptr, min( count, dst_stride ) );
380             src_ptr += src_stride;
381             bits = (char *)bits + dst_stride;
382             count -= dst_stride;
383         }
384         if (src_bits.free) src_bits.free( &src_bits );
385     }
386     else ret = 0;
387
388 done:
389     GDI_ReleaseObj( hbitmap );
390     return ret;
391 }
392
393
394 /******************************************************************************
395  * SetBitmapBits [GDI32.@]
396  *
397  * Sets bits of color data for a bitmap.
398  *
399  * RETURNS
400  *    Success: Number of bytes used in setting the bitmap bits
401  *    Failure: 0
402  */
403 LONG WINAPI SetBitmapBits(
404     HBITMAP hbitmap, /* [in] Handle to bitmap */
405     LONG count,        /* [in] Number of bytes in bitmap array */
406     LPCVOID bits)      /* [in] Address of array with bitmap bits */
407 {
408     char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
409     BITMAPINFO *info = (BITMAPINFO *)buffer;
410     BITMAPOBJ *bmp;
411     DWORD err;
412     int i, src_stride, dst_stride;
413     struct bitblt_coords src, dst;
414     struct gdi_image_bits src_bits;
415     HRGN clip = NULL;
416     const struct gdi_dc_funcs *funcs;
417
418     if (!bits) return 0;
419
420     bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
421     if (!bmp) return 0;
422
423     funcs = get_bitmap_funcs( bmp );
424
425     if (count < 0) {
426         WARN("(%d): Negative number of bytes passed???\n", count );
427         count = -count;
428     }
429
430     if (bmp->dib) src_stride = get_bitmap_stride( bmp->dib->dsBmih.biWidth, bmp->dib->dsBmih.biBitCount );
431     else src_stride = get_bitmap_stride( bmp->bitmap.bmWidth, bmp->bitmap.bmBitsPixel );
432     count = min( count, src_stride * bmp->bitmap.bmHeight );
433
434     dst_stride = get_dib_stride( bmp->bitmap.bmWidth, bmp->bitmap.bmBitsPixel );
435
436     src.visrect.left   = src.x = 0;
437     src.visrect.top    = src.y = 0;
438     src.visrect.right  = src.width = bmp->bitmap.bmWidth;
439     src.visrect.bottom = src.height = (count + src_stride - 1 ) / src_stride;
440     dst = src;
441
442     if (count % src_stride)
443     {
444         HRGN last_row;
445         int extra_pixels = ((count % src_stride) << 3) / bmp->bitmap.bmBitsPixel;
446
447         if ((count % src_stride << 3) % bmp->bitmap.bmBitsPixel)
448             FIXME( "Unhandled partial pixel\n" );
449         clip = CreateRectRgn( src.visrect.left, src.visrect.top,
450                               src.visrect.right, src.visrect.bottom - 1 );
451         last_row = CreateRectRgn( src.visrect.left, src.visrect.bottom - 1,
452                                   src.visrect.left + extra_pixels, src.visrect.bottom );
453         CombineRgn( clip, clip, last_row, RGN_OR );
454         DeleteObject( last_row );
455     }
456
457     TRACE("(%p, %d, %p) %dx%d %d bpp fetched height: %d\n",
458           hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
459           bmp->bitmap.bmBitsPixel, src.height );
460
461     if (src_stride == dst_stride)
462     {
463         src_bits.ptr = (void *)bits;
464         src_bits.is_copy = FALSE;
465         src_bits.free = NULL;
466     }
467     else
468     {
469         if (!(src_bits.ptr = HeapAlloc( GetProcessHeap(), 0, dst.height * dst_stride )))
470         {
471             GDI_ReleaseObj( hbitmap );
472             return 0;
473         }
474         src_bits.is_copy = TRUE;
475         src_bits.free = free_heap_bits;
476         for (i = 0; i < count / src_stride; i++)
477             memcpy( (char *)src_bits.ptr + i * dst_stride, (char *)bits + i * src_stride, src_stride );
478         if (count % src_stride)
479             memcpy( (char *)src_bits.ptr + i * dst_stride, (char *)bits + i * src_stride, count % src_stride );
480     }
481
482     /* query the color info */
483     info->bmiHeader.biSize          = sizeof(info->bmiHeader);
484     info->bmiHeader.biPlanes        = 1;
485     info->bmiHeader.biBitCount      = bmp->bitmap.bmBitsPixel;
486     info->bmiHeader.biCompression   = BI_RGB;
487     info->bmiHeader.biXPelsPerMeter = 0;
488     info->bmiHeader.biYPelsPerMeter = 0;
489     info->bmiHeader.biClrUsed       = 0;
490     info->bmiHeader.biClrImportant  = 0;
491     info->bmiHeader.biWidth         = 0;
492     info->bmiHeader.biHeight        = 0;
493     info->bmiHeader.biSizeImage     = 0;
494     err = funcs->pPutImage( NULL, hbitmap, 0, info, NULL, NULL, NULL, SRCCOPY );
495
496     if (!err || err == ERROR_BAD_FORMAT)
497     {
498         info->bmiHeader.biPlanes        = 1;
499         info->bmiHeader.biBitCount      = bmp->bitmap.bmBitsPixel;
500         info->bmiHeader.biWidth         = bmp->bitmap.bmWidth;
501         info->bmiHeader.biHeight        = -dst.height;
502         info->bmiHeader.biSizeImage     = dst.height * dst_stride;
503         err = funcs->pPutImage( NULL, hbitmap, clip, info, &src_bits, &src, &dst, SRCCOPY );
504     }
505     if (err) count = 0;
506
507     if (clip) DeleteObject( clip );
508     if (src_bits.free) src_bits.free( &src_bits );
509     GDI_ReleaseObj( hbitmap );
510     return count;
511 }
512
513 /**********************************************************************
514  *              BITMAP_CopyBitmap
515  *
516  */
517 HBITMAP BITMAP_CopyBitmap(HBITMAP hbitmap)
518 {
519     HBITMAP res;
520     DIBSECTION dib;
521     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
522
523     if (!bmp) return 0;
524     if (bmp->dib)
525     {
526         void *bits;
527         BITMAPINFO *bi;
528         HDC dc;
529
530         dib = *bmp->dib;
531         GDI_ReleaseObj( hbitmap );
532         dc = CreateCompatibleDC( NULL );
533
534         if (!dc) return 0;
535         if (!(bi = HeapAlloc(GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] ))))
536         {
537             DeleteDC( dc );
538             return 0;
539         }
540         bi->bmiHeader = dib.dsBmih;
541
542         /* Get the color table or the color masks */
543         GetDIBits( dc, hbitmap, 0, 0, NULL, bi, DIB_RGB_COLORS );
544         bi->bmiHeader.biHeight = dib.dsBmih.biHeight;
545
546         res = CreateDIBSection( dc, bi, DIB_RGB_COLORS, &bits, NULL, 0 );
547         if (res) SetDIBits( dc, res, 0, dib.dsBm.bmHeight, dib.dsBm.bmBits, bi, DIB_RGB_COLORS );
548         HeapFree( GetProcessHeap(), 0, bi );
549         DeleteDC( dc );
550         return res;
551     }
552     dib.dsBm = bmp->bitmap;
553     dib.dsBm.bmBits = NULL;
554     GDI_ReleaseObj( hbitmap );
555
556     res = CreateBitmapIndirect( &dib.dsBm );
557     if(res) {
558         char *buf = HeapAlloc( GetProcessHeap(), 0, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight );
559         GetBitmapBits (hbitmap, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight, buf);
560         SetBitmapBits (res, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight, buf);
561         HeapFree( GetProcessHeap(), 0, buf );
562     }
563     return res;
564 }
565
566
567 static void set_initial_bitmap_bits( HBITMAP hbitmap, BITMAPOBJ *bmp )
568 {
569     char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
570     BITMAPINFO *info = (BITMAPINFO *)buffer;
571
572     if (!bmp->bitmap.bmBits) return;
573     if (bmp->funcs->pPutImage == nulldrv_PutImage) return;
574
575     get_ddb_bitmapinfo( bmp, info );
576     SetDIBits( 0, hbitmap, 0, bmp->bitmap.bmHeight, bmp->bitmap.bmBits, info, DIB_RGB_COLORS );
577 }
578
579 /***********************************************************************
580  *           BITMAP_SetOwnerDC
581  *
582  * Set the type of DC that owns the bitmap. This is used when the
583  * bitmap is selected into a device to initialize the bitmap function
584  * table.
585  */
586 BOOL BITMAP_SetOwnerDC( HBITMAP hbitmap, PHYSDEV physdev )
587 {
588     BITMAPOBJ *bitmap;
589     BOOL ret = TRUE;
590
591     /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
592     if (hbitmap == GetStockObject(DEFAULT_BITMAP)) return TRUE;
593
594     if (!(bitmap = GDI_GetObjPtr( hbitmap, OBJ_BITMAP ))) return FALSE;
595
596     if (!bitmap->dib && bitmap->funcs != physdev->funcs)
597     {
598         /* we can only change from the null driver to some other driver */
599         if (bitmap->funcs == &null_driver)
600         {
601             if (physdev->funcs->pCreateBitmap)
602             {
603                 ret = physdev->funcs->pCreateBitmap( physdev, hbitmap );
604                 if (ret)
605                 {
606                     bitmap->funcs = physdev->funcs;
607                     set_initial_bitmap_bits( hbitmap, bitmap );
608                 }
609             }
610             else bitmap->funcs = &dib_driver;  /* use the DIB driver to emulate DDB support */
611         }
612         else
613         {
614             FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap );
615             ret = FALSE;
616         }
617     }
618     GDI_ReleaseObj( hbitmap );
619     return ret;
620 }
621
622
623 /***********************************************************************
624  *           BITMAP_SelectObject
625  */
626 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, HDC hdc )
627 {
628     HGDIOBJ ret;
629     BITMAPOBJ *bitmap;
630     DC *dc;
631     PHYSDEV physdev = NULL, old_physdev = NULL, pathdev = NULL;
632
633     if (!(dc = get_dc_ptr( hdc ))) return 0;
634
635     if (GetObjectType( hdc ) != OBJ_MEMDC)
636     {
637         ret = 0;
638         goto done;
639     }
640     ret = dc->hBitmap;
641     if (handle == dc->hBitmap) goto done;  /* nothing to do */
642
643     if (!(bitmap = GDI_GetObjPtr( handle, OBJ_BITMAP )))
644     {
645         ret = 0;
646         goto done;
647     }
648
649     if (bitmap->header.selcount && (handle != GetStockObject(DEFAULT_BITMAP)))
650     {
651         WARN( "Bitmap already selected in another DC\n" );
652         GDI_ReleaseObj( handle );
653         ret = 0;
654         goto done;
655     }
656
657     if (dc->physDev->funcs == &path_driver) pathdev = pop_dc_driver( &dc->physDev );
658
659     old_physdev = GET_DC_PHYSDEV( dc, pSelectBitmap );
660     if(old_physdev == dc->dibdrv)
661         old_physdev = pop_dc_driver( &dc->physDev );
662
663     physdev = GET_DC_PHYSDEV( dc, pSelectBitmap );
664     if (bitmap->dib || physdev->funcs == &null_driver)
665     {
666         physdev = dc->dibdrv;
667         if (physdev) push_dc_driver( &dc->physDev, physdev, physdev->funcs );
668         else
669         {
670             if (!dib_driver.pCreateDC( &dc->physDev, NULL, NULL, NULL, NULL )) goto done;
671             dc->dibdrv = physdev = dc->physDev;
672         }
673     }
674
675     if (!BITMAP_SetOwnerDC( handle, physdev ))
676     {
677         GDI_ReleaseObj( handle );
678         ret = 0;
679         goto done;
680     }
681     if (!physdev->funcs->pSelectBitmap( physdev, handle ))
682     {
683         GDI_ReleaseObj( handle );
684         ret = 0;
685     }
686     else
687     {
688         dc->hBitmap = handle;
689         GDI_inc_ref_count( handle );
690         dc->dirty = 0;
691         dc->vis_rect.left   = 0;
692         dc->vis_rect.top    = 0;
693         dc->vis_rect.right  = bitmap->bitmap.bmWidth;
694         dc->vis_rect.bottom = bitmap->bitmap.bmHeight;
695         SetRectRgn( dc->hVisRgn, 0, 0, bitmap->bitmap.bmWidth, bitmap->bitmap.bmHeight);
696         GDI_ReleaseObj( handle );
697         DC_InitDC( dc );
698         GDI_dec_ref_count( ret );
699     }
700
701  done:
702     if(!ret)
703     {
704         if (physdev && physdev == dc->dibdrv)
705             pop_dc_driver( &dc->physDev );
706         if (old_physdev && old_physdev == dc->dibdrv)
707             push_dc_driver( &dc->physDev, old_physdev, old_physdev->funcs );
708     }
709     if (pathdev) push_dc_driver( &dc->physDev, pathdev, pathdev->funcs );
710     release_dc_ptr( dc );
711     return ret;
712 }
713
714
715 /***********************************************************************
716  *           BITMAP_DeleteObject
717  */
718 static BOOL BITMAP_DeleteObject( HGDIOBJ handle )
719 {
720     const struct gdi_dc_funcs *funcs;
721     BITMAPOBJ *bmp = GDI_GetObjPtr( handle, OBJ_BITMAP );
722
723     if (!bmp) return FALSE;
724     funcs = bmp->funcs;
725     GDI_ReleaseObj( handle );
726
727     funcs->pDeleteBitmap( handle );
728
729     if (!(bmp = free_gdi_handle( handle ))) return FALSE;
730
731     HeapFree( GetProcessHeap(), 0, bmp->bitmap.bmBits );
732
733     if (bmp->dib)
734     {
735         DIBSECTION *dib = bmp->dib;
736
737         if (dib->dsBm.bmBits)
738         {
739             if (dib->dshSection)
740             {
741                 SYSTEM_INFO SystemInfo;
742                 GetSystemInfo( &SystemInfo );
743                 UnmapViewOfFile( (char *)dib->dsBm.bmBits -
744                                  (dib->dsOffset % SystemInfo.dwAllocationGranularity) );
745             }
746             else if (!dib->dsOffset)
747                 VirtualFree(dib->dsBm.bmBits, 0L, MEM_RELEASE );
748         }
749         HeapFree(GetProcessHeap(), 0, dib);
750         HeapFree(GetProcessHeap(), 0, bmp->color_table);
751     }
752     return HeapFree( GetProcessHeap(), 0, bmp );
753 }
754
755
756 /***********************************************************************
757  *           BITMAP_GetObject
758  */
759 static INT BITMAP_GetObject( HGDIOBJ handle, INT count, LPVOID buffer )
760 {
761     INT ret;
762     BITMAPOBJ *bmp = GDI_GetObjPtr( handle, OBJ_BITMAP );
763
764     if (!bmp) return 0;
765
766     if (!buffer) ret = sizeof(BITMAP);
767     else if (count < sizeof(BITMAP)) ret = 0;
768     else if (bmp->dib)
769     {
770         if (count >= sizeof(DIBSECTION))
771         {
772             DIBSECTION *dib = buffer;
773             *dib = *bmp->dib;
774             dib->dsBmih.biHeight = abs( dib->dsBmih.biHeight );
775             ret = sizeof(DIBSECTION);
776         }
777         else /* if (count >= sizeof(BITMAP)) */
778         {
779             DIBSECTION *dib = bmp->dib;
780             memcpy( buffer, &dib->dsBm, sizeof(BITMAP) );
781             ret = sizeof(BITMAP);
782         }
783     }
784     else
785     {
786         memcpy( buffer, &bmp->bitmap, sizeof(BITMAP) );
787         ((BITMAP *) buffer)->bmBits = NULL;
788         ret = sizeof(BITMAP);
789     }
790     GDI_ReleaseObj( handle );
791     return ret;
792 }
793
794
795 /******************************************************************************
796  * CreateDiscardableBitmap [GDI32.@]
797  *
798  * Creates a discardable bitmap.
799  *
800  * RETURNS
801  *    Success: Handle to bitmap
802  *    Failure: NULL
803  */
804 HBITMAP WINAPI CreateDiscardableBitmap(
805     HDC hdc,    /* [in] Handle to device context */
806     INT width,  /* [in] Bitmap width */
807     INT height) /* [in] Bitmap height */
808 {
809     return CreateCompatibleBitmap( hdc, width, height );
810 }
811
812
813 /******************************************************************************
814  * GetBitmapDimensionEx [GDI32.@]
815  *
816  * Retrieves dimensions of a bitmap.
817  *
818  * RETURNS
819  *    Success: TRUE
820  *    Failure: FALSE
821  */
822 BOOL WINAPI GetBitmapDimensionEx(
823     HBITMAP hbitmap, /* [in]  Handle to bitmap */
824     LPSIZE size)     /* [out] Address of struct receiving dimensions */
825 {
826     BITMAPOBJ * bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
827     if (!bmp) return FALSE;
828     *size = bmp->size;
829     GDI_ReleaseObj( hbitmap );
830     return TRUE;
831 }
832
833
834 /******************************************************************************
835  * SetBitmapDimensionEx [GDI32.@]
836  *
837  * Assigns dimensions to a bitmap.
838  * MSDN says that this function will fail if hbitmap is a handle created by
839  * CreateDIBSection, but that's not true on Windows 2000.
840  *
841  * RETURNS
842  *    Success: TRUE
843  *    Failure: FALSE
844  */
845 BOOL WINAPI SetBitmapDimensionEx(
846     HBITMAP hbitmap, /* [in]  Handle to bitmap */
847     INT x,           /* [in]  Bitmap width */
848     INT y,           /* [in]  Bitmap height */
849     LPSIZE prevSize) /* [out] Address of structure for orig dims */
850 {
851     BITMAPOBJ * bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
852     if (!bmp) return FALSE;
853     if (prevSize) *prevSize = bmp->size;
854     bmp->size.cx = x;
855     bmp->size.cy = y;
856     GDI_ReleaseObj( hbitmap );
857     return TRUE;
858 }