Sweden-Number/dlls/gdi32/dib.c

1557 lines
52 KiB
C

/*
* GDI device-independent bitmaps
*
* Copyright 1993,1994 Alexandre Julliard
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
/*
Important information:
* Current Windows versions support two different DIB structures:
- BITMAPCOREINFO / BITMAPCOREHEADER (legacy structures; used in OS/2)
- BITMAPINFO / BITMAPINFOHEADER
Most Windows API functions taking a BITMAPINFO* / BITMAPINFOHEADER* also
accept the old "core" structures, and so must WINE.
You can distinguish them by looking at the first member (bcSize/biSize).
* The palettes are stored in different formats:
- BITMAPCOREINFO: Array of RGBTRIPLE
- BITMAPINFO: Array of RGBQUAD
* There are even more DIB headers, but they all extend BITMAPINFOHEADER:
- BITMAPV4HEADER: Introduced in Windows 95 / NT 4.0
- BITMAPV5HEADER: Introduced in Windows 98 / 2000
If biCompression is BI_BITFIELDS, the color masks are at the same position
in all the headers (they start at bmiColors of BITMAPINFOHEADER), because
the new headers have structure members for the masks.
* You should never access the color table using the bmiColors member,
because the passed structure may have one of the extended headers
mentioned above. Use this to calculate the location:
BITMAPINFO* info;
void* colorPtr = (LPBYTE) info + (WORD) info->bmiHeader.biSize;
* More information:
Search for "Bitmap Structures" in MSDN
*/
#include <stdarg.h>
#include <stdlib.h>
#include <string.h>
#include <assert.h>
#include "windef.h"
#include "winbase.h"
#include "gdi_private.h"
#include "wine/debug.h"
WINE_DEFAULT_DEBUG_CHANNEL(bitmap);
/***********************************************************************
* bitmap_info_size
*
* Return the size of the bitmap info structure including color table.
*/
int bitmap_info_size( const BITMAPINFO * info, WORD coloruse )
{
unsigned int colors, size, masks = 0;
if (info->bmiHeader.biSize == sizeof(BITMAPCOREHEADER))
{
const BITMAPCOREHEADER *core = (const BITMAPCOREHEADER *)info;
colors = (core->bcBitCount <= 8) ? 1 << core->bcBitCount : 0;
return sizeof(BITMAPCOREHEADER) + colors *
((coloruse == DIB_RGB_COLORS) ? sizeof(RGBTRIPLE) : sizeof(WORD));
}
else /* assume BITMAPINFOHEADER */
{
colors = get_dib_num_of_colors( info );
if (info->bmiHeader.biCompression == BI_BITFIELDS) masks = 3;
size = max( info->bmiHeader.biSize, sizeof(BITMAPINFOHEADER) + masks * sizeof(DWORD) );
return size + colors * ((coloruse == DIB_RGB_COLORS) ? sizeof(RGBQUAD) : sizeof(WORD));
}
}
/*******************************************************************************************
* Verify that the DIB parameters are valid.
*/
static BOOL is_valid_dib_format( const BITMAPINFOHEADER *info, BOOL allow_compression )
{
if (info->biWidth <= 0) return FALSE;
if (info->biHeight == 0) return FALSE;
if (allow_compression && (info->biCompression == BI_RLE4 || info->biCompression == BI_RLE8))
{
if (info->biHeight < 0) return FALSE;
if (!info->biSizeImage) return FALSE;
return info->biBitCount == (info->biCompression == BI_RLE4 ? 4 : 8);
}
if (!info->biPlanes) return FALSE;
switch (info->biBitCount)
{
case 1:
case 4:
case 8:
case 24:
return (info->biCompression == BI_RGB);
case 16:
case 32:
return (info->biCompression == BI_BITFIELDS || info->biCompression == BI_RGB);
default:
return FALSE;
}
}
/*******************************************************************************************
* Fill out a true BITMAPINFOHEADER from a variable sized BITMAPINFOHEADER / BITMAPCOREHEADER.
*/
static BOOL bitmapinfoheader_from_user_bitmapinfo( BITMAPINFOHEADER *dst, const BITMAPINFOHEADER *info )
{
if (!info) return FALSE;
if (info->biSize == sizeof(BITMAPCOREHEADER))
{
const BITMAPCOREHEADER *core = (const BITMAPCOREHEADER *)info;
dst->biWidth = core->bcWidth;
dst->biHeight = core->bcHeight;
dst->biPlanes = core->bcPlanes;
dst->biBitCount = core->bcBitCount;
dst->biCompression = BI_RGB;
dst->biXPelsPerMeter = 0;
dst->biYPelsPerMeter = 0;
dst->biClrUsed = 0;
dst->biClrImportant = 0;
}
else if (info->biSize >= sizeof(BITMAPINFOHEADER)) /* assume BITMAPINFOHEADER */
{
*dst = *info;
}
else
{
WARN( "(%u): unknown/wrong size for header\n", info->biSize );
return FALSE;
}
dst->biSize = sizeof(*dst);
if (dst->biCompression == BI_RGB || dst->biCompression == BI_BITFIELDS)
dst->biSizeImage = get_dib_image_size( (BITMAPINFO *)dst );
return TRUE;
}
/*******************************************************************************************
* Fill out a true BITMAPINFO from a variable sized BITMAPINFO / BITMAPCOREINFO.
*/
static BOOL bitmapinfo_from_user_bitmapinfo( BITMAPINFO *dst, const BITMAPINFO *info,
UINT coloruse, BOOL allow_compression )
{
void *src_colors;
if (!bitmapinfoheader_from_user_bitmapinfo( &dst->bmiHeader, &info->bmiHeader )) return FALSE;
if (!is_valid_dib_format( &dst->bmiHeader, allow_compression )) return FALSE;
src_colors = (char *)info + info->bmiHeader.biSize;
if (dst->bmiHeader.biCompression == BI_BITFIELDS)
{
/* bitfields are always at bmiColors even in larger structures */
memcpy( dst->bmiColors, info->bmiColors, 3 * sizeof(DWORD) );
dst->bmiHeader.biClrUsed = 0;
}
else if (dst->bmiHeader.biBitCount <= 8)
{
unsigned int colors = dst->bmiHeader.biClrUsed;
unsigned int max_colors = 1 << dst->bmiHeader.biBitCount;
if (!colors) colors = max_colors;
else colors = min( colors, max_colors );
if (coloruse == DIB_PAL_COLORS)
{
memcpy( dst->bmiColors, src_colors, colors * sizeof(WORD) );
max_colors = colors;
}
else if (info->bmiHeader.biSize != sizeof(BITMAPCOREHEADER))
{
memcpy( dst->bmiColors, src_colors, colors * sizeof(RGBQUAD) );
}
else
{
unsigned int i;
RGBTRIPLE *triple = (RGBTRIPLE *)src_colors;
for (i = 0; i < colors; i++)
{
dst->bmiColors[i].rgbRed = triple[i].rgbtRed;
dst->bmiColors[i].rgbGreen = triple[i].rgbtGreen;
dst->bmiColors[i].rgbBlue = triple[i].rgbtBlue;
dst->bmiColors[i].rgbReserved = 0;
}
}
memset( dst->bmiColors + colors, 0, (max_colors - colors) * sizeof(RGBQUAD) );
dst->bmiHeader.biClrUsed = max_colors;
}
else dst->bmiHeader.biClrUsed = 0;
return TRUE;
}
static int fill_color_table_from_palette( BITMAPINFO *info, HDC hdc )
{
PALETTEENTRY palEntry[256];
HPALETTE palette = GetCurrentObject( hdc, OBJ_PAL );
int i, colors = get_dib_num_of_colors( info );
if (!palette) return 0;
if (!colors) return 0;
memset( palEntry, 0, sizeof(palEntry) );
if (!GetPaletteEntries( palette, 0, colors, palEntry ))
return 0;
for (i = 0; i < colors; i++)
{
info->bmiColors[i].rgbRed = palEntry[i].peRed;
info->bmiColors[i].rgbGreen = palEntry[i].peGreen;
info->bmiColors[i].rgbBlue = palEntry[i].peBlue;
info->bmiColors[i].rgbReserved = 0;
}
return colors;
}
BOOL fill_color_table_from_pal_colors( BITMAPINFO *info, HDC hdc )
{
PALETTEENTRY entries[256];
RGBQUAD table[256];
HPALETTE palette;
const WORD *index = (const WORD *)info->bmiColors;
int i, count, colors = info->bmiHeader.biClrUsed;
if (!colors) return TRUE;
if (!(palette = GetCurrentObject( hdc, OBJ_PAL ))) return FALSE;
if (!(count = GetPaletteEntries( palette, 0, colors, entries ))) return FALSE;
for (i = 0; i < colors; i++, index++)
{
table[i].rgbRed = entries[*index % count].peRed;
table[i].rgbGreen = entries[*index % count].peGreen;
table[i].rgbBlue = entries[*index % count].peBlue;
table[i].rgbReserved = 0;
}
info->bmiHeader.biClrUsed = 1 << info->bmiHeader.biBitCount;
memcpy( info->bmiColors, table, colors * sizeof(RGBQUAD) );
memset( info->bmiColors + colors, 0, (info->bmiHeader.biClrUsed - colors) * sizeof(RGBQUAD) );
return TRUE;
}
static void *get_pixel_ptr( const BITMAPINFO *info, void *bits, int x, int y )
{
const int width = info->bmiHeader.biWidth, height = info->bmiHeader.biHeight;
const int bpp = info->bmiHeader.biBitCount;
if (height > 0)
return (char *)bits + (height - y - 1) * get_dib_stride( width, bpp ) + x * bpp / 8;
else
return (char *)bits + y * get_dib_stride( width, bpp ) + x * bpp / 8;
}
static BOOL build_rle_bitmap( const BITMAPINFO *info, struct gdi_image_bits *bits, HRGN *clip )
{
int i = 0;
int left, right;
int x, y, width = info->bmiHeader.biWidth, height = info->bmiHeader.biHeight;
HRGN run = NULL;
BYTE skip, num, data;
BYTE *out_bits, *in_bits = bits->ptr;
if (clip) *clip = NULL;
assert( info->bmiHeader.biBitCount == 4 || info->bmiHeader.biBitCount == 8 );
out_bits = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, get_dib_image_size( info ) );
if (!out_bits) goto fail;
if (clip)
{
*clip = CreateRectRgn( 0, 0, 0, 0 );
run = CreateRectRgn( 0, 0, 0, 0 );
if (!*clip || !run) goto fail;
}
x = left = right = 0;
y = height - 1;
while (i < info->bmiHeader.biSizeImage - 1)
{
num = in_bits[i];
data = in_bits[i + 1];
i += 2;
if (num)
{
if (x + num > width) num = width - x;
if (num)
{
BYTE s = data, *out_ptr = get_pixel_ptr( info, out_bits, x, y );
if (info->bmiHeader.biBitCount == 8)
memset( out_ptr, s, num );
else
{
if(x & 1)
{
s = ((s >> 4) & 0x0f) | ((s << 4) & 0xf0);
*out_ptr = (*out_ptr & 0xf0) | (s & 0x0f);
out_ptr++;
x++;
num--;
}
/* this will write one too many if num is odd, but that doesn't matter */
if (num) memset( out_ptr, s, (num + 1) / 2 );
}
}
x += num;
right = x;
}
else
{
if (data < 3)
{
if(left != right && clip)
{
SetRectRgn( run, left, y, right, y + 1 );
CombineRgn( *clip, run, *clip, RGN_OR );
}
switch (data)
{
case 0: /* eol */
left = right = x = 0;
y--;
if(y < 0) goto done;
break;
case 1: /* eod */
goto done;
case 2: /* delta */
if (i >= info->bmiHeader.biSizeImage - 1) goto done;
x += in_bits[i];
if (x > width) x = width;
left = right = x;
y -= in_bits[i + 1];
if(y < 0) goto done;
i += 2;
}
}
else /* data bytes of data */
{
num = data;
skip = (num * info->bmiHeader.biBitCount + 7) / 8;
if (skip > info->bmiHeader.biSizeImage - i) goto done;
skip = (skip + 1) & ~1;
if (x + num > width) num = width - x;
if (num)
{
BYTE *out_ptr = get_pixel_ptr( info, out_bits, x, y );
if (info->bmiHeader.biBitCount == 8)
memcpy( out_ptr, in_bits + i, num );
else
{
if(x & 1)
{
const BYTE *in_ptr = in_bits + i;
for ( ; num; num--, x++)
{
if (x & 1)
{
*out_ptr = (*out_ptr & 0xf0) | ((*in_ptr >> 4) & 0x0f);
out_ptr++;
}
else
*out_ptr = (*in_ptr++ << 4) & 0xf0;
}
}
else
memcpy( out_ptr, in_bits + i, (num + 1) / 2);
}
}
x += num;
right = x;
i += skip;
}
}
}
done:
if (run) DeleteObject( run );
if (bits->free) bits->free( bits );
bits->ptr = out_bits;
bits->is_copy = TRUE;
bits->free = free_heap_bits;
return TRUE;
fail:
if (run) DeleteObject( run );
if (clip && *clip) DeleteObject( *clip );
HeapFree( GetProcessHeap(), 0, out_bits );
return FALSE;
}
INT nulldrv_StretchDIBits( PHYSDEV dev, INT xDst, INT yDst, INT widthDst, INT heightDst,
INT xSrc, INT ySrc, INT widthSrc, INT heightSrc, const void *bits,
BITMAPINFO *src_info, UINT coloruse, DWORD rop )
{
DC *dc = get_nulldrv_dc( dev );
char dst_buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *dst_info = (BITMAPINFO *)dst_buffer;
struct bitblt_coords src, dst;
struct gdi_image_bits src_bits;
DWORD err;
HRGN clip = NULL;
INT ret = 0;
INT height = abs( src_info->bmiHeader.biHeight );
BOOL top_down = src_info->bmiHeader.biHeight < 0, non_stretch_from_origin = FALSE;
RECT rect;
TRACE("%d %d %d %d <- %d %d %d %d rop %08x\n", xDst, yDst, widthDst, heightDst,
xSrc, ySrc, widthSrc, heightSrc, rop);
src_bits.ptr = (void*)bits;
src_bits.is_copy = FALSE;
src_bits.free = NULL;
if (coloruse == DIB_PAL_COLORS && !fill_color_table_from_pal_colors( src_info, dev->hdc )) return 0;
rect.left = xDst;
rect.top = yDst;
rect.right = xDst + widthDst;
rect.bottom = yDst + heightDst;
LPtoDP( dc->hSelf, (POINT *)&rect, 2 );
dst.x = rect.left;
dst.y = rect.top;
dst.width = rect.right - rect.left;
dst.height = rect.bottom - rect.top;
if (dc->layout & LAYOUT_RTL && rop & NOMIRRORBITMAP)
{
dst.x += dst.width;
dst.width = -dst.width;
}
rop &= ~NOMIRRORBITMAP;
src.x = xSrc;
src.width = widthSrc;
src.y = ySrc;
src.height = heightSrc;
if (src.x == 0 && src.y == 0 && src.width == dst.width && src.height == dst.height)
non_stretch_from_origin = TRUE;
if (src_info->bmiHeader.biCompression == BI_RLE4 || src_info->bmiHeader.biCompression == BI_RLE8)
{
BOOL want_clip = non_stretch_from_origin && (rop == SRCCOPY);
if (!build_rle_bitmap( src_info, &src_bits, want_clip ? &clip : NULL )) return 0;
}
if (rop != SRCCOPY || non_stretch_from_origin)
{
if (dst.width == 1 && src.width > 1) src.width--;
if (dst.height == 1 && src.height > 1) src.height--;
}
if (rop != SRCCOPY)
{
if (dst.width < 0 && dst.width == src.width)
{
/* This is off-by-one, but that's what Windows does */
dst.x += dst.width;
src.x += src.width;
dst.width = -dst.width;
src.width = -src.width;
}
if (dst.height < 0 && dst.height == src.height)
{
dst.y += dst.height;
src.y += src.height;
dst.height = -dst.height;
src.height = -src.height;
}
}
if (!top_down || (rop == SRCCOPY && !non_stretch_from_origin)) src.y = height - src.y - src.height;
if (src.y >= height && src.y + src.height + 1 < height)
src.y = height - 1;
else if (src.y > 0 && src.y + src.height + 1 < 0)
src.y = -src.height - 1;
get_bounding_rect( &rect, src.x, src.y, src.width, src.height );
src.visrect.left = 0;
src.visrect.right = src_info->bmiHeader.biWidth;
src.visrect.top = 0;
src.visrect.bottom = height;
if (!intersect_rect( &src.visrect, &src.visrect, &rect )) goto done;
get_bounding_rect( &rect, dst.x, dst.y, dst.width, dst.height );
if (!clip_visrect( dc, &dst.visrect, &rect )) goto done;
if (!intersect_vis_rectangles( &dst, &src )) goto done;
if (clip) OffsetRgn( clip, dst.x - src.x, dst.y - src.y );
dev = GET_DC_PHYSDEV( dc, pPutImage );
copy_bitmapinfo( dst_info, src_info );
err = dev->funcs->pPutImage( dev, 0, clip, dst_info, &src_bits, &src, &dst, rop );
if (err == ERROR_BAD_FORMAT)
{
/* 1-bpp destination without a color table requires a fake 1-entry table
* that contains only the background color */
if (dst_info->bmiHeader.biBitCount == 1 && !dst_info->bmiHeader.biClrUsed)
{
COLORREF color = GetBkColor( dev->hdc );
dst_info->bmiColors[0].rgbRed = GetRValue( color );
dst_info->bmiColors[0].rgbGreen = GetGValue( color );
dst_info->bmiColors[0].rgbBlue = GetBValue( color );
dst_info->bmiColors[0].rgbReserved = 0;
dst_info->bmiHeader.biClrUsed = 1;
}
if (!(err = convert_bits( src_info, &src, dst_info, &src_bits, FALSE )))
{
/* get rid of the fake 1-bpp table */
if (dst_info->bmiHeader.biClrUsed == 1) dst_info->bmiHeader.biClrUsed = 0;
err = dev->funcs->pPutImage( dev, 0, clip, dst_info, &src_bits, &src, &dst, rop );
}
}
if (err == ERROR_TRANSFORM_NOT_SUPPORTED)
{
copy_bitmapinfo( src_info, dst_info );
err = stretch_bits( src_info, &src, dst_info, &dst, &src_bits, GetStretchBltMode( dev->hdc ) );
if (!err) err = dev->funcs->pPutImage( dev, 0, NULL, dst_info, &src_bits, &src, &dst, rop );
}
if (err) ret = 0;
else if (rop == SRCCOPY) ret = height;
else ret = src_info->bmiHeader.biHeight;
done:
if (src_bits.free) src_bits.free( &src_bits );
if (clip) DeleteObject( clip );
return ret;
}
/***********************************************************************
* StretchDIBits (GDI32.@)
*/
INT WINAPI StretchDIBits(HDC hdc, INT xDst, INT yDst, INT widthDst, INT heightDst,
INT xSrc, INT ySrc, INT widthSrc, INT heightSrc, const void *bits,
const BITMAPINFO *bmi, UINT coloruse, DWORD rop )
{
char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *info = (BITMAPINFO *)buffer;
DC *dc;
INT ret = 0;
if (!bits) return 0;
if (!bitmapinfo_from_user_bitmapinfo( info, bmi, coloruse, TRUE ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return 0;
}
if ((dc = get_dc_ptr( hdc )))
{
PHYSDEV physdev = GET_DC_PHYSDEV( dc, pStretchDIBits );
update_dc( dc );
ret = physdev->funcs->pStretchDIBits( physdev, xDst, yDst, widthDst, heightDst,
xSrc, ySrc, widthSrc, heightSrc, bits, info, coloruse, rop );
release_dc_ptr( dc );
}
return ret;
}
/******************************************************************************
* SetDIBits [GDI32.@]
*
* Sets pixels in a bitmap using colors from DIB.
*
* PARAMS
* hdc [I] Handle to device context
* hbitmap [I] Handle to bitmap
* startscan [I] Starting scan line
* lines [I] Number of scan lines
* bits [I] Array of bitmap bits
* info [I] Address of structure with data
* coloruse [I] Type of color indexes to use
*
* RETURNS
* Success: Number of scan lines copied
* Failure: 0
*/
INT WINAPI SetDIBits( HDC hdc, HBITMAP hbitmap, UINT startscan,
UINT lines, LPCVOID bits, const BITMAPINFO *info,
UINT coloruse )
{
BITMAPOBJ *bitmap;
char src_bmibuf[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *src_info = (BITMAPINFO *)src_bmibuf;
char dst_bmibuf[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *dst_info = (BITMAPINFO *)dst_bmibuf;
INT result = 0;
DWORD err;
struct gdi_image_bits src_bits;
struct bitblt_coords src, dst;
INT src_to_dst_offset;
HRGN clip = 0;
const struct gdi_dc_funcs *funcs;
if (!bitmapinfo_from_user_bitmapinfo( src_info, info, coloruse, TRUE ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return 0;
}
if (src_info->bmiHeader.biCompression == BI_BITFIELDS)
{
DWORD *masks = (DWORD *)src_info->bmiColors;
if (!masks[0] || !masks[1] || !masks[2])
{
SetLastError( ERROR_INVALID_PARAMETER );
return 0;
}
}
src_bits.ptr = (void *)bits;
src_bits.is_copy = FALSE;
src_bits.free = NULL;
src_bits.param = NULL;
if (coloruse == DIB_PAL_COLORS && !fill_color_table_from_pal_colors( src_info, hdc )) return 0;
if (!(bitmap = GDI_GetObjPtr( hbitmap, OBJ_BITMAP ))) return 0;
if (src_info->bmiHeader.biCompression == BI_RLE4 || src_info->bmiHeader.biCompression == BI_RLE8)
{
if (lines == 0) goto done;
else lines = src_info->bmiHeader.biHeight;
startscan = 0;
if (!build_rle_bitmap( src_info, &src_bits, &clip )) goto done;
}
dst.visrect.left = 0;
dst.visrect.top = 0;
dst.visrect.right = bitmap->bitmap.bmWidth;
dst.visrect.bottom = bitmap->bitmap.bmHeight;
src.visrect.left = 0;
src.visrect.top = 0;
src.visrect.right = src_info->bmiHeader.biWidth;
src.visrect.bottom = abs( src_info->bmiHeader.biHeight );
if (src_info->bmiHeader.biHeight > 0)
{
src_to_dst_offset = -startscan;
lines = min( lines, src.visrect.bottom - startscan );
if (lines < src.visrect.bottom) src.visrect.top = src.visrect.bottom - lines;
}
else
{
src_to_dst_offset = src.visrect.bottom - lines - startscan;
/* Unlike the bottom-up case, Windows doesn't limit lines. */
if (lines < src.visrect.bottom) src.visrect.bottom = lines;
}
funcs = get_bitmap_funcs( bitmap );
result = lines;
offset_rect( &src.visrect, 0, src_to_dst_offset );
if (!intersect_rect( &dst.visrect, &src.visrect, &dst.visrect )) goto done;
src.visrect = dst.visrect;
offset_rect( &src.visrect, 0, -src_to_dst_offset );
src.x = src.visrect.left;
src.y = src.visrect.top;
src.width = src.visrect.right - src.visrect.left;
src.height = src.visrect.bottom - src.visrect.top;
dst.x = dst.visrect.left;
dst.y = dst.visrect.top;
dst.width = dst.visrect.right - dst.visrect.left;
dst.height = dst.visrect.bottom - dst.visrect.top;
copy_bitmapinfo( dst_info, src_info );
err = funcs->pPutImage( NULL, hbitmap, clip, dst_info, &src_bits, &src, &dst, 0 );
if (err == ERROR_BAD_FORMAT)
{
err = convert_bits( src_info, &src, dst_info, &src_bits, FALSE );
if (!err) err = funcs->pPutImage( NULL, hbitmap, clip, dst_info, &src_bits, &src, &dst, 0 );
}
if(err) result = 0;
done:
if (src_bits.free) src_bits.free( &src_bits );
if (clip) DeleteObject( clip );
GDI_ReleaseObj( hbitmap );
return result;
}
INT nulldrv_SetDIBitsToDevice( PHYSDEV dev, INT x_dst, INT y_dst, DWORD cx, DWORD cy,
INT x_src, INT y_src, UINT startscan, UINT lines,
const void *bits, BITMAPINFO *src_info, UINT coloruse )
{
DC *dc = get_nulldrv_dc( dev );
char dst_buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *dst_info = (BITMAPINFO *)dst_buffer;
struct bitblt_coords src, dst;
struct gdi_image_bits src_bits;
HRGN clip = 0;
DWORD err;
UINT height;
BOOL top_down;
POINT pt;
RECT rect;
top_down = (src_info->bmiHeader.biHeight < 0);
height = abs( src_info->bmiHeader.biHeight );
src_bits.ptr = (void *)bits;
src_bits.is_copy = FALSE;
src_bits.free = NULL;
if (!lines) return 0;
if (coloruse == DIB_PAL_COLORS && !fill_color_table_from_pal_colors( src_info, dev->hdc )) return 0;
if (src_info->bmiHeader.biCompression == BI_RLE4 || src_info->bmiHeader.biCompression == BI_RLE8)
{
startscan = 0;
lines = height;
src_info->bmiHeader.biWidth = x_src + cx;
src_info->bmiHeader.biHeight = y_src + cy;
if (src_info->bmiHeader.biWidth <= 0 || src_info->bmiHeader.biHeight <= 0) return 0;
src.x = x_src;
src.y = 0;
src.width = cx;
src.height = cy;
if (!build_rle_bitmap( src_info, &src_bits, &clip )) return 0;
}
else
{
if (startscan >= height) return 0;
if (!top_down && lines > height - startscan) lines = height - startscan;
/* map src to top-down coordinates with startscan as origin */
src.x = x_src;
src.y = startscan + lines - (y_src + cy);
src.width = cx;
src.height = cy;
if (src.y > 0)
{
if (!top_down)
{
/* get rid of unnecessary lines */
if (src.y >= lines) return 0;
lines -= src.y;
src.y = 0;
}
else if (src.y >= lines) return lines;
}
src_info->bmiHeader.biHeight = top_down ? -lines : lines;
}
src.visrect.left = src.x;
src.visrect.top = src.y;
src.visrect.right = src.x + cx;
src.visrect.bottom = src.y + cy;
rect.left = 0;
rect.top = 0;
rect.right = src_info->bmiHeader.biWidth;
rect.bottom = abs( src_info->bmiHeader.biHeight );
if (!intersect_rect( &src.visrect, &src.visrect, &rect ))
{
lines = 0;
goto done;
}
pt.x = x_dst;
pt.y = y_dst;
LPtoDP( dev->hdc, &pt, 1 );
dst.x = pt.x;
dst.y = pt.y;
dst.width = cx;
dst.height = cy;
if (GetLayout( dev->hdc ) & LAYOUT_RTL) dst.x -= cx - 1;
rect.left = dst.x;
rect.top = dst.y;
rect.right = dst.x + cx;
rect.bottom = dst.y + cy;
if (!clip_visrect( dc, &dst.visrect, &rect )) goto done;
offset_rect( &src.visrect, dst.x - src.x, dst.y - src.y );
intersect_rect( &rect, &src.visrect, &dst.visrect );
src.visrect = dst.visrect = rect;
offset_rect( &src.visrect, src.x - dst.x, src.y - dst.y );
if (is_rect_empty( &dst.visrect )) goto done;
if (clip) OffsetRgn( clip, dst.x - src.x, dst.y - src.y );
dev = GET_DC_PHYSDEV( dc, pPutImage );
copy_bitmapinfo( dst_info, src_info );
err = dev->funcs->pPutImage( dev, 0, clip, dst_info, &src_bits, &src, &dst, SRCCOPY );
if (err == ERROR_BAD_FORMAT)
{
err = convert_bits( src_info, &src, dst_info, &src_bits, FALSE );
if (!err) err = dev->funcs->pPutImage( dev, 0, clip, dst_info, &src_bits, &src, &dst, SRCCOPY );
}
if (err) lines = 0;
done:
if (src_bits.free) src_bits.free( &src_bits );
if (clip) DeleteObject( clip );
return lines;
}
/***********************************************************************
* SetDIBitsToDevice (GDI32.@)
*/
INT WINAPI SetDIBitsToDevice(HDC hdc, INT xDest, INT yDest, DWORD cx,
DWORD cy, INT xSrc, INT ySrc, UINT startscan,
UINT lines, LPCVOID bits, const BITMAPINFO *bmi,
UINT coloruse )
{
char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *info = (BITMAPINFO *)buffer;
INT ret = 0;
DC *dc;
if (!bits) return 0;
if (!bitmapinfo_from_user_bitmapinfo( info, bmi, coloruse, TRUE ))
{
SetLastError( ERROR_INVALID_PARAMETER );
return 0;
}
if ((dc = get_dc_ptr( hdc )))
{
PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSetDIBitsToDevice );
update_dc( dc );
ret = physdev->funcs->pSetDIBitsToDevice( physdev, xDest, yDest, cx, cy, xSrc,
ySrc, startscan, lines, bits, info, coloruse );
release_dc_ptr( dc );
}
return ret;
}
/***********************************************************************
* SetDIBColorTable (GDI32.@)
*/
UINT WINAPI SetDIBColorTable( HDC hdc, UINT startpos, UINT entries, CONST RGBQUAD *colors )
{
DC * dc;
UINT result = 0;
BITMAPOBJ * bitmap;
if (!(dc = get_dc_ptr( hdc ))) return 0;
if ((bitmap = GDI_GetObjPtr( dc->hBitmap, OBJ_BITMAP )))
{
PHYSDEV physdev = GET_DC_PHYSDEV( dc, pSetDIBColorTable );
/* Check if currently selected bitmap is a DIB */
if (bitmap->color_table)
{
if (startpos < bitmap->dib->dsBmih.biClrUsed)
{
result = min( entries, bitmap->dib->dsBmih.biClrUsed - startpos );
memcpy(bitmap->color_table + startpos, colors, result * sizeof(RGBQUAD));
}
}
GDI_ReleaseObj( dc->hBitmap );
physdev->funcs->pSetDIBColorTable( physdev, startpos, entries, colors );
}
release_dc_ptr( dc );
return result;
}
/***********************************************************************
* GetDIBColorTable (GDI32.@)
*/
UINT WINAPI GetDIBColorTable( HDC hdc, UINT startpos, UINT entries, RGBQUAD *colors )
{
DC * dc;
BITMAPOBJ *bitmap;
UINT result = 0;
if (!(dc = get_dc_ptr( hdc ))) return 0;
if ((bitmap = GDI_GetObjPtr( dc->hBitmap, OBJ_BITMAP )))
{
/* Check if currently selected bitmap is a DIB */
if (bitmap->color_table)
{
if (startpos < bitmap->dib->dsBmih.biClrUsed)
{
result = min( entries, bitmap->dib->dsBmih.biClrUsed - startpos );
memcpy(colors, bitmap->color_table + startpos, result * sizeof(RGBQUAD));
}
}
GDI_ReleaseObj( dc->hBitmap );
}
release_dc_ptr( dc );
return result;
}
static const RGBQUAD DefLogPaletteQuads[20] = { /* Copy of Default Logical Palette */
/* rgbBlue, rgbGreen, rgbRed, rgbReserved */
{ 0x00, 0x00, 0x00, 0x00 },
{ 0x00, 0x00, 0x80, 0x00 },
{ 0x00, 0x80, 0x00, 0x00 },
{ 0x00, 0x80, 0x80, 0x00 },
{ 0x80, 0x00, 0x00, 0x00 },
{ 0x80, 0x00, 0x80, 0x00 },
{ 0x80, 0x80, 0x00, 0x00 },
{ 0xc0, 0xc0, 0xc0, 0x00 },
{ 0xc0, 0xdc, 0xc0, 0x00 },
{ 0xf0, 0xca, 0xa6, 0x00 },
{ 0xf0, 0xfb, 0xff, 0x00 },
{ 0xa4, 0xa0, 0xa0, 0x00 },
{ 0x80, 0x80, 0x80, 0x00 },
{ 0x00, 0x00, 0xff, 0x00 },
{ 0x00, 0xff, 0x00, 0x00 },
{ 0x00, 0xff, 0xff, 0x00 },
{ 0xff, 0x00, 0x00, 0x00 },
{ 0xff, 0x00, 0xff, 0x00 },
{ 0xff, 0xff, 0x00, 0x00 },
{ 0xff, 0xff, 0xff, 0x00 }
};
static const DWORD bit_fields_888[3] = {0xff0000, 0x00ff00, 0x0000ff};
static const DWORD bit_fields_565[3] = {0xf800, 0x07e0, 0x001f};
static const DWORD bit_fields_555[3] = {0x7c00, 0x03e0, 0x001f};
static int fill_query_info( BITMAPINFO *info, BITMAPOBJ *bmp )
{
BITMAPINFOHEADER header;
header.biSize = info->bmiHeader.biSize; /* Ensure we don't overwrite the original size when we copy back */
header.biWidth = bmp->bitmap.bmWidth;
header.biHeight = bmp->bitmap.bmHeight;
header.biPlanes = 1;
if (bmp->dib)
{
header.biBitCount = bmp->dib->dsBm.bmBitsPixel;
switch (bmp->dib->dsBm.bmBitsPixel)
{
case 16:
case 32:
header.biCompression = BI_BITFIELDS;
break;
default:
header.biCompression = BI_RGB;
break;
}
}
else
{
header.biCompression = (bmp->bitmap.bmBitsPixel > 8) ? BI_BITFIELDS : BI_RGB;
header.biBitCount = bmp->bitmap.bmBitsPixel;
}
header.biSizeImage = get_dib_image_size( (BITMAPINFO *)&header );
header.biXPelsPerMeter = 0;
header.biYPelsPerMeter = 0;
header.biClrUsed = 0;
header.biClrImportant = 0;
if ( info->bmiHeader.biSize == sizeof(BITMAPCOREHEADER) )
{
BITMAPCOREHEADER *coreheader = (BITMAPCOREHEADER *)info;
coreheader->bcWidth = header.biWidth;
coreheader->bcHeight = header.biHeight;
coreheader->bcPlanes = header.biPlanes;
coreheader->bcBitCount = header.biBitCount;
}
else
info->bmiHeader = header;
return abs(bmp->bitmap.bmHeight);
}
/************************************************************************
* copy_color_info
*
* Copy BITMAPINFO color information where dst may be a BITMAPCOREINFO.
*/
static void copy_color_info(BITMAPINFO *dst, const BITMAPINFO *src, UINT coloruse)
{
unsigned int colors = get_dib_num_of_colors( src );
RGBQUAD *src_colors = (RGBQUAD *)((char *)src + src->bmiHeader.biSize);
assert( src->bmiHeader.biSize >= sizeof(BITMAPINFOHEADER) );
if (dst->bmiHeader.biSize == sizeof(BITMAPCOREHEADER))
{
BITMAPCOREINFO *core = (BITMAPCOREINFO *)dst;
if (coloruse == DIB_PAL_COLORS)
memcpy( core->bmciColors, src_colors, colors * sizeof(WORD) );
else
{
unsigned int i;
for (i = 0; i < colors; i++)
{
core->bmciColors[i].rgbtRed = src_colors[i].rgbRed;
core->bmciColors[i].rgbtGreen = src_colors[i].rgbGreen;
core->bmciColors[i].rgbtBlue = src_colors[i].rgbBlue;
}
}
}
else
{
dst->bmiHeader.biClrUsed = src->bmiHeader.biClrUsed;
dst->bmiHeader.biSizeImage = src->bmiHeader.biSizeImage;
if (src->bmiHeader.biCompression == BI_BITFIELDS)
/* bitfields are always at bmiColors even in larger structures */
memcpy( dst->bmiColors, src->bmiColors, 3 * sizeof(DWORD) );
else if (colors)
{
void *colorptr = (char *)dst + dst->bmiHeader.biSize;
unsigned int size;
if (coloruse == DIB_PAL_COLORS)
size = colors * sizeof(WORD);
else
size = colors * sizeof(RGBQUAD);
memcpy( colorptr, src_colors, size );
}
}
}
void fill_default_color_table( BITMAPINFO *info )
{
int i;
switch (info->bmiHeader.biBitCount)
{
case 1:
info->bmiColors[0].rgbRed = info->bmiColors[0].rgbGreen = info->bmiColors[0].rgbBlue = 0;
info->bmiColors[0].rgbReserved = 0;
info->bmiColors[1].rgbRed = info->bmiColors[1].rgbGreen = info->bmiColors[1].rgbBlue = 0xff;
info->bmiColors[1].rgbReserved = 0;
break;
case 4:
/* The EGA palette is the first and last 8 colours of the default palette
with the innermost pair swapped */
memcpy(info->bmiColors, DefLogPaletteQuads, 7 * sizeof(RGBQUAD));
memcpy(info->bmiColors + 7, DefLogPaletteQuads + 12, 1 * sizeof(RGBQUAD));
memcpy(info->bmiColors + 8, DefLogPaletteQuads + 7, 1 * sizeof(RGBQUAD));
memcpy(info->bmiColors + 9, DefLogPaletteQuads + 13, 7 * sizeof(RGBQUAD));
break;
case 8:
memcpy(info->bmiColors, DefLogPaletteQuads, 10 * sizeof(RGBQUAD));
memcpy(info->bmiColors + 246, DefLogPaletteQuads + 10, 10 * sizeof(RGBQUAD));
for (i = 10; i < 246; i++)
{
info->bmiColors[i].rgbRed = (i & 0x07) << 5;
info->bmiColors[i].rgbGreen = (i & 0x38) << 2;
info->bmiColors[i].rgbBlue = i & 0xc0;
info->bmiColors[i].rgbReserved = 0;
}
break;
default:
ERR("called with bitcount %d\n", info->bmiHeader.biBitCount);
}
info->bmiHeader.biClrUsed = 1 << info->bmiHeader.biBitCount;
}
void get_ddb_bitmapinfo( BITMAPOBJ *bmp, BITMAPINFO *info )
{
info->bmiHeader.biSize = sizeof(info->bmiHeader);
info->bmiHeader.biWidth = bmp->bitmap.bmWidth;
info->bmiHeader.biHeight = -bmp->bitmap.bmHeight;
info->bmiHeader.biPlanes = 1;
info->bmiHeader.biBitCount = bmp->bitmap.bmBitsPixel;
info->bmiHeader.biCompression = BI_RGB;
info->bmiHeader.biXPelsPerMeter = 0;
info->bmiHeader.biYPelsPerMeter = 0;
info->bmiHeader.biClrUsed = 0;
info->bmiHeader.biClrImportant = 0;
if (info->bmiHeader.biBitCount <= 8) fill_default_color_table( info );
}
BITMAPINFO *copy_packed_dib( const BITMAPINFO *src_info, UINT usage )
{
char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *ret, *info = (BITMAPINFO *)buffer;
int info_size, image_size;
if (!bitmapinfo_from_user_bitmapinfo( info, src_info, usage, FALSE )) return NULL;
info_size = bitmap_info_size( info, usage );
image_size = get_dib_image_size( info );
if ((ret = HeapAlloc( GetProcessHeap(), 0, info_size + image_size )))
{
memcpy( ret, info, info_size );
memcpy( (char *)ret + info_size, (char *)src_info + bitmap_info_size(src_info,usage), image_size );
}
return ret;
}
/******************************************************************************
* GetDIBits [GDI32.@]
*
* Retrieves bits of bitmap and copies to buffer.
*
* RETURNS
* Success: Number of scan lines copied from bitmap
* Failure: 0
*/
INT WINAPI GetDIBits(
HDC hdc, /* [in] Handle to device context */
HBITMAP hbitmap, /* [in] Handle to bitmap */
UINT startscan, /* [in] First scan line to set in dest bitmap */
UINT lines, /* [in] Number of scan lines to copy */
LPVOID bits, /* [out] Address of array for bitmap bits */
BITMAPINFO * info, /* [out] Address of structure with bitmap data */
UINT coloruse) /* [in] RGB or palette index */
{
DC * dc;
BITMAPOBJ * bmp;
int i, dst_to_src_offset, ret = 0;
DWORD err;
char dst_bmibuf[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *dst_info = (BITMAPINFO *)dst_bmibuf;
char src_bmibuf[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *src_info = (BITMAPINFO *)src_bmibuf;
const struct gdi_dc_funcs *funcs;
struct gdi_image_bits src_bits;
struct bitblt_coords src, dst;
BOOL empty_rect = FALSE;
/* Since info may be a BITMAPCOREINFO or any of the larger BITMAPINFO structures, we'll use our
own copy and transfer the colour info back at the end */
if (!bitmapinfoheader_from_user_bitmapinfo( &dst_info->bmiHeader, &info->bmiHeader )) return 0;
if (bits &&
(dst_info->bmiHeader.biCompression == BI_JPEG || dst_info->bmiHeader.biCompression == BI_PNG))
return 0;
dst_info->bmiHeader.biClrUsed = 0;
dst_info->bmiHeader.biClrImportant = 0;
if (!(dc = get_dc_ptr( hdc )))
{
SetLastError( ERROR_INVALID_PARAMETER );
return 0;
}
update_dc( dc );
if (!(bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP )))
{
release_dc_ptr( dc );
return 0;
}
funcs = get_bitmap_funcs( bmp );
src.visrect.left = 0;
src.visrect.top = 0;
src.visrect.right = bmp->bitmap.bmWidth;
src.visrect.bottom = bmp->bitmap.bmHeight;
dst.visrect.left = 0;
dst.visrect.top = 0;
dst.visrect.right = dst_info->bmiHeader.biWidth;
dst.visrect.bottom = abs( dst_info->bmiHeader.biHeight );
if (lines == 0 || startscan >= dst.visrect.bottom)
bits = NULL;
if (!bits && dst_info->bmiHeader.biBitCount == 0) /* query bitmap info only */
{
ret = fill_query_info( info, bmp );
goto done;
}
/* validate parameters */
if (dst_info->bmiHeader.biWidth <= 0) goto done;
if (dst_info->bmiHeader.biHeight == 0) goto done;
switch (dst_info->bmiHeader.biCompression)
{
case BI_RLE4:
if (dst_info->bmiHeader.biBitCount != 4) goto done;
if (dst_info->bmiHeader.biHeight < 0) goto done;
if (bits) goto done; /* can't retrieve compressed bits */
break;
case BI_RLE8:
if (dst_info->bmiHeader.biBitCount != 8) goto done;
if (dst_info->bmiHeader.biHeight < 0) goto done;
if (bits) goto done; /* can't retrieve compressed bits */
break;
case BI_BITFIELDS:
if (dst_info->bmiHeader.biBitCount != 16 && dst_info->bmiHeader.biBitCount != 32) goto done;
/* fall through */
case BI_RGB:
if (lines && !dst_info->bmiHeader.biPlanes) goto done;
if (dst_info->bmiHeader.biBitCount == 1) break;
if (dst_info->bmiHeader.biBitCount == 4) break;
if (dst_info->bmiHeader.biBitCount == 8) break;
if (dst_info->bmiHeader.biBitCount == 16) break;
if (dst_info->bmiHeader.biBitCount == 24) break;
if (dst_info->bmiHeader.biBitCount == 32) break;
/* fall through */
default:
goto done;
}
if (bits)
{
if (dst_info->bmiHeader.biHeight > 0)
{
dst_to_src_offset = -startscan;
lines = min( lines, dst.visrect.bottom - startscan );
if (lines < dst.visrect.bottom) dst.visrect.top = dst.visrect.bottom - lines;
}
else
{
dst_to_src_offset = dst.visrect.bottom - lines - startscan;
if (dst_to_src_offset < 0)
{
dst_to_src_offset = 0;
lines = dst.visrect.bottom - startscan;
}
if (lines < dst.visrect.bottom) dst.visrect.bottom = lines;
}
offset_rect( &dst.visrect, 0, dst_to_src_offset );
empty_rect = !intersect_rect( &src.visrect, &src.visrect, &dst.visrect );
dst.visrect = src.visrect;
offset_rect( &dst.visrect, 0, -dst_to_src_offset );
if (dst_info->bmiHeader.biHeight > 0)
{
if (dst.visrect.bottom < dst_info->bmiHeader.biHeight)
{
int pad_lines = min( dst_info->bmiHeader.biHeight - dst.visrect.bottom, lines );
int pad_bytes = pad_lines * get_dib_stride( dst_info->bmiHeader.biWidth, dst_info->bmiHeader.biBitCount );
memset( bits, 0, pad_bytes );
bits = (char *)bits + pad_bytes;
}
}
else
{
if (dst.visrect.bottom < lines)
{
int pad_lines = lines - dst.visrect.bottom;
int stride = get_dib_stride( dst_info->bmiHeader.biWidth, dst_info->bmiHeader.biBitCount );
int pad_bytes = pad_lines * stride;
memset( (char *)bits + dst.visrect.bottom * stride, 0, pad_bytes );
}
}
if (empty_rect) bits = NULL;
src.x = src.visrect.left;
src.y = src.visrect.top;
src.width = src.visrect.right - src.visrect.left;
src.height = src.visrect.bottom - src.visrect.top;
lines = src.height;
}
err = funcs->pGetImage( NULL, hbitmap, src_info, bits ? &src_bits : NULL, bits ? &src : NULL );
if (err) goto done;
/* fill out the src colour table, if it needs one */
if (src_info->bmiHeader.biBitCount <= 8 && src_info->bmiHeader.biClrUsed == 0)
fill_default_color_table( src_info );
/* if the src and dst are the same depth, copy the colour info across */
if (dst_info->bmiHeader.biBitCount == src_info->bmiHeader.biBitCount && coloruse == DIB_RGB_COLORS )
{
switch (src_info->bmiHeader.biBitCount)
{
case 16:
if (src_info->bmiHeader.biCompression == BI_RGB)
{
src_info->bmiHeader.biCompression = BI_BITFIELDS;
memcpy( src_info->bmiColors, bit_fields_555, sizeof(bit_fields_555) );
}
break;
case 32:
if (src_info->bmiHeader.biCompression == BI_RGB)
{
src_info->bmiHeader.biCompression = BI_BITFIELDS;
memcpy( src_info->bmiColors, bit_fields_888, sizeof(bit_fields_888) );
}
break;
}
src_info->bmiHeader.biSizeImage = get_dib_image_size( dst_info );
copy_color_info( dst_info, src_info, coloruse );
}
else if (dst_info->bmiHeader.biBitCount <= 8) /* otherwise construct a default colour table for the dst, if needed */
{
if( coloruse == DIB_PAL_COLORS )
{
if (!fill_color_table_from_palette( dst_info, hdc )) goto done;
}
else
{
fill_default_color_table( dst_info );
}
}
if (bits)
{
if(dst_info->bmiHeader.biHeight > 0)
dst_info->bmiHeader.biHeight = src.height;
else
dst_info->bmiHeader.biHeight = -src.height;
convert_bitmapinfo( src_info, src_bits.ptr, &src, dst_info, bits, FALSE );
if (src_bits.free) src_bits.free( &src_bits );
ret = lines;
}
else
ret = empty_rect ? FALSE : TRUE;
if (coloruse == DIB_PAL_COLORS)
{
WORD *index = (WORD *)dst_info->bmiColors;
int colors = get_dib_num_of_colors( dst_info );
for (i = 0; i < colors; i++, index++)
*index = i;
}
dst_info->bmiHeader.biClrUsed = 0;
copy_color_info( info, dst_info, coloruse );
done:
release_dc_ptr( dc );
GDI_ReleaseObj( hbitmap );
return ret;
}
/***********************************************************************
* CreateDIBitmap (GDI32.@)
*
* Creates a DDB (device dependent bitmap) from a DIB.
* The DDB will have the same color depth as the reference DC.
*/
HBITMAP WINAPI CreateDIBitmap( HDC hdc, const BITMAPINFOHEADER *header,
DWORD init, LPCVOID bits, const BITMAPINFO *data,
UINT coloruse )
{
BITMAPINFOHEADER info;
HBITMAP handle;
LONG height;
if (!bitmapinfoheader_from_user_bitmapinfo( &info, header )) return 0;
if (info.biCompression == BI_JPEG || info.biCompression == BI_PNG) return 0;
if (info.biWidth < 0) return 0;
/* Top-down DIBs have a negative height */
height = abs( info.biHeight );
TRACE("hdc=%p, header=%p, init=%u, bits=%p, data=%p, coloruse=%u (bitmap: width=%d, height=%d, bpp=%u, compr=%u)\n",
hdc, header, init, bits, data, coloruse, info.biWidth, info.biHeight,
info.biBitCount, info.biCompression);
if (hdc == NULL)
handle = CreateBitmap( info.biWidth, height, 1, 1, NULL );
else
handle = CreateCompatibleBitmap( hdc, info.biWidth, height );
if (handle)
{
if (init & CBM_INIT)
{
if (SetDIBits( hdc, handle, 0, height, bits, data, coloruse ) == 0)
{
DeleteObject( handle );
handle = 0;
}
}
}
return handle;
}
/***********************************************************************
* CreateDIBSection (GDI32.@)
*/
HBITMAP WINAPI CreateDIBSection(HDC hdc, CONST BITMAPINFO *bmi, UINT usage,
VOID **bits, HANDLE section, DWORD offset)
{
char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
BITMAPINFO *info = (BITMAPINFO *)buffer;
HBITMAP ret = 0;
DC *dc;
BOOL bDesktopDC = FALSE;
DIBSECTION *dib;
BITMAPOBJ *bmp;
RGBQUAD *color_table = NULL;
void *mapBits = NULL;
if (bits) *bits = NULL;
if (!bitmapinfo_from_user_bitmapinfo( info, bmi, usage, FALSE )) return 0;
if (info->bmiHeader.biPlanes != 1)
{
if (info->bmiHeader.biPlanes * info->bmiHeader.biBitCount > 16) return 0;
WARN( "%u planes not properly supported\n", info->bmiHeader.biPlanes );
}
if (!(dib = HeapAlloc( GetProcessHeap(), 0, sizeof(*dib) ))) return 0;
TRACE("format (%d,%d), planes %d, bpp %d, %s, size %d %s\n",
info->bmiHeader.biWidth, info->bmiHeader.biHeight,
info->bmiHeader.biPlanes, info->bmiHeader.biBitCount,
info->bmiHeader.biCompression == BI_BITFIELDS? "BI_BITFIELDS" : "BI_RGB",
info->bmiHeader.biSizeImage, usage == DIB_PAL_COLORS? "PAL" : "RGB");
dib->dsBm.bmType = 0;
dib->dsBm.bmWidth = info->bmiHeader.biWidth;
dib->dsBm.bmHeight = abs( info->bmiHeader.biHeight );
dib->dsBm.bmWidthBytes = get_dib_stride( info->bmiHeader.biWidth, info->bmiHeader.biBitCount );
dib->dsBm.bmPlanes = info->bmiHeader.biPlanes;
dib->dsBm.bmBitsPixel = info->bmiHeader.biBitCount;
dib->dsBm.bmBits = NULL;
dib->dsBmih = info->bmiHeader;
if (info->bmiHeader.biBitCount <= 8) /* build the color table */
{
if (usage == DIB_PAL_COLORS && !fill_color_table_from_pal_colors( info, hdc ))
goto error;
dib->dsBmih.biClrUsed = info->bmiHeader.biClrUsed;
if (!(color_table = HeapAlloc( GetProcessHeap(), 0, dib->dsBmih.biClrUsed * sizeof(RGBQUAD) )))
goto error;
memcpy( color_table, info->bmiColors, dib->dsBmih.biClrUsed * sizeof(RGBQUAD) );
}
/* set dsBitfields values */
if (info->bmiHeader.biBitCount == 16 && info->bmiHeader.biCompression == BI_RGB)
{
dib->dsBmih.biCompression = BI_BITFIELDS;
dib->dsBitfields[0] = 0x7c00;
dib->dsBitfields[1] = 0x03e0;
dib->dsBitfields[2] = 0x001f;
}
else if (info->bmiHeader.biCompression == BI_BITFIELDS)
{
if (usage == DIB_PAL_COLORS) goto error;
dib->dsBitfields[0] = *(const DWORD *)info->bmiColors;
dib->dsBitfields[1] = *((const DWORD *)info->bmiColors + 1);
dib->dsBitfields[2] = *((const DWORD *)info->bmiColors + 2);
if (!dib->dsBitfields[0] || !dib->dsBitfields[1] || !dib->dsBitfields[2]) goto error;
}
else dib->dsBitfields[0] = dib->dsBitfields[1] = dib->dsBitfields[2] = 0;
/* get storage location for DIB bits */
if (section)
{
SYSTEM_INFO SystemInfo;
DWORD mapOffset;
INT mapSize;
GetSystemInfo( &SystemInfo );
mapOffset = offset - (offset % SystemInfo.dwAllocationGranularity);
mapSize = dib->dsBmih.biSizeImage + (offset - mapOffset);
mapBits = MapViewOfFile( section, FILE_MAP_ALL_ACCESS, 0, mapOffset, mapSize );
if (mapBits) dib->dsBm.bmBits = (char *)mapBits + (offset - mapOffset);
}
else
{
offset = 0;
dib->dsBm.bmBits = VirtualAlloc( NULL, dib->dsBmih.biSizeImage,
MEM_RESERVE|MEM_COMMIT, PAGE_READWRITE );
}
dib->dshSection = section;
dib->dsOffset = offset;
if (!dib->dsBm.bmBits) goto error;
/* If the reference hdc is null, take the desktop dc */
if (hdc == 0)
{
hdc = CreateCompatibleDC(0);
bDesktopDC = TRUE;
}
if (!(dc = get_dc_ptr( hdc ))) goto error;
/* create Device Dependent Bitmap and add DIB pointer */
ret = CreateBitmap( dib->dsBm.bmWidth, dib->dsBm.bmHeight, 1,
(info->bmiHeader.biBitCount == 1) ? 1 : GetDeviceCaps(hdc, BITSPIXEL), NULL );
if (ret && ((bmp = GDI_GetObjPtr(ret, OBJ_BITMAP))))
{
PHYSDEV physdev = GET_DC_PHYSDEV( dc, pCreateDIBSection );
bmp->dib = dib;
bmp->funcs = physdev->funcs;
bmp->color_table = color_table;
GDI_ReleaseObj( ret );
if (!physdev->funcs->pCreateDIBSection( physdev, ret, info, usage ))
{
DeleteObject( ret );
ret = 0;
}
}
release_dc_ptr( dc );
if (bDesktopDC) DeleteDC( hdc );
if (ret && bits) *bits = dib->dsBm.bmBits;
return ret;
error:
if (bDesktopDC) DeleteDC( hdc );
if (section) UnmapViewOfFile( mapBits );
else if (!offset) VirtualFree( dib->dsBm.bmBits, 0, MEM_RELEASE );
HeapFree( GetProcessHeap(), 0, color_table );
HeapFree( GetProcessHeap(), 0, dib );
return 0;
}