advapi32: Add stub for EnableTrace.
[wine] / dlls / gdi32 / 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include <string.h>
22
23 #include "mfdrv/metafiledrv.h"
24 #include "wine/debug.h"
25
26 WINE_DEFAULT_DEBUG_CHANNEL(metafile);
27
28 /***********************************************************************
29  *           MFDRV_PatBlt
30  */
31 BOOL  CDECL MFDRV_PatBlt( PHYSDEV dev, INT left, INT top, INT width, INT height, DWORD rop )
32 {
33     MFDRV_MetaParam6( dev, META_PATBLT, left, top, width, height, HIWORD(rop), LOWORD(rop) );
34     return TRUE;
35 }
36
37
38 /***********************************************************************
39  *           MFDRV_StretchBlt
40  * this function contains TWO ways for processing StretchBlt in metafiles,
41  * decide between rdFunction values  META_STRETCHBLT or META_DIBSTRETCHBLT
42  * via #define STRETCH_VIA_DIB
43  */
44 #define STRETCH_VIA_DIB
45
46 BOOL  CDECL MFDRV_StretchBlt( PHYSDEV devDst, INT xDst, INT yDst, INT widthDst,
47                               INT heightDst, PHYSDEV devSrc, INT xSrc, INT ySrc,
48                               INT widthSrc, INT heightSrc, DWORD rop )
49 {
50     BOOL ret;
51     DWORD len;
52     METARECORD *mr;
53     BITMAP BM;
54     METAFILEDRV_PDEVICE *physDevSrc = (METAFILEDRV_PDEVICE *)devSrc;
55 #ifdef STRETCH_VIA_DIB
56     LPBITMAPINFOHEADER lpBMI;
57     WORD nBPP;
58 #endif
59     HBITMAP hBitmap = GetCurrentObject(physDevSrc->hdc, OBJ_BITMAP);
60
61     if (GetObjectW(hBitmap, sizeof(BITMAP), &BM) != sizeof(BITMAP))
62     {
63         WARN("bad bitmap object %p passed for hdc %p\n", hBitmap, physDevSrc->hdc);
64         return FALSE;
65     }
66 #ifdef STRETCH_VIA_DIB
67     nBPP = BM.bmPlanes * BM.bmBitsPixel;
68     if(nBPP > 8) nBPP = 24; /* FIXME Can't get 16bpp to work for some reason */
69     len = sizeof(METARECORD) + 10 * sizeof(INT16)
70             + sizeof(BITMAPINFOHEADER) + (nBPP <= 8 ? 1 << nBPP: 0) * sizeof(RGBQUAD)
71               + DIB_GetDIBWidthBytes(BM.bmWidth, nBPP) * BM.bmHeight;
72     if (!(mr = HeapAlloc( GetProcessHeap(), 0, len)))
73         return FALSE;
74     mr->rdFunction = META_DIBSTRETCHBLT;
75     lpBMI=(LPBITMAPINFOHEADER)(mr->rdParm+10);
76     lpBMI->biSize      = sizeof(BITMAPINFOHEADER);
77     lpBMI->biWidth     = BM.bmWidth;
78     lpBMI->biHeight    = BM.bmHeight;
79     lpBMI->biPlanes    = 1;
80     lpBMI->biBitCount  = nBPP;
81     lpBMI->biSizeImage = DIB_GetDIBWidthBytes(BM.bmWidth, nBPP) * lpBMI->biHeight;
82     lpBMI->biClrUsed   = nBPP <= 8 ? 1 << nBPP : 0;
83     lpBMI->biCompression = BI_RGB;
84     lpBMI->biXPelsPerMeter = MulDiv(GetDeviceCaps(physDevSrc->hdc,LOGPIXELSX),3937,100);
85     lpBMI->biYPelsPerMeter = MulDiv(GetDeviceCaps(physDevSrc->hdc,LOGPIXELSY),3937,100);
86     lpBMI->biClrImportant  = 0;                          /* 1 meter  = 39.37 inch */
87
88     TRACE("MF_StretchBltViaDIB->len = %d  rop=%x  PixYPM=%d Caps=%d\n",
89           len,rop,lpBMI->biYPelsPerMeter,GetDeviceCaps(physDevSrc->hdc, LOGPIXELSY));
90
91     if (GetDIBits(physDevSrc->hdc, hBitmap, 0, (UINT)lpBMI->biHeight,
92                   (LPSTR)lpBMI + bitmap_info_size( (BITMAPINFO *)lpBMI,
93                                                      DIB_RGB_COLORS ),
94                   (LPBITMAPINFO)lpBMI, DIB_RGB_COLORS))
95 #else
96     len = sizeof(METARECORD) + 15 * sizeof(INT16) + BM.bmWidthBytes * BM.bmHeight;
97     if (!(mr = HeapAlloc( GetProcessHeap(), 0, len )))
98         return FALSE;
99     mr->rdFunction = META_STRETCHBLT;
100     *(mr->rdParm +10) = BM.bmWidth;
101     *(mr->rdParm +11) = BM.bmHeight;
102     *(mr->rdParm +12) = BM.bmWidthBytes;
103     *(mr->rdParm +13) = BM.bmPlanes;
104     *(mr->rdParm +14) = BM.bmBitsPixel;
105     TRACE("len = %ld  rop=%lx\n", len, rop);
106     if (GetBitmapBits( hBitmap, BM.bmWidthBytes * BM.bmHeight, mr->rdParm + 15))
107 #endif
108     {
109       mr->rdSize = len / sizeof(INT16);
110       *(mr->rdParm) = LOWORD(rop);
111       *(mr->rdParm + 1) = HIWORD(rop);
112       *(mr->rdParm + 2) = heightSrc;
113       *(mr->rdParm + 3) = widthSrc;
114       *(mr->rdParm + 4) = ySrc;
115       *(mr->rdParm + 5) = xSrc;
116       *(mr->rdParm + 6) = heightDst;
117       *(mr->rdParm + 7) = widthDst;
118       *(mr->rdParm + 8) = yDst;
119       *(mr->rdParm + 9) = xDst;
120       ret = MFDRV_WriteRecord( devDst, mr, mr->rdSize * 2);
121     }
122     else
123         ret = FALSE;
124     HeapFree( GetProcessHeap(), 0, mr);
125     return ret;
126 }
127
128
129 /***********************************************************************
130  *           MFDRV_StretchDIBits
131  */
132 INT  CDECL MFDRV_StretchDIBits( PHYSDEV dev, INT xDst, INT yDst, INT widthDst,
133                                 INT heightDst, INT xSrc, INT ySrc, INT widthSrc,
134                                 INT heightSrc, const void *bits,
135                                 const BITMAPINFO *info, UINT wUsage, DWORD dwRop )
136 {
137     DWORD len, infosize, imagesize;
138     METARECORD *mr;
139
140     infosize = bitmap_info_size(info, wUsage);
141     imagesize = DIB_GetDIBImageBytes( info->bmiHeader.biWidth,
142                                       info->bmiHeader.biHeight,
143                                       info->bmiHeader.biBitCount );
144
145     len = sizeof(METARECORD) + 10 * sizeof(WORD) + infosize + imagesize;
146     mr = HeapAlloc( GetProcessHeap(), 0, len );
147     if(!mr) return 0;
148
149     mr->rdSize = len / 2;
150     mr->rdFunction = META_STRETCHDIB;
151     mr->rdParm[0] = LOWORD(dwRop);
152     mr->rdParm[1] = HIWORD(dwRop);
153     mr->rdParm[2] = wUsage;
154     mr->rdParm[3] = (INT16)heightSrc;
155     mr->rdParm[4] = (INT16)widthSrc;
156     mr->rdParm[5] = (INT16)ySrc;
157     mr->rdParm[6] = (INT16)xSrc;
158     mr->rdParm[7] = (INT16)heightDst;
159     mr->rdParm[8] = (INT16)widthDst;
160     mr->rdParm[9] = (INT16)yDst;
161     mr->rdParm[10] = (INT16)xDst;
162     memcpy(mr->rdParm + 11, info, infosize);
163     memcpy(mr->rdParm + 11 + infosize / 2, bits, imagesize);
164     MFDRV_WriteRecord( dev, mr, mr->rdSize * 2 );
165     HeapFree( GetProcessHeap(), 0, mr );
166     return heightSrc;
167 }
168
169
170 /***********************************************************************
171  *           MFDRV_SetDIBitsToDeivce
172  */
173 INT  CDECL MFDRV_SetDIBitsToDevice( PHYSDEV dev, INT xDst, INT yDst, DWORD cx,
174                                     DWORD cy, INT xSrc, INT ySrc, UINT startscan,
175                                     UINT lines, LPCVOID bits, const BITMAPINFO *info,
176                                     UINT coloruse )
177
178 {
179     DWORD len, infosize, imagesize;
180     METARECORD *mr;
181
182     infosize = bitmap_info_size(info, coloruse);
183     imagesize = DIB_GetDIBImageBytes( info->bmiHeader.biWidth,
184                                       info->bmiHeader.biHeight,
185                                       info->bmiHeader.biBitCount );
186
187     len = sizeof(METARECORD) + 8 * sizeof(WORD) + infosize + imagesize;
188     mr = HeapAlloc( GetProcessHeap(), 0, len );
189     if(!mr) return 0;
190
191     mr->rdSize = len / 2;
192     mr->rdFunction = META_SETDIBTODEV;
193     mr->rdParm[0] = coloruse;
194     mr->rdParm[1] = lines;
195     mr->rdParm[2] = startscan;
196     mr->rdParm[3] = (INT16)ySrc;
197     mr->rdParm[4] = (INT16)xSrc;
198     mr->rdParm[5] = (INT16)cy;
199     mr->rdParm[6] = (INT16)cx;
200     mr->rdParm[7] = (INT16)yDst;
201     mr->rdParm[8] = (INT16)xDst;
202     memcpy(mr->rdParm + 9, info, infosize);
203     memcpy(mr->rdParm + 9 + infosize / 2, bits, imagesize);
204     MFDRV_WriteRecord( dev, mr, mr->rdSize * 2 );
205     HeapFree( GetProcessHeap(), 0, mr );
206     return lines;
207 }