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 );