wined3d: Get rid of the swapchain destroy callback.
[wine] / dlls / gdi32 / tests / dib.c
1 /*
2  * DIB driver tests.
3  *
4  * Copyright 2011 Huw Davies
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 <stdarg.h>
22 #include <stdio.h>
23
24 #include "windef.h"
25 #include "winbase.h"
26 #include "wingdi.h"
27 #include "winuser.h"
28 #include "wincrypt.h"
29
30 #include "wine/test.h"
31
32 static HCRYPTPROV crypt_prov;
33
34 static const DWORD rop3[256] =
35 {
36     0x000042, 0x010289, 0x020C89, 0x0300AA, 0x040C88, 0x0500A9, 0x060865, 0x0702C5,
37     0x080F08, 0x090245, 0x0A0329, 0x0B0B2A, 0x0C0324, 0x0D0B25, 0x0E08A5, 0x0F0001,
38     0x100C85, 0x1100A6, 0x120868, 0x1302C8, 0x140869, 0x1502C9, 0x165CCA, 0x171D54,
39     0x180D59, 0x191CC8, 0x1A06C5, 0x1B0768, 0x1C06CA, 0x1D0766, 0x1E01A5, 0x1F0385,
40     0x200F09, 0x210248, 0x220326, 0x230B24, 0x240D55, 0x251CC5, 0x2606C8, 0x271868,
41     0x280369, 0x2916CA, 0x2A0CC9, 0x2B1D58, 0x2C0784, 0x2D060A, 0x2E064A, 0x2F0E2A,
42     0x30032A, 0x310B28, 0x320688, 0x330008, 0x3406C4, 0x351864, 0x3601A8, 0x370388,
43     0x38078A, 0x390604, 0x3A0644, 0x3B0E24, 0x3C004A, 0x3D18A4, 0x3E1B24, 0x3F00EA,
44     0x400F0A, 0x410249, 0x420D5D, 0x431CC4, 0x440328, 0x450B29, 0x4606C6, 0x47076A,
45     0x480368, 0x4916C5, 0x4A0789, 0x4B0605, 0x4C0CC8, 0x4D1954, 0x4E0645, 0x4F0E25,
46     0x500325, 0x510B26, 0x5206C9, 0x530764, 0x5408A9, 0x550009, 0x5601A9, 0x570389,
47     0x580785, 0x590609, 0x5A0049, 0x5B18A9, 0x5C0649, 0x5D0E29, 0x5E1B29, 0x5F00E9,
48     0x600365, 0x6116C6, 0x620786, 0x630608, 0x640788, 0x650606, 0x660046, 0x6718A8,
49     0x6858A6, 0x690145, 0x6A01E9, 0x6B178A, 0x6C01E8, 0x6D1785, 0x6E1E28, 0x6F0C65,
50     0x700CC5, 0x711D5C, 0x720648, 0x730E28, 0x740646, 0x750E26, 0x761B28, 0x7700E6,
51     0x7801E5, 0x791786, 0x7A1E29, 0x7B0C68, 0x7C1E24, 0x7D0C69, 0x7E0955, 0x7F03C9,
52     0x8003E9, 0x810975, 0x820C49, 0x831E04, 0x840C48, 0x851E05, 0x8617A6, 0x8701C5,
53     0x8800C6, 0x891B08, 0x8A0E06, 0x8B0666, 0x8C0E08, 0x8D0668, 0x8E1D7C, 0x8F0CE5,
54     0x900C45, 0x911E08, 0x9217A9, 0x9301C4, 0x9417AA, 0x9501C9, 0x960169, 0x97588A,
55     0x981888, 0x990066, 0x9A0709, 0x9B07A8, 0x9C0704, 0x9D07A6, 0x9E16E6, 0x9F0345,
56     0xA000C9, 0xA11B05, 0xA20E09, 0xA30669, 0xA41885, 0xA50065, 0xA60706, 0xA707A5,
57     0xA803A9, 0xA90189, 0xAA0029, 0xAB0889, 0xAC0744, 0xAD06E9, 0xAE0B06, 0xAF0229,
58     0xB00E05, 0xB10665, 0xB21974, 0xB30CE8, 0xB4070A, 0xB507A9, 0xB616E9, 0xB70348,
59     0xB8074A, 0xB906E6, 0xBA0B09, 0xBB0226, 0xBC1CE4, 0xBD0D7D, 0xBE0269, 0xBF08C9,
60     0xC000CA, 0xC11B04, 0xC21884, 0xC3006A, 0xC40E04, 0xC50664, 0xC60708, 0xC707AA,
61     0xC803A8, 0xC90184, 0xCA0749, 0xCB06E4, 0xCC0020, 0xCD0888, 0xCE0B08, 0xCF0224,
62     0xD00E0A, 0xD1066A, 0xD20705, 0xD307A4, 0xD41D78, 0xD50CE9, 0xD616EA, 0xD70349,
63     0xD80745, 0xD906E8, 0xDA1CE9, 0xDB0D75, 0xDC0B04, 0xDD0228, 0xDE0268, 0xDF08C8,
64     0xE003A5, 0xE10185, 0xE20746, 0xE306EA, 0xE40748, 0xE506E5, 0xE61CE8, 0xE70D79,
65     0xE81D74, 0xE95CE6, 0xEA02E9, 0xEB0849, 0xEC02E8, 0xED0848, 0xEE0086, 0xEF0A08,
66     0xF00021, 0xF10885, 0xF20B05, 0xF3022A, 0xF40B0A, 0xF50225, 0xF60265, 0xF708C5,
67     0xF802E5, 0xF90845, 0xFA0089, 0xFB0A09, 0xFC008A, 0xFD0A0A, 0xFE02A9, 0xFF0062
68 };
69
70 static inline BOOL rop_uses_src(DWORD rop)
71 {
72     return (((rop & 0xcc0000) >> 2) != (rop & 0x330000));
73 }
74
75 static const char *sha1_graphics_a8r8g8b8[] =
76 {
77     "a3cadd34d95d3d5cc23344f69aab1c2e55935fcf",
78     "2426172d9e8fec27d9228088f382ef3c93717da9",
79     "17b2c177bdce5e94433574a928bda5c94a8cdfa5",
80     NULL
81 };
82
83 static inline DWORD get_stride(BITMAPINFO *bmi)
84 {
85     return ((bmi->bmiHeader.biBitCount * bmi->bmiHeader.biWidth + 31) >> 3) & ~3;
86 }
87
88 static inline DWORD get_dib_size(BITMAPINFO *bmi)
89 {
90     return get_stride(bmi) * abs(bmi->bmiHeader.biHeight);
91 }
92
93 static char *hash_dib(BITMAPINFO *bmi, void *bits)
94 {
95     DWORD dib_size = get_dib_size(bmi);
96     HCRYPTHASH hash;
97     char *buf;
98     BYTE hash_buf[20];
99     DWORD hash_size = sizeof(hash_buf);
100     int i;
101     static const char *hex = "0123456789abcdef";
102
103     if(!crypt_prov) return NULL;
104
105     if(!CryptCreateHash(crypt_prov, CALG_SHA1, 0, 0, &hash)) return NULL;
106
107     CryptHashData(hash, bits, dib_size, 0);
108
109     CryptGetHashParam(hash, HP_HASHVAL, NULL, &hash_size, 0);
110     if(hash_size != sizeof(hash_buf)) return NULL;
111
112     CryptGetHashParam(hash, HP_HASHVAL, hash_buf, &hash_size, 0);
113     CryptDestroyHash(hash);
114
115     buf = HeapAlloc(GetProcessHeap(), 0, hash_size * 2 + 1);
116
117     for(i = 0; i < hash_size; i++)
118     {
119         buf[i * 2] = hex[hash_buf[i] >> 4];
120         buf[i * 2 + 1] = hex[hash_buf[i] & 0xf];
121     }
122     buf[i * 2] = '\0';
123
124     return buf;
125 }
126
127 static void compare_hash(BITMAPINFO *bmi, BYTE *bits, const char ***sha1, const char *info)
128 {
129     char *hash = hash_dib(bmi, bits);
130
131     if(!hash)
132     {
133         skip("SHA1 hashing unavailable on this platform\n");
134         return;
135     }
136
137     if(**sha1)
138     {
139         ok(!strcmp(hash, **sha1), "%d: %s: expected hash %s got %s\n",
140            bmi->bmiHeader.biBitCount, info, **sha1, hash);
141         (*sha1)++;
142     }
143     else trace("\"%s\",\n", hash);
144
145     HeapFree(GetProcessHeap(), 0, hash);
146 }
147
148 static void draw_graphics(HDC hdc, BITMAPINFO *bmi, BYTE *bits, const char ***sha1)
149 {
150     DWORD dib_size = get_dib_size(bmi);
151     HPEN solid_pen, orig_pen;
152     HBRUSH solid_brush, orig_brush;
153     INT i, y;
154
155     memset(bits, 0xcc, dib_size);
156     compare_hash(bmi, bits, sha1, "empty");
157
158     solid_pen = CreatePen(PS_SOLID, 1, RGB(0, 0, 0xff));
159     orig_pen = SelectObject(hdc, solid_pen);
160
161     /* horizontal and vertical lines */
162     for(i = 1; i <= 16; i++)
163     {
164         SetROP2(hdc, i);
165         MoveToEx(hdc, 10, i * 3, NULL);
166         LineTo(hdc, 100, i * 3); /* l -> r */
167         MoveToEx(hdc, 100, 50 + i * 3, NULL);
168         LineTo(hdc, 10, 50 + i * 3); /* r -> l */
169         MoveToEx(hdc, 120 + i * 3, 10, NULL);
170         LineTo(hdc, 120 + i * 3, 100); /* t -> b */
171         MoveToEx(hdc, 170 + i * 3, 100, NULL);
172         LineTo(hdc, 170 + i * 3, 10); /* b -> t */
173     }
174     compare_hash(bmi, bits, sha1, "h and v solid lines");
175     memset(bits, 0xcc, dib_size);
176
177     solid_brush = CreateSolidBrush(RGB(0x33, 0xaa, 0xff));
178     orig_brush = SelectObject(hdc, solid_brush);
179
180     for(i = 0, y = 10; i < 256; i++)
181     {
182         BOOL ret;
183
184         ret = PatBlt(hdc, 10, y, 100, 10, rop3[i]);
185
186         if(rop_uses_src(rop3[i]))
187             ok(ret == FALSE, "got TRUE for %x\n", rop3[i]);
188         else
189         {
190             ok(ret, "got FALSE for %x\n", rop3[i]);
191             y += 20;
192         }
193
194     }
195     compare_hash(bmi, bits, sha1, "solid patblt");
196
197     SelectObject(hdc, orig_brush);
198     SelectObject(hdc, orig_pen);
199     DeleteObject(solid_brush);
200     DeleteObject(solid_pen);
201 }
202
203 static void test_simple_graphics(void)
204 {
205     char bmibuf[sizeof(BITMAPINFO) + 256 * sizeof(RGBQUAD)];
206     BITMAPINFO *bmi = (BITMAPINFO *)bmibuf;
207     DWORD *bit_fields = (DWORD*)(bmibuf + sizeof(BITMAPINFOHEADER));
208     HDC mem_dc;
209     BYTE *bits;
210     HBITMAP dib, orig_bm;
211     const char **sha1;
212     DIBSECTION ds;
213
214     mem_dc = CreateCompatibleDC(NULL);
215
216     /* a8r8g8b8 */
217     trace("8888\n");
218     memset(bmi, 0, sizeof(bmibuf));
219     bmi->bmiHeader.biSize = sizeof(bmi->bmiHeader);
220     bmi->bmiHeader.biHeight = 512;
221     bmi->bmiHeader.biWidth = 512;
222     bmi->bmiHeader.biBitCount = 32;
223     bmi->bmiHeader.biPlanes = 1;
224     bmi->bmiHeader.biCompression = BI_RGB;
225
226     dib = CreateDIBSection(0, bmi, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
227     ok(dib != NULL, "ret NULL\n");
228     ok(GetObjectW( dib, sizeof(ds), &ds ), "GetObject failed\n");
229     ok(ds.dsBitfields[0] == 0, "got %08x\n", ds.dsBitfields[0]);
230     ok(ds.dsBitfields[1] == 0, "got %08x\n", ds.dsBitfields[1]);
231     ok(ds.dsBitfields[2] == 0, "got %08x\n", ds.dsBitfields[2]);
232     ok(ds.dsBmih.biCompression == BI_RGB, "got %x\n", ds.dsBmih.biCompression);
233
234     orig_bm = SelectObject(mem_dc, dib);
235
236     sha1 = sha1_graphics_a8r8g8b8;
237     draw_graphics(mem_dc, bmi, bits, &sha1);
238
239     SelectObject(mem_dc, orig_bm);
240     DeleteObject(dib);
241
242     /* a8r8g8b8 - bitfields.  Should be the same as the regular 32 bit case.*/
243     trace("8888 - bitfields\n");
244     bmi->bmiHeader.biBitCount = 32;
245     bmi->bmiHeader.biCompression = BI_BITFIELDS;
246     bit_fields[0] = 0xff0000;
247     bit_fields[1] = 0x00ff00;
248     bit_fields[2] = 0x0000ff;
249
250     dib = CreateDIBSection(mem_dc, bmi, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
251     ok(dib != NULL, "ret NULL\n");
252     ok(GetObjectW( dib, sizeof(ds), &ds ), "GetObject failed\n");
253     ok(ds.dsBitfields[0] == 0xff0000, "got %08x\n", ds.dsBitfields[0]);
254     ok(ds.dsBitfields[1] == 0x00ff00, "got %08x\n", ds.dsBitfields[1]);
255     ok(ds.dsBitfields[2] == 0x0000ff, "got %08x\n", ds.dsBitfields[2]);
256     ok(ds.dsBmih.biCompression == BI_BITFIELDS, "got %x\n", ds.dsBmih.biCompression);
257
258     orig_bm = SelectObject(mem_dc, dib);
259
260     sha1 = sha1_graphics_a8r8g8b8;
261     draw_graphics(mem_dc, bmi, bits, &sha1);
262
263     SelectObject(mem_dc, orig_bm);
264     DeleteObject(dib);
265
266
267     /* r5g5b5 */
268     bmi->bmiHeader.biBitCount = 16;
269     bmi->bmiHeader.biCompression = BI_RGB;
270
271     dib = CreateDIBSection(0, bmi, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
272     ok(dib != NULL, "ret NULL\n");
273     ok(GetObjectW( dib, sizeof(ds), &ds ), "GetObject failed\n");
274     ok(ds.dsBitfields[0] == 0x7c00, "got %08x\n", ds.dsBitfields[0]);
275     ok(ds.dsBitfields[1] == 0x03e0, "got %08x\n", ds.dsBitfields[1]);
276     ok(ds.dsBitfields[2] == 0x001f, "got %08x\n", ds.dsBitfields[2]);
277 todo_wine
278     ok(ds.dsBmih.biCompression == BI_BITFIELDS, "got %x\n", ds.dsBmih.biCompression);
279
280     DeleteObject(dib);
281
282     DeleteDC(mem_dc);
283 }
284
285 START_TEST(dib)
286 {
287     CryptAcquireContextW(&crypt_prov, NULL, NULL, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT);
288
289     test_simple_graphics();
290
291     CryptReleaseContext(crypt_prov, 0);
292 }