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
, void *obj
, HDC hdc
);
37 static INT
BITMAP_GetObject16( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
);
38 static INT
BITMAP_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
);
39 static BOOL
BITMAP_DeleteObject( HGDIOBJ handle
, void *obj
);
41 static const struct gdi_obj_funcs bitmap_funcs
=
43 BITMAP_SelectObject
, /* pSelectObject */
44 BITMAP_GetObject16
, /* pGetObject16 */
45 BITMAP_GetObject
, /* pGetObjectA */
46 BITMAP_GetObject
, /* pGetObjectW */
47 NULL
, /* pUnrealizeObject */
48 BITMAP_DeleteObject
/* pDeleteObject */
51 /***********************************************************************
52 * BITMAP_GetWidthBytes
54 * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
57 INT
BITMAP_GetWidthBytes( INT bmWidth
, INT bpp
)
62 return 2 * ((bmWidth
+15) >> 4);
65 bmWidth
*= 3; /* fall through */
67 return bmWidth
+ (bmWidth
& 1);
77 return 2 * ((bmWidth
+3) >> 2);
80 WARN("Unknown depth %d, please report.\n", bpp
);
86 /******************************************************************************
87 * CreateBitmap [GDI32.@]
89 * Creates a bitmap with the specified info.
92 * width [I] bitmap width
93 * height [I] bitmap height
94 * planes [I] Number of color planes
95 * bpp [I] Number of bits to identify a color
96 * bits [I] Pointer to array containing color data
99 * Success: Handle to bitmap
102 HBITMAP WINAPI
CreateBitmap( INT width
, INT height
, UINT planes
,
103 UINT bpp
, LPCVOID bits
)
109 bm
.bmHeight
= height
;
110 bm
.bmWidthBytes
= BITMAP_GetWidthBytes( width
, bpp
);
111 bm
.bmPlanes
= planes
;
112 bm
.bmBitsPixel
= bpp
;
113 bm
.bmBits
= (LPVOID
)bits
;
115 return CreateBitmapIndirect( &bm
);
118 /******************************************************************************
119 * CreateCompatibleBitmap [GDI32.@]
121 * Creates a bitmap compatible with the DC.
124 * hdc [I] Handle to device context
125 * width [I] Width of bitmap
126 * height [I] Height of bitmap
129 * Success: Handle to bitmap
132 HBITMAP WINAPI
CreateCompatibleBitmap( HDC hdc
, INT width
, INT height
)
137 TRACE("(%p,%d,%d) =\n", hdc
, width
, height
);
139 if ((width
>= 0x10000) || (height
>= 0x10000))
141 FIXME("got bad width %d or height %d, please look for reason\n",
146 if (!(dc
= DC_GetDCPtr(hdc
))) return 0;
148 if (GDIMAGIC( dc
->header
.wMagic
) != MEMORY_DC_MAGIC
)
150 hbmpRet
= CreateBitmap(width
, height
,
151 GetDeviceCaps(hdc
, PLANES
),
152 GetDeviceCaps(hdc
, BITSPIXEL
),
157 BITMAPOBJ
*bmp
= GDI_GetObjPtr( dc
->hBitmap
, BITMAP_MAGIC
);
161 /* A device-dependent bitmap is selected in the DC */
162 hbmpRet
= CreateBitmap(width
, height
,
163 bmp
->bitmap
.bmPlanes
,
164 bmp
->bitmap
.bmBitsPixel
,
169 /* A DIB section is selected in the DC */
173 /* Allocate memory for a BITMAPINFOHEADER structure and a
174 color table. The maximum number of colors in a color table
175 is 256 which corresponds to a bitmap with depth 8.
176 Bitmaps with higher depths don't have color tables. */
177 bi
= HeapAlloc(GetProcessHeap(), 0, sizeof(BITMAPINFOHEADER
) + 256 * sizeof(RGBQUAD
));
181 bi
->bmiHeader
.biSize
= sizeof(bi
->bmiHeader
);
182 bi
->bmiHeader
.biWidth
= width
;
183 bi
->bmiHeader
.biHeight
= height
;
184 bi
->bmiHeader
.biPlanes
= bmp
->dib
->dsBmih
.biPlanes
;
185 bi
->bmiHeader
.biBitCount
= bmp
->dib
->dsBmih
.biBitCount
;
186 bi
->bmiHeader
.biCompression
= bmp
->dib
->dsBmih
.biCompression
;
187 bi
->bmiHeader
.biSizeImage
= 0;
188 bi
->bmiHeader
.biXPelsPerMeter
= bmp
->dib
->dsBmih
.biXPelsPerMeter
;
189 bi
->bmiHeader
.biYPelsPerMeter
= bmp
->dib
->dsBmih
.biYPelsPerMeter
;
190 bi
->bmiHeader
.biClrUsed
= bmp
->dib
->dsBmih
.biClrUsed
;
191 bi
->bmiHeader
.biClrImportant
= bmp
->dib
->dsBmih
.biClrImportant
;
193 if (bi
->bmiHeader
.biCompression
== BI_BITFIELDS
)
195 /* Copy the color masks */
196 CopyMemory(bi
->bmiColors
, bmp
->dib
->dsBitfields
, 3 * sizeof(DWORD
));
198 else if (bi
->bmiHeader
.biBitCount
<= 8)
200 /* Copy the color table */
201 GetDIBColorTable(hdc
, 0, 256, bi
->bmiColors
);
204 hbmpRet
= CreateDIBSection(hdc
, bi
, DIB_RGB_COLORS
, &bits
, NULL
, 0);
205 HeapFree(GetProcessHeap(), 0, bi
);
208 GDI_ReleaseObj(dc
->hBitmap
);
213 TRACE("\t\t%p\n", hbmpRet
);
218 /******************************************************************************
219 * CreateBitmapIndirect [GDI32.@]
221 * Creates a bitmap with the specified info.
224 * bmp [I] Pointer to the bitmap info describing the bitmap
227 * Success: Handle to bitmap
228 * Failure: NULL. Use GetLastError() to determine the cause.
231 * If a width or height of 0 are given, a 1x1 monochrome bitmap is returned.
233 HBITMAP WINAPI
CreateBitmapIndirect( const BITMAP
*bmp
)
239 if (!bmp
|| bmp
->bmType
)
241 SetLastError( ERROR_INVALID_PARAMETER
);
247 if (!bm
.bmWidth
|| !bm
.bmHeight
)
249 return GetStockObject( DEFAULT_BITMAP
);
254 bm
.bmHeight
= -bm
.bmHeight
;
256 bm
.bmWidth
= -bm
.bmWidth
;
259 if (bm
.bmPlanes
!= 1)
261 FIXME("planes = %d\n", bm
.bmPlanes
);
262 SetLastError( ERROR_INVALID_PARAMETER
);
266 /* Windows ignores the provided bm.bmWidthBytes */
267 bm
.bmWidthBytes
= BITMAP_GetWidthBytes( bm
.bmWidth
, bm
.bmBitsPixel
);
269 /* Create the BITMAPOBJ */
270 bmpobj
= GDI_AllocObject( sizeof(BITMAPOBJ
), BITMAP_MAGIC
,
271 (HGDIOBJ
*)&hbitmap
, &bitmap_funcs
);
275 SetLastError( ERROR_NOT_ENOUGH_MEMORY
);
279 TRACE("%dx%d, %d colors returning %p\n", bm
.bmWidth
, bm
.bmHeight
,
280 1 << (bm
.bmPlanes
* bm
.bmBitsPixel
), hbitmap
);
285 bmpobj
->bitmap
.bmBits
= NULL
;
286 bmpobj
->funcs
= NULL
;
288 bmpobj
->segptr_bits
= 0;
289 bmpobj
->color_table
= NULL
;
290 bmpobj
->nb_colors
= 0;
293 SetBitmapBits( hbitmap
, bm
.bmHeight
* bm
.bmWidthBytes
, bm
.bmBits
);
295 GDI_ReleaseObj( hbitmap
);
300 /***********************************************************************
301 * GetBitmapBits [GDI32.@]
303 * Copies bitmap bits of bitmap to buffer.
306 * Success: Number of bytes copied
309 LONG WINAPI
GetBitmapBits(
310 HBITMAP hbitmap
, /* [in] Handle to bitmap */
311 LONG count
, /* [in] Number of bytes to copy */
312 LPVOID bits
) /* [out] Pointer to buffer to receive bits */
314 BITMAPOBJ
*bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
319 if (bmp
->dib
) /* simply copy the bits from the DIB */
321 DIBSECTION
*dib
= bmp
->dib
;
322 const char *src
= dib
->dsBm
.bmBits
;
323 INT width_bytes
= BITMAP_GetWidthBytes(dib
->dsBm
.bmWidth
, dib
->dsBm
.bmBitsPixel
);
324 DWORD max
= width_bytes
* bmp
->bitmap
.bmHeight
;
332 if (count
> max
) count
= max
;
335 /* GetBitmapBits returns not 32-bit aligned data */
337 if (bmp
->dib
->dsBmih
.biHeight
>= 0) /* not top-down, need to flip contents vertically */
339 src
+= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
342 src
-= dib
->dsBm
.bmWidthBytes
;
343 memcpy( bits
, src
, min( count
, width_bytes
) );
344 bits
= (char *)bits
+ width_bytes
;
345 count
-= width_bytes
;
352 memcpy( bits
, src
, min( count
, width_bytes
) );
353 src
+= dib
->dsBm
.bmWidthBytes
;
354 bits
= (char *)bits
+ width_bytes
;
355 count
-= width_bytes
;
361 /* If the bits vector is null, the function should return the read size */
364 ret
= bmp
->bitmap
.bmWidthBytes
* bmp
->bitmap
.bmHeight
;
369 WARN("(%d): Negative number of bytes passed???\n", count
);
373 /* Only get entire lines */
374 height
= count
/ bmp
->bitmap
.bmWidthBytes
;
375 if (height
> bmp
->bitmap
.bmHeight
) height
= bmp
->bitmap
.bmHeight
;
376 count
= height
* bmp
->bitmap
.bmWidthBytes
;
379 WARN("Less than one entire line requested\n");
385 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
386 hbitmap
, count
, bits
, bmp
->bitmap
.bmWidth
, bmp
->bitmap
.bmHeight
,
387 1 << bmp
->bitmap
.bmBitsPixel
, height
);
389 if(bmp
->funcs
&& bmp
->funcs
->pGetBitmapBits
)
391 TRACE("Calling device specific BitmapBits\n");
392 ret
= bmp
->funcs
->pGetBitmapBits(hbitmap
, bits
, count
);
395 if(!bmp
->bitmap
.bmBits
) {
396 TRACE("Bitmap is empty\n");
397 memset(bits
, 0, count
);
400 memcpy(bits
, bmp
->bitmap
.bmBits
, count
);
406 GDI_ReleaseObj( hbitmap
);
411 /******************************************************************************
412 * SetBitmapBits [GDI32.@]
414 * Sets bits of color data for a bitmap.
417 * Success: Number of bytes used in setting the bitmap bits
420 LONG WINAPI
SetBitmapBits(
421 HBITMAP hbitmap
, /* [in] Handle to bitmap */
422 LONG count
, /* [in] Number of bytes in bitmap array */
423 LPCVOID bits
) /* [in] Address of array with bitmap bits */
425 BITMAPOBJ
*bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
428 if ((!bmp
) || (!bits
))
432 WARN("(%d): Negative number of bytes passed???\n", count
);
436 if (bmp
->dib
) /* simply copy the bits into the DIB */
438 DIBSECTION
*dib
= bmp
->dib
;
439 char *dest
= dib
->dsBm
.bmBits
;
440 DWORD max
= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
441 if (count
> max
) count
= max
;
444 if (bmp
->dib
->dsBmih
.biHeight
>= 0) /* not top-down, need to flip contents vertically */
446 dest
+= dib
->dsBm
.bmWidthBytes
* dib
->dsBm
.bmHeight
;
449 dest
-= dib
->dsBm
.bmWidthBytes
;
450 memcpy( dest
, bits
, min( count
, dib
->dsBm
.bmWidthBytes
) );
451 bits
= (const char *)bits
+ dib
->dsBm
.bmWidthBytes
;
452 count
-= dib
->dsBm
.bmWidthBytes
;
455 else memcpy( dest
, bits
, count
);
457 GDI_ReleaseObj( hbitmap
);
461 /* Only get entire lines */
462 height
= count
/ bmp
->bitmap
.bmWidthBytes
;
463 if (height
> bmp
->bitmap
.bmHeight
) height
= bmp
->bitmap
.bmHeight
;
464 count
= height
* bmp
->bitmap
.bmWidthBytes
;
466 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
467 hbitmap
, count
, bits
, bmp
->bitmap
.bmWidth
, bmp
->bitmap
.bmHeight
,
468 1 << bmp
->bitmap
.bmBitsPixel
, height
);
470 if(bmp
->funcs
&& bmp
->funcs
->pSetBitmapBits
) {
472 TRACE("Calling device specific BitmapBits\n");
473 ret
= bmp
->funcs
->pSetBitmapBits(hbitmap
, bits
, count
);
476 if(!bmp
->bitmap
.bmBits
) /* Alloc enough for entire bitmap */
477 bmp
->bitmap
.bmBits
= HeapAlloc( GetProcessHeap(), 0, count
);
478 if(!bmp
->bitmap
.bmBits
) {
479 WARN("Unable to allocate bit buffer\n");
482 memcpy(bmp
->bitmap
.bmBits
, bits
, count
);
487 GDI_ReleaseObj( hbitmap
);
491 /**********************************************************************
495 HBITMAP
BITMAP_CopyBitmap(HBITMAP hbitmap
)
497 BITMAPOBJ
*bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
505 res
= CreateBitmapIndirect(&bm
);
508 char *buf
= HeapAlloc( GetProcessHeap(), 0, bm
.bmWidthBytes
*
510 GetBitmapBits (hbitmap
, bm
.bmWidthBytes
* bm
.bmHeight
, buf
);
511 SetBitmapBits (res
, bm
.bmWidthBytes
* bm
.bmHeight
, buf
);
512 HeapFree( GetProcessHeap(), 0, buf
);
515 GDI_ReleaseObj( hbitmap
);
520 /***********************************************************************
523 * Set the type of DC that owns the bitmap. This is used when the
524 * bitmap is selected into a device to initialize the bitmap function
527 BOOL
BITMAP_SetOwnerDC( HBITMAP hbitmap
, DC
*dc
)
532 /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
533 if (hbitmap
== GetStockObject(DEFAULT_BITMAP
)) return TRUE
;
535 if (!(bitmap
= GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
))) return FALSE
;
538 if (!bitmap
->funcs
) /* not owned by a DC yet */
540 if (dc
->funcs
->pCreateBitmap
) ret
= dc
->funcs
->pCreateBitmap( dc
->physDev
, hbitmap
,
541 bitmap
->bitmap
.bmBits
);
542 if (ret
) bitmap
->funcs
= dc
->funcs
;
544 else if (bitmap
->funcs
!= dc
->funcs
)
546 FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap
);
549 GDI_ReleaseObj( hbitmap
);
554 /***********************************************************************
555 * BITMAP_SelectObject
557 static HGDIOBJ
BITMAP_SelectObject( HGDIOBJ handle
, void *obj
, HDC hdc
)
560 BITMAPOBJ
*bitmap
= obj
;
561 DC
*dc
= DC_GetDCPtr( hdc
);
564 if (GetObjectType( hdc
) != OBJ_MEMDC
)
566 GDI_ReleaseObj( hdc
);
570 if (handle
== dc
->hBitmap
) goto done
; /* nothing to do */
572 if (bitmap
->header
.dwCount
&& (handle
!= GetStockObject(DEFAULT_BITMAP
)))
574 WARN( "Bitmap already selected in another DC\n" );
575 GDI_ReleaseObj( hdc
);
579 if (!bitmap
->funcs
&& !BITMAP_SetOwnerDC( handle
, dc
))
581 GDI_ReleaseObj( hdc
);
585 if (dc
->funcs
->pSelectBitmap
) handle
= dc
->funcs
->pSelectBitmap( dc
->physDev
, handle
);
589 dc
->hBitmap
= handle
;
590 dc
->flags
&= ~DC_DIRTY
;
591 SetRectRgn( dc
->hVisRgn
, 0, 0, bitmap
->bitmap
.bmWidth
, bitmap
->bitmap
.bmHeight
);
597 GDI_ReleaseObj( hdc
);
602 /***********************************************************************
603 * BITMAP_DeleteObject
605 static BOOL
BITMAP_DeleteObject( HGDIOBJ handle
, void *obj
)
607 BITMAPOBJ
* bmp
= obj
;
609 if (bmp
->funcs
&& bmp
->funcs
->pDeleteBitmap
)
610 bmp
->funcs
->pDeleteBitmap( handle
);
612 HeapFree( GetProcessHeap(), 0, bmp
->bitmap
.bmBits
);
616 DIBSECTION
*dib
= bmp
->dib
;
618 if (dib
->dsBm
.bmBits
)
622 SYSTEM_INFO SystemInfo
;
623 GetSystemInfo( &SystemInfo
);
624 UnmapViewOfFile( (char *)dib
->dsBm
.bmBits
-
625 (dib
->dsOffset
% SystemInfo
.dwAllocationGranularity
) );
627 else if (!dib
->dsOffset
)
628 VirtualFree(dib
->dsBm
.bmBits
, 0L, MEM_RELEASE
);
630 HeapFree(GetProcessHeap(), 0, dib
);
632 if (bmp
->segptr_bits
)
633 { /* free its selector array */
634 WORD sel
= SELECTOROF(bmp
->segptr_bits
);
635 WORD count
= (GetSelectorLimit16(sel
) / 0x10000) + 1;
638 for (i
= 0; i
< count
; i
++) FreeSelector16(sel
+ (i
<< __AHSHIFT
));
640 HeapFree(GetProcessHeap(), 0, bmp
->color_table
);
642 return GDI_FreeObject( handle
, obj
);
646 /***********************************************************************
649 static INT
BITMAP_GetObject16( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
)
651 BITMAPOBJ
*bmp
= obj
;
655 if ( count
<= sizeof(BITMAP16
) )
657 BITMAP
*bmp32
= &bmp
->dib
->dsBm
;
659 bmp16
.bmType
= bmp32
->bmType
;
660 bmp16
.bmWidth
= bmp32
->bmWidth
;
661 bmp16
.bmHeight
= bmp32
->bmHeight
;
662 bmp16
.bmWidthBytes
= bmp32
->bmWidthBytes
;
663 bmp16
.bmPlanes
= bmp32
->bmPlanes
;
664 bmp16
.bmBitsPixel
= bmp32
->bmBitsPixel
;
665 bmp16
.bmBits
= (SEGPTR
)0;
666 memcpy( buffer
, &bmp16
, count
);
671 FIXME("not implemented for DIBs: count %d\n", count
);
678 bmp16
.bmType
= bmp
->bitmap
.bmType
;
679 bmp16
.bmWidth
= bmp
->bitmap
.bmWidth
;
680 bmp16
.bmHeight
= bmp
->bitmap
.bmHeight
;
681 bmp16
.bmWidthBytes
= bmp
->bitmap
.bmWidthBytes
;
682 bmp16
.bmPlanes
= bmp
->bitmap
.bmPlanes
;
683 bmp16
.bmBitsPixel
= bmp
->bitmap
.bmBitsPixel
;
684 bmp16
.bmBits
= (SEGPTR
)0;
685 if (count
< sizeof(bmp16
)) return 0;
686 memcpy( buffer
, &bmp16
, sizeof(bmp16
) );
687 return sizeof(bmp16
);
692 /***********************************************************************
695 static INT
BITMAP_GetObject( HGDIOBJ handle
, void *obj
, INT count
, LPVOID buffer
)
697 BITMAPOBJ
*bmp
= obj
;
699 if( !buffer
) return sizeof(BITMAP
);
700 if (count
< sizeof(BITMAP
)) return 0;
704 if (count
>= sizeof(DIBSECTION
))
706 memcpy( buffer
, bmp
->dib
, sizeof(DIBSECTION
) );
707 return sizeof(DIBSECTION
);
709 else /* if (count >= sizeof(BITMAP)) */
711 DIBSECTION
*dib
= bmp
->dib
;
712 memcpy( buffer
, &dib
->dsBm
, sizeof(BITMAP
) );
713 return sizeof(BITMAP
);
718 memcpy( buffer
, &bmp
->bitmap
, sizeof(BITMAP
) );
719 ((BITMAP
*) buffer
)->bmBits
= NULL
;
720 return sizeof(BITMAP
);
725 /******************************************************************************
726 * CreateDiscardableBitmap [GDI32.@]
728 * Creates a discardable bitmap.
731 * Success: Handle to bitmap
734 HBITMAP WINAPI
CreateDiscardableBitmap(
735 HDC hdc
, /* [in] Handle to device context */
736 INT width
, /* [in] Bitmap width */
737 INT height
) /* [in] Bitmap height */
739 return CreateCompatibleBitmap( hdc
, width
, height
);
743 /******************************************************************************
744 * GetBitmapDimensionEx [GDI32.@]
746 * Retrieves dimensions of a bitmap.
752 BOOL WINAPI
GetBitmapDimensionEx(
753 HBITMAP hbitmap
, /* [in] Handle to bitmap */
754 LPSIZE size
) /* [out] Address of struct receiving dimensions */
756 BITMAPOBJ
* bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
757 if (!bmp
) return FALSE
;
759 GDI_ReleaseObj( hbitmap
);
764 /******************************************************************************
765 * SetBitmapDimensionEx [GDI32.@]
767 * Assigns dimensions to a bitmap.
768 * MSDN says that this function will fail if hbitmap is a handle created by
769 * CreateDIBSection, but that's not true on Windows 2000.
775 BOOL WINAPI
SetBitmapDimensionEx(
776 HBITMAP hbitmap
, /* [in] Handle to bitmap */
777 INT x
, /* [in] Bitmap width */
778 INT y
, /* [in] Bitmap height */
779 LPSIZE prevSize
) /* [out] Address of structure for orig dims */
781 BITMAPOBJ
* bmp
= (BITMAPOBJ
*) GDI_GetObjPtr( hbitmap
, BITMAP_MAGIC
);
782 if (!bmp
) return FALSE
;
783 if (prevSize
) *prevSize
= bmp
->size
;
786 GDI_ReleaseObj( hbitmap
);