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 || bmp->bmPlanes != 1)
241 if (bmp && bmp->bmPlanes != 1)
242 FIXME("planes = %d\n", bmp->bmPlanes);
243 SetLastError( ERROR_INVALID_PARAMETER );
249 if (!bm.bmWidth || !bm.bmHeight)
251 bm.bmWidth = bm.bmHeight = 1;
252 bm.bmPlanes = bm.bmBitsPixel = 1;
259 bm.bmHeight = -bm.bmHeight;
261 bm.bmWidth = -bm.bmWidth;
264 /* Create the BITMAPOBJ */
265 bmpobj = GDI_AllocObject( sizeof(BITMAPOBJ), BITMAP_MAGIC,
266 (HGDIOBJ *)&hbitmap, &bitmap_funcs );
270 SetLastError( ERROR_NOT_ENOUGH_MEMORY );
274 TRACE("%dx%d, %d colors returning %p\n", bm.bmWidth, bm.bmHeight,
275 1 << (bm.bmPlanes * bm.bmBitsPixel), hbitmap);
280 bmpobj->bitmap.bmBits = NULL;
281 bmpobj->funcs = NULL;
283 bmpobj->segptr_bits = 0;
284 bmpobj->color_table = NULL;
285 bmpobj->nb_colors = 0;
288 SetBitmapBits( hbitmap, bm.bmHeight * bm.bmWidthBytes, bm.bmBits );
290 GDI_ReleaseObj( hbitmap );
295 /***********************************************************************
296 * GetBitmapBits [GDI32.@]
298 * Copies bitmap bits of bitmap to buffer.
301 * Success: Number of bytes copied
304 LONG WINAPI GetBitmapBits(
305 HBITMAP hbitmap, /* [in] Handle to bitmap */
306 LONG count, /* [in] Number of bytes to copy */
307 LPVOID bits) /* [out] Pointer to buffer to receive bits */
309 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
314 if (bmp->dib) /* simply copy the bits from the DIB */
316 DIBSECTION *dib = bmp->dib;
317 const char *src = dib->dsBm.bmBits;
318 INT width_bytes = BITMAP_GetWidthBytes(dib->dsBm.bmWidth, dib->dsBm.bmBitsPixel);
319 DWORD max = width_bytes * bmp->bitmap.bmHeight;
327 if (count > max) count = max;
330 /* GetBitmapBits returns not 32-bit aligned data */
332 if (bmp->dib->dsBmih.biHeight >= 0) /* not top-down, need to flip contents vertically */
334 src += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
337 src -= dib->dsBm.bmWidthBytes;
338 memcpy( bits, src, min( count, width_bytes ) );
339 bits = (char *)bits + width_bytes;
340 count -= width_bytes;
347 memcpy( bits, src, min( count, width_bytes ) );
348 src += dib->dsBm.bmWidthBytes;
349 bits = (char *)bits + width_bytes;
350 count -= width_bytes;
356 /* If the bits vector is null, the function should return the read size */
359 ret = bmp->bitmap.bmWidthBytes * bmp->bitmap.bmHeight;
364 WARN("(%d): Negative number of bytes passed???\n", count );
368 /* Only get entire lines */
369 height = count / bmp->bitmap.bmWidthBytes;
370 if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
371 count = height * bmp->bitmap.bmWidthBytes;
374 WARN("Less than one entire line requested\n");
380 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
381 hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
382 1 << bmp->bitmap.bmBitsPixel, height );
384 if(bmp->funcs && bmp->funcs->pGetBitmapBits)
386 TRACE("Calling device specific BitmapBits\n");
387 ret = bmp->funcs->pGetBitmapBits(hbitmap, bits, count);
390 if(!bmp->bitmap.bmBits) {
391 TRACE("Bitmap is empty\n");
392 memset(bits, 0, count);
395 memcpy(bits, bmp->bitmap.bmBits, count);
401 GDI_ReleaseObj( hbitmap );
406 /******************************************************************************
407 * SetBitmapBits [GDI32.@]
409 * Sets bits of color data for a bitmap.
412 * Success: Number of bytes used in setting the bitmap bits
415 LONG WINAPI SetBitmapBits(
416 HBITMAP hbitmap, /* [in] Handle to bitmap */
417 LONG count, /* [in] Number of bytes in bitmap array */
418 LPCVOID bits) /* [in] Address of array with bitmap bits */
420 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
423 if ((!bmp) || (!bits))
427 WARN("(%d): Negative number of bytes passed???\n", count );
431 if (bmp->dib) /* simply copy the bits into the DIB */
433 DIBSECTION *dib = bmp->dib;
434 char *dest = dib->dsBm.bmBits;
435 DWORD max = dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
436 if (count > max) count = max;
439 if (bmp->dib->dsBmih.biHeight >= 0) /* not top-down, need to flip contents vertically */
441 dest += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
444 dest -= dib->dsBm.bmWidthBytes;
445 memcpy( dest, bits, min( count, dib->dsBm.bmWidthBytes ) );
446 bits = (const char *)bits + dib->dsBm.bmWidthBytes;
447 count -= dib->dsBm.bmWidthBytes;
450 else memcpy( dest, bits, count );
452 GDI_ReleaseObj( hbitmap );
456 /* Only get entire lines */
457 height = count / bmp->bitmap.bmWidthBytes;
458 if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
459 count = height * bmp->bitmap.bmWidthBytes;
461 TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
462 hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
463 1 << bmp->bitmap.bmBitsPixel, height );
465 if(bmp->funcs && bmp->funcs->pSetBitmapBits) {
467 TRACE("Calling device specific BitmapBits\n");
468 ret = bmp->funcs->pSetBitmapBits(hbitmap, bits, count);
471 if(!bmp->bitmap.bmBits) /* Alloc enough for entire bitmap */
472 bmp->bitmap.bmBits = HeapAlloc( GetProcessHeap(), 0, count );
473 if(!bmp->bitmap.bmBits) {
474 WARN("Unable to allocate bit buffer\n");
477 memcpy(bmp->bitmap.bmBits, bits, count);
482 GDI_ReleaseObj( hbitmap );
486 /**********************************************************************
490 HBITMAP BITMAP_CopyBitmap(HBITMAP hbitmap)
492 BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
500 res = CreateBitmapIndirect(&bm);
503 char *buf = HeapAlloc( GetProcessHeap(), 0, bm.bmWidthBytes *
505 GetBitmapBits (hbitmap, bm.bmWidthBytes * bm.bmHeight, buf);
506 SetBitmapBits (res, bm.bmWidthBytes * bm.bmHeight, buf);
507 HeapFree( GetProcessHeap(), 0, buf );
510 GDI_ReleaseObj( hbitmap );
515 /***********************************************************************
518 * Set the type of DC that owns the bitmap. This is used when the
519 * bitmap is selected into a device to initialize the bitmap function
522 BOOL BITMAP_SetOwnerDC( HBITMAP hbitmap, DC *dc )
527 /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
528 if (hbitmap == GetStockObject(DEFAULT_BITMAP)) return TRUE;
530 if (!(bitmap = GDI_GetObjPtr( hbitmap, BITMAP_MAGIC ))) return FALSE;
533 if (!bitmap->funcs) /* not owned by a DC yet */
535 if (dc->funcs->pCreateBitmap) ret = dc->funcs->pCreateBitmap( dc->physDev, hbitmap,
536 bitmap->bitmap.bmBits );
537 if (ret) bitmap->funcs = dc->funcs;
539 else if (bitmap->funcs != dc->funcs)
541 FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap );
544 GDI_ReleaseObj( hbitmap );
549 /***********************************************************************
550 * BITMAP_SelectObject
552 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, void *obj, HDC hdc )
555 BITMAPOBJ *bitmap = obj;
556 DC *dc = DC_GetDCPtr( hdc );
559 if (GetObjectType( hdc ) != OBJ_MEMDC)
561 GDI_ReleaseObj( hdc );
565 if (handle == dc->hBitmap) goto done; /* nothing to do */
567 if (bitmap->header.dwCount && (handle != GetStockObject(DEFAULT_BITMAP)))
569 WARN( "Bitmap already selected in another DC\n" );
570 GDI_ReleaseObj( hdc );
574 if (!bitmap->funcs && !BITMAP_SetOwnerDC( handle, dc ))
576 GDI_ReleaseObj( hdc );
580 if (dc->funcs->pSelectBitmap) handle = dc->funcs->pSelectBitmap( dc->physDev, handle );
584 dc->hBitmap = handle;
585 dc->flags &= ~DC_DIRTY;
586 SetRectRgn( dc->hVisRgn, 0, 0, bitmap->bitmap.bmWidth, bitmap->bitmap.bmHeight);
592 GDI_ReleaseObj( hdc );
597 /***********************************************************************
598 * BITMAP_DeleteObject
600 static BOOL BITMAP_DeleteObject( HGDIOBJ handle, void *obj )
602 BITMAPOBJ * bmp = obj;
604 if (bmp->funcs && bmp->funcs->pDeleteBitmap)
605 bmp->funcs->pDeleteBitmap( handle );
607 HeapFree( GetProcessHeap(), 0, bmp->bitmap.bmBits );
611 DIBSECTION *dib = bmp->dib;
613 if (dib->dsBm.bmBits)
617 SYSTEM_INFO SystemInfo;
618 GetSystemInfo( &SystemInfo );
619 UnmapViewOfFile( (char *)dib->dsBm.bmBits -
620 (dib->dsOffset % SystemInfo.dwAllocationGranularity) );
622 else if (!dib->dsOffset)
623 VirtualFree(dib->dsBm.bmBits, 0L, MEM_RELEASE );
625 HeapFree(GetProcessHeap(), 0, dib);
627 if (bmp->segptr_bits)
628 { /* free its selector array */
629 WORD sel = SELECTOROF(bmp->segptr_bits);
630 WORD count = (GetSelectorLimit16(sel) / 0x10000) + 1;
633 for (i = 0; i < count; i++) FreeSelector16(sel + (i << __AHSHIFT));
635 HeapFree(GetProcessHeap(), 0, bmp->color_table);
637 return GDI_FreeObject( handle, obj );
641 /***********************************************************************
644 static INT BITMAP_GetObject16( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
646 BITMAPOBJ *bmp = obj;
650 if ( count <= sizeof(BITMAP16) )
652 BITMAP *bmp32 = &bmp->dib->dsBm;
654 bmp16.bmType = bmp32->bmType;
655 bmp16.bmWidth = bmp32->bmWidth;
656 bmp16.bmHeight = bmp32->bmHeight;
657 bmp16.bmWidthBytes = bmp32->bmWidthBytes;
658 bmp16.bmPlanes = bmp32->bmPlanes;
659 bmp16.bmBitsPixel = bmp32->bmBitsPixel;
660 bmp16.bmBits = (SEGPTR)0;
661 memcpy( buffer, &bmp16, count );
666 FIXME("not implemented for DIBs: count %d\n", count);
673 bmp16.bmType = bmp->bitmap.bmType;
674 bmp16.bmWidth = bmp->bitmap.bmWidth;
675 bmp16.bmHeight = bmp->bitmap.bmHeight;
676 bmp16.bmWidthBytes = bmp->bitmap.bmWidthBytes;
677 bmp16.bmPlanes = bmp->bitmap.bmPlanes;
678 bmp16.bmBitsPixel = bmp->bitmap.bmBitsPixel;
679 bmp16.bmBits = (SEGPTR)0;
680 if (count < sizeof(bmp16)) return 0;
681 memcpy( buffer, &bmp16, sizeof(bmp16) );
682 return sizeof(bmp16);
687 /***********************************************************************
690 static INT BITMAP_GetObject( HGDIOBJ handle, void *obj, INT count, LPVOID buffer )
692 BITMAPOBJ *bmp = obj;
694 if( !buffer ) return sizeof(BITMAP);
695 if (count < sizeof(BITMAP)) return 0;
699 if (count >= sizeof(DIBSECTION))
701 memcpy( buffer, bmp->dib, sizeof(DIBSECTION) );
702 return sizeof(DIBSECTION);
704 else /* if (count >= sizeof(BITMAP)) */
706 DIBSECTION *dib = bmp->dib;
707 memcpy( buffer, &dib->dsBm, sizeof(BITMAP) );
708 return sizeof(BITMAP);
713 memcpy( buffer, &bmp->bitmap, sizeof(BITMAP) );
714 ((BITMAP *) buffer)->bmBits = NULL;
715 return sizeof(BITMAP);
720 /******************************************************************************
721 * CreateDiscardableBitmap [GDI32.@]
723 * Creates a discardable bitmap.
726 * Success: Handle to bitmap
729 HBITMAP WINAPI CreateDiscardableBitmap(
730 HDC hdc, /* [in] Handle to device context */
731 INT width, /* [in] Bitmap width */
732 INT height) /* [in] Bitmap height */
734 return CreateCompatibleBitmap( hdc, width, height );
738 /******************************************************************************
739 * GetBitmapDimensionEx [GDI32.@]
741 * Retrieves dimensions of a bitmap.
747 BOOL WINAPI GetBitmapDimensionEx(
748 HBITMAP hbitmap, /* [in] Handle to bitmap */
749 LPSIZE size) /* [out] Address of struct receiving dimensions */
751 BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
752 if (!bmp) return FALSE;
754 GDI_ReleaseObj( hbitmap );
759 /******************************************************************************
760 * SetBitmapDimensionEx [GDI32.@]
762 * Assigns dimensions to a bitmap.
763 * MSDN says that this function will fail if hbitmap is a handle created by
764 * CreateDIBSection, but that's not true on Windows 2000.
770 BOOL WINAPI SetBitmapDimensionEx(
771 HBITMAP hbitmap, /* [in] Handle to bitmap */
772 INT x, /* [in] Bitmap width */
773 INT y, /* [in] Bitmap height */
774 LPSIZE prevSize) /* [out] Address of structure for orig dims */
776 BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
777 if (!bmp) return FALSE;
778 if (prevSize) *prevSize = bmp->size;
781 GDI_ReleaseObj( hbitmap );