4 * Copyright 1993 Alexandre Julliard
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.
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.
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
29 #include "wine/winbase16.h"
30 #include "gdi_private.h"
31 #include "wine/debug.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(bitmap
);
36 static HGDIOBJ
BITMAP_SelectObject( HGDIOBJ handle
, HDC hdc
);
37 static INT
BITMAP_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
);
38 static BOOL
BITMAP_DeleteObject( HGDIOBJ handle
, void *obj
);
40 static const struct gdi_obj_funcs bitmap_funcs
=
42 BITMAP_SelectObject
, /* pSelectObject */
43 BITMAP_GetObject
, /* pGetObjectA */
44 BITMAP_GetObject
, /* pGetObjectW */
45 NULL
, /* pUnrealizeObject */
46 BITMAP_DeleteObject
/* pDeleteObject */
49 /***********************************************************************
50 * BITMAP_GetWidthBytes
52 * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
55 INT
BITMAP_GetWidthBytes( INT bmWidth
, INT bpp
)
60 return 2 * ((bmWidth
+15) >> 4);
63 bmWidth
*= 3; /* fall through */
65 return bmWidth
+ (bmWidth
& 1);
75 return 2 * ((bmWidth
+3) >> 2);
78 WARN("Unknown depth %d, please report.\n", bpp
);
84 /******************************************************************************
85 * CreateBitmap [GDI32.@]
87 * Creates a bitmap with the specified info.
90 * width [I] bitmap width
91 * height [I] bitmap height
92 * planes [I] Number of color planes
93 * bpp [I] Number of bits to identify a color
94 * bits [I] Pointer to array containing color data
97 * Success: Handle to bitmap
100 HBITMAP WINAPI
CreateBitmap( INT width
, INT height
, UINT planes
,
101 UINT bpp
, LPCVOID bits
)
107 bm
.bmHeight
= height
;
108 bm
.bmWidthBytes
= BITMAP_GetWidthBytes( width
, bpp
);
109 bm
.bmPlanes
= planes
;
110 bm
.bmBitsPixel
= bpp
;
111 bm
.bmBits
= (LPVOID
)bits
;
113 return CreateBitmapIndirect( &bm
);
116 /******************************************************************************
117 * CreateCompatibleBitmap [GDI32.@]
119 * Creates a bitmap compatible with the DC.
122 * hdc [I] Handle to device context
123 * width [I] Width of bitmap
124 * height [I] Height of bitmap
127 * Success: Handle to bitmap
130 HBITMAP WINAPI
CreateCompatibleBitmap( HDC hdc
, INT width
, INT height
)
134 TRACE("(%p,%d,%d) =\n", hdc
, width
, height
);
136 if (GetObjectType( hdc
) != OBJ_MEMDC
)
138 hbmpRet
= CreateBitmap(width
, height
,
139 GetDeviceCaps(hdc
, PLANES
),
140 GetDeviceCaps(hdc
, BITSPIXEL
),
146 HBITMAP bitmap
= GetCurrentObject( hdc
, OBJ_BITMAP
);
147 INT size
= GetObjectW( bitmap
, sizeof(dib
), &dib
);
151 if (size
== sizeof(BITMAP
))
153 /* A device-dependent bitmap is selected in the DC */
154 hbmpRet
= CreateBitmap(width
, height
,
156 dib
.dsBm
.bmBitsPixel
,
161 /* A DIB section is selected in the DC */
165 /* Allocate memory for a BITMAPINFOHEADER structure and a
166 color table. The maximum number of colors in a color table
167 is 256 which corresponds to a bitmap with depth 8.
168 Bitmaps with higher depths don't have color tables. */
169 bi
= HeapAlloc(GetProcessHeap(), 0, sizeof(BITMAPINFOHEADER
) + 256 * sizeof(RGBQUAD
));
173 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
174 bi
->bmiHeader
.biWidth
= width
;
175 bi
->bmiHeader
.biHeight
= height
;
176 bi
->bmiHeader
.biPlanes
= dib
.dsBmih
.biPlanes
;
177 bi
->bmiHeader
.biBitCount
= dib
.dsBmih
.biBitCount
;
178 bi
->bmiHeader
.biCompression
= dib
.dsBmih
.biCompression
;
179 bi
->bmiHeader
.biSizeImage
= 0;
180 bi
->bmiHeader
.biXPelsPerMeter
= dib
.dsBmih
.biXPelsPerMeter
;
181 bi
->bmiHeader
.biYPelsPerMeter
= dib
.dsBmih
.biYPelsPerMeter
;
182 bi
->bmiHeader
.biClrUsed
= dib
.dsBmih
.biClrUsed
;
183 bi
->bmiHeader
.biClrImportant
= dib
.dsBmih
.biClrImportant
;
185 if (bi
->bmiHeader
.biCompression
== BI_BITFIELDS
)
187 /* Copy the color masks */
188 CopyMemory(bi
->bmiColors
, dib
.dsBitfields
, 3 * sizeof(DWORD
));
190 else if (bi
->bmiHeader
.biBitCount
<= 8)
192 /* Copy the color table */
193 GetDIBColorTable(hdc
, 0, 256, bi
->bmiColors
);
196 hbmpRet
= CreateDIBSection(hdc
, bi
, DIB_RGB_COLORS
, &bits
, NULL
, 0);
197 HeapFree(GetProcessHeap(), 0, bi
);
202 TRACE("\t\t%p\n", hbmpRet
);
207 /******************************************************************************
208 * CreateBitmapIndirect [GDI32.@]
210 * Creates a bitmap with the specified info.
213 * bmp [I] Pointer to the bitmap info describing the bitmap
216 * Success: Handle to bitmap
217 * Failure: NULL. Use GetLastError() to determine the cause.
220 * If a width or height of 0 are given, a 1x1 monochrome bitmap is returned.
222 HBITMAP WINAPI
CreateBitmapIndirect( const BITMAP
*bmp
)
228 if (!bmp
|| bmp
->bmType
)
230 SetLastError( ERROR_INVALID_PARAMETER
);
234 if (bmp
->bmWidth
> 0x7ffffff || bmp
->bmHeight
> 0x7ffffff)
236 SetLastError( ERROR_INVALID_PARAMETER
);
242 if (!bm
.bmWidth
|| !bm
.bmHeight
)
244 return GetStockObject( DEFAULT_BITMAP
);
249 bm
.bmHeight
= -bm
.bmHeight
;
251 bm
.bmWidth
= -bm
.bmWidth
;
254 if (bm
.bmPlanes
!= 1)
256 FIXME("planes = %d\n", bm
.bmPlanes
);
257 SetLastError( ERROR_INVALID_PARAMETER
);
261 /* Windows only uses 1, 4, 8, 16, 24 and 32 bpp */
262 if(bm
.bmBitsPixel
== 1) bm
.bmBitsPixel
= 1;
263 else if(bm
.bmBitsPixel
<= 4) bm
.bmBitsPixel
= 4;
264 else if(bm
.bmBitsPixel
<= 8) bm
.bmBitsPixel
= 8;
265 else if(bm
.bmBitsPixel
<= 16) bm
.bmBitsPixel
= 16;
266 else if(bm
.bmBitsPixel
<= 24) bm
.bmBitsPixel
= 24;
267 else if(bm
.bmBitsPixel
<= 32) bm
.bmBitsPixel
= 32;
269 WARN("Invalid bmBitsPixel %d, returning ERROR_INVALID_PARAMETER\n", bm
.bmBitsPixel
);
270 SetLastError(ERROR_INVALID_PARAMETER
);
274 /* Windows ignores the provided bm.bmWidthBytes */
275 bm
.bmWidthBytes
= BITMAP_GetWidthBytes( bm
.bmWidth
, bm
.bmBitsPixel
);
276 /* XP doesn't allow to create bitmaps larger than 128 Mb */
277 if (bm
.bmHeight
* bm
.bmWidthBytes
> 128 * 1024 * 1024)
279 SetLastError( ERROR_NOT_ENOUGH_MEMORY
);
283 /* Create the BITMAPOBJ */
284 bmpobj
= GDI_AllocObject( sizeof(BITMAPOBJ
), BITMAP_MAGIC
,
285 (HGDIOBJ
*)&hbitmap
, &bitmap_funcs
);
289 SetLastError( ERROR_NOT_ENOUGH_MEMORY
);
293 TRACE("%dx%d, %d colors returning %p\n", bm
.bmWidth
, bm
.bmHeight
,
294 1 << (bm
.bmPlanes
* bm
.bmBitsPixel
), hbitmap
);
299 bmpobj
->bitmap
.bmBits
= NULL
;
300 bmpobj
->funcs
= NULL
;
302 bmpobj
->segptr_bits
= 0;
303 bmpobj
->color_table
= NULL
;
304 bmpobj
->nb_colors
= 0;
307 SetBitmapBits( hbitmap
, bm
.bmHeight
* bm
.bmWidthBytes
, bm
.bmBits
);
309 GDI_ReleaseObj( hbitmap
);
314 /***********************************************************************
315 * GetBitmapBits [GDI32.@]
317 * Copies bitmap bits of bitmap to buffer.
320 * Success: Number of bytes copied
323 LONG WINAPI
GetBitmapBits(
324 HBITMAP hbitmap
, /* [in] Handle to bitmap */
325 LONG count
, /* [in] Number of bytes to copy */
326 LPVOID bits
) /* [out] Pointer to buffer to receive bits */
328 BITMAPOBJ
*bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
333 if (bmp
->dib
) /* simply copy the bits from the DIB */
335 DIBSECTION
*dib
= bmp
->dib
;
336 const char *src
= dib
->dsBm
.bmBits
;
337 INT width_bytes
= BITMAP_GetWidthBytes(dib
->dsBm
.bmWidth
, dib
->dsBm
.bmBitsPixel
);
338 DWORD max
= width_bytes
* bmp
->bitmap
.bmHeight
;
346 if (count
> max
) count
= max
;
349 /* GetBitmapBits returns not 32-bit aligned data */
351 if (bmp
->dib
->dsBmih
.biHeight
>= 0) /* not top-down, need to flip contents vertically */
353 src
+= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
356 src
-= dib
->dsBm
.bmWidthBytes
;
357 memcpy( bits
, src
, min( count
, width_bytes
) );
358 bits
= (char *)bits
+ width_bytes
;
359 count
-= width_bytes
;
366 memcpy( bits
, src
, min( count
, width_bytes
) );
367 src
+= dib
->dsBm
.bmWidthBytes
;
368 bits
= (char *)bits
+ width_bytes
;
369 count
-= width_bytes
;
375 /* If the bits vector is null, the function should return the read size */
378 ret
= bmp
->bitmap
.bmWidthBytes
* bmp
->bitmap
.bmHeight
;
383 WARN("(%d): Negative number of bytes passed???\n", count
);
387 /* Only get entire lines */
388 height
= count
/ bmp
->bitmap
.bmWidthBytes
;
389 if (height
> bmp
->bitmap
.bmHeight
) height
= bmp
->bitmap
.bmHeight
;
390 count
= height
* bmp
->bitmap
.bmWidthBytes
;
393 WARN("Less than one entire line requested\n");
399 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
400 hbitmap
, count
, bits
, bmp
->bitmap
.bmWidth
, bmp
->bitmap
.bmHeight
,
401 1 << bmp
->bitmap
.bmBitsPixel
, height
);
403 if(bmp
->funcs
&& bmp
->funcs
->pGetBitmapBits
)
405 TRACE("Calling device specific BitmapBits\n");
406 ret
= bmp
->funcs
->pGetBitmapBits(hbitmap
, bits
, count
);
409 if(!bmp
->bitmap
.bmBits
) {
410 TRACE("Bitmap is empty\n");
411 memset(bits
, 0, count
);
414 memcpy(bits
, bmp
->bitmap
.bmBits
, count
);
420 GDI_ReleaseObj( hbitmap
);
425 /******************************************************************************
426 * SetBitmapBits [GDI32.@]
428 * Sets bits of color data for a bitmap.
431 * Success: Number of bytes used in setting the bitmap bits
434 LONG WINAPI
SetBitmapBits(
435 HBITMAP hbitmap
, /* [in] Handle to bitmap */
436 LONG count
, /* [in] Number of bytes in bitmap array */
437 LPCVOID bits
) /* [in] Address of array with bitmap bits */
439 BITMAPOBJ
*bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
442 if ((!bmp
) || (!bits
))
446 WARN("(%d): Negative number of bytes passed???\n", count
);
450 if (bmp
->dib
) /* simply copy the bits into the DIB */
452 DIBSECTION
*dib
= bmp
->dib
;
453 char *dest
= dib
->dsBm
.bmBits
;
454 DWORD max
= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
455 if (count
> max
) count
= max
;
458 if (bmp
->dib
->dsBmih
.biHeight
>= 0) /* not top-down, need to flip contents vertically */
460 dest
+= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
463 dest
-= dib
->dsBm
.bmWidthBytes
;
464 memcpy( dest
, bits
, min( count
, dib
->dsBm
.bmWidthBytes
) );
465 bits
= (const char *)bits
+ dib
->dsBm
.bmWidthBytes
;
466 count
-= dib
->dsBm
.bmWidthBytes
;
469 else memcpy( dest
, bits
, count
);
471 GDI_ReleaseObj( hbitmap
);
475 /* Only get entire lines */
476 height
= count
/ bmp
->bitmap
.bmWidthBytes
;
477 if (height
> bmp
->bitmap
.bmHeight
) height
= bmp
->bitmap
.bmHeight
;
478 count
= height
* bmp
->bitmap
.bmWidthBytes
;
480 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
481 hbitmap
, count
, bits
, bmp
->bitmap
.bmWidth
, bmp
->bitmap
.bmHeight
,
482 1 << bmp
->bitmap
.bmBitsPixel
, height
);
484 if(bmp
->funcs
&& bmp
->funcs
->pSetBitmapBits
) {
486 TRACE("Calling device specific BitmapBits\n");
487 ret
= bmp
->funcs
->pSetBitmapBits(hbitmap
, bits
, count
);
490 if(!bmp
->bitmap
.bmBits
) /* Alloc enough for entire bitmap */
491 bmp
->bitmap
.bmBits
= HeapAlloc( GetProcessHeap(), 0, count
);
492 if(!bmp
->bitmap
.bmBits
) {
493 WARN("Unable to allocate bit buffer\n");
496 memcpy(bmp
->bitmap
.bmBits
, bits
, count
);
501 GDI_ReleaseObj( hbitmap
);
505 /**********************************************************************
509 HBITMAP
BITMAP_CopyBitmap(HBITMAP hbitmap
)
514 if (!GetObjectW( hbitmap
, sizeof(bm
), &bm
)) return 0;
515 res
= CreateBitmapIndirect(&bm
);
518 char *buf
= HeapAlloc( GetProcessHeap(), 0, bm
.bmWidthBytes
*
520 GetBitmapBits (hbitmap
, bm
.bmWidthBytes
* bm
.bmHeight
, buf
);
521 SetBitmapBits (res
, bm
.bmWidthBytes
* bm
.bmHeight
, buf
);
522 HeapFree( GetProcessHeap(), 0, buf
);
528 /***********************************************************************
531 * Set the type of DC that owns the bitmap. This is used when the
532 * bitmap is selected into a device to initialize the bitmap function
535 BOOL
BITMAP_SetOwnerDC( HBITMAP hbitmap
, DC
*dc
)
540 /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
541 if (hbitmap
== GetStockObject(DEFAULT_BITMAP
)) return TRUE
;
543 if (!(bitmap
= GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
))) return FALSE
;
546 if (!bitmap
->funcs
) /* not owned by a DC yet */
548 if (dc
->funcs
->pCreateBitmap
) ret
= dc
->funcs
->pCreateBitmap( dc
->physDev
, hbitmap
,
549 bitmap
->bitmap
.bmBits
);
550 if (ret
) bitmap
->funcs
= dc
->funcs
;
552 else if (bitmap
->funcs
!= dc
->funcs
)
554 FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap
);
557 GDI_ReleaseObj( hbitmap
);
562 /***********************************************************************
563 * BITMAP_SelectObject
565 static HGDIOBJ
BITMAP_SelectObject( HGDIOBJ handle
, HDC hdc
)
571 if (!(dc
= get_dc_ptr( hdc
))) return 0;
573 if (GetObjectType( hdc
) != OBJ_MEMDC
)
579 if (handle
== dc
->hBitmap
) goto done
; /* nothing to do */
581 if (!(bitmap
= GDI_GetObjPtr( handle
, BITMAP_MAGIC
)))
587 if (bitmap
->header
.dwCount
&& (handle
!= GetStockObject(DEFAULT_BITMAP
)))
589 WARN( "Bitmap already selected in another DC\n" );
590 GDI_ReleaseObj( handle
);
595 if (!bitmap
->funcs
&& !BITMAP_SetOwnerDC( handle
, dc
))
597 GDI_ReleaseObj( handle
);
602 if (dc
->funcs
->pSelectBitmap
&& !dc
->funcs
->pSelectBitmap( dc
->physDev
, handle
))
604 GDI_ReleaseObj( handle
);
609 dc
->hBitmap
= handle
;
610 GDI_inc_ref_count( handle
);
612 SetRectRgn( dc
->hVisRgn
, 0, 0, bitmap
->bitmap
.bmWidth
, bitmap
->bitmap
.bmHeight
);
613 GDI_ReleaseObj( handle
);
615 GDI_dec_ref_count( ret
);
619 release_dc_ptr( dc
);
624 /***********************************************************************
625 * BITMAP_DeleteObject
627 static BOOL
BITMAP_DeleteObject( HGDIOBJ handle
, void *obj
)
629 BITMAPOBJ
* bmp
= obj
;
631 if (bmp
->funcs
&& bmp
->funcs
->pDeleteBitmap
)
632 bmp
->funcs
->pDeleteBitmap( handle
);
634 HeapFree( GetProcessHeap(), 0, bmp
->bitmap
.bmBits
);
638 DIBSECTION
*dib
= bmp
->dib
;
640 if (dib
->dsBm
.bmBits
)
644 SYSTEM_INFO SystemInfo
;
645 GetSystemInfo( &SystemInfo
);
646 UnmapViewOfFile( (char *)dib
->dsBm
.bmBits
-
647 (dib
->dsOffset
% SystemInfo
.dwAllocationGranularity
) );
649 else if (!dib
->dsOffset
)
650 VirtualFree(dib
->dsBm
.bmBits
, 0L, MEM_RELEASE
);
652 HeapFree(GetProcessHeap(), 0, dib
);
654 if (bmp
->segptr_bits
)
655 { /* free its selector array */
656 WORD sel
= SELECTOROF(bmp
->segptr_bits
);
657 WORD count
= (GetSelectorLimit16(sel
) / 0x10000) + 1;
660 for (i
= 0; i
< count
; i
++) FreeSelector16(sel
+ (i
<< __AHSHIFT
));
662 HeapFree(GetProcessHeap(), 0, bmp
->color_table
);
664 return GDI_FreeObject( handle
, obj
);
668 /***********************************************************************
671 static INT
BITMAP_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
)
673 BITMAPOBJ
*bmp
= obj
;
675 if( !buffer
) return sizeof(BITMAP
);
676 if (count
< sizeof(BITMAP
)) return 0;
680 if (count
>= sizeof(DIBSECTION
))
682 memcpy( buffer
, bmp
->dib
, sizeof(DIBSECTION
) );
683 return sizeof(DIBSECTION
);
685 else /* if (count >= sizeof(BITMAP)) */
687 DIBSECTION
*dib
= bmp
->dib
;
688 memcpy( buffer
, &dib
->dsBm
, sizeof(BITMAP
) );
689 return sizeof(BITMAP
);
694 memcpy( buffer
, &bmp
->bitmap
, sizeof(BITMAP
) );
695 ((BITMAP
*) buffer
)->bmBits
= NULL
;
696 return sizeof(BITMAP
);
701 /******************************************************************************
702 * CreateDiscardableBitmap [GDI32.@]
704 * Creates a discardable bitmap.
707 * Success: Handle to bitmap
710 HBITMAP WINAPI
CreateDiscardableBitmap(
711 HDC hdc
, /* [in] Handle to device context */
712 INT width
, /* [in] Bitmap width */
713 INT height
) /* [in] Bitmap height */
715 return CreateCompatibleBitmap( hdc
, width
, height
);
719 /******************************************************************************
720 * GetBitmapDimensionEx [GDI32.@]
722 * Retrieves dimensions of a bitmap.
728 BOOL WINAPI
GetBitmapDimensionEx(
729 HBITMAP hbitmap
, /* [in] Handle to bitmap */
730 LPSIZE size
) /* [out] Address of struct receiving dimensions */
732 BITMAPOBJ
* bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
733 if (!bmp
) return FALSE
;
735 GDI_ReleaseObj( hbitmap
);
740 /******************************************************************************
741 * SetBitmapDimensionEx [GDI32.@]
743 * Assigns dimensions to a bitmap.
744 * MSDN says that this function will fail if hbitmap is a handle created by
745 * CreateDIBSection, but that's not true on Windows 2000.
751 BOOL WINAPI
SetBitmapDimensionEx(
752 HBITMAP hbitmap
, /* [in] Handle to bitmap */
753 INT x
, /* [in] Bitmap width */
754 INT y
, /* [in] Bitmap height */
755 LPSIZE prevSize
) /* [out] Address of structure for orig dims */
757 BITMAPOBJ
* bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
758 if (!bmp
) return FALSE
;
759 if (prevSize
) *prevSize
= bmp
->size
;
762 GDI_ReleaseObj( hbitmap
);