dlls/gdi/mfdrv/bitblt.c

   1 /*
   2  * GDI bit-blit operations
   3  *
   4  * Copyright 1993, 1994  Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include <string.h>
  22
  23 #include "gdi.h"
  24 #include "mfdrv/metafiledrv.h"
  25 #include "wine/debug.h"
  26 #include "bitmap.h"
  27
  28 WINE_DEFAULT_DEBUG_CHANNEL(metafile);
  29
  30 /***********************************************************************
  31  *           MFDRV_PatBlt
  32  */
  33 BOOL MFDRV_PatBlt( PHYSDEV dev, INT left, INT top, INT width, INT height, DWORD rop )
  34 {
  35     MFDRV_MetaParam6( dev, META_PATBLT, left, top, width, height, HIWORD(rop), LOWORD(rop) );
  36     return TRUE;
  37 }
  38
  39
  40 /***********************************************************************
  41  *           MFDRV_BitBlt
  42  */
  43 BOOL MFDRV_BitBlt( PHYSDEV devDst, INT xDst, INT yDst, INT width, INT height,
  44                    PHYSDEV devSrc, INT xSrc, INT ySrc, DWORD rop )
  45 {
  46     return MFDRV_StretchBlt(devDst, xDst, yDst, width, height, devSrc,
  47                             xSrc, ySrc, width, height, rop);
  48 }
  49
  50
  51
  52 /***********************************************************************
  53  *           MFDRV_StretchBlt
  54  * this function contains TWO ways for procesing StretchBlt in metafiles,
  55  * decide between rdFunction values  META_STRETCHBLT or META_DIBSTRETCHBLT
  56  * via #define STRETCH_VIA_DIB
  57  */
  58 #define STRETCH_VIA_DIB
  59
  60 BOOL MFDRV_StretchBlt( PHYSDEV devDst, INT xDst, INT yDst, INT widthDst,
  61                        INT heightDst, PHYSDEV devSrc, INT xSrc, INT ySrc,
  62                        INT widthSrc, INT heightSrc, DWORD rop )
  63 {
  64     BOOL ret;
  65     DWORD len;
  66     METARECORD *mr;
  67     BITMAP BM;
  68     METAFILEDRV_PDEVICE *physDevSrc = (METAFILEDRV_PDEVICE *)devSrc;
  69     DC *dcSrc = physDevSrc->dc;
  70 #ifdef STRETCH_VIA_DIB
  71     LPBITMAPINFOHEADER lpBMI;
  72     WORD nBPP;
  73 #endif
  74     GetObjectA(dcSrc->hBitmap, sizeof(BITMAP), &BM);
  75 #ifdef STRETCH_VIA_DIB
  76     nBPP = BM.bmPlanes * BM.bmBitsPixel;
  77     if(nBPP > 8) nBPP = 24; /* FIXME Can't get 16bpp to work for some reason */
  78     len = sizeof(METARECORD) + 10 * sizeof(INT16)
  79             + sizeof(BITMAPINFOHEADER) + (nBPP <= 8 ? 1 << nBPP: 0) * sizeof(RGBQUAD)
  80               + DIB_GetDIBWidthBytes(BM.bmWidth, nBPP) * BM.bmHeight;
  81     if (!(mr = HeapAlloc( GetProcessHeap(), 0, len)))
  82         return FALSE;
  83     mr->rdFunction = META_DIBSTRETCHBLT;
  84     lpBMI=(LPBITMAPINFOHEADER)(mr->rdParm+10);
  85     lpBMI->biSize      = sizeof(BITMAPINFOHEADER);
  86     lpBMI->biWidth     = BM.bmWidth;
  87     lpBMI->biHeight    = BM.bmHeight;
  88     lpBMI->biPlanes    = 1;
  89     lpBMI->biBitCount  = nBPP;
  90     lpBMI->biSizeImage = DIB_GetDIBWidthBytes(BM.bmWidth, nBPP) * lpBMI->biHeight;
  91     lpBMI->biClrUsed   = nBPP <= 8 ? 1 << nBPP : 0;
  92     lpBMI->biCompression = BI_RGB;
  93     lpBMI->biXPelsPerMeter = MulDiv(GetDeviceCaps(dcSrc->hSelf,LOGPIXELSX),3937,100);
  94     lpBMI->biYPelsPerMeter = MulDiv(GetDeviceCaps(dcSrc->hSelf,LOGPIXELSY),3937,100);
  95     lpBMI->biClrImportant  = 0;                          /* 1 meter  = 39.37 inch */
  96
  97     TRACE("MF_StretchBltViaDIB->len = %ld  rop=%lx  PixYPM=%ld Caps=%d\n",
  98           len,rop,lpBMI->biYPelsPerMeter,GetDeviceCaps(dcSrc->hSelf,
  99                                                        LOGPIXELSY));
 100     if (GetDIBits(dcSrc->hSelf,dcSrc->hBitmap,0,(UINT)lpBMI->biHeight,
 101                   (LPSTR)lpBMI + DIB_BitmapInfoSize( (BITMAPINFO *)lpBMI,
 102                                                      DIB_RGB_COLORS ),
 103                   (LPBITMAPINFO)lpBMI, DIB_RGB_COLORS))
 104 #else
 105     len = sizeof(METARECORD) + 15 * sizeof(INT16) + BM.bmWidthBytes * BM.bmHeight;
 106     if (!(mr = HeapAlloc( GetProcessHeap(), 0, len )))
 107         return FALSE;
 108     mr->rdFunction = META_STRETCHBLT;
 109     *(mr->rdParm +10) = BM.bmWidth;
 110     *(mr->rdParm +11) = BM.bmHeight;
 111     *(mr->rdParm +12) = BM.bmWidthBytes;
 112     *(mr->rdParm +13) = BM.bmPlanes;
 113     *(mr->rdParm +14) = BM.bmBitsPixel;
 114     TRACE("len = %ld  rop=%lx  \n",len,rop);
 115     if (GetBitmapBits( dcSrc->hBitmap, BM.bmWidthBytes * BM.bmHeight,
 116                          mr->rdParm +15))
 117 #endif
 118     {
 119       mr->rdSize = len / sizeof(INT16);
 120       *(mr->rdParm) = LOWORD(rop);
 121       *(mr->rdParm + 1) = HIWORD(rop);
 122       *(mr->rdParm + 2) = heightSrc;
 123       *(mr->rdParm + 3) = widthSrc;
 124       *(mr->rdParm + 4) = ySrc;
 125       *(mr->rdParm + 5) = xSrc;
 126       *(mr->rdParm + 6) = heightDst;
 127       *(mr->rdParm + 7) = widthDst;
 128       *(mr->rdParm + 8) = yDst;
 129       *(mr->rdParm + 9) = xDst;
 130       ret = MFDRV_WriteRecord( devDst, mr, mr->rdSize * 2);
 131     }
 132     else
 133         ret = FALSE;
 134     HeapFree( GetProcessHeap(), 0, mr);
 135     return ret;
 136 }
 137
 138
 139 /***********************************************************************
 140  *           MFDRV_StretchDIBits
 141  */
 142 INT MFDRV_StretchDIBits( PHYSDEV dev, INT xDst, INT yDst, INT widthDst,
 143                          INT heightDst, INT xSrc, INT ySrc, INT widthSrc,
 144                          INT heightSrc, const void *bits,
 145                          const BITMAPINFO *info, UINT wUsage, DWORD dwRop )
 146 {
 147     DWORD len, infosize, imagesize;
 148     METARECORD *mr;
 149
 150     infosize = DIB_BitmapInfoSize(info, wUsage);
 151     imagesize = DIB_GetDIBImageBytes( info->bmiHeader.biWidth,
 152                                       info->bmiHeader.biHeight,
 153                                       info->bmiHeader.biBitCount );
 154
 155     len = sizeof(METARECORD) + 10 * sizeof(WORD) + infosize + imagesize;
 156     mr = (METARECORD *)HeapAlloc( GetProcessHeap(), 0, len );
 157     if(!mr) return 0;
 158
 159     mr->rdSize = len / 2;
 160     mr->rdFunction = META_STRETCHDIB;
 161     mr->rdParm[0] = LOWORD(dwRop);
 162     mr->rdParm[1] = HIWORD(dwRop);
 163     mr->rdParm[2] = wUsage;
 164     mr->rdParm[3] = (INT16)heightSrc;
 165     mr->rdParm[4] = (INT16)widthSrc;
 166     mr->rdParm[5] = (INT16)ySrc;
 167     mr->rdParm[6] = (INT16)xSrc;
 168     mr->rdParm[7] = (INT16)heightDst;
 169     mr->rdParm[8] = (INT16)widthDst;
 170     mr->rdParm[9] = (INT16)yDst;
 171     mr->rdParm[10] = (INT16)xDst;
 172     memcpy(mr->rdParm + 11, info, infosize);
 173     memcpy(mr->rdParm + 11 + infosize / 2, bits, imagesize);
 174     MFDRV_WriteRecord( dev, mr, mr->rdSize * 2 );
 175     HeapFree( GetProcessHeap(), 0, mr );
 176     return heightSrc;
 177 }
 178
 179
 180 /***********************************************************************
 181  *           MFDRV_SetDIBitsToDeivce
 182  */
 183 INT MFDRV_SetDIBitsToDevice( PHYSDEV dev, INT xDst, INT yDst, DWORD cx,
 184                              DWORD cy, INT xSrc, INT ySrc, UINT startscan,
 185                              UINT lines, LPCVOID bits, const BITMAPINFO *info,
 186                              UINT coloruse )
 187
 188 {
 189     DWORD len, infosize, imagesize;
 190     METARECORD *mr;
 191
 192     infosize = DIB_BitmapInfoSize(info, coloruse);
 193     imagesize = DIB_GetDIBImageBytes( info->bmiHeader.biWidth,
 194                                       info->bmiHeader.biHeight,
 195                                       info->bmiHeader.biBitCount );
 196
 197     len = sizeof(METARECORD) + 8 * sizeof(WORD) + infosize + imagesize;
 198     mr = (METARECORD *)HeapAlloc( GetProcessHeap(), 0, len );
 199     if(!mr) return 0;
 200
 201     mr->rdSize = len / 2;
 202     mr->rdFunction = META_SETDIBTODEV;
 203     mr->rdParm[0] = coloruse;
 204     mr->rdParm[1] = lines;
 205     mr->rdParm[2] = startscan;
 206     mr->rdParm[3] = (INT16)ySrc;
 207     mr->rdParm[4] = (INT16)xSrc;
 208     mr->rdParm[5] = (INT16)cy;
 209     mr->rdParm[6] = (INT16)cx;
 210     mr->rdParm[7] = (INT16)yDst;
 211     mr->rdParm[8] = (INT16)xDst;
 212     memcpy(mr->rdParm + 9, info, infosize);
 213     memcpy(mr->rdParm + 9 + infosize / 2, bits, imagesize);
 214     MFDRV_WriteRecord( dev, mr, mr->rdSize * 2 );
 215     HeapFree( GetProcessHeap(), 0, mr );
 216     return lines;
 217 }