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 /* Create the BITMAPOBJ */
267 bmpobj = GDI_AllocObject( sizeof(BITMAPOBJ), BITMAP_MAGIC,
268 (HGDIOBJ *)&hbitmap, &bitmap_funcs );
272 SetLastError( ERROR_NOT_ENOUGH_MEMORY );
276 TRACE("%dx%d, %d colors returning %p\n", bm.bmWidth, bm.bmHeight,
277 1 << (bm.bmPlanes * bm.bmBitsPixel), hbitmap);
282 bmpobj->bitmap.bmBits = NULL;
283 bmpobj->funcs = NULL;
285 bmpobj->segptr_bits = 0;
286 bmpobj->color_table = NULL;
287 bmpobj->nb_colors = 0;
290 SetBitmapBits( hbitmap, bm.bmHeight * bm.bmWidthBytes, bm.bmBits );
292 GDI_ReleaseObj( hbitmap );
297 /***********************************************************************
298 * GetBitmapBits [GDI32.@]
300 * Copies bitmap bits of bitmap to buffer.
303 * Success: Number of bytes copied
306 LONG WINAPI GetBitmapBits(
307 HBITMAP hbitmap, /* [in] Handle to bitmap */
308 LONG count, /* [in] Number of bytes to copy */
309 LPVOID bits) /* [out] Pointer to buffer to receive bits */
311 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
316 if (bmp->dib) /* simply copy the bits from the DIB */
318 DIBSECTION *dib = bmp->dib;
319 const char *src = dib->dsBm.bmBits;
320 INT width_bytes = BITMAP_GetWidthBytes(dib->dsBm.bmWidth, dib->dsBm.bmBitsPixel);
321 DWORD max = width_bytes * bmp->bitmap.bmHeight;
329 if (count > max) count = max;
332 /* GetBitmapBits returns not 32-bit aligned data */
334 if (bmp->dib->dsBmih.biHeight >= 0) /* not top-down, need to flip contents vertically */
336 src += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
339 src -= dib->dsBm.bmWidthBytes;
340 memcpy( bits, src, min( count, width_bytes ) );
341 bits = (char *)bits + width_bytes;
342 count -= width_bytes;
349 memcpy( bits, src, min( count, width_bytes ) );
350 src += dib->dsBm.bmWidthBytes;
351 bits = (char *)bits + width_bytes;
352 count -= width_bytes;
358 /* If the bits vector is null, the function should return the read size */
361 ret = bmp->bitmap.bmWidthBytes * bmp->bitmap.bmHeight;
366 WARN("(%d): Negative number of bytes passed???\n", count );
370 /* Only get entire lines */
371 height = count / bmp->bitmap.bmWidthBytes;
372 if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
373 count = height * bmp->bitmap.bmWidthBytes;
376 WARN("Less than one entire line requested\n");
382 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
383 hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
384 1 << bmp->bitmap.bmBitsPixel, height );
386 if(bmp->funcs && bmp->funcs->pGetBitmapBits)
388 TRACE("Calling device specific BitmapBits\n");
389 ret = bmp->funcs->pGetBitmapBits(hbitmap, bits, count);
392 if(!bmp->bitmap.bmBits) {
393 TRACE("Bitmap is empty\n");
394 memset(bits, 0, count);
397 memcpy(bits, bmp->bitmap.bmBits, count);
403 GDI_ReleaseObj( hbitmap );
408 /******************************************************************************
409 * SetBitmapBits [GDI32.@]
411 * Sets bits of color data for a bitmap.
414 * Success: Number of bytes used in setting the bitmap bits
417 LONG WINAPI SetBitmapBits(
418 HBITMAP hbitmap, /* [in] Handle to bitmap */
419 LONG count, /* [in] Number of bytes in bitmap array */
420 LPCVOID bits) /* [in] Address of array with bitmap bits */
422 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
425 if ((!bmp) || (!bits))
429 WARN("(%d): Negative number of bytes passed???\n", count );
433 if (bmp->dib) /* simply copy the bits into the DIB */
435 DIBSECTION *dib = bmp->dib;
436 char *dest = dib->dsBm.bmBits;
437 DWORD max = dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
438 if (count > max) count = max;
441 if (bmp->dib->dsBmih.biHeight >= 0) /* not top-down, need to flip contents vertically */
443 dest += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
446 dest -= dib->dsBm.bmWidthBytes;
447 memcpy( dest, bits, min( count, dib->dsBm.bmWidthBytes ) );
448 bits = (const char *)bits + dib->dsBm.bmWidthBytes;
449 count -= dib->dsBm.bmWidthBytes;
452 else memcpy( dest, bits, count );
454 GDI_ReleaseObj( hbitmap );
458 /* Only get entire lines */
459 height = count / bmp->bitmap.bmWidthBytes;
460 if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
461 count = height * bmp->bitmap.bmWidthBytes;
463 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
464 hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
465 1 << bmp->bitmap.bmBitsPixel, height );
467 if(bmp->funcs && bmp->funcs->pSetBitmapBits) {
469 TRACE("Calling device specific BitmapBits\n");
470 ret = bmp->funcs->pSetBitmapBits(hbitmap, bits, count);
473 if(!bmp->bitmap.bmBits) /* Alloc enough for entire bitmap */
474 bmp->bitmap.bmBits = HeapAlloc( GetProcessHeap(), 0, count );
475 if(!bmp->bitmap.bmBits) {
476 WARN("Unable to allocate bit buffer\n");
479 memcpy(bmp->bitmap.bmBits, bits, count);
484 GDI_ReleaseObj( hbitmap );
488 /**********************************************************************
492 HBITMAP BITMAP_CopyBitmap(HBITMAP hbitmap)
494 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
502 res = CreateBitmapIndirect(&bm);
505 char *buf = HeapAlloc( GetProcessHeap(), 0, bm.bmWidthBytes *
507 GetBitmapBits (hbitmap, bm.bmWidthBytes * bm.bmHeight, buf);
508 SetBitmapBits (res, bm.bmWidthBytes * bm.bmHeight, buf);
509 HeapFree( GetProcessHeap(), 0, buf );
512 GDI_ReleaseObj( hbitmap );
517 /***********************************************************************
520 * Set the type of DC that owns the bitmap. This is used when the
521 * bitmap is selected into a device to initialize the bitmap function
524 BOOL BITMAP_SetOwnerDC( HBITMAP hbitmap, DC *dc )
529 /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
530 if (hbitmap == GetStockObject(DEFAULT_BITMAP)) return TRUE;
532 if (!(bitmap = GDI_GetObjPtr( hbitmap, BITMAP_MAGIC ))) return FALSE;
535 if (!bitmap->funcs) /* not owned by a DC yet */
537 if (dc->funcs->pCreateBitmap) ret = dc->funcs->pCreateBitmap( dc->physDev, hbitmap,
538 bitmap->bitmap.bmBits );
539 if (ret) bitmap->funcs = dc->funcs;
541 else if (bitmap->funcs != dc->funcs)
543 FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap );
546 GDI_ReleaseObj( hbitmap );
551 /***********************************************************************
552 * BITMAP_SelectObject
554 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, void *obj, HDC hdc )
557 BITMAPOBJ *bitmap = obj;
558 DC *dc = DC_GetDCPtr( hdc );
561 if (GetObjectType( hdc ) != OBJ_MEMDC)
563 GDI_ReleaseObj( hdc );
567 if (handle == dc->hBitmap) goto done; /* nothing to do */
569 if (bitmap->header.dwCount && (handle != GetStockObject(DEFAULT_BITMAP)))
571 WARN( "Bitmap already selected in another DC\n" );
572 GDI_ReleaseObj( hdc );
576 if (!bitmap->funcs && !BITMAP_SetOwnerDC( handle, dc ))
578 GDI_ReleaseObj( hdc );
582 if (dc->funcs->pSelectBitmap) handle = dc->funcs->pSelectBitmap( dc->physDev, handle );
586 dc->hBitmap = handle;
587 dc->flags &= ~DC_DIRTY;
588 SetRectRgn( dc->hVisRgn, 0, 0, bitmap->bitmap.bmWidth, bitmap->bitmap.bmHeight);
594 GDI_ReleaseObj( hdc );
599 /***********************************************************************
600 * BITMAP_DeleteObject
602 static BOOL BITMAP_DeleteObject( HGDIOBJ handle, void *obj )
604 BITMAPOBJ * bmp = obj;
606 if (bmp->funcs && bmp->funcs->pDeleteBitmap)
607 bmp->funcs->pDeleteBitmap( handle );
609 HeapFree( GetProcessHeap(), 0, bmp->bitmap.bmBits );
613 DIBSECTION *dib = bmp->dib;
615 if (dib->dsBm.bmBits)
619 SYSTEM_INFO SystemInfo;
620 GetSystemInfo( &SystemInfo );
621 UnmapViewOfFile( (char *)dib->dsBm.bmBits -
622 (dib->dsOffset % SystemInfo.dwAllocationGranularity) );
624 else if (!dib->dsOffset)
625 VirtualFree(dib->dsBm.bmBits, 0L, MEM_RELEASE );
627 HeapFree(GetProcessHeap(), 0, dib);
629 if (bmp->segptr_bits)
630 { /* free its selector array */
631 WORD sel = SELECTOROF(bmp->segptr_bits);
632 WORD count = (GetSelectorLimit16(sel) / 0x10000) + 1;
635 for (i = 0; i < count; i++) FreeSelector16(sel + (i << __AHSHIFT));
637 HeapFree(GetProcessHeap(), 0, bmp->color_table);
639 return GDI_FreeObject( handle, obj );
643 /***********************************************************************
646 static INT BITMAP_GetObject16( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
648 BITMAPOBJ *bmp = obj;
652 if ( count <= sizeof(BITMAP16) )
654 BITMAP *bmp32 = &bmp->dib->dsBm;
656 bmp16.bmType = bmp32->bmType;
657 bmp16.bmWidth = bmp32->bmWidth;
658 bmp16.bmHeight = bmp32->bmHeight;
659 bmp16.bmWidthBytes = bmp32->bmWidthBytes;
660 bmp16.bmPlanes = bmp32->bmPlanes;
661 bmp16.bmBitsPixel = bmp32->bmBitsPixel;
662 bmp16.bmBits = (SEGPTR)0;
663 memcpy( buffer, &bmp16, count );
668 FIXME("not implemented for DIBs: count %d\n", count);
675 bmp16.bmType = bmp->bitmap.bmType;
676 bmp16.bmWidth = bmp->bitmap.bmWidth;
677 bmp16.bmHeight = bmp->bitmap.bmHeight;
678 bmp16.bmWidthBytes = bmp->bitmap.bmWidthBytes;
679 bmp16.bmPlanes = bmp->bitmap.bmPlanes;
680 bmp16.bmBitsPixel = bmp->bitmap.bmBitsPixel;
681 bmp16.bmBits = (SEGPTR)0;
682 if (count < sizeof(bmp16)) return 0;
683 memcpy( buffer, &bmp16, sizeof(bmp16) );
684 return sizeof(bmp16);
689 /***********************************************************************
692 static INT BITMAP_GetObject( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
694 BITMAPOBJ *bmp = obj;
696 if( !buffer ) return sizeof(BITMAP);
697 if (count < sizeof(BITMAP)) return 0;
701 if (count >= sizeof(DIBSECTION))
703 memcpy( buffer, bmp->dib, sizeof(DIBSECTION) );
704 return sizeof(DIBSECTION);
706 else /* if (count >= sizeof(BITMAP)) */
708 DIBSECTION *dib = bmp->dib;
709 memcpy( buffer, &dib->dsBm, sizeof(BITMAP) );
710 return sizeof(BITMAP);
715 memcpy( buffer, &bmp->bitmap, sizeof(BITMAP) );
716 ((BITMAP *) buffer)->bmBits = NULL;
717 return sizeof(BITMAP);
722 /******************************************************************************
723 * CreateDiscardableBitmap [GDI32.@]
725 * Creates a discardable bitmap.
728 * Success: Handle to bitmap
731 HBITMAP WINAPI CreateDiscardableBitmap(
732 HDC hdc, /* [in] Handle to device context */
733 INT width, /* [in] Bitmap width */
734 INT height) /* [in] Bitmap height */
736 return CreateCompatibleBitmap( hdc, width, height );
740 /******************************************************************************
741 * GetBitmapDimensionEx [GDI32.@]
743 * Retrieves dimensions of a bitmap.
749 BOOL WINAPI GetBitmapDimensionEx(
750 HBITMAP hbitmap, /* [in] Handle to bitmap */
751 LPSIZE size) /* [out] Address of struct receiving dimensions */
753 BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
754 if (!bmp) return FALSE;
756 GDI_ReleaseObj( hbitmap );
761 /******************************************************************************
762 * SetBitmapDimensionEx [GDI32.@]
764 * Assigns dimensions to a bitmap.
765 * MSDN says that this function will fail if hbitmap is a handle created by
766 * CreateDIBSection, but that's not true on Windows 2000.
772 BOOL WINAPI SetBitmapDimensionEx(
773 HBITMAP hbitmap, /* [in] Handle to bitmap */
774 INT x, /* [in] Bitmap width */
775 INT y, /* [in] Bitmap height */
776 LPSIZE prevSize) /* [out] Address of structure for orig dims */
778 BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
779 if (!bmp) return FALSE;
780 if (prevSize) *prevSize = bmp->size;
783 GDI_ReleaseObj( hbitmap );