dlls/gdi32/enhmfdrv/bitblt.c - wine - Git at Google

 /*
  * Enhanced MetaFile driver BitBlt functions
  *
  * Copyright 2002 Huw D M Davies for CodeWeavers
  *
  * 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
  */

 #include <stdarg.h>
 #include <string.h>

 #include "windef.h"
 #include "winbase.h"
 #include "wingdi.h"
 #include "enhmetafiledrv.h"
 #include "wine/debug.h"

 BOOL EMFDRV_PatBlt( PHYSDEV dev, struct bitblt_coords *dst, DWORD rop )
 {
     EMRBITBLT emr;
     BOOL ret;

     emr.emr.iType = EMR_BITBLT;
     emr.emr.nSize = sizeof(emr);
     emr.rclBounds.left = dst->log_x;
     emr.rclBounds.top = dst->log_y;
     emr.rclBounds.right = dst->log_x + dst->log_width - 1;
     emr.rclBounds.bottom = dst->log_y + dst->log_height - 1;
     emr.xDest = dst->log_x;
     emr.yDest = dst->log_y;
     emr.cxDest = dst->log_width;
     emr.cyDest = dst->log_height;
     emr.dwRop = rop;
     emr.xSrc = 0;
     emr.ySrc = 0;
     emr.xformSrc.eM11 = 1.0;
     emr.xformSrc.eM12 = 0.0;
     emr.xformSrc.eM21 = 0.0;
     emr.xformSrc.eM22 = 1.0;
     emr.xformSrc.eDx = 0.0;
     emr.xformSrc.eDy = 0.0;
     emr.crBkColorSrc = 0;
     emr.iUsageSrc = 0;
     emr.offBmiSrc = 0;
     emr.cbBmiSrc = 0;
     emr.offBitsSrc = 0;
     emr.cbBitsSrc = 0;

     ret = EMFDRV_WriteRecord( dev, &emr.emr );
     if(ret)
         EMFDRV_UpdateBBox( dev, &emr.rclBounds );
     return ret;
 }

 BOOL EMFDRV_StretchBlt( PHYSDEV devDst, struct bitblt_coords *dst,
                         PHYSDEV devSrc, struct bitblt_coords *src, DWORD rop )
 {
     BOOL ret;
     PEMRBITBLT pEMR;
     UINT emrSize;
     UINT bmiSize;
     UINT bitsSize;
     UINT size;
     BITMAP  BM;
     WORD nBPP = 0;
     LPBITMAPINFOHEADER lpBmiH;
     HBITMAP hBitmap = NULL;
     DWORD emrType;

     if (devSrc->funcs == devDst->funcs) return FALSE;  /* can't use a metafile DC as source */

     if (src->log_width == dst->log_width && src->log_height == dst->log_height)
     {
         emrType = EMR_BITBLT;
         emrSize = sizeof(EMRBITBLT);
     }
     else
     {
         emrType = EMR_STRETCHBLT;
         emrSize = sizeof(EMRSTRETCHBLT);
     }

     hBitmap = GetCurrentObject(devSrc->hdc, OBJ_BITMAP);

     if(sizeof(BITMAP) != GetObjectW(hBitmap, sizeof(BITMAP), &BM))
         return FALSE;

     nBPP = BM.bmPlanes * BM.bmBitsPixel;
     if(nBPP > 8) nBPP = 24; /* FIXME Can't get 16bpp to work for some reason */
     bitsSize = get_dib_stride( BM.bmWidth, nBPP ) * BM.bmHeight;
     bmiSize = sizeof(BITMAPINFOHEADER) +
         (nBPP <= 8 ? 1 << nBPP : 0) * sizeof(RGBQUAD);

    size = emrSize + bmiSize + bitsSize;

     pEMR = HeapAlloc(GetProcessHeap(), 0, size);
     if (!pEMR) return FALSE;

     /* Initialize EMR */
     pEMR->emr.iType = emrType;
     pEMR->emr.nSize = size;
     pEMR->rclBounds.left = dst->log_x;
     pEMR->rclBounds.top = dst->log_y;
     pEMR->rclBounds.right = dst->log_x + dst->log_width - 1;
     pEMR->rclBounds.bottom = dst->log_y + dst->log_height - 1;
     pEMR->xDest = dst->log_x;
     pEMR->yDest = dst->log_y;
     pEMR->cxDest = dst->log_width;
     pEMR->cyDest = dst->log_height;
     pEMR->dwRop = rop;
     pEMR->xSrc = src->log_x;
     pEMR->ySrc = src->log_y;
     GetWorldTransform(devSrc->hdc, &pEMR->xformSrc);
     pEMR->crBkColorSrc = GetBkColor(devSrc->hdc);
     pEMR->iUsageSrc = DIB_RGB_COLORS;
     pEMR->offBmiSrc = emrSize;
     pEMR->offBitsSrc = emrSize + bmiSize;
     pEMR->cbBmiSrc = bmiSize;
     pEMR->cbBitsSrc = bitsSize;
     if (emrType == EMR_STRETCHBLT)
     {
         PEMRSTRETCHBLT pEMRStretch = (PEMRSTRETCHBLT)pEMR;
         pEMRStretch->cxSrc = src->log_width;
         pEMRStretch->cySrc = src->log_height;
     }

     /* Initialize BITMAPINFO structure */
     lpBmiH = (LPBITMAPINFOHEADER)((BYTE*)pEMR + pEMR->offBmiSrc);

     lpBmiH->biSize = sizeof(BITMAPINFOHEADER);
     lpBmiH->biWidth =  BM.bmWidth;
     lpBmiH->biHeight = BM.bmHeight;
     lpBmiH->biPlanes = BM.bmPlanes;
     lpBmiH->biBitCount = nBPP;
     /* Assume the bitmap isn't compressed and set the BI_RGB flag. */
     lpBmiH->biCompression = BI_RGB;
     lpBmiH->biSizeImage = bitsSize;
     lpBmiH->biYPelsPerMeter = 0;
     lpBmiH->biXPelsPerMeter = 0;
     lpBmiH->biClrUsed   = nBPP <= 8 ? 1 << nBPP : 0;
     /* Set biClrImportant to 0, indicating that all of the
        device colors are important. */
     lpBmiH->biClrImportant = 0;

     /* Initialize bitmap bits */
     if (GetDIBits(devSrc->hdc, hBitmap, 0, (UINT)lpBmiH->biHeight,
                   (BYTE*)pEMR + pEMR->offBitsSrc,
                   (LPBITMAPINFO)lpBmiH, DIB_RGB_COLORS))
     {
         ret = EMFDRV_WriteRecord(devDst, (EMR*)pEMR);
         if (ret) EMFDRV_UpdateBBox(devDst, &(pEMR->rclBounds));
     }
     else
         ret = FALSE;

     HeapFree( GetProcessHeap(), 0, pEMR);
     return ret;
 }

 INT EMFDRV_StretchDIBits( PHYSDEV dev, INT xDst, INT yDst, INT widthDst, INT heightDst,
                           INT xSrc, INT ySrc, INT widthSrc, INT heightSrc, const void *bits,
                           BITMAPINFO *info, UINT wUsage, DWORD dwRop )
 {
     EMRSTRETCHDIBITS *emr;
     BOOL ret;
     UINT bmi_size, emr_size;

     /* calculate the size of the colour table */
     bmi_size = get_dib_info_size(info, wUsage);

     emr_size = sizeof (EMRSTRETCHDIBITS) + bmi_size + info->bmiHeader.biSizeImage;
     emr = HeapAlloc(GetProcessHeap(), 0, emr_size );
     if (!emr) return 0;

     /* write a bitmap info header (with colours) to the record */
     memcpy( &emr[1], info, bmi_size);

     /* write bitmap bits to the record */
     memcpy ( ( (BYTE *) (&emr[1]) ) + bmi_size, bits, info->bmiHeader.biSizeImage);

     /* fill in the EMR header at the front of our piece of memory */
     emr->emr.iType = EMR_STRETCHDIBITS;
     emr->emr.nSize = emr_size;

     emr->xDest     = xDst;
     emr->yDest     = yDst;
     emr->cxDest    = widthDst;
     emr->cyDest    = heightDst;
     emr->dwRop     = dwRop;
     emr->xSrc      = xSrc; /* FIXME: only save the piece of the bitmap needed */
     emr->ySrc      = ySrc;

     emr->iUsageSrc    = wUsage;
     emr->offBmiSrc    = sizeof (EMRSTRETCHDIBITS);
     emr->cbBmiSrc     = bmi_size;
     emr->offBitsSrc   = emr->offBmiSrc + bmi_size;
     emr->cbBitsSrc    = info->bmiHeader.biSizeImage;

     emr->cxSrc = widthSrc;
     emr->cySrc = heightSrc;

     emr->rclBounds.left   = xDst;
     emr->rclBounds.top    = yDst;
     emr->rclBounds.right  = xDst + widthDst;
     emr->rclBounds.bottom = yDst + heightDst;

     /* save the record we just created */
     ret = EMFDRV_WriteRecord( dev, &emr->emr );
     if(ret)
         EMFDRV_UpdateBBox( dev, &emr->rclBounds );

     HeapFree(GetProcessHeap(), 0, emr);

     return ret ? heightSrc : GDI_ERROR;
 }

 INT EMFDRV_SetDIBitsToDevice( PHYSDEV dev, INT xDst, INT yDst, DWORD width, DWORD height,
                               INT xSrc, INT ySrc, UINT startscan, UINT lines,
                               LPCVOID bits, BITMAPINFO *info, UINT wUsage )
 {
     EMRSETDIBITSTODEVICE* pEMR;
     DWORD bmiSize = get_dib_info_size(info, wUsage);
     DWORD size = sizeof(EMRSETDIBITSTODEVICE) + bmiSize + info->bmiHeader.biSizeImage;

     pEMR = HeapAlloc(GetProcessHeap(), 0, size);
     if (!pEMR) return 0;

     pEMR->emr.iType = EMR_SETDIBITSTODEVICE;
     pEMR->emr.nSize = size;
     pEMR->rclBounds.left = xDst;
     pEMR->rclBounds.top = yDst;
     pEMR->rclBounds.right = xDst + width - 1;
     pEMR->rclBounds.bottom = yDst + height - 1;
     pEMR->xDest = xDst;
     pEMR->yDest = yDst;
     pEMR->xSrc = xSrc;
     pEMR->ySrc = ySrc;
     pEMR->cxSrc = width;
     pEMR->cySrc = height;
     pEMR->offBmiSrc = sizeof(EMRSETDIBITSTODEVICE);
     pEMR->cbBmiSrc = bmiSize;
     pEMR->offBitsSrc = sizeof(EMRSETDIBITSTODEVICE) + bmiSize;
     pEMR->cbBitsSrc = info->bmiHeader.biSizeImage;
     pEMR->iUsageSrc = wUsage;
     pEMR->iStartScan = startscan;
     pEMR->cScans = lines;
     memcpy((BYTE*)pEMR + pEMR->offBmiSrc, info, bmiSize);
     memcpy((BYTE*)pEMR + pEMR->offBitsSrc, bits, info->bmiHeader.biSizeImage);

     if (EMFDRV_WriteRecord(dev, (EMR*)pEMR))
         EMFDRV_UpdateBBox(dev, &(pEMR->rclBounds));

     HeapFree( GetProcessHeap(), 0, pEMR);
     return lines;
 }
	/*
	* Enhanced MetaFile driver BitBlt functions
	*
	* Copyright 2002 Huw D M Davies for CodeWeavers
	*
	* 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
	*/

	#include <stdarg.h>
	#include <string.h>

	#include "windef.h"
	#include "winbase.h"
	#include "wingdi.h"
	#include "enhmetafiledrv.h"
	#include "wine/debug.h"

	BOOL EMFDRV_PatBlt( PHYSDEV dev, struct bitblt_coords *dst, DWORD rop )
	{
	EMRBITBLT emr;
	BOOL ret;

	emr.emr.iType = EMR_BITBLT;
	emr.emr.nSize = sizeof(emr);
	emr.rclBounds.left = dst->log_x;
	emr.rclBounds.top = dst->log_y;
	emr.rclBounds.right = dst->log_x + dst->log_width - 1;
	emr.rclBounds.bottom = dst->log_y + dst->log_height - 1;
	emr.xDest = dst->log_x;
	emr.yDest = dst->log_y;
	emr.cxDest = dst->log_width;
	emr.cyDest = dst->log_height;
	emr.dwRop = rop;
	emr.xSrc = 0;
	emr.ySrc = 0;
	emr.xformSrc.eM11 = 1.0;
	emr.xformSrc.eM12 = 0.0;
	emr.xformSrc.eM21 = 0.0;
	emr.xformSrc.eM22 = 1.0;
	emr.xformSrc.eDx = 0.0;
	emr.xformSrc.eDy = 0.0;
	emr.crBkColorSrc = 0;
	emr.iUsageSrc = 0;
	emr.offBmiSrc = 0;
	emr.cbBmiSrc = 0;
	emr.offBitsSrc = 0;
	emr.cbBitsSrc = 0;

	ret = EMFDRV_WriteRecord( dev, &emr.emr );
	if(ret)
	EMFDRV_UpdateBBox( dev, &emr.rclBounds );
	return ret;
	}

	BOOL EMFDRV_StretchBlt( PHYSDEV devDst, struct bitblt_coords *dst,
	PHYSDEV devSrc, struct bitblt_coords *src, DWORD rop )
	{
	BOOL ret;
	PEMRBITBLT pEMR;
	UINT emrSize;
	UINT bmiSize;
	UINT bitsSize;
	UINT size;
	BITMAP BM;
	WORD nBPP = 0;
	LPBITMAPINFOHEADER lpBmiH;
	HBITMAP hBitmap = NULL;
	DWORD emrType;

	if (devSrc->funcs == devDst->funcs) return FALSE; /* can't use a metafile DC as source */

	if (src->log_width == dst->log_width && src->log_height == dst->log_height)
	{
	emrType = EMR_BITBLT;
	emrSize = sizeof(EMRBITBLT);
	}
	else
	{
	emrType = EMR_STRETCHBLT;
	emrSize = sizeof(EMRSTRETCHBLT);
	}

	hBitmap = GetCurrentObject(devSrc->hdc, OBJ_BITMAP);

	if(sizeof(BITMAP) != GetObjectW(hBitmap, sizeof(BITMAP), &BM))
	return FALSE;

	nBPP = BM.bmPlanes * BM.bmBitsPixel;
	if(nBPP > 8) nBPP = 24; /* FIXME Can't get 16bpp to work for some reason */
	bitsSize = get_dib_stride( BM.bmWidth, nBPP ) * BM.bmHeight;
	bmiSize = sizeof(BITMAPINFOHEADER) +
	(nBPP <= 8 ? 1 << nBPP : 0) * sizeof(RGBQUAD);

	size = emrSize + bmiSize + bitsSize;

	pEMR = HeapAlloc(GetProcessHeap(), 0, size);
	if (!pEMR) return FALSE;

	/* Initialize EMR */
	pEMR->emr.iType = emrType;
	pEMR->emr.nSize = size;
	pEMR->rclBounds.left = dst->log_x;
	pEMR->rclBounds.top = dst->log_y;
	pEMR->rclBounds.right = dst->log_x + dst->log_width - 1;
	pEMR->rclBounds.bottom = dst->log_y + dst->log_height - 1;
	pEMR->xDest = dst->log_x;
	pEMR->yDest = dst->log_y;
	pEMR->cxDest = dst->log_width;
	pEMR->cyDest = dst->log_height;
	pEMR->dwRop = rop;
	pEMR->xSrc = src->log_x;
	pEMR->ySrc = src->log_y;
	GetWorldTransform(devSrc->hdc, &pEMR->xformSrc);
	pEMR->crBkColorSrc = GetBkColor(devSrc->hdc);
	pEMR->iUsageSrc = DIB_RGB_COLORS;
	pEMR->offBmiSrc = emrSize;
	pEMR->offBitsSrc = emrSize + bmiSize;
	pEMR->cbBmiSrc = bmiSize;
	pEMR->cbBitsSrc = bitsSize;
	if (emrType == EMR_STRETCHBLT)
	{
	PEMRSTRETCHBLT pEMRStretch = (PEMRSTRETCHBLT)pEMR;
	pEMRStretch->cxSrc = src->log_width;
	pEMRStretch->cySrc = src->log_height;
	}

	/* Initialize BITMAPINFO structure */
	lpBmiH = (LPBITMAPINFOHEADER)((BYTE*)pEMR + pEMR->offBmiSrc);

	lpBmiH->biSize = sizeof(BITMAPINFOHEADER);
	lpBmiH->biWidth = BM.bmWidth;
	lpBmiH->biHeight = BM.bmHeight;
	lpBmiH->biPlanes = BM.bmPlanes;
	lpBmiH->biBitCount = nBPP;
	/* Assume the bitmap isn't compressed and set the BI_RGB flag. */
	lpBmiH->biCompression = BI_RGB;
	lpBmiH->biSizeImage = bitsSize;
	lpBmiH->biYPelsPerMeter = 0;
	lpBmiH->biXPelsPerMeter = 0;
	lpBmiH->biClrUsed = nBPP <= 8 ? 1 << nBPP : 0;
	/* Set biClrImportant to 0, indicating that all of the
	device colors are important. */
	lpBmiH->biClrImportant = 0;

	/* Initialize bitmap bits */
	if (GetDIBits(devSrc->hdc, hBitmap, 0, (UINT)lpBmiH->biHeight,
	(BYTE*)pEMR + pEMR->offBitsSrc,
	(LPBITMAPINFO)lpBmiH, DIB_RGB_COLORS))
	{
	ret = EMFDRV_WriteRecord(devDst, (EMR*)pEMR);
	if (ret) EMFDRV_UpdateBBox(devDst, &(pEMR->rclBounds));
	}
	else
	ret = FALSE;

	HeapFree( GetProcessHeap(), 0, pEMR);
	return ret;
	}

	INT EMFDRV_StretchDIBits( PHYSDEV dev, INT xDst, INT yDst, INT widthDst, INT heightDst,
	INT xSrc, INT ySrc, INT widthSrc, INT heightSrc, const void *bits,
	BITMAPINFO *info, UINT wUsage, DWORD dwRop )
	{
	EMRSTRETCHDIBITS *emr;
	BOOL ret;
	UINT bmi_size, emr_size;

	/* calculate the size of the colour table */
	bmi_size = get_dib_info_size(info, wUsage);

	emr_size = sizeof (EMRSTRETCHDIBITS) + bmi_size + info->bmiHeader.biSizeImage;
	emr = HeapAlloc(GetProcessHeap(), 0, emr_size );
	if (!emr) return 0;

	/* write a bitmap info header (with colours) to the record */
	memcpy( &emr[1], info, bmi_size);

	/* write bitmap bits to the record */
	memcpy ( ( (BYTE *) (&emr[1]) ) + bmi_size, bits, info->bmiHeader.biSizeImage);

	/* fill in the EMR header at the front of our piece of memory */
	emr->emr.iType = EMR_STRETCHDIBITS;
	emr->emr.nSize = emr_size;

	emr->xDest = xDst;
	emr->yDest = yDst;
	emr->cxDest = widthDst;
	emr->cyDest = heightDst;
	emr->dwRop = dwRop;
	emr->xSrc = xSrc; /* FIXME: only save the piece of the bitmap needed */
	emr->ySrc = ySrc;

	emr->iUsageSrc = wUsage;
	emr->offBmiSrc = sizeof (EMRSTRETCHDIBITS);
	emr->cbBmiSrc = bmi_size;
	emr->offBitsSrc = emr->offBmiSrc + bmi_size;
	emr->cbBitsSrc = info->bmiHeader.biSizeImage;

	emr->cxSrc = widthSrc;
	emr->cySrc = heightSrc;

	emr->rclBounds.left = xDst;
	emr->rclBounds.top = yDst;
	emr->rclBounds.right = xDst + widthDst;
	emr->rclBounds.bottom = yDst + heightDst;

	/* save the record we just created */
	ret = EMFDRV_WriteRecord( dev, &emr->emr );
	if(ret)
	EMFDRV_UpdateBBox( dev, &emr->rclBounds );

	HeapFree(GetProcessHeap(), 0, emr);

	return ret ? heightSrc : GDI_ERROR;
	}

	INT EMFDRV_SetDIBitsToDevice( PHYSDEV dev, INT xDst, INT yDst, DWORD width, DWORD height,
	INT xSrc, INT ySrc, UINT startscan, UINT lines,
	LPCVOID bits, BITMAPINFO *info, UINT wUsage )
	{
	EMRSETDIBITSTODEVICE* pEMR;
	DWORD bmiSize = get_dib_info_size(info, wUsage);
	DWORD size = sizeof(EMRSETDIBITSTODEVICE) + bmiSize + info->bmiHeader.biSizeImage;

	pEMR = HeapAlloc(GetProcessHeap(), 0, size);
	if (!pEMR) return 0;

	pEMR->emr.iType = EMR_SETDIBITSTODEVICE;
	pEMR->emr.nSize = size;
	pEMR->rclBounds.left = xDst;
	pEMR->rclBounds.top = yDst;
	pEMR->rclBounds.right = xDst + width - 1;
	pEMR->rclBounds.bottom = yDst + height - 1;
	pEMR->xDest = xDst;
	pEMR->yDest = yDst;
	pEMR->xSrc = xSrc;
	pEMR->ySrc = ySrc;
	pEMR->cxSrc = width;
	pEMR->cySrc = height;
	pEMR->offBmiSrc = sizeof(EMRSETDIBITSTODEVICE);
	pEMR->cbBmiSrc = bmiSize;
	pEMR->offBitsSrc = sizeof(EMRSETDIBITSTODEVICE) + bmiSize;
	pEMR->cbBitsSrc = info->bmiHeader.biSizeImage;
	pEMR->iUsageSrc = wUsage;
	pEMR->iStartScan = startscan;
	pEMR->cScans = lines;
	memcpy((BYTE*)pEMR + pEMR->offBmiSrc, info, bmiSize);
	memcpy((BYTE*)pEMR + pEMR->offBitsSrc, bits, info->bmiHeader.biSizeImage);

	if (EMFDRV_WriteRecord(dev, (EMR*)pEMR))
	EMFDRV_UpdateBBox(dev, &(pEMR->rclBounds));

	HeapFree( GetProcessHeap(), 0, pEMR);
	return lines;
	}