gdiplus: Make get_path_hrgn work with HDC-less graphics objects.
[wine] / dlls / gdiplus / image.c
1 /*
2  * Copyright (C) 2007 Google (Evan Stade)
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include <stdarg.h>
20
21 #define NONAMELESSUNION
22
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "wingdi.h"
27
28 #define COBJMACROS
29 #include "objbase.h"
30 #include "olectl.h"
31 #include "ole2.h"
32
33 #include "initguid.h"
34 #include "wincodec.h"
35 #include "gdiplus.h"
36 #include "gdiplus_private.h"
37 #include "wine/debug.h"
38
39 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
40
41 #define PIXELFORMATBPP(x) ((x) ? ((x) >> 8) & 255 : 24)
42
43 static INT ipicture_pixel_height(IPicture *pic)
44 {
45     HDC hdcref;
46     OLE_YSIZE_HIMETRIC y;
47
48     IPicture_get_Height(pic, &y);
49
50     hdcref = GetDC(0);
51
52     y = MulDiv(y, GetDeviceCaps(hdcref, LOGPIXELSY), INCH_HIMETRIC);
53     ReleaseDC(0, hdcref);
54
55     return y;
56 }
57
58 static INT ipicture_pixel_width(IPicture *pic)
59 {
60     HDC hdcref;
61     OLE_XSIZE_HIMETRIC x;
62
63     IPicture_get_Width(pic, &x);
64
65     hdcref = GetDC(0);
66
67     x = MulDiv(x, GetDeviceCaps(hdcref, LOGPIXELSX), INCH_HIMETRIC);
68
69     ReleaseDC(0, hdcref);
70
71     return x;
72 }
73
74 GpStatus WINGDIPAPI GdipBitmapApplyEffect(GpBitmap* bitmap, CGpEffect* effect,
75     RECT* roi, BOOL useAuxData, VOID** auxData, INT* auxDataSize)
76 {
77     FIXME("(%p %p %p %d %p %p): stub\n", bitmap, effect, roi, useAuxData, auxData, auxDataSize);
78     /*
79      * Note: According to Jose Roca's GDI+ docs, this function is not
80      * implemented in Windows's GDI+.
81      */
82     return NotImplemented;
83 }
84
85 GpStatus WINGDIPAPI GdipBitmapCreateApplyEffect(GpBitmap** inputBitmaps,
86     INT numInputs, CGpEffect* effect, RECT* roi, RECT* outputRect,
87     GpBitmap** outputBitmap, BOOL useAuxData, VOID** auxData, INT* auxDataSize)
88 {
89     FIXME("(%p %d %p %p %p %p %d %p %p): stub\n", inputBitmaps, numInputs, effect, roi, outputRect, outputBitmap, useAuxData, auxData, auxDataSize);
90     /*
91      * Note: According to Jose Roca's GDI+ docs, this function is not
92      * implemented in Windows's GDI+.
93      */
94     return NotImplemented;
95 }
96
97 static inline void getpixel_1bppIndexed(BYTE *index, const BYTE *row, UINT x)
98 {
99     *index = (row[x/8]>>(7-x%8)) & 1;
100 }
101
102 static inline void getpixel_4bppIndexed(BYTE *index, const BYTE *row, UINT x)
103 {
104     if (x & 1)
105         *index = row[x/2]&0xf;
106     else
107         *index = row[x/2]>>4;
108 }
109
110 static inline void getpixel_8bppIndexed(BYTE *index, const BYTE *row, UINT x)
111 {
112     *index = row[x];
113 }
114
115 static inline void getpixel_16bppGrayScale(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
116     const BYTE *row, UINT x)
117 {
118     *r = *g = *b = row[x*2+1];
119     *a = 255;
120 }
121
122 static inline void getpixel_16bppRGB555(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
123     const BYTE *row, UINT x)
124 {
125     WORD pixel = *((const WORD*)(row)+x);
126     *r = (pixel>>7&0xf8)|(pixel>>12&0x7);
127     *g = (pixel>>2&0xf8)|(pixel>>6&0x7);
128     *b = (pixel<<3&0xf8)|(pixel>>2&0x7);
129     *a = 255;
130 }
131
132 static inline void getpixel_16bppRGB565(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
133     const BYTE *row, UINT x)
134 {
135     WORD pixel = *((const WORD*)(row)+x);
136     *r = (pixel>>8&0xf8)|(pixel>>13&0x7);
137     *g = (pixel>>3&0xfc)|(pixel>>9&0x3);
138     *b = (pixel<<3&0xf8)|(pixel>>2&0x7);
139     *a = 255;
140 }
141
142 static inline void getpixel_16bppARGB1555(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
143     const BYTE *row, UINT x)
144 {
145     WORD pixel = *((const WORD*)(row)+x);
146     *r = (pixel>>7&0xf8)|(pixel>>12&0x7);
147     *g = (pixel>>2&0xf8)|(pixel>>6&0x7);
148     *b = (pixel<<3&0xf8)|(pixel>>2&0x7);
149     if ((pixel&0x8000) == 0x8000)
150         *a = 255;
151     else
152         *a = 0;
153 }
154
155 static inline void getpixel_24bppRGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
156     const BYTE *row, UINT x)
157 {
158     *r = row[x*3+2];
159     *g = row[x*3+1];
160     *b = row[x*3];
161     *a = 255;
162 }
163
164 static inline void getpixel_32bppRGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
165     const BYTE *row, UINT x)
166 {
167     *r = row[x*4+2];
168     *g = row[x*4+1];
169     *b = row[x*4];
170     *a = 255;
171 }
172
173 static inline void getpixel_32bppARGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
174     const BYTE *row, UINT x)
175 {
176     *r = row[x*4+2];
177     *g = row[x*4+1];
178     *b = row[x*4];
179     *a = row[x*4+3];
180 }
181
182 static inline void getpixel_32bppPARGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
183     const BYTE *row, UINT x)
184 {
185     *a = row[x*4+3];
186     if (*a == 0)
187         *r = *g = *b = 0;
188     else
189     {
190         *r = row[x*4+2] * 255 / *a;
191         *g = row[x*4+1] * 255 / *a;
192         *b = row[x*4] * 255 / *a;
193     }
194 }
195
196 static inline void getpixel_48bppRGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
197     const BYTE *row, UINT x)
198 {
199     *r = row[x*6+5];
200     *g = row[x*6+3];
201     *b = row[x*6+1];
202     *a = 255;
203 }
204
205 static inline void getpixel_64bppARGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
206     const BYTE *row, UINT x)
207 {
208     *r = row[x*8+5];
209     *g = row[x*8+3];
210     *b = row[x*8+1];
211     *a = row[x*8+7];
212 }
213
214 static inline void getpixel_64bppPARGB(BYTE *r, BYTE *g, BYTE *b, BYTE *a,
215     const BYTE *row, UINT x)
216 {
217     *a = row[x*8+7];
218     if (*a == 0)
219         *r = *g = *b = 0;
220     else
221     {
222         *r = row[x*8+5] * 255 / *a;
223         *g = row[x*8+3] * 255 / *a;
224         *b = row[x*8+1] * 255 / *a;
225     }
226 }
227
228 GpStatus WINGDIPAPI GdipBitmapGetPixel(GpBitmap* bitmap, INT x, INT y,
229     ARGB *color)
230 {
231     BYTE r, g, b, a;
232     BYTE index;
233     BYTE *row;
234     TRACE("%p %d %d %p\n", bitmap, x, y, color);
235
236     if(!bitmap || !color ||
237        x < 0 || y < 0 || x >= bitmap->width || y >= bitmap->height)
238         return InvalidParameter;
239
240     row = bitmap->bits+bitmap->stride*y;
241
242     switch (bitmap->format)
243     {
244         case PixelFormat1bppIndexed:
245             getpixel_1bppIndexed(&index,row,x);
246             break;
247         case PixelFormat4bppIndexed:
248             getpixel_4bppIndexed(&index,row,x);
249             break;
250         case PixelFormat8bppIndexed:
251             getpixel_8bppIndexed(&index,row,x);
252             break;
253         case PixelFormat16bppGrayScale:
254             getpixel_16bppGrayScale(&r,&g,&b,&a,row,x);
255             break;
256         case PixelFormat16bppRGB555:
257             getpixel_16bppRGB555(&r,&g,&b,&a,row,x);
258             break;
259         case PixelFormat16bppRGB565:
260             getpixel_16bppRGB565(&r,&g,&b,&a,row,x);
261             break;
262         case PixelFormat16bppARGB1555:
263             getpixel_16bppARGB1555(&r,&g,&b,&a,row,x);
264             break;
265         case PixelFormat24bppRGB:
266             getpixel_24bppRGB(&r,&g,&b,&a,row,x);
267             break;
268         case PixelFormat32bppRGB:
269             getpixel_32bppRGB(&r,&g,&b,&a,row,x);
270             break;
271         case PixelFormat32bppARGB:
272             getpixel_32bppARGB(&r,&g,&b,&a,row,x);
273             break;
274         case PixelFormat32bppPARGB:
275             getpixel_32bppPARGB(&r,&g,&b,&a,row,x);
276             break;
277         case PixelFormat48bppRGB:
278             getpixel_48bppRGB(&r,&g,&b,&a,row,x);
279             break;
280         case PixelFormat64bppARGB:
281             getpixel_64bppARGB(&r,&g,&b,&a,row,x);
282             break;
283         case PixelFormat64bppPARGB:
284             getpixel_64bppPARGB(&r,&g,&b,&a,row,x);
285             break;
286         default:
287             FIXME("not implemented for format 0x%x\n", bitmap->format);
288             return NotImplemented;
289     }
290
291     if (bitmap->format & PixelFormatIndexed)
292         *color = bitmap->image.palette_entries[index];
293     else
294         *color = a<<24|r<<16|g<<8|b;
295
296     return Ok;
297 }
298
299 static inline void setpixel_16bppGrayScale(BYTE r, BYTE g, BYTE b, BYTE a,
300     BYTE *row, UINT x)
301 {
302     *((WORD*)(row)+x) = (r+g+b)*85;
303 }
304
305 static inline void setpixel_16bppRGB555(BYTE r, BYTE g, BYTE b, BYTE a,
306     BYTE *row, UINT x)
307 {
308     *((WORD*)(row)+x) = (r<<7&0x7c00)|
309                         (g<<2&0x03e0)|
310                         (b>>3&0x001f);
311 }
312
313 static inline void setpixel_16bppRGB565(BYTE r, BYTE g, BYTE b, BYTE a,
314     BYTE *row, UINT x)
315 {
316     *((WORD*)(row)+x) = (r<<8&0xf800)|
317                          (g<<3&0x07e0)|
318                          (b>>3&0x001f);
319 }
320
321 static inline void setpixel_16bppARGB1555(BYTE r, BYTE g, BYTE b, BYTE a,
322     BYTE *row, UINT x)
323 {
324     *((WORD*)(row)+x) = (a<<8&0x8000)|
325                         (r<<7&0x7c00)|
326                         (g<<2&0x03e0)|
327                         (b>>3&0x001f);
328 }
329
330 static inline void setpixel_24bppRGB(BYTE r, BYTE g, BYTE b, BYTE a,
331     BYTE *row, UINT x)
332 {
333     row[x*3+2] = r;
334     row[x*3+1] = g;
335     row[x*3] = b;
336 }
337
338 static inline void setpixel_32bppRGB(BYTE r, BYTE g, BYTE b, BYTE a,
339     BYTE *row, UINT x)
340 {
341     *((DWORD*)(row)+x) = (r<<16)|(g<<8)|b;
342 }
343
344 static inline void setpixel_32bppARGB(BYTE r, BYTE g, BYTE b, BYTE a,
345     BYTE *row, UINT x)
346 {
347     *((DWORD*)(row)+x) = (a<<24)|(r<<16)|(g<<8)|b;
348 }
349
350 static inline void setpixel_32bppPARGB(BYTE r, BYTE g, BYTE b, BYTE a,
351     BYTE *row, UINT x)
352 {
353     r = r * a / 255;
354     g = g * a / 255;
355     b = b * a / 255;
356     *((DWORD*)(row)+x) = (a<<24)|(r<<16)|(g<<8)|b;
357 }
358
359 static inline void setpixel_48bppRGB(BYTE r, BYTE g, BYTE b, BYTE a,
360     BYTE *row, UINT x)
361 {
362     row[x*6+5] = row[x*6+4] = r;
363     row[x*6+3] = row[x*6+2] = g;
364     row[x*6+1] = row[x*6] = b;
365 }
366
367 static inline void setpixel_64bppARGB(BYTE r, BYTE g, BYTE b, BYTE a,
368     BYTE *row, UINT x)
369 {
370     UINT64 a64=a, r64=r, g64=g, b64=b;
371     *((UINT64*)(row)+x) = (a64<<56)|(a64<<48)|(r64<<40)|(r64<<32)|(g64<<24)|(g64<<16)|(b64<<8)|b64;
372 }
373
374 static inline void setpixel_64bppPARGB(BYTE r, BYTE g, BYTE b, BYTE a,
375     BYTE *row, UINT x)
376 {
377     UINT64 a64, r64, g64, b64;
378     a64 = a * 257;
379     r64 = r * a / 255;
380     g64 = g * a / 255;
381     b64 = b * a / 255;
382     *((UINT64*)(row)+x) = (a64<<48)|(r64<<32)|(g64<<16)|b64;
383 }
384
385 GpStatus WINGDIPAPI GdipBitmapSetPixel(GpBitmap* bitmap, INT x, INT y,
386     ARGB color)
387 {
388     BYTE a, r, g, b;
389     BYTE *row;
390     TRACE("bitmap:%p, x:%d, y:%d, color:%08x\n", bitmap, x, y, color);
391
392     if(!bitmap || x < 0 || y < 0 || x >= bitmap->width || y >= bitmap->height)
393         return InvalidParameter;
394
395     a = color>>24;
396     r = color>>16;
397     g = color>>8;
398     b = color;
399
400     row = bitmap->bits + bitmap->stride * y;
401
402     switch (bitmap->format)
403     {
404         case PixelFormat16bppGrayScale:
405             setpixel_16bppGrayScale(r,g,b,a,row,x);
406             break;
407         case PixelFormat16bppRGB555:
408             setpixel_16bppRGB555(r,g,b,a,row,x);
409             break;
410         case PixelFormat16bppRGB565:
411             setpixel_16bppRGB565(r,g,b,a,row,x);
412             break;
413         case PixelFormat16bppARGB1555:
414             setpixel_16bppARGB1555(r,g,b,a,row,x);
415             break;
416         case PixelFormat24bppRGB:
417             setpixel_24bppRGB(r,g,b,a,row,x);
418             break;
419         case PixelFormat32bppRGB:
420             setpixel_32bppRGB(r,g,b,a,row,x);
421             break;
422         case PixelFormat32bppARGB:
423             setpixel_32bppARGB(r,g,b,a,row,x);
424             break;
425         case PixelFormat32bppPARGB:
426             setpixel_32bppPARGB(r,g,b,a,row,x);
427             break;
428         case PixelFormat48bppRGB:
429             setpixel_48bppRGB(r,g,b,a,row,x);
430             break;
431         case PixelFormat64bppARGB:
432             setpixel_64bppARGB(r,g,b,a,row,x);
433             break;
434         case PixelFormat64bppPARGB:
435             setpixel_64bppPARGB(r,g,b,a,row,x);
436             break;
437         default:
438             FIXME("not implemented for format 0x%x\n", bitmap->format);
439             return NotImplemented;
440     }
441
442     return Ok;
443 }
444
445 GpStatus convert_pixels(UINT width, UINT height,
446     INT dst_stride, BYTE *dst_bits, PixelFormat dst_format,
447     INT src_stride, const BYTE *src_bits, PixelFormat src_format, ARGB *src_palette)
448 {
449     UINT x, y;
450
451     if (src_format == dst_format ||
452         (dst_format == PixelFormat32bppRGB && PIXELFORMATBPP(src_format) == 32))
453     {
454         UINT widthbytes = PIXELFORMATBPP(src_format) * width / 8;
455         for (y=0; y<height; y++)
456             memcpy(dst_bits+dst_stride*y, src_bits+src_stride*y, widthbytes);
457         return Ok;
458     }
459
460 #define convert_indexed_to_rgb(getpixel_function, setpixel_function) do { \
461     for (x=0; x<width; x++) \
462         for (y=0; y<height; y++) { \
463             BYTE index; \
464             BYTE *color; \
465             getpixel_function(&index, src_bits+src_stride*y, x); \
466             color = (BYTE*)(&src_palette[index]); \
467             setpixel_function(color[2], color[1], color[0], color[3], dst_bits+dst_stride*y, x); \
468         } \
469     return Ok; \
470 } while (0);
471
472 #define convert_rgb_to_rgb(getpixel_function, setpixel_function) do { \
473     for (x=0; x<width; x++) \
474         for (y=0; y<height; y++) { \
475             BYTE r, g, b, a; \
476             getpixel_function(&r, &g, &b, &a, src_bits+src_stride*y, x); \
477             setpixel_function(r, g, b, a, dst_bits+dst_stride*y, x); \
478         } \
479     return Ok; \
480 } while (0);
481
482     switch (src_format)
483     {
484     case PixelFormat1bppIndexed:
485         switch (dst_format)
486         {
487         case PixelFormat16bppGrayScale:
488             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_16bppGrayScale);
489         case PixelFormat16bppRGB555:
490             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_16bppRGB555);
491         case PixelFormat16bppRGB565:
492             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_16bppRGB565);
493         case PixelFormat16bppARGB1555:
494             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_16bppARGB1555);
495         case PixelFormat24bppRGB:
496             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_24bppRGB);
497         case PixelFormat32bppRGB:
498             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_32bppRGB);
499         case PixelFormat32bppARGB:
500             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_32bppARGB);
501         case PixelFormat32bppPARGB:
502             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_32bppPARGB);
503         case PixelFormat48bppRGB:
504             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_48bppRGB);
505         case PixelFormat64bppARGB:
506             convert_indexed_to_rgb(getpixel_1bppIndexed, setpixel_64bppARGB);
507         default:
508             break;
509         }
510         break;
511     case PixelFormat4bppIndexed:
512         switch (dst_format)
513         {
514         case PixelFormat16bppGrayScale:
515             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_16bppGrayScale);
516         case PixelFormat16bppRGB555:
517             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_16bppRGB555);
518         case PixelFormat16bppRGB565:
519             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_16bppRGB565);
520         case PixelFormat16bppARGB1555:
521             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_16bppARGB1555);
522         case PixelFormat24bppRGB:
523             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_24bppRGB);
524         case PixelFormat32bppRGB:
525             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_32bppRGB);
526         case PixelFormat32bppARGB:
527             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_32bppARGB);
528         case PixelFormat32bppPARGB:
529             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_32bppPARGB);
530         case PixelFormat48bppRGB:
531             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_48bppRGB);
532         case PixelFormat64bppARGB:
533             convert_indexed_to_rgb(getpixel_4bppIndexed, setpixel_64bppARGB);
534         default:
535             break;
536         }
537         break;
538     case PixelFormat8bppIndexed:
539         switch (dst_format)
540         {
541         case PixelFormat16bppGrayScale:
542             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_16bppGrayScale);
543         case PixelFormat16bppRGB555:
544             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_16bppRGB555);
545         case PixelFormat16bppRGB565:
546             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_16bppRGB565);
547         case PixelFormat16bppARGB1555:
548             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_16bppARGB1555);
549         case PixelFormat24bppRGB:
550             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_24bppRGB);
551         case PixelFormat32bppRGB:
552             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_32bppRGB);
553         case PixelFormat32bppARGB:
554             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_32bppARGB);
555         case PixelFormat32bppPARGB:
556             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_32bppPARGB);
557         case PixelFormat48bppRGB:
558             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_48bppRGB);
559         case PixelFormat64bppARGB:
560             convert_indexed_to_rgb(getpixel_8bppIndexed, setpixel_64bppARGB);
561         default:
562             break;
563         }
564         break;
565     case PixelFormat16bppGrayScale:
566         switch (dst_format)
567         {
568         case PixelFormat16bppRGB555:
569             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_16bppRGB555);
570         case PixelFormat16bppRGB565:
571             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_16bppRGB565);
572         case PixelFormat16bppARGB1555:
573             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_16bppARGB1555);
574         case PixelFormat24bppRGB:
575             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_24bppRGB);
576         case PixelFormat32bppRGB:
577             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_32bppRGB);
578         case PixelFormat32bppARGB:
579             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_32bppARGB);
580         case PixelFormat32bppPARGB:
581             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_32bppPARGB);
582         case PixelFormat48bppRGB:
583             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_48bppRGB);
584         case PixelFormat64bppARGB:
585             convert_rgb_to_rgb(getpixel_16bppGrayScale, setpixel_64bppARGB);
586         default:
587             break;
588         }
589         break;
590     case PixelFormat16bppRGB555:
591         switch (dst_format)
592         {
593         case PixelFormat16bppGrayScale:
594             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_16bppGrayScale);
595         case PixelFormat16bppRGB565:
596             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_16bppRGB565);
597         case PixelFormat16bppARGB1555:
598             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_16bppARGB1555);
599         case PixelFormat24bppRGB:
600             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_24bppRGB);
601         case PixelFormat32bppRGB:
602             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_32bppRGB);
603         case PixelFormat32bppARGB:
604             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_32bppARGB);
605         case PixelFormat32bppPARGB:
606             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_32bppPARGB);
607         case PixelFormat48bppRGB:
608             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_48bppRGB);
609         case PixelFormat64bppARGB:
610             convert_rgb_to_rgb(getpixel_16bppRGB555, setpixel_64bppARGB);
611         default:
612             break;
613         }
614         break;
615     case PixelFormat16bppRGB565:
616         switch (dst_format)
617         {
618         case PixelFormat16bppGrayScale:
619             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_16bppGrayScale);
620         case PixelFormat16bppRGB555:
621             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_16bppRGB555);
622         case PixelFormat16bppARGB1555:
623             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_16bppARGB1555);
624         case PixelFormat24bppRGB:
625             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_24bppRGB);
626         case PixelFormat32bppRGB:
627             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_32bppRGB);
628         case PixelFormat32bppARGB:
629             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_32bppARGB);
630         case PixelFormat32bppPARGB:
631             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_32bppPARGB);
632         case PixelFormat48bppRGB:
633             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_48bppRGB);
634         case PixelFormat64bppARGB:
635             convert_rgb_to_rgb(getpixel_16bppRGB565, setpixel_64bppARGB);
636         default:
637             break;
638         }
639         break;
640     case PixelFormat16bppARGB1555:
641         switch (dst_format)
642         {
643         case PixelFormat16bppGrayScale:
644             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_16bppGrayScale);
645         case PixelFormat16bppRGB555:
646             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_16bppRGB555);
647         case PixelFormat16bppRGB565:
648             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_16bppRGB565);
649         case PixelFormat24bppRGB:
650             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_24bppRGB);
651         case PixelFormat32bppRGB:
652             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_32bppRGB);
653         case PixelFormat32bppARGB:
654             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_32bppARGB);
655         case PixelFormat32bppPARGB:
656             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_32bppPARGB);
657         case PixelFormat48bppRGB:
658             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_48bppRGB);
659         case PixelFormat64bppARGB:
660             convert_rgb_to_rgb(getpixel_16bppARGB1555, setpixel_64bppARGB);
661         default:
662             break;
663         }
664         break;
665     case PixelFormat24bppRGB:
666         switch (dst_format)
667         {
668         case PixelFormat16bppGrayScale:
669             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_16bppGrayScale);
670         case PixelFormat16bppRGB555:
671             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_16bppRGB555);
672         case PixelFormat16bppRGB565:
673             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_16bppRGB565);
674         case PixelFormat16bppARGB1555:
675             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_16bppARGB1555);
676         case PixelFormat32bppRGB:
677             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_32bppRGB);
678         case PixelFormat32bppARGB:
679             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_32bppARGB);
680         case PixelFormat32bppPARGB:
681             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_32bppPARGB);
682         case PixelFormat48bppRGB:
683             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_48bppRGB);
684         case PixelFormat64bppARGB:
685             convert_rgb_to_rgb(getpixel_24bppRGB, setpixel_64bppARGB);
686         default:
687             break;
688         }
689         break;
690     case PixelFormat32bppRGB:
691         switch (dst_format)
692         {
693         case PixelFormat16bppGrayScale:
694             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_16bppGrayScale);
695         case PixelFormat16bppRGB555:
696             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_16bppRGB555);
697         case PixelFormat16bppRGB565:
698             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_16bppRGB565);
699         case PixelFormat16bppARGB1555:
700             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_16bppARGB1555);
701         case PixelFormat24bppRGB:
702             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_24bppRGB);
703         case PixelFormat32bppARGB:
704             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_32bppARGB);
705         case PixelFormat32bppPARGB:
706             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_32bppPARGB);
707         case PixelFormat48bppRGB:
708             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_48bppRGB);
709         case PixelFormat64bppARGB:
710             convert_rgb_to_rgb(getpixel_32bppRGB, setpixel_64bppARGB);
711         default:
712             break;
713         }
714         break;
715     case PixelFormat32bppARGB:
716         switch (dst_format)
717         {
718         case PixelFormat16bppGrayScale:
719             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_16bppGrayScale);
720         case PixelFormat16bppRGB555:
721             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_16bppRGB555);
722         case PixelFormat16bppRGB565:
723             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_16bppRGB565);
724         case PixelFormat16bppARGB1555:
725             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_16bppARGB1555);
726         case PixelFormat24bppRGB:
727             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_24bppRGB);
728         case PixelFormat32bppPARGB:
729             convert_32bppARGB_to_32bppPARGB(width, height, dst_bits, dst_stride, src_bits, src_stride);
730             return Ok;
731         case PixelFormat48bppRGB:
732             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_48bppRGB);
733         case PixelFormat64bppARGB:
734             convert_rgb_to_rgb(getpixel_32bppARGB, setpixel_64bppARGB);
735         default:
736             break;
737         }
738         break;
739     case PixelFormat32bppPARGB:
740         switch (dst_format)
741         {
742         case PixelFormat16bppGrayScale:
743             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_16bppGrayScale);
744         case PixelFormat16bppRGB555:
745             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_16bppRGB555);
746         case PixelFormat16bppRGB565:
747             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_16bppRGB565);
748         case PixelFormat16bppARGB1555:
749             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_16bppARGB1555);
750         case PixelFormat24bppRGB:
751             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_24bppRGB);
752         case PixelFormat32bppRGB:
753             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_32bppRGB);
754         case PixelFormat32bppARGB:
755             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_32bppARGB);
756         case PixelFormat48bppRGB:
757             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_48bppRGB);
758         case PixelFormat64bppARGB:
759             convert_rgb_to_rgb(getpixel_32bppPARGB, setpixel_64bppARGB);
760         default:
761             break;
762         }
763         break;
764     case PixelFormat48bppRGB:
765         switch (dst_format)
766         {
767         case PixelFormat16bppGrayScale:
768             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_16bppGrayScale);
769         case PixelFormat16bppRGB555:
770             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_16bppRGB555);
771         case PixelFormat16bppRGB565:
772             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_16bppRGB565);
773         case PixelFormat16bppARGB1555:
774             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_16bppARGB1555);
775         case PixelFormat24bppRGB:
776             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_24bppRGB);
777         case PixelFormat32bppRGB:
778             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_32bppRGB);
779         case PixelFormat32bppARGB:
780             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_32bppARGB);
781         case PixelFormat32bppPARGB:
782             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_32bppPARGB);
783         case PixelFormat64bppARGB:
784             convert_rgb_to_rgb(getpixel_48bppRGB, setpixel_64bppARGB);
785         default:
786             break;
787         }
788         break;
789     case PixelFormat64bppARGB:
790         switch (dst_format)
791         {
792         case PixelFormat16bppGrayScale:
793             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_16bppGrayScale);
794         case PixelFormat16bppRGB555:
795             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_16bppRGB555);
796         case PixelFormat16bppRGB565:
797             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_16bppRGB565);
798         case PixelFormat16bppARGB1555:
799             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_16bppARGB1555);
800         case PixelFormat24bppRGB:
801             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_24bppRGB);
802         case PixelFormat32bppRGB:
803             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_32bppRGB);
804         case PixelFormat32bppARGB:
805             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_32bppARGB);
806         case PixelFormat32bppPARGB:
807             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_32bppPARGB);
808         case PixelFormat48bppRGB:
809             convert_rgb_to_rgb(getpixel_64bppARGB, setpixel_48bppRGB);
810         default:
811             break;
812         }
813         break;
814     case PixelFormat64bppPARGB:
815         switch (dst_format)
816         {
817         case PixelFormat16bppGrayScale:
818             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_16bppGrayScale);
819         case PixelFormat16bppRGB555:
820             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_16bppRGB555);
821         case PixelFormat16bppRGB565:
822             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_16bppRGB565);
823         case PixelFormat16bppARGB1555:
824             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_16bppARGB1555);
825         case PixelFormat24bppRGB:
826             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_24bppRGB);
827         case PixelFormat32bppRGB:
828             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_32bppRGB);
829         case PixelFormat32bppARGB:
830             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_32bppARGB);
831         case PixelFormat32bppPARGB:
832             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_32bppPARGB);
833         case PixelFormat48bppRGB:
834             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_48bppRGB);
835         case PixelFormat64bppARGB:
836             convert_rgb_to_rgb(getpixel_64bppPARGB, setpixel_64bppARGB);
837         default:
838             break;
839         }
840         break;
841     default:
842         break;
843     }
844
845 #undef convert_indexed_to_rgb
846 #undef convert_rgb_to_rgb
847
848     return NotImplemented;
849 }
850
851 /* This function returns a pointer to an array of pixels that represents the
852  * bitmap. The *entire* bitmap is locked according to the lock mode specified by
853  * flags.  It is correct behavior that a user who calls this function with write
854  * privileges can write to the whole bitmap (not just the area in rect).
855  *
856  * FIXME: only used portion of format is bits per pixel. */
857 GpStatus WINGDIPAPI GdipBitmapLockBits(GpBitmap* bitmap, GDIPCONST GpRect* rect,
858     UINT flags, PixelFormat format, BitmapData* lockeddata)
859 {
860     INT stride, bitspp = PIXELFORMATBPP(format);
861     BYTE *buff = NULL;
862     UINT abs_height;
863     GpRect act_rect; /* actual rect to be used */
864     GpStatus stat;
865
866     TRACE("%p %p %d 0x%x %p\n", bitmap, rect, flags, format, lockeddata);
867
868     if(!lockeddata || !bitmap)
869         return InvalidParameter;
870
871     if(rect){
872         if(rect->X < 0 || rect->Y < 0 || (rect->X + rect->Width > bitmap->width) ||
873           (rect->Y + rect->Height > bitmap->height) || !flags)
874             return InvalidParameter;
875
876         act_rect = *rect;
877     }
878     else{
879         act_rect.X = act_rect.Y = 0;
880         act_rect.Width  = bitmap->width;
881         act_rect.Height = bitmap->height;
882     }
883
884     if(flags & ImageLockModeUserInputBuf)
885     {
886         static int fixme=0;
887         if (!fixme++) FIXME("ImageLockModeUserInputBuf not implemented\n");
888         return NotImplemented;
889     }
890
891     if(bitmap->lockmode)
892     {
893         WARN("bitmap is already locked and cannot be locked again\n");
894         return WrongState;
895     }
896
897     if (bitmap->bits && bitmap->format == format)
898     {
899         /* no conversion is necessary; just use the bits directly */
900         lockeddata->Width = act_rect.Width;
901         lockeddata->Height = act_rect.Height;
902         lockeddata->PixelFormat = format;
903         lockeddata->Reserved = flags;
904         lockeddata->Stride = bitmap->stride;
905         lockeddata->Scan0 = bitmap->bits + (bitspp / 8) * act_rect.X +
906                             bitmap->stride * act_rect.Y;
907
908         bitmap->lockmode = flags;
909         bitmap->numlocks++;
910
911         return Ok;
912     }
913
914     /* Make sure we can convert to the requested format. */
915     stat = convert_pixels(0, 0, 0, NULL, format, 0, NULL, bitmap->format, NULL);
916     if (stat == NotImplemented)
917     {
918         FIXME("cannot read bitmap from %x to %x\n", bitmap->format, format);
919         return NotImplemented;
920     }
921
922     /* If we're opening for writing, make sure we'll be able to write back in
923      * the original format. */
924     if (flags & ImageLockModeWrite)
925     {
926         stat = convert_pixels(0, 0, 0, NULL, bitmap->format, 0, NULL, format, NULL);
927         if (stat == NotImplemented)
928         {
929             FIXME("cannot write bitmap from %x to %x\n", format, bitmap->format);
930             return NotImplemented;
931         }
932     }
933
934     abs_height = bitmap->height;
935     stride = (bitmap->width * bitspp + 7) / 8;
936     stride = (stride + 3) & ~3;
937
938     buff = GdipAlloc(stride * abs_height);
939
940     if (!buff) return OutOfMemory;
941
942     stat = convert_pixels(bitmap->width, bitmap->height,
943         stride, buff, format,
944         bitmap->stride, bitmap->bits, bitmap->format, bitmap->image.palette_entries);
945
946     if (stat != Ok)
947     {
948         GdipFree(buff);
949         return stat;
950     }
951
952     lockeddata->Width  = act_rect.Width;
953     lockeddata->Height = act_rect.Height;
954     lockeddata->PixelFormat = format;
955     lockeddata->Reserved = flags;
956     lockeddata->Stride = stride;
957     lockeddata->Scan0  = buff + (bitspp / 8) * act_rect.X + stride * act_rect.Y;
958
959     bitmap->lockmode = flags;
960     bitmap->numlocks++;
961     bitmap->bitmapbits = buff;
962
963     return Ok;
964 }
965
966 GpStatus WINGDIPAPI GdipBitmapSetResolution(GpBitmap* bitmap, REAL xdpi, REAL ydpi)
967 {
968     TRACE("(%p, %.2f, %.2f)\n", bitmap, xdpi, ydpi);
969
970     if (!bitmap || xdpi == 0.0 || ydpi == 0.0)
971         return InvalidParameter;
972
973     bitmap->image.xres = xdpi;
974     bitmap->image.yres = ydpi;
975
976     return Ok;
977 }
978
979 GpStatus WINGDIPAPI GdipBitmapUnlockBits(GpBitmap* bitmap,
980     BitmapData* lockeddata)
981 {
982     GpStatus stat;
983
984     TRACE("(%p,%p)\n", bitmap, lockeddata);
985
986     if(!bitmap || !lockeddata)
987         return InvalidParameter;
988
989     if(!bitmap->lockmode)
990         return WrongState;
991
992     if(lockeddata->Reserved & ImageLockModeUserInputBuf)
993         return NotImplemented;
994
995     if(lockeddata->Reserved & ImageLockModeRead){
996         if(!(--bitmap->numlocks))
997             bitmap->lockmode = 0;
998
999         GdipFree(bitmap->bitmapbits);
1000         bitmap->bitmapbits = NULL;
1001         return Ok;
1002     }
1003
1004     if (!bitmap->bitmapbits)
1005     {
1006         /* we passed a direct reference; no need to do anything */
1007         bitmap->lockmode = 0;
1008         bitmap->numlocks = 0;
1009         return Ok;
1010     }
1011
1012     stat = convert_pixels(bitmap->width, bitmap->height,
1013         bitmap->stride, bitmap->bits, bitmap->format,
1014         lockeddata->Stride, bitmap->bitmapbits, lockeddata->PixelFormat, NULL);
1015
1016     if (stat != Ok)
1017     {
1018         ERR("failed to convert pixels; this should never happen\n");
1019     }
1020
1021     GdipFree(bitmap->bitmapbits);
1022     bitmap->bitmapbits = NULL;
1023     bitmap->lockmode = 0;
1024     bitmap->numlocks = 0;
1025
1026     return stat;
1027 }
1028
1029 GpStatus WINGDIPAPI GdipCloneBitmapArea(REAL x, REAL y, REAL width, REAL height,
1030     PixelFormat format, GpBitmap* srcBitmap, GpBitmap** dstBitmap)
1031 {
1032     BitmapData lockeddata_src, lockeddata_dst;
1033     int i;
1034     UINT row_size;
1035     Rect area;
1036     GpStatus stat;
1037
1038     TRACE("(%f,%f,%f,%f,0x%x,%p,%p)\n", x, y, width, height, format, srcBitmap, dstBitmap);
1039
1040     if (!srcBitmap || !dstBitmap || srcBitmap->image.type != ImageTypeBitmap ||
1041         x < 0 || y < 0 ||
1042         x + width > srcBitmap->width || y + height > srcBitmap->height)
1043     {
1044         TRACE("<-- InvalidParameter\n");
1045         return InvalidParameter;
1046     }
1047
1048     if (format == PixelFormatDontCare)
1049         format = srcBitmap->format;
1050
1051     area.X = roundr(x);
1052     area.Y = roundr(y);
1053     area.Width = roundr(width);
1054     area.Height = roundr(height);
1055
1056     stat = GdipBitmapLockBits(srcBitmap, &area, ImageLockModeRead, format,
1057         &lockeddata_src);
1058     if (stat != Ok) return stat;
1059
1060     stat = GdipCreateBitmapFromScan0(lockeddata_src.Width, lockeddata_src.Height,
1061         0, lockeddata_src.PixelFormat, NULL, dstBitmap);
1062     if (stat == Ok)
1063     {
1064         stat = GdipBitmapLockBits(*dstBitmap, NULL, ImageLockModeWrite,
1065             lockeddata_src.PixelFormat, &lockeddata_dst);
1066
1067         if (stat == Ok)
1068         {
1069             /* copy the image data */
1070             row_size = (lockeddata_src.Width * PIXELFORMATBPP(lockeddata_src.PixelFormat) +7)/8;
1071             for (i=0; i<lockeddata_src.Height; i++)
1072                 memcpy((BYTE*)lockeddata_dst.Scan0+lockeddata_dst.Stride*i,
1073                        (BYTE*)lockeddata_src.Scan0+lockeddata_src.Stride*i,
1074                        row_size);
1075
1076             GdipBitmapUnlockBits(*dstBitmap, &lockeddata_dst);
1077         }
1078
1079         if (stat != Ok)
1080             GdipDisposeImage((GpImage*)*dstBitmap);
1081     }
1082
1083     GdipBitmapUnlockBits(srcBitmap, &lockeddata_src);
1084
1085     if (stat != Ok)
1086     {
1087         *dstBitmap = NULL;
1088     }
1089
1090     return stat;
1091 }
1092
1093 GpStatus WINGDIPAPI GdipCloneBitmapAreaI(INT x, INT y, INT width, INT height,
1094     PixelFormat format, GpBitmap* srcBitmap, GpBitmap** dstBitmap)
1095 {
1096     TRACE("(%i,%i,%i,%i,0x%x,%p,%p)\n", x, y, width, height, format, srcBitmap, dstBitmap);
1097
1098     return GdipCloneBitmapArea(x, y, width, height, format, srcBitmap, dstBitmap);
1099 }
1100
1101 GpStatus WINGDIPAPI GdipCloneImage(GpImage *image, GpImage **cloneImage)
1102 {
1103     GpStatus stat = GenericError;
1104
1105     TRACE("%p, %p\n", image, cloneImage);
1106
1107     if (!image || !cloneImage)
1108         return InvalidParameter;
1109
1110     if (image->picture)
1111     {
1112         IStream* stream;
1113         HRESULT hr;
1114         INT size;
1115         LARGE_INTEGER move;
1116
1117         hr = CreateStreamOnHGlobal(0, TRUE, &stream);
1118         if (FAILED(hr))
1119             return GenericError;
1120
1121         hr = IPicture_SaveAsFile(image->picture, stream, FALSE, &size);
1122         if(FAILED(hr))
1123         {
1124             WARN("Failed to save image on stream\n");
1125             goto out;
1126         }
1127
1128         /* Set seek pointer back to the beginning of the picture */
1129         move.QuadPart = 0;
1130         hr = IStream_Seek(stream, move, STREAM_SEEK_SET, NULL);
1131         if (FAILED(hr))
1132             goto out;
1133
1134         stat = GdipLoadImageFromStream(stream, cloneImage);
1135         if (stat != Ok) WARN("Failed to load image from stream\n");
1136
1137     out:
1138         IStream_Release(stream);
1139         return stat;
1140     }
1141     else if (image->type == ImageTypeBitmap)
1142     {
1143         GpBitmap *bitmap = (GpBitmap*)image;
1144         BitmapData lockeddata_src, lockeddata_dst;
1145         int i;
1146         UINT row_size;
1147
1148         stat = GdipBitmapLockBits(bitmap, NULL, ImageLockModeRead, bitmap->format,
1149             &lockeddata_src);
1150         if (stat != Ok) return stat;
1151
1152         stat = GdipCreateBitmapFromScan0(lockeddata_src.Width, lockeddata_src.Height,
1153             0, lockeddata_src.PixelFormat, NULL, (GpBitmap**)cloneImage);
1154         if (stat == Ok)
1155         {
1156             stat = GdipBitmapLockBits((GpBitmap*)*cloneImage, NULL, ImageLockModeWrite,
1157                 lockeddata_src.PixelFormat, &lockeddata_dst);
1158
1159             if (stat == Ok)
1160             {
1161                 /* copy the image data */
1162                 row_size = (lockeddata_src.Width * PIXELFORMATBPP(lockeddata_src.PixelFormat) +7)/8;
1163                 for (i=0; i<lockeddata_src.Height; i++)
1164                     memcpy((BYTE*)lockeddata_dst.Scan0+lockeddata_dst.Stride*i,
1165                            (BYTE*)lockeddata_src.Scan0+lockeddata_src.Stride*i,
1166                            row_size);
1167
1168                 GdipBitmapUnlockBits((GpBitmap*)*cloneImage, &lockeddata_dst);
1169             }
1170
1171             if (stat != Ok)
1172                 GdipDisposeImage(*cloneImage);
1173         }
1174
1175         GdipBitmapUnlockBits(bitmap, &lockeddata_src);
1176
1177         if (stat != Ok)
1178         {
1179             *cloneImage = NULL;
1180         }
1181         else memcpy(&(*cloneImage)->format, &image->format, sizeof(GUID));
1182
1183         return stat;
1184     }
1185     else
1186     {
1187         ERR("GpImage with no IPicture or bitmap?!\n");
1188         return NotImplemented;
1189     }
1190 }
1191
1192 GpStatus WINGDIPAPI GdipCreateBitmapFromFile(GDIPCONST WCHAR* filename,
1193     GpBitmap **bitmap)
1194 {
1195     GpStatus stat;
1196     IStream *stream;
1197
1198     TRACE("(%s) %p\n", debugstr_w(filename), bitmap);
1199
1200     if(!filename || !bitmap)
1201         return InvalidParameter;
1202
1203     stat = GdipCreateStreamOnFile(filename, GENERIC_READ, &stream);
1204
1205     if(stat != Ok)
1206         return stat;
1207
1208     stat = GdipCreateBitmapFromStream(stream, bitmap);
1209
1210     IStream_Release(stream);
1211
1212     return stat;
1213 }
1214
1215 GpStatus WINGDIPAPI GdipCreateBitmapFromGdiDib(GDIPCONST BITMAPINFO* info,
1216                                                VOID *bits, GpBitmap **bitmap)
1217 {
1218     DWORD height, stride;
1219     PixelFormat format;
1220
1221     FIXME("(%p, %p, %p) - partially implemented\n", info, bits, bitmap);
1222
1223     if (!info || !bits || !bitmap)
1224         return InvalidParameter;
1225
1226     height = abs(info->bmiHeader.biHeight);
1227     stride = ((info->bmiHeader.biWidth * info->bmiHeader.biBitCount + 31) >> 3) & ~3;
1228
1229     if(info->bmiHeader.biHeight > 0) /* bottom-up */
1230     {
1231         bits = (BYTE*)bits + (height - 1) * stride;
1232         stride = -stride;
1233     }
1234
1235     switch(info->bmiHeader.biBitCount) {
1236     case 1:
1237         format = PixelFormat1bppIndexed;
1238         break;
1239     case 4:
1240         format = PixelFormat4bppIndexed;
1241         break;
1242     case 8:
1243         format = PixelFormat8bppIndexed;
1244         break;
1245     case 16:
1246         format = PixelFormat16bppRGB555;
1247         break;
1248     case 24:
1249         format = PixelFormat24bppRGB;
1250         break;
1251     case 32:
1252         format = PixelFormat32bppRGB;
1253         break;
1254     default:
1255         FIXME("don't know how to handle %d bpp\n", info->bmiHeader.biBitCount);
1256         *bitmap = NULL;
1257         return InvalidParameter;
1258     }
1259
1260     return GdipCreateBitmapFromScan0(info->bmiHeader.biWidth, height, stride, format,
1261                                      bits, bitmap);
1262
1263 }
1264
1265 /* FIXME: no icm */
1266 GpStatus WINGDIPAPI GdipCreateBitmapFromFileICM(GDIPCONST WCHAR* filename,
1267     GpBitmap **bitmap)
1268 {
1269     TRACE("(%s) %p\n", debugstr_w(filename), bitmap);
1270
1271     return GdipCreateBitmapFromFile(filename, bitmap);
1272 }
1273
1274 GpStatus WINGDIPAPI GdipCreateBitmapFromResource(HINSTANCE hInstance,
1275     GDIPCONST WCHAR* lpBitmapName, GpBitmap** bitmap)
1276 {
1277     HBITMAP hbm;
1278     GpStatus stat = InvalidParameter;
1279
1280     TRACE("%p (%s) %p\n", hInstance, debugstr_w(lpBitmapName), bitmap);
1281
1282     if(!lpBitmapName || !bitmap)
1283         return InvalidParameter;
1284
1285     /* load DIB */
1286     hbm = LoadImageW(hInstance, lpBitmapName, IMAGE_BITMAP, 0, 0,
1287                      LR_CREATEDIBSECTION);
1288
1289     if(hbm){
1290         stat = GdipCreateBitmapFromHBITMAP(hbm, NULL, bitmap);
1291         DeleteObject(hbm);
1292     }
1293
1294     return stat;
1295 }
1296
1297 GpStatus WINGDIPAPI GdipCreateHBITMAPFromBitmap(GpBitmap* bitmap,
1298     HBITMAP* hbmReturn, ARGB background)
1299 {
1300     GpStatus stat;
1301     HBITMAP result, oldbitmap;
1302     UINT width, height;
1303     HDC hdc;
1304     GpGraphics *graphics;
1305     BITMAPINFOHEADER bih;
1306     void *bits;
1307     TRACE("(%p,%p,%x)\n", bitmap, hbmReturn, background);
1308
1309     if (!bitmap || !hbmReturn) return InvalidParameter;
1310
1311     GdipGetImageWidth((GpImage*)bitmap, &width);
1312     GdipGetImageHeight((GpImage*)bitmap, &height);
1313
1314     bih.biSize = sizeof(bih);
1315     bih.biWidth = width;
1316     bih.biHeight = height;
1317     bih.biPlanes = 1;
1318     bih.biBitCount = 32;
1319     bih.biCompression = BI_RGB;
1320     bih.biSizeImage = 0;
1321     bih.biXPelsPerMeter = 0;
1322     bih.biYPelsPerMeter = 0;
1323     bih.biClrUsed = 0;
1324     bih.biClrImportant = 0;
1325
1326     hdc = CreateCompatibleDC(NULL);
1327     if (!hdc) return GenericError;
1328
1329     result = CreateDIBSection(hdc, (BITMAPINFO*)&bih, DIB_RGB_COLORS, &bits,
1330         NULL, 0);
1331
1332     if (result)
1333     {
1334         oldbitmap = SelectObject(hdc, result);
1335
1336         stat = GdipCreateFromHDC(hdc, &graphics);
1337         if (stat == Ok)
1338         {
1339             stat = GdipGraphicsClear(graphics, background);
1340
1341             if (stat == Ok)
1342                 stat = GdipDrawImage(graphics, (GpImage*)bitmap, 0, 0);
1343
1344             GdipDeleteGraphics(graphics);
1345         }
1346
1347         SelectObject(hdc, oldbitmap);
1348     }
1349     else
1350         stat = GenericError;
1351
1352     DeleteDC(hdc);
1353
1354     if (stat != Ok && result)
1355     {
1356         DeleteObject(result);
1357         result = NULL;
1358     }
1359
1360     *hbmReturn = result;
1361
1362     return stat;
1363 }
1364
1365 GpStatus WINGDIPAPI GdipConvertToEmfPlus(const GpGraphics* ref,
1366     GpMetafile* metafile, BOOL* succ, EmfType emfType,
1367     const WCHAR* description, GpMetafile** out_metafile)
1368 {
1369     static int calls;
1370
1371     TRACE("(%p,%p,%p,%u,%s,%p)\n", ref, metafile, succ, emfType,
1372         debugstr_w(description), out_metafile);
1373
1374     if(!ref || !metafile || !out_metafile)
1375         return InvalidParameter;
1376
1377     *succ = FALSE;
1378     *out_metafile = NULL;
1379
1380     if(!(calls++))
1381         FIXME("not implemented\n");
1382
1383     return NotImplemented;
1384 }
1385
1386 /* FIXME: this should create a bitmap in the given size with the attributes
1387  * (resolution etc.) of the graphics object */
1388 GpStatus WINGDIPAPI GdipCreateBitmapFromGraphics(INT width, INT height,
1389     GpGraphics* target, GpBitmap** bitmap)
1390 {
1391     static int calls;
1392     GpStatus ret;
1393
1394     TRACE("(%d, %d, %p, %p)\n", width, height, target, bitmap);
1395
1396     if(!target || !bitmap)
1397         return InvalidParameter;
1398
1399     if(!(calls++))
1400         FIXME("hacked stub\n");
1401
1402     ret = GdipCreateBitmapFromScan0(width, height, 0, PixelFormat24bppRGB,
1403                                     NULL, bitmap);
1404
1405     return ret;
1406 }
1407
1408 GpStatus WINGDIPAPI GdipCreateBitmapFromHICON(HICON hicon, GpBitmap** bitmap)
1409 {
1410     GpStatus stat;
1411     ICONINFO iinfo;
1412     BITMAP bm;
1413     int ret;
1414     UINT width, height;
1415     GpRect rect;
1416     BitmapData lockeddata;
1417     HDC screendc;
1418     BOOL has_alpha;
1419     int x, y;
1420     BYTE *bits;
1421     BITMAPINFOHEADER bih;
1422     DWORD *src;
1423     BYTE *dst_row;
1424     DWORD *dst;
1425
1426     TRACE("%p, %p\n", hicon, bitmap);
1427
1428     if(!bitmap || !GetIconInfo(hicon, &iinfo))
1429         return InvalidParameter;
1430
1431     /* get the size of the icon */
1432     ret = GetObjectA(iinfo.hbmColor ? iinfo.hbmColor : iinfo.hbmMask, sizeof(bm), &bm);
1433     if (ret == 0) {
1434         DeleteObject(iinfo.hbmColor);
1435         DeleteObject(iinfo.hbmMask);
1436         return GenericError;
1437     }
1438
1439     width = bm.bmWidth;
1440
1441     if (iinfo.hbmColor)
1442         height = abs(bm.bmHeight);
1443     else /* combined bitmap + mask */
1444         height = abs(bm.bmHeight) / 2;
1445
1446     bits = HeapAlloc(GetProcessHeap(), 0, 4*width*height);
1447     if (!bits) {
1448         DeleteObject(iinfo.hbmColor);
1449         DeleteObject(iinfo.hbmMask);
1450         return OutOfMemory;
1451     }
1452
1453     stat = GdipCreateBitmapFromScan0(width, height, 0, PixelFormat32bppARGB, NULL, bitmap);
1454     if (stat != Ok) {
1455         DeleteObject(iinfo.hbmColor);
1456         DeleteObject(iinfo.hbmMask);
1457         HeapFree(GetProcessHeap(), 0, bits);
1458         return stat;
1459     }
1460
1461     rect.X = 0;
1462     rect.Y = 0;
1463     rect.Width = width;
1464     rect.Height = height;
1465
1466     stat = GdipBitmapLockBits(*bitmap, &rect, ImageLockModeWrite, PixelFormat32bppARGB, &lockeddata);
1467     if (stat != Ok) {
1468         DeleteObject(iinfo.hbmColor);
1469         DeleteObject(iinfo.hbmMask);
1470         HeapFree(GetProcessHeap(), 0, bits);
1471         GdipDisposeImage((GpImage*)*bitmap);
1472         return stat;
1473     }
1474
1475     bih.biSize = sizeof(bih);
1476     bih.biWidth = width;
1477     bih.biHeight = -height;
1478     bih.biPlanes = 1;
1479     bih.biBitCount = 32;
1480     bih.biCompression = BI_RGB;
1481     bih.biSizeImage = 0;
1482     bih.biXPelsPerMeter = 0;
1483     bih.biYPelsPerMeter = 0;
1484     bih.biClrUsed = 0;
1485     bih.biClrImportant = 0;
1486
1487     screendc = GetDC(0);
1488     if (iinfo.hbmColor)
1489     {
1490         GetDIBits(screendc, iinfo.hbmColor, 0, height, bits, (BITMAPINFO*)&bih, DIB_RGB_COLORS);
1491
1492         if (bm.bmBitsPixel == 32)
1493         {
1494             has_alpha = FALSE;
1495
1496             /* If any pixel has a non-zero alpha, ignore hbmMask */
1497             src = (DWORD*)bits;
1498             for (x=0; x<width && !has_alpha; x++)
1499                 for (y=0; y<height && !has_alpha; y++)
1500                     if ((*src++ & 0xff000000) != 0)
1501                         has_alpha = TRUE;
1502         }
1503         else has_alpha = FALSE;
1504     }
1505     else
1506     {
1507         GetDIBits(screendc, iinfo.hbmMask, 0, height, bits, (BITMAPINFO*)&bih, DIB_RGB_COLORS);
1508         has_alpha = FALSE;
1509     }
1510
1511     /* copy the image data to the Bitmap */
1512     src = (DWORD*)bits;
1513     dst_row = lockeddata.Scan0;
1514     for (y=0; y<height; y++)
1515     {
1516         memcpy(dst_row, src, width*4);
1517         src += width;
1518         dst_row += lockeddata.Stride;
1519     }
1520
1521     if (!has_alpha)
1522     {
1523         if (iinfo.hbmMask)
1524         {
1525             /* read alpha data from the mask */
1526             if (iinfo.hbmColor)
1527                 GetDIBits(screendc, iinfo.hbmMask, 0, height, bits, (BITMAPINFO*)&bih, DIB_RGB_COLORS);
1528             else
1529                 GetDIBits(screendc, iinfo.hbmMask, height, height, bits, (BITMAPINFO*)&bih, DIB_RGB_COLORS);
1530
1531             src = (DWORD*)bits;
1532             dst_row = lockeddata.Scan0;
1533             for (y=0; y<height; y++)
1534             {
1535                 dst = (DWORD*)dst_row;
1536                 for (x=0; x<height; x++)
1537                 {
1538                     DWORD src_value = *src++;
1539                     if (src_value)
1540                         *dst++ = 0;
1541                     else
1542                         *dst++ |= 0xff000000;
1543                 }
1544                 dst_row += lockeddata.Stride;
1545             }
1546         }
1547         else
1548         {
1549             /* set constant alpha of 255 */
1550             dst_row = bits;
1551             for (y=0; y<height; y++)
1552             {
1553                 dst = (DWORD*)dst_row;
1554                 for (x=0; x<height; x++)
1555                     *dst++ |= 0xff000000;
1556                 dst_row += lockeddata.Stride;
1557             }
1558         }
1559     }
1560
1561     ReleaseDC(0, screendc);
1562
1563     DeleteObject(iinfo.hbmColor);
1564     DeleteObject(iinfo.hbmMask);
1565
1566     GdipBitmapUnlockBits(*bitmap, &lockeddata);
1567
1568     HeapFree(GetProcessHeap(), 0, bits);
1569
1570     return Ok;
1571 }
1572
1573 static void generate_halftone_palette(ARGB *entries, UINT count)
1574 {
1575     static const BYTE halftone_values[6]={0x00,0x33,0x66,0x99,0xcc,0xff};
1576     UINT i;
1577
1578     for (i=0; i<8 && i<count; i++)
1579     {
1580         entries[i] = 0xff000000;
1581         if (i&1) entries[i] |= 0x800000;
1582         if (i&2) entries[i] |= 0x8000;
1583         if (i&4) entries[i] |= 0x80;
1584     }
1585
1586     if (8 < count)
1587         entries[i] = 0xffc0c0c0;
1588
1589     for (i=9; i<16 && i<count; i++)
1590     {
1591         entries[i] = 0xff000000;
1592         if (i&1) entries[i] |= 0xff0000;
1593         if (i&2) entries[i] |= 0xff00;
1594         if (i&4) entries[i] |= 0xff;
1595     }
1596
1597     for (i=16; i<40 && i<count; i++)
1598     {
1599         entries[i] = 0;
1600     }
1601
1602     for (i=40; i<256 && i<count; i++)
1603     {
1604         entries[i] = 0xff000000;
1605         entries[i] |= halftone_values[(i-40)%6];
1606         entries[i] |= halftone_values[((i-40)/6)%6] << 8;
1607         entries[i] |= halftone_values[((i-40)/36)%6] << 16;
1608     }
1609 }
1610
1611 static GpStatus get_screen_resolution(REAL *xres, REAL *yres)
1612 {
1613     HDC screendc = GetDC(0);
1614
1615     if (!screendc) return GenericError;
1616
1617     *xres = (REAL)GetDeviceCaps(screendc, LOGPIXELSX);
1618     *yres = (REAL)GetDeviceCaps(screendc, LOGPIXELSY);
1619
1620     ReleaseDC(0, screendc);
1621
1622     return Ok;
1623 }
1624
1625 GpStatus WINGDIPAPI GdipCreateBitmapFromScan0(INT width, INT height, INT stride,
1626     PixelFormat format, BYTE* scan0, GpBitmap** bitmap)
1627 {
1628     BITMAPINFO* pbmi;
1629     HBITMAP hbitmap=NULL;
1630     INT row_size, dib_stride;
1631     HDC hdc;
1632     BYTE *bits=NULL, *own_bits=NULL;
1633     REAL xres, yres;
1634     GpStatus stat;
1635
1636     TRACE("%d %d %d 0x%x %p %p\n", width, height, stride, format, scan0, bitmap);
1637
1638     if (!bitmap) return InvalidParameter;
1639
1640     if(width <= 0 || height <= 0 || (scan0 && (stride % 4))){
1641         *bitmap = NULL;
1642         return InvalidParameter;
1643     }
1644
1645     if(scan0 && !stride)
1646         return InvalidParameter;
1647
1648     stat = get_screen_resolution(&xres, &yres);
1649     if (stat != Ok) return stat;
1650
1651     row_size = (width * PIXELFORMATBPP(format)+7) / 8;
1652     dib_stride = (row_size + 3) & ~3;
1653
1654     if(stride == 0)
1655         stride = dib_stride;
1656
1657     if (format & PixelFormatGDI && !(format & (PixelFormatAlpha|PixelFormatIndexed)) && !scan0)
1658     {
1659         pbmi = GdipAlloc(sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
1660         if (!pbmi)
1661             return OutOfMemory;
1662
1663         pbmi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
1664         pbmi->bmiHeader.biWidth = width;
1665         pbmi->bmiHeader.biHeight = -height;
1666         pbmi->bmiHeader.biPlanes = 1;
1667         /* FIXME: use the rest of the data from format */
1668         pbmi->bmiHeader.biBitCount = PIXELFORMATBPP(format);
1669         pbmi->bmiHeader.biCompression = BI_RGB;
1670         pbmi->bmiHeader.biSizeImage = 0;
1671         pbmi->bmiHeader.biXPelsPerMeter = 0;
1672         pbmi->bmiHeader.biYPelsPerMeter = 0;
1673         pbmi->bmiHeader.biClrUsed = 0;
1674         pbmi->bmiHeader.biClrImportant = 0;
1675
1676         hdc = CreateCompatibleDC(NULL);
1677         if (!hdc) {
1678             GdipFree(pbmi);
1679             return GenericError;
1680         }
1681
1682         hbitmap = CreateDIBSection(hdc, pbmi, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
1683
1684         DeleteDC(hdc);
1685         GdipFree(pbmi);
1686
1687         if (!hbitmap) return GenericError;
1688     }
1689     else
1690     {
1691         /* Not a GDI format; don't try to make an HBITMAP. */
1692         if (scan0)
1693             bits = scan0;
1694         else
1695         {
1696             INT size = abs(stride) * height;
1697
1698             own_bits = bits = GdipAlloc(size);
1699             if (!own_bits) return OutOfMemory;
1700
1701             if (stride < 0)
1702                 bits += stride * (1 - height);
1703         }
1704     }
1705
1706     *bitmap = GdipAlloc(sizeof(GpBitmap));
1707     if(!*bitmap)
1708     {
1709         DeleteObject(hbitmap);
1710         GdipFree(own_bits);
1711         return OutOfMemory;
1712     }
1713
1714     (*bitmap)->image.type = ImageTypeBitmap;
1715     memcpy(&(*bitmap)->image.format, &ImageFormatMemoryBMP, sizeof(GUID));
1716     (*bitmap)->image.flags = ImageFlagsNone;
1717     (*bitmap)->image.palette_flags = 0;
1718     (*bitmap)->image.palette_count = 0;
1719     (*bitmap)->image.palette_size = 0;
1720     (*bitmap)->image.palette_entries = NULL;
1721     (*bitmap)->image.xres = xres;
1722     (*bitmap)->image.yres = yres;
1723     (*bitmap)->width = width;
1724     (*bitmap)->height = height;
1725     (*bitmap)->format = format;
1726     (*bitmap)->image.picture = NULL;
1727     (*bitmap)->hbitmap = hbitmap;
1728     (*bitmap)->hdc = NULL;
1729     (*bitmap)->bits = bits;
1730     (*bitmap)->stride = dib_stride;
1731     (*bitmap)->own_bits = own_bits;
1732
1733     /* set format-related flags */
1734     if (format & (PixelFormatAlpha|PixelFormatPAlpha|PixelFormatIndexed))
1735         (*bitmap)->image.flags |= ImageFlagsHasAlpha;
1736
1737     if (format == PixelFormat1bppIndexed ||
1738         format == PixelFormat4bppIndexed ||
1739         format == PixelFormat8bppIndexed)
1740     {
1741         (*bitmap)->image.palette_size = (*bitmap)->image.palette_count = 1 << PIXELFORMATBPP(format);
1742         (*bitmap)->image.palette_entries = GdipAlloc(sizeof(ARGB) * ((*bitmap)->image.palette_size));
1743
1744         if (!(*bitmap)->image.palette_entries)
1745         {
1746             GdipDisposeImage(&(*bitmap)->image);
1747             *bitmap = NULL;
1748             return OutOfMemory;
1749         }
1750
1751         if (format == PixelFormat1bppIndexed)
1752         {
1753             (*bitmap)->image.palette_flags = PaletteFlagsGrayScale;
1754             (*bitmap)->image.palette_entries[0] = 0xff000000;
1755             (*bitmap)->image.palette_entries[1] = 0xffffffff;
1756         }
1757         else
1758         {
1759             if (format == PixelFormat8bppIndexed)
1760                 (*bitmap)->image.palette_flags = PaletteFlagsHalftone;
1761
1762             generate_halftone_palette((*bitmap)->image.palette_entries,
1763                 (*bitmap)->image.palette_count);
1764         }
1765     }
1766
1767     TRACE("<-- %p\n", *bitmap);
1768
1769     return Ok;
1770 }
1771
1772 GpStatus WINGDIPAPI GdipCreateBitmapFromStream(IStream* stream,
1773     GpBitmap **bitmap)
1774 {
1775     GpStatus stat;
1776
1777     TRACE("%p %p\n", stream, bitmap);
1778
1779     stat = GdipLoadImageFromStream(stream, (GpImage**) bitmap);
1780
1781     if(stat != Ok)
1782         return stat;
1783
1784     if((*bitmap)->image.type != ImageTypeBitmap){
1785         GdipDisposeImage(&(*bitmap)->image);
1786         *bitmap = NULL;
1787         return GenericError; /* FIXME: what error to return? */
1788     }
1789
1790     return Ok;
1791 }
1792
1793 /* FIXME: no icm */
1794 GpStatus WINGDIPAPI GdipCreateBitmapFromStreamICM(IStream* stream,
1795     GpBitmap **bitmap)
1796 {
1797     TRACE("%p %p\n", stream, bitmap);
1798
1799     return GdipCreateBitmapFromStream(stream, bitmap);
1800 }
1801
1802 GpStatus WINGDIPAPI GdipCreateCachedBitmap(GpBitmap *bitmap, GpGraphics *graphics,
1803     GpCachedBitmap **cachedbmp)
1804 {
1805     GpStatus stat;
1806
1807     TRACE("%p %p %p\n", bitmap, graphics, cachedbmp);
1808
1809     if(!bitmap || !graphics || !cachedbmp)
1810         return InvalidParameter;
1811
1812     *cachedbmp = GdipAlloc(sizeof(GpCachedBitmap));
1813     if(!*cachedbmp)
1814         return OutOfMemory;
1815
1816     stat = GdipCloneImage(&(bitmap->image), &(*cachedbmp)->image);
1817     if(stat != Ok){
1818         GdipFree(*cachedbmp);
1819         return stat;
1820     }
1821
1822     return Ok;
1823 }
1824
1825 GpStatus WINGDIPAPI GdipCreateHICONFromBitmap(GpBitmap *bitmap, HICON *hicon)
1826 {
1827     GpStatus stat;
1828     BitmapData lockeddata;
1829     ULONG andstride, xorstride, bitssize;
1830     LPBYTE andbits, xorbits, androw, xorrow, srcrow;
1831     UINT x, y;
1832
1833     TRACE("(%p, %p)\n", bitmap, hicon);
1834
1835     if (!bitmap || !hicon)
1836         return InvalidParameter;
1837
1838     stat = GdipBitmapLockBits(bitmap, NULL, ImageLockModeRead,
1839         PixelFormat32bppPARGB, &lockeddata);
1840     if (stat == Ok)
1841     {
1842         andstride = ((lockeddata.Width+31)/32)*4;
1843         xorstride = lockeddata.Width*4;
1844         bitssize = (andstride + xorstride) * lockeddata.Height;
1845
1846         andbits = GdipAlloc(bitssize);
1847
1848         if (andbits)
1849         {
1850             xorbits = andbits + andstride * lockeddata.Height;
1851
1852             for (y=0; y<lockeddata.Height; y++)
1853             {
1854                 srcrow = ((LPBYTE)lockeddata.Scan0) + lockeddata.Stride * y;
1855
1856                 androw = andbits + andstride * y;
1857                 for (x=0; x<lockeddata.Width; x++)
1858                     if (srcrow[3+4*x] >= 128)
1859                         androw[x/8] |= 1 << (7-x%8);
1860
1861                 xorrow = xorbits + xorstride * y;
1862                 memcpy(xorrow, srcrow, xorstride);
1863             }
1864
1865             *hicon = CreateIcon(NULL, lockeddata.Width, lockeddata.Height, 1, 32,
1866                 andbits, xorbits);
1867
1868             GdipFree(andbits);
1869         }
1870         else
1871             stat = OutOfMemory;
1872
1873         GdipBitmapUnlockBits(bitmap, &lockeddata);
1874     }
1875
1876     return stat;
1877 }
1878
1879 GpStatus WINGDIPAPI GdipDeleteCachedBitmap(GpCachedBitmap *cachedbmp)
1880 {
1881     TRACE("%p\n", cachedbmp);
1882
1883     if(!cachedbmp)
1884         return InvalidParameter;
1885
1886     GdipDisposeImage(cachedbmp->image);
1887     GdipFree(cachedbmp);
1888
1889     return Ok;
1890 }
1891
1892 GpStatus WINGDIPAPI GdipDrawCachedBitmap(GpGraphics *graphics,
1893     GpCachedBitmap *cachedbmp, INT x, INT y)
1894 {
1895     TRACE("%p %p %d %d\n", graphics, cachedbmp, x, y);
1896
1897     if(!graphics || !cachedbmp)
1898         return InvalidParameter;
1899
1900     return GdipDrawImage(graphics, cachedbmp->image, (REAL)x, (REAL)y);
1901 }
1902
1903 GpStatus WINGDIPAPI GdipEmfToWmfBits(HENHMETAFILE hemf, UINT cbData16,
1904     LPBYTE pData16, INT iMapMode, INT eFlags)
1905 {
1906     FIXME("(%p, %d, %p, %d, %d): stub\n", hemf, cbData16, pData16, iMapMode, eFlags);
1907     return NotImplemented;
1908 }
1909
1910 /* Internal utility function: Replace the image data of dst with that of src,
1911  * and free src. */
1912 static void move_bitmap(GpBitmap *dst, GpBitmap *src, BOOL clobber_palette)
1913 {
1914     GdipFree(dst->bitmapbits);
1915     DeleteDC(dst->hdc);
1916     DeleteObject(dst->hbitmap);
1917
1918     if (clobber_palette)
1919     {
1920         GdipFree(dst->image.palette_entries);
1921         dst->image.palette_flags = src->image.palette_flags;
1922         dst->image.palette_count = src->image.palette_count;
1923         dst->image.palette_entries = src->image.palette_entries;
1924     }
1925     else
1926         GdipFree(src->image.palette_entries);
1927
1928     dst->image.xres = src->image.xres;
1929     dst->image.yres = src->image.yres;
1930     dst->width = src->width;
1931     dst->height = src->height;
1932     dst->format = src->format;
1933     dst->hbitmap = src->hbitmap;
1934     dst->hdc = src->hdc;
1935     dst->bits = src->bits;
1936     dst->stride = src->stride;
1937     dst->own_bits = src->own_bits;
1938
1939     GdipFree(src);
1940 }
1941
1942 GpStatus WINGDIPAPI GdipDisposeImage(GpImage *image)
1943 {
1944     TRACE("%p\n", image);
1945
1946     if(!image)
1947         return InvalidParameter;
1948
1949     if (image->type == ImageTypeBitmap)
1950     {
1951         GdipFree(((GpBitmap*)image)->bitmapbits);
1952         GdipFree(((GpBitmap*)image)->own_bits);
1953         DeleteDC(((GpBitmap*)image)->hdc);
1954         DeleteObject(((GpBitmap*)image)->hbitmap);
1955     }
1956     else if (image->type != ImageTypeMetafile)
1957     {
1958         WARN("invalid image: %p\n", image);
1959         return ObjectBusy;
1960     }
1961     if (image->picture)
1962         IPicture_Release(image->picture);
1963     GdipFree(image->palette_entries);
1964     image->type = ~0;
1965     GdipFree(image);
1966
1967     return Ok;
1968 }
1969
1970 GpStatus WINGDIPAPI GdipFindFirstImageItem(GpImage *image, ImageItemData* item)
1971 {
1972     static int calls;
1973
1974     TRACE("(%p,%p)\n", image, item);
1975
1976     if(!image || !item)
1977         return InvalidParameter;
1978
1979     if (!(calls++))
1980         FIXME("not implemented\n");
1981
1982     return NotImplemented;
1983 }
1984
1985 GpStatus WINGDIPAPI GdipGetImageItemData(GpImage *image, ImageItemData *item)
1986 {
1987     static int calls;
1988
1989     TRACE("(%p,%p)\n", image, item);
1990
1991     if (!(calls++))
1992         FIXME("not implemented\n");
1993
1994     return NotImplemented;
1995 }
1996
1997 GpStatus WINGDIPAPI GdipGetImageBounds(GpImage *image, GpRectF *srcRect,
1998     GpUnit *srcUnit)
1999 {
2000     TRACE("%p %p %p\n", image, srcRect, srcUnit);
2001
2002     if(!image || !srcRect || !srcUnit)
2003         return InvalidParameter;
2004     if(image->type == ImageTypeMetafile){
2005         *srcRect = ((GpMetafile*)image)->bounds;
2006         *srcUnit = ((GpMetafile*)image)->unit;
2007     }
2008     else if(image->type == ImageTypeBitmap){
2009         srcRect->X = srcRect->Y = 0.0;
2010         srcRect->Width = (REAL) ((GpBitmap*)image)->width;
2011         srcRect->Height = (REAL) ((GpBitmap*)image)->height;
2012         *srcUnit = UnitPixel;
2013     }
2014     else{
2015         srcRect->X = srcRect->Y = 0.0;
2016         srcRect->Width = ipicture_pixel_width(image->picture);
2017         srcRect->Height = ipicture_pixel_height(image->picture);
2018         *srcUnit = UnitPixel;
2019     }
2020
2021     TRACE("returning (%f, %f) (%f, %f) unit type %d\n", srcRect->X, srcRect->Y,
2022           srcRect->Width, srcRect->Height, *srcUnit);
2023
2024     return Ok;
2025 }
2026
2027 GpStatus WINGDIPAPI GdipGetImageDimension(GpImage *image, REAL *width,
2028     REAL *height)
2029 {
2030     TRACE("%p %p %p\n", image, width, height);
2031
2032     if(!image || !height || !width)
2033         return InvalidParameter;
2034
2035     if(image->type == ImageTypeMetafile){
2036         HDC hdc = GetDC(0);
2037         REAL res = (REAL)GetDeviceCaps(hdc, LOGPIXELSX);
2038
2039         ReleaseDC(0, hdc);
2040
2041         *height = convert_unit(res, ((GpMetafile*)image)->unit) *
2042                         ((GpMetafile*)image)->bounds.Height;
2043
2044         *width = convert_unit(res, ((GpMetafile*)image)->unit) *
2045                         ((GpMetafile*)image)->bounds.Width;
2046     }
2047
2048     else if(image->type == ImageTypeBitmap){
2049         *height = ((GpBitmap*)image)->height;
2050         *width = ((GpBitmap*)image)->width;
2051     }
2052     else{
2053         *height = ipicture_pixel_height(image->picture);
2054         *width = ipicture_pixel_width(image->picture);
2055     }
2056
2057     TRACE("returning (%f, %f)\n", *height, *width);
2058     return Ok;
2059 }
2060
2061 GpStatus WINGDIPAPI GdipGetImageGraphicsContext(GpImage *image,
2062     GpGraphics **graphics)
2063 {
2064     HDC hdc;
2065     GpStatus stat;
2066
2067     TRACE("%p %p\n", image, graphics);
2068
2069     if(!image || !graphics)
2070         return InvalidParameter;
2071
2072     if(image->type != ImageTypeBitmap){
2073         FIXME("not implemented for image type %d\n", image->type);
2074         return NotImplemented;
2075     }
2076
2077     if (((GpBitmap*)image)->hbitmap)
2078     {
2079         hdc = ((GpBitmap*)image)->hdc;
2080
2081         if(!hdc){
2082             hdc = CreateCompatibleDC(0);
2083             SelectObject(hdc, ((GpBitmap*)image)->hbitmap);
2084             ((GpBitmap*)image)->hdc = hdc;
2085         }
2086
2087         stat = GdipCreateFromHDC(hdc, graphics);
2088
2089         if (stat == Ok)
2090             (*graphics)->image = image;
2091     }
2092     else
2093         stat = graphics_from_image(image, graphics);
2094
2095     return stat;
2096 }
2097
2098 GpStatus WINGDIPAPI GdipGetImageHeight(GpImage *image, UINT *height)
2099 {
2100     TRACE("%p %p\n", image, height);
2101
2102     if(!image || !height)
2103         return InvalidParameter;
2104
2105     if(image->type == ImageTypeMetafile){
2106         HDC hdc = GetDC(0);
2107         REAL res = (REAL)GetDeviceCaps(hdc, LOGPIXELSX);
2108
2109         ReleaseDC(0, hdc);
2110
2111         *height = roundr(convert_unit(res, ((GpMetafile*)image)->unit) *
2112                         ((GpMetafile*)image)->bounds.Height);
2113     }
2114     else if(image->type == ImageTypeBitmap)
2115         *height = ((GpBitmap*)image)->height;
2116     else
2117         *height = ipicture_pixel_height(image->picture);
2118
2119     TRACE("returning %d\n", *height);
2120
2121     return Ok;
2122 }
2123
2124 GpStatus WINGDIPAPI GdipGetImageHorizontalResolution(GpImage *image, REAL *res)
2125 {
2126     if(!image || !res)
2127         return InvalidParameter;
2128
2129     *res = image->xres;
2130
2131     TRACE("(%p) <-- %0.2f\n", image, *res);
2132
2133     return Ok;
2134 }
2135
2136 GpStatus WINGDIPAPI GdipGetImagePaletteSize(GpImage *image, INT *size)
2137 {
2138     TRACE("%p %p\n", image, size);
2139
2140     if(!image || !size)
2141         return InvalidParameter;
2142
2143     if (image->palette_count == 0)
2144         *size = sizeof(ColorPalette);
2145     else
2146         *size = sizeof(UINT)*2 + sizeof(ARGB)*image->palette_count;
2147
2148     TRACE("<-- %u\n", *size);
2149
2150     return Ok;
2151 }
2152
2153 /* FIXME: test this function for non-bitmap types */
2154 GpStatus WINGDIPAPI GdipGetImagePixelFormat(GpImage *image, PixelFormat *format)
2155 {
2156     TRACE("%p %p\n", image, format);
2157
2158     if(!image || !format)
2159         return InvalidParameter;
2160
2161     if(image->type != ImageTypeBitmap)
2162         *format = PixelFormat24bppRGB;
2163     else
2164         *format = ((GpBitmap*) image)->format;
2165
2166     return Ok;
2167 }
2168
2169 GpStatus WINGDIPAPI GdipGetImageRawFormat(GpImage *image, GUID *format)
2170 {
2171     TRACE("(%p, %p)\n", image, format);
2172
2173     if(!image || !format)
2174         return InvalidParameter;
2175
2176     memcpy(format, &image->format, sizeof(GUID));
2177
2178     return Ok;
2179 }
2180
2181 GpStatus WINGDIPAPI GdipGetImageType(GpImage *image, ImageType *type)
2182 {
2183     TRACE("%p %p\n", image, type);
2184
2185     if(!image || !type)
2186         return InvalidParameter;
2187
2188     *type = image->type;
2189
2190     return Ok;
2191 }
2192
2193 GpStatus WINGDIPAPI GdipGetImageVerticalResolution(GpImage *image, REAL *res)
2194 {
2195     if(!image || !res)
2196         return InvalidParameter;
2197
2198     *res = image->yres;
2199
2200     TRACE("(%p) <-- %0.2f\n", image, *res);
2201
2202     return Ok;
2203 }
2204
2205 GpStatus WINGDIPAPI GdipGetImageWidth(GpImage *image, UINT *width)
2206 {
2207     TRACE("%p %p\n", image, width);
2208
2209     if(!image || !width)
2210         return InvalidParameter;
2211
2212     if(image->type == ImageTypeMetafile){
2213         HDC hdc = GetDC(0);
2214         REAL res = (REAL)GetDeviceCaps(hdc, LOGPIXELSX);
2215
2216         ReleaseDC(0, hdc);
2217
2218         *width = roundr(convert_unit(res, ((GpMetafile*)image)->unit) *
2219                         ((GpMetafile*)image)->bounds.Width);
2220     }
2221     else if(image->type == ImageTypeBitmap)
2222         *width = ((GpBitmap*)image)->width;
2223     else
2224         *width = ipicture_pixel_width(image->picture);
2225
2226     TRACE("returning %d\n", *width);
2227
2228     return Ok;
2229 }
2230
2231 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromMetafile(GpMetafile * metafile,
2232     MetafileHeader * header)
2233 {
2234     static int calls;
2235
2236     TRACE("(%p, %p)\n", metafile, header);
2237
2238     if(!metafile || !header)
2239         return InvalidParameter;
2240
2241     if(!(calls++))
2242         FIXME("not implemented\n");
2243
2244     memset(header, 0, sizeof(MetafileHeader));
2245
2246     return Ok;
2247 }
2248
2249 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromEmf(HENHMETAFILE hEmf,
2250     MetafileHeader *header)
2251 {
2252     static int calls;
2253
2254     if(!hEmf || !header)
2255         return InvalidParameter;
2256
2257     if(!(calls++))
2258         FIXME("not implemented\n");
2259
2260     memset(header, 0, sizeof(MetafileHeader));
2261
2262     return Ok;
2263 }
2264
2265 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromFile(GDIPCONST WCHAR *filename,
2266     MetafileHeader *header)
2267 {
2268     static int calls;
2269
2270     TRACE("(%s,%p)\n", debugstr_w(filename), header);
2271
2272     if(!filename || !header)
2273         return InvalidParameter;
2274
2275     if(!(calls++))
2276         FIXME("not implemented\n");
2277
2278     memset(header, 0, sizeof(MetafileHeader));
2279
2280     return Ok;
2281 }
2282
2283 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromStream(IStream *stream,
2284     MetafileHeader *header)
2285 {
2286     static int calls;
2287
2288     TRACE("(%p,%p)\n", stream, header);
2289
2290     if(!stream || !header)
2291         return InvalidParameter;
2292
2293     if(!(calls++))
2294         FIXME("not implemented\n");
2295
2296     memset(header, 0, sizeof(MetafileHeader));
2297
2298     return Ok;
2299 }
2300
2301 GpStatus WINGDIPAPI GdipGetAllPropertyItems(GpImage *image, UINT size,
2302     UINT num, PropertyItem* items)
2303 {
2304     static int calls;
2305
2306     TRACE("(%p, %u, %u, %p)\n", image, size, num, items);
2307
2308     if(!(calls++))
2309         FIXME("not implemented\n");
2310
2311     return InvalidParameter;
2312 }
2313
2314 GpStatus WINGDIPAPI GdipGetPropertyCount(GpImage *image, UINT* num)
2315 {
2316     static int calls;
2317
2318     TRACE("(%p, %p)\n", image, num);
2319
2320     if(!(calls++))
2321         FIXME("not implemented\n");
2322
2323     return InvalidParameter;
2324 }
2325
2326 GpStatus WINGDIPAPI GdipGetPropertyIdList(GpImage *image, UINT num, PROPID* list)
2327 {
2328     static int calls;
2329
2330     TRACE("(%p, %u, %p)\n", image, num, list);
2331
2332     if(!(calls++))
2333         FIXME("not implemented\n");
2334
2335     return InvalidParameter;
2336 }
2337
2338 GpStatus WINGDIPAPI GdipGetPropertyItem(GpImage *image, PROPID id, UINT size,
2339     PropertyItem* buffer)
2340 {
2341     static int calls;
2342
2343     TRACE("(%p, %u, %u, %p)\n", image, id, size, buffer);
2344
2345     if(!(calls++))
2346         FIXME("not implemented\n");
2347
2348     return InvalidParameter;
2349 }
2350
2351 GpStatus WINGDIPAPI GdipGetPropertyItemSize(GpImage *image, PROPID pid,
2352     UINT* size)
2353 {
2354     static int calls;
2355
2356     TRACE("%p %x %p\n", image, pid, size);
2357
2358     if(!size || !image)
2359         return InvalidParameter;
2360
2361     if(!(calls++))
2362         FIXME("not implemented\n");
2363
2364     return NotImplemented;
2365 }
2366
2367 GpStatus WINGDIPAPI GdipGetPropertySize(GpImage *image, UINT* size, UINT* num)
2368 {
2369     static int calls;
2370
2371     TRACE("(%p,%p,%p)\n", image, size, num);
2372
2373     if(!(calls++))
2374         FIXME("not implemented\n");
2375
2376     return InvalidParameter;
2377 }
2378
2379 struct image_format_dimension
2380 {
2381     const GUID *format;
2382     const GUID *dimension;
2383 };
2384
2385 struct image_format_dimension image_format_dimensions[] =
2386 {
2387     {&ImageFormatGIF, &FrameDimensionTime},
2388     {&ImageFormatIcon, &FrameDimensionResolution},
2389     {NULL}
2390 };
2391
2392 /* FIXME: Need to handle multi-framed images */
2393 GpStatus WINGDIPAPI GdipImageGetFrameCount(GpImage *image,
2394     GDIPCONST GUID* dimensionID, UINT* count)
2395 {
2396     static int calls;
2397
2398     TRACE("(%p,%s,%p)\n", image, debugstr_guid(dimensionID), count);
2399
2400     if(!image || !count)
2401         return InvalidParameter;
2402
2403     if(!(calls++))
2404         FIXME("returning frame count of 1\n");
2405
2406     *count = 1;
2407
2408     return Ok;
2409 }
2410
2411 GpStatus WINGDIPAPI GdipImageGetFrameDimensionsCount(GpImage *image,
2412     UINT* count)
2413 {
2414     TRACE("(%p, %p)\n", image, count);
2415
2416     /* Native gdiplus 1.1 does not yet support multiple frame dimensions. */
2417
2418     if(!image || !count)
2419         return InvalidParameter;
2420
2421     *count = 1;
2422
2423     return Ok;
2424 }
2425
2426 GpStatus WINGDIPAPI GdipImageGetFrameDimensionsList(GpImage* image,
2427     GUID* dimensionIDs, UINT count)
2428 {
2429     int i;
2430     const GUID *result=NULL;
2431
2432     TRACE("(%p,%p,%u)\n", image, dimensionIDs, count);
2433
2434     if(!image || !dimensionIDs || count != 1)
2435         return InvalidParameter;
2436
2437     for (i=0; image_format_dimensions[i].format; i++)
2438     {
2439         if (IsEqualGUID(&image->format, image_format_dimensions[i].format))
2440         {
2441             result = image_format_dimensions[i].dimension;
2442             break;
2443         }
2444     }
2445
2446     if (!result)
2447         result = &FrameDimensionPage;
2448
2449     memcpy(dimensionIDs, result, sizeof(GUID));
2450
2451     return Ok;
2452 }
2453
2454 GpStatus WINGDIPAPI GdipImageSelectActiveFrame(GpImage *image,
2455     GDIPCONST GUID* dimensionID, UINT frameidx)
2456 {
2457     static int calls;
2458
2459     TRACE("(%p, %s, %u)\n", image, debugstr_guid(dimensionID), frameidx);
2460
2461     if(!image || !dimensionID)
2462         return InvalidParameter;
2463
2464     if(!(calls++))
2465         FIXME("not implemented\n");
2466
2467     return Ok;
2468 }
2469
2470 GpStatus WINGDIPAPI GdipLoadImageFromFile(GDIPCONST WCHAR* filename,
2471                                           GpImage **image)
2472 {
2473     GpStatus stat;
2474     IStream *stream;
2475
2476     TRACE("(%s) %p\n", debugstr_w(filename), image);
2477
2478     if (!filename || !image)
2479         return InvalidParameter;
2480
2481     stat = GdipCreateStreamOnFile(filename, GENERIC_READ, &stream);
2482
2483     if (stat != Ok)
2484         return stat;
2485
2486     stat = GdipLoadImageFromStream(stream, image);
2487
2488     IStream_Release(stream);
2489
2490     return stat;
2491 }
2492
2493 /* FIXME: no icm handling */
2494 GpStatus WINGDIPAPI GdipLoadImageFromFileICM(GDIPCONST WCHAR* filename,GpImage **image)
2495 {
2496     TRACE("(%s) %p\n", debugstr_w(filename), image);
2497
2498     return GdipLoadImageFromFile(filename, image);
2499 }
2500
2501 static const WICPixelFormatGUID *wic_pixel_formats[] = {
2502     &GUID_WICPixelFormat16bppBGR555,
2503     &GUID_WICPixelFormat24bppBGR,
2504     &GUID_WICPixelFormat32bppBGR,
2505     &GUID_WICPixelFormat32bppBGRA,
2506     &GUID_WICPixelFormat32bppPBGRA,
2507     NULL
2508 };
2509
2510 static const PixelFormat wic_gdip_formats[] = {
2511     PixelFormat16bppRGB555,
2512     PixelFormat24bppRGB,
2513     PixelFormat32bppRGB,
2514     PixelFormat32bppARGB,
2515     PixelFormat32bppPARGB,
2516 };
2517
2518 static GpStatus decode_image_wic(IStream* stream, REFCLSID clsid, GpImage **image)
2519 {
2520     GpStatus status=Ok;
2521     GpBitmap *bitmap;
2522     HRESULT hr;
2523     IWICBitmapDecoder *decoder;
2524     IWICBitmapFrameDecode *frame;
2525     IWICBitmapSource *source=NULL;
2526     WICPixelFormatGUID wic_format;
2527     PixelFormat gdip_format=0;
2528     int i;
2529     UINT width, height;
2530     BitmapData lockeddata;
2531     WICRect wrc;
2532     HRESULT initresult;
2533
2534     initresult = CoInitialize(NULL);
2535
2536     hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER,
2537         &IID_IWICBitmapDecoder, (void**)&decoder);
2538     if (FAILED(hr)) goto end;
2539
2540     hr = IWICBitmapDecoder_Initialize(decoder, (IStream*)stream, WICDecodeMetadataCacheOnLoad);
2541     if (SUCCEEDED(hr))
2542         hr = IWICBitmapDecoder_GetFrame(decoder, 0, &frame);
2543
2544     if (SUCCEEDED(hr)) /* got frame */
2545     {
2546         hr = IWICBitmapFrameDecode_GetPixelFormat(frame, &wic_format);
2547
2548         if (SUCCEEDED(hr))
2549         {
2550             for (i=0; wic_pixel_formats[i]; i++)
2551             {
2552                 if (IsEqualGUID(&wic_format, wic_pixel_formats[i]))
2553                 {
2554                     source = (IWICBitmapSource*)frame;
2555                     IWICBitmapSource_AddRef(source);
2556                     gdip_format = wic_gdip_formats[i];
2557                     break;
2558                 }
2559             }
2560             if (!source)
2561             {
2562                 /* unknown format; fall back on 32bppARGB */
2563                 hr = WICConvertBitmapSource(&GUID_WICPixelFormat32bppBGRA, (IWICBitmapSource*)frame, &source);
2564                 gdip_format = PixelFormat32bppARGB;
2565             }
2566         }
2567
2568         if (SUCCEEDED(hr)) /* got source */
2569         {
2570             hr = IWICBitmapSource_GetSize(source, &width, &height);
2571
2572             if (SUCCEEDED(hr))
2573                 status = GdipCreateBitmapFromScan0(width, height, 0, gdip_format,
2574                     NULL, &bitmap);
2575
2576             if (SUCCEEDED(hr) && status == Ok) /* created bitmap */
2577             {
2578                 status = GdipBitmapLockBits(bitmap, NULL, ImageLockModeWrite,
2579                     gdip_format, &lockeddata);
2580                 if (status == Ok) /* locked bitmap */
2581                 {
2582                     wrc.X = 0;
2583                     wrc.Width = width;
2584                     wrc.Height = 1;
2585                     for (i=0; i<height; i++)
2586                     {
2587                         wrc.Y = i;
2588                         hr = IWICBitmapSource_CopyPixels(source, &wrc, abs(lockeddata.Stride),
2589                             abs(lockeddata.Stride), (BYTE*)lockeddata.Scan0+lockeddata.Stride*i);
2590                         if (FAILED(hr)) break;
2591                     }
2592
2593                     GdipBitmapUnlockBits(bitmap, &lockeddata);
2594                 }
2595
2596                 if (SUCCEEDED(hr) && status == Ok)
2597                     *image = (GpImage*)bitmap;
2598                 else
2599                 {
2600                     *image = NULL;
2601                     GdipDisposeImage((GpImage*)bitmap);
2602                 }
2603
2604                 if (SUCCEEDED(hr) && status == Ok)
2605                 {
2606                     double dpix, dpiy;
2607                     hr = IWICBitmapSource_GetResolution(source, &dpix, &dpiy);
2608                     if (SUCCEEDED(hr))
2609                     {
2610                         bitmap->image.xres = dpix;
2611                         bitmap->image.yres = dpiy;
2612                     }
2613                     hr = S_OK;
2614                 }
2615             }
2616
2617             IWICBitmapSource_Release(source);
2618         }
2619
2620         IWICBitmapFrameDecode_Release(frame);
2621     }
2622
2623     IWICBitmapDecoder_Release(decoder);
2624
2625 end:
2626     if (SUCCEEDED(initresult)) CoUninitialize();
2627
2628     if (FAILED(hr) && status == Ok) status = hresult_to_status(hr);
2629
2630     if (status == Ok)
2631     {
2632         /* Native GDI+ used to be smarter, but since Win7 it just sets these flags. */
2633         bitmap->image.flags |= ImageFlagsReadOnly|ImageFlagsHasRealPixelSize|ImageFlagsHasRealDPI|ImageFlagsColorSpaceRGB;
2634     }
2635
2636     return status;
2637 }
2638
2639 static GpStatus decode_image_icon(IStream* stream, REFCLSID clsid, GpImage **image)
2640 {
2641     return decode_image_wic(stream, &CLSID_WICIcoDecoder, image);
2642 }
2643
2644 static GpStatus decode_image_bmp(IStream* stream, REFCLSID clsid, GpImage **image)
2645 {
2646     GpStatus status;
2647     GpBitmap* bitmap;
2648
2649     status = decode_image_wic(stream, &CLSID_WICBmpDecoder, image);
2650
2651     bitmap = (GpBitmap*)*image;
2652
2653     if (status == Ok && bitmap->format == PixelFormat32bppARGB)
2654     {
2655         /* WIC supports bmp files with alpha, but gdiplus does not */
2656         bitmap->format = PixelFormat32bppRGB;
2657     }
2658
2659     return status;
2660 }
2661
2662 static GpStatus decode_image_jpeg(IStream* stream, REFCLSID clsid, GpImage **image)
2663 {
2664     return decode_image_wic(stream, &CLSID_WICJpegDecoder, image);
2665 }
2666
2667 static GpStatus decode_image_png(IStream* stream, REFCLSID clsid, GpImage **image)
2668 {
2669     return decode_image_wic(stream, &CLSID_WICPngDecoder, image);
2670 }
2671
2672 static GpStatus decode_image_gif(IStream* stream, REFCLSID clsid, GpImage **image)
2673 {
2674     return decode_image_wic(stream, &CLSID_WICGifDecoder, image);
2675 }
2676
2677 static GpStatus decode_image_tiff(IStream* stream, REFCLSID clsid, GpImage **image)
2678 {
2679     return decode_image_wic(stream, &CLSID_WICTiffDecoder, image);
2680 }
2681
2682 static GpStatus decode_image_olepicture_metafile(IStream* stream, REFCLSID clsid, GpImage **image)
2683 {
2684     IPicture *pic;
2685
2686     TRACE("%p %p\n", stream, image);
2687
2688     if(!stream || !image)
2689         return InvalidParameter;
2690
2691     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
2692         (LPVOID*) &pic) != S_OK){
2693         TRACE("Could not load picture\n");
2694         return GenericError;
2695     }
2696
2697     /* FIXME: missing initialization code */
2698     *image = GdipAlloc(sizeof(GpMetafile));
2699     if(!*image) return OutOfMemory;
2700     (*image)->type = ImageTypeMetafile;
2701     (*image)->picture = pic;
2702     (*image)->flags   = ImageFlagsNone;
2703     (*image)->palette_flags = 0;
2704     (*image)->palette_count = 0;
2705     (*image)->palette_size = 0;
2706     (*image)->palette_entries = NULL;
2707
2708     TRACE("<-- %p\n", *image);
2709
2710     return Ok;
2711 }
2712
2713 typedef GpStatus (*encode_image_func)(GpImage *image, IStream* stream,
2714     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params);
2715
2716 typedef GpStatus (*decode_image_func)(IStream *stream, REFCLSID clsid, GpImage** image);
2717
2718 typedef struct image_codec {
2719     ImageCodecInfo info;
2720     encode_image_func encode_func;
2721     decode_image_func decode_func;
2722 } image_codec;
2723
2724 typedef enum {
2725     BMP,
2726     JPEG,
2727     GIF,
2728     TIFF,
2729     EMF,
2730     WMF,
2731     PNG,
2732     ICO,
2733     NUM_CODECS
2734 } ImageFormat;
2735
2736 static const struct image_codec codecs[NUM_CODECS];
2737
2738 static GpStatus get_decoder_info(IStream* stream, const struct image_codec **result)
2739 {
2740     BYTE signature[8];
2741     const BYTE *pattern, *mask;
2742     LARGE_INTEGER seek;
2743     HRESULT hr;
2744     UINT bytesread;
2745     int i, j, sig;
2746
2747     /* seek to the start of the stream */
2748     seek.QuadPart = 0;
2749     hr = IStream_Seek(stream, seek, STREAM_SEEK_SET, NULL);
2750     if (FAILED(hr)) return hresult_to_status(hr);
2751
2752     /* read the first 8 bytes */
2753     /* FIXME: This assumes all codecs have signatures <= 8 bytes in length */
2754     hr = IStream_Read(stream, signature, 8, &bytesread);
2755     if (FAILED(hr)) return hresult_to_status(hr);
2756     if (hr == S_FALSE || bytesread == 0) return GenericError;
2757
2758     for (i = 0; i < NUM_CODECS; i++) {
2759         if ((codecs[i].info.Flags & ImageCodecFlagsDecoder) &&
2760             bytesread >= codecs[i].info.SigSize)
2761         {
2762             for (sig=0; sig<codecs[i].info.SigCount; sig++)
2763             {
2764                 pattern = &codecs[i].info.SigPattern[codecs[i].info.SigSize*sig];
2765                 mask = &codecs[i].info.SigMask[codecs[i].info.SigSize*sig];
2766                 for (j=0; j<codecs[i].info.SigSize; j++)
2767                     if ((signature[j] & mask[j]) != pattern[j])
2768                         break;
2769                 if (j == codecs[i].info.SigSize)
2770                 {
2771                     *result = &codecs[i];
2772                     return Ok;
2773                 }
2774             }
2775         }
2776     }
2777
2778     TRACE("no match for %i byte signature %x %x %x %x %x %x %x %x\n", bytesread,
2779         signature[0],signature[1],signature[2],signature[3],
2780         signature[4],signature[5],signature[6],signature[7]);
2781
2782     return GenericError;
2783 }
2784
2785 GpStatus WINGDIPAPI GdipLoadImageFromStream(IStream* stream, GpImage **image)
2786 {
2787     GpStatus stat;
2788     LARGE_INTEGER seek;
2789     HRESULT hr;
2790     const struct image_codec *codec=NULL;
2791
2792     /* choose an appropriate image decoder */
2793     stat = get_decoder_info(stream, &codec);
2794     if (stat != Ok) return stat;
2795
2796     /* seek to the start of the stream */
2797     seek.QuadPart = 0;
2798     hr = IStream_Seek(stream, seek, STREAM_SEEK_SET, NULL);
2799     if (FAILED(hr)) return hresult_to_status(hr);
2800
2801     /* call on the image decoder to do the real work */
2802     stat = codec->decode_func(stream, &codec->info.Clsid, image);
2803
2804     /* take note of the original data format */
2805     if (stat == Ok)
2806     {
2807         memcpy(&(*image)->format, &codec->info.FormatID, sizeof(GUID));
2808     }
2809
2810     return stat;
2811 }
2812
2813 /* FIXME: no ICM */
2814 GpStatus WINGDIPAPI GdipLoadImageFromStreamICM(IStream* stream, GpImage **image)
2815 {
2816     TRACE("%p %p\n", stream, image);
2817
2818     return GdipLoadImageFromStream(stream, image);
2819 }
2820
2821 GpStatus WINGDIPAPI GdipRemovePropertyItem(GpImage *image, PROPID propId)
2822 {
2823     static int calls;
2824
2825     TRACE("(%p,%u)\n", image, propId);
2826
2827     if(!image)
2828         return InvalidParameter;
2829
2830     if(!(calls++))
2831         FIXME("not implemented\n");
2832
2833     return NotImplemented;
2834 }
2835
2836 GpStatus WINGDIPAPI GdipSetPropertyItem(GpImage *image, GDIPCONST PropertyItem* item)
2837 {
2838     static int calls;
2839
2840     TRACE("(%p,%p)\n", image, item);
2841
2842     if(!(calls++))
2843         FIXME("not implemented\n");
2844
2845     return NotImplemented;
2846 }
2847
2848 GpStatus WINGDIPAPI GdipSaveImageToFile(GpImage *image, GDIPCONST WCHAR* filename,
2849                                         GDIPCONST CLSID *clsidEncoder,
2850                                         GDIPCONST EncoderParameters *encoderParams)
2851 {
2852     GpStatus stat;
2853     IStream *stream;
2854
2855     TRACE("%p (%s) %p %p\n", image, debugstr_w(filename), clsidEncoder, encoderParams);
2856
2857     if (!image || !filename|| !clsidEncoder)
2858         return InvalidParameter;
2859
2860     stat = GdipCreateStreamOnFile(filename, GENERIC_WRITE, &stream);
2861     if (stat != Ok)
2862         return GenericError;
2863
2864     stat = GdipSaveImageToStream(image, stream, clsidEncoder, encoderParams);
2865
2866     IStream_Release(stream);
2867     return stat;
2868 }
2869
2870 /*************************************************************************
2871  * Encoding functions -
2872  *   These functions encode an image in different image file formats.
2873  */
2874 #define BITMAP_FORMAT_BMP   0x4d42 /* "BM" */
2875 #define BITMAP_FORMAT_JPEG  0xd8ff
2876 #define BITMAP_FORMAT_GIF   0x4947
2877 #define BITMAP_FORMAT_PNG   0x5089
2878 #define BITMAP_FORMAT_APM   0xcdd7
2879
2880 static GpStatus encode_image_WIC(GpImage *image, IStream* stream,
2881     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
2882 {
2883     GpStatus stat;
2884     GpBitmap *bitmap;
2885     IWICBitmapEncoder *encoder;
2886     IWICBitmapFrameEncode *frameencode;
2887     IPropertyBag2 *encoderoptions;
2888     HRESULT hr;
2889     UINT width, height;
2890     PixelFormat gdipformat=0;
2891     WICPixelFormatGUID wicformat;
2892     GpRect rc;
2893     BitmapData lockeddata;
2894     HRESULT initresult;
2895     UINT i;
2896
2897     if (image->type != ImageTypeBitmap)
2898         return GenericError;
2899
2900     bitmap = (GpBitmap*)image;
2901
2902     GdipGetImageWidth(image, &width);
2903     GdipGetImageHeight(image, &height);
2904
2905     rc.X = 0;
2906     rc.Y = 0;
2907     rc.Width = width;
2908     rc.Height = height;
2909
2910     initresult = CoInitialize(NULL);
2911
2912     hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER,
2913         &IID_IWICBitmapEncoder, (void**)&encoder);
2914     if (FAILED(hr))
2915     {
2916         if (SUCCEEDED(initresult)) CoUninitialize();
2917         return hresult_to_status(hr);
2918     }
2919
2920     hr = IWICBitmapEncoder_Initialize(encoder, stream, WICBitmapEncoderNoCache);
2921
2922     if (SUCCEEDED(hr))
2923     {
2924         hr = IWICBitmapEncoder_CreateNewFrame(encoder, &frameencode, &encoderoptions);
2925     }
2926
2927     if (SUCCEEDED(hr)) /* created frame */
2928     {
2929         hr = IWICBitmapFrameEncode_Initialize(frameencode, encoderoptions);
2930
2931         if (SUCCEEDED(hr))
2932             hr = IWICBitmapFrameEncode_SetSize(frameencode, width, height);
2933
2934         if (SUCCEEDED(hr))
2935             /* FIXME: use the resolution from the image */
2936             hr = IWICBitmapFrameEncode_SetResolution(frameencode, 96.0, 96.0);
2937
2938         if (SUCCEEDED(hr))
2939         {
2940             for (i=0; wic_pixel_formats[i]; i++)
2941             {
2942                 if (wic_gdip_formats[i] == bitmap->format)
2943                     break;
2944             }
2945             if (wic_pixel_formats[i])
2946                 memcpy(&wicformat, wic_pixel_formats[i], sizeof(GUID));
2947             else
2948                 memcpy(&wicformat, &GUID_WICPixelFormat32bppBGRA, sizeof(GUID));
2949
2950             hr = IWICBitmapFrameEncode_SetPixelFormat(frameencode, &wicformat);
2951
2952             for (i=0; wic_pixel_formats[i]; i++)
2953             {
2954                 if (IsEqualGUID(&wicformat, wic_pixel_formats[i]))
2955                     break;
2956             }
2957             if (wic_pixel_formats[i])
2958                 gdipformat = wic_gdip_formats[i];
2959             else
2960             {
2961                 ERR("cannot provide pixel format %s\n", debugstr_guid(&wicformat));
2962                 hr = E_FAIL;
2963             }
2964         }
2965
2966         if (SUCCEEDED(hr))
2967         {
2968             stat = GdipBitmapLockBits(bitmap, &rc, ImageLockModeRead, gdipformat,
2969                 &lockeddata);
2970
2971             if (stat == Ok)
2972             {
2973                 UINT row_size = (lockeddata.Width * PIXELFORMATBPP(gdipformat) + 7)/8;
2974                 BYTE *row;
2975
2976                 /* write one row at a time in case stride is negative */
2977                 row = lockeddata.Scan0;
2978                 for (i=0; i<lockeddata.Height; i++)
2979                 {
2980                     hr = IWICBitmapFrameEncode_WritePixels(frameencode, 1, row_size, row_size, row);
2981                     if (FAILED(hr)) break;
2982                     row += lockeddata.Stride;
2983                 }
2984
2985                 GdipBitmapUnlockBits(bitmap, &lockeddata);
2986             }
2987             else
2988                 hr = E_FAIL;
2989         }
2990
2991         if (SUCCEEDED(hr))
2992             hr = IWICBitmapFrameEncode_Commit(frameencode);
2993
2994         IWICBitmapFrameEncode_Release(frameencode);
2995         IPropertyBag2_Release(encoderoptions);
2996     }
2997
2998     if (SUCCEEDED(hr))
2999         hr = IWICBitmapEncoder_Commit(encoder);
3000
3001     IWICBitmapEncoder_Release(encoder);
3002
3003     if (SUCCEEDED(initresult)) CoUninitialize();
3004
3005     return hresult_to_status(hr);
3006 }
3007
3008 static GpStatus encode_image_BMP(GpImage *image, IStream* stream,
3009     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
3010 {
3011     return encode_image_WIC(image, stream, &CLSID_WICBmpEncoder, params);
3012 }
3013
3014 static GpStatus encode_image_png(GpImage *image, IStream* stream,
3015     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
3016 {
3017     return encode_image_WIC(image, stream, &CLSID_WICPngEncoder, params);
3018 }
3019
3020 /*****************************************************************************
3021  * GdipSaveImageToStream [GDIPLUS.@]
3022  */
3023 GpStatus WINGDIPAPI GdipSaveImageToStream(GpImage *image, IStream* stream,
3024     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
3025 {
3026     GpStatus stat;
3027     encode_image_func encode_image;
3028     int i;
3029
3030     TRACE("%p %p %p %p\n", image, stream, clsid, params);
3031
3032     if(!image || !stream)
3033         return InvalidParameter;
3034
3035     /* select correct encoder */
3036     encode_image = NULL;
3037     for (i = 0; i < NUM_CODECS; i++) {
3038         if ((codecs[i].info.Flags & ImageCodecFlagsEncoder) &&
3039             IsEqualCLSID(clsid, &codecs[i].info.Clsid))
3040             encode_image = codecs[i].encode_func;
3041     }
3042     if (encode_image == NULL)
3043         return UnknownImageFormat;
3044
3045     stat = encode_image(image, stream, clsid, params);
3046
3047     return stat;
3048 }
3049
3050 /*****************************************************************************
3051  * GdipGetImagePalette [GDIPLUS.@]
3052  */
3053 GpStatus WINGDIPAPI GdipGetImagePalette(GpImage *image, ColorPalette *palette, INT size)
3054 {
3055     TRACE("(%p,%p,%i)\n", image, palette, size);
3056
3057     if (!image || !palette)
3058         return InvalidParameter;
3059
3060     if (size < (sizeof(UINT)*2+sizeof(ARGB)*image->palette_count))
3061     {
3062         TRACE("<-- InsufficientBuffer\n");
3063         return InsufficientBuffer;
3064     }
3065
3066     palette->Flags = image->palette_flags;
3067     palette->Count = image->palette_count;
3068     memcpy(palette->Entries, image->palette_entries, sizeof(ARGB)*image->palette_count);
3069
3070     return Ok;
3071 }
3072
3073 /*****************************************************************************
3074  * GdipSetImagePalette [GDIPLUS.@]
3075  */
3076 GpStatus WINGDIPAPI GdipSetImagePalette(GpImage *image,
3077     GDIPCONST ColorPalette *palette)
3078 {
3079     TRACE("(%p,%p)\n", image, palette);
3080
3081     if(!image || !palette || palette->Count > 256)
3082         return InvalidParameter;
3083
3084     if (palette->Count > image->palette_size)
3085     {
3086         ARGB *new_palette;
3087
3088         new_palette = GdipAlloc(sizeof(ARGB) * palette->Count);
3089         if (!new_palette) return OutOfMemory;
3090
3091         GdipFree(image->palette_entries);
3092         image->palette_entries = new_palette;
3093         image->palette_size = palette->Count;
3094     }
3095
3096     image->palette_flags = palette->Flags;
3097     image->palette_count = palette->Count;
3098     memcpy(image->palette_entries, palette->Entries, sizeof(ARGB)*palette->Count);
3099
3100     return Ok;
3101 }
3102
3103 /*************************************************************************
3104  * Encoders -
3105  *   Structures that represent which formats we support for encoding.
3106  */
3107
3108 /* ImageCodecInfo creation routines taken from libgdiplus */
3109 static const WCHAR bmp_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'B', 'M', 'P', 0}; /* Built-in BMP */
3110 static const WCHAR bmp_extension[] = {'*','.','B', 'M', 'P',';', '*','.', 'D','I', 'B',';', '*','.', 'R', 'L', 'E',0}; /* *.BMP;*.DIB;*.RLE */
3111 static const WCHAR bmp_mimetype[] = {'i', 'm', 'a','g', 'e', '/', 'b', 'm', 'p', 0}; /* image/bmp */
3112 static const WCHAR bmp_format[] = {'B', 'M', 'P', 0}; /* BMP */
3113 static const BYTE bmp_sig_pattern[] = { 0x42, 0x4D };
3114 static const BYTE bmp_sig_mask[] = { 0xFF, 0xFF };
3115
3116 static const WCHAR jpeg_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'J','P','E','G', 0};
3117 static const WCHAR jpeg_extension[] = {'*','.','J','P','G',';', '*','.','J','P','E','G',';', '*','.','J','P','E',';', '*','.','J','F','I','F',0};
3118 static const WCHAR jpeg_mimetype[] = {'i','m','a','g','e','/','j','p','e','g', 0};
3119 static const WCHAR jpeg_format[] = {'J','P','E','G',0};
3120 static const BYTE jpeg_sig_pattern[] = { 0xFF, 0xD8 };
3121 static const BYTE jpeg_sig_mask[] = { 0xFF, 0xFF };
3122
3123 static const WCHAR gif_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'G','I','F', 0};
3124 static const WCHAR gif_extension[] = {'*','.','G','I','F',0};
3125 static const WCHAR gif_mimetype[] = {'i','m','a','g','e','/','g','i','f', 0};
3126 static const WCHAR gif_format[] = {'G','I','F',0};
3127 static const BYTE gif_sig_pattern[4] = "GIF8";
3128 static const BYTE gif_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3129
3130 static const WCHAR tiff_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'T','I','F','F', 0};
3131 static const WCHAR tiff_extension[] = {'*','.','T','I','F','F',';','*','.','T','I','F',0};
3132 static const WCHAR tiff_mimetype[] = {'i','m','a','g','e','/','t','i','f','f', 0};
3133 static const WCHAR tiff_format[] = {'T','I','F','F',0};
3134 static const BYTE tiff_sig_pattern[] = {0x49,0x49,42,0,0x4d,0x4d,0,42};
3135 static const BYTE tiff_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF };
3136
3137 static const WCHAR emf_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'E','M','F', 0};
3138 static const WCHAR emf_extension[] = {'*','.','E','M','F',0};
3139 static const WCHAR emf_mimetype[] = {'i','m','a','g','e','/','x','-','e','m','f', 0};
3140 static const WCHAR emf_format[] = {'E','M','F',0};
3141 static const BYTE emf_sig_pattern[] = { 0x01, 0x00, 0x00, 0x00 };
3142 static const BYTE emf_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3143
3144 static const WCHAR wmf_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'W','M','F', 0};
3145 static const WCHAR wmf_extension[] = {'*','.','W','M','F',0};
3146 static const WCHAR wmf_mimetype[] = {'i','m','a','g','e','/','x','-','w','m','f', 0};
3147 static const WCHAR wmf_format[] = {'W','M','F',0};
3148 static const BYTE wmf_sig_pattern[] = { 0xd7, 0xcd };
3149 static const BYTE wmf_sig_mask[] = { 0xFF, 0xFF };
3150
3151 static const WCHAR png_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'P','N','G', 0};
3152 static const WCHAR png_extension[] = {'*','.','P','N','G',0};
3153 static const WCHAR png_mimetype[] = {'i','m','a','g','e','/','p','n','g', 0};
3154 static const WCHAR png_format[] = {'P','N','G',0};
3155 static const BYTE png_sig_pattern[] = { 137, 80, 78, 71, 13, 10, 26, 10, };
3156 static const BYTE png_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF };
3157
3158 static const WCHAR ico_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'I','C','O', 0};
3159 static const WCHAR ico_extension[] = {'*','.','I','C','O',0};
3160 static const WCHAR ico_mimetype[] = {'i','m','a','g','e','/','x','-','i','c','o','n', 0};
3161 static const WCHAR ico_format[] = {'I','C','O',0};
3162 static const BYTE ico_sig_pattern[] = { 0x00, 0x00, 0x01, 0x00 };
3163 static const BYTE ico_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3164
3165 static const struct image_codec codecs[NUM_CODECS] = {
3166     {
3167         { /* BMP */
3168             /* Clsid */              { 0x557cf400, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3169             /* FormatID */           { 0xb96b3cabU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3170             /* CodecName */          bmp_codecname,
3171             /* DllName */            NULL,
3172             /* FormatDescription */  bmp_format,
3173             /* FilenameExtension */  bmp_extension,
3174             /* MimeType */           bmp_mimetype,
3175             /* Flags */              ImageCodecFlagsEncoder | ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3176             /* Version */            1,
3177             /* SigCount */           1,
3178             /* SigSize */            2,
3179             /* SigPattern */         bmp_sig_pattern,
3180             /* SigMask */            bmp_sig_mask,
3181         },
3182         encode_image_BMP,
3183         decode_image_bmp
3184     },
3185     {
3186         { /* JPEG */
3187             /* Clsid */              { 0x557cf401, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3188             /* FormatID */           { 0xb96b3caeU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3189             /* CodecName */          jpeg_codecname,
3190             /* DllName */            NULL,
3191             /* FormatDescription */  jpeg_format,
3192             /* FilenameExtension */  jpeg_extension,
3193             /* MimeType */           jpeg_mimetype,
3194             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3195             /* Version */            1,
3196             /* SigCount */           1,
3197             /* SigSize */            2,
3198             /* SigPattern */         jpeg_sig_pattern,
3199             /* SigMask */            jpeg_sig_mask,
3200         },
3201         NULL,
3202         decode_image_jpeg
3203     },
3204     {
3205         { /* GIF */
3206             /* Clsid */              { 0x557cf402, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3207             /* FormatID */           { 0xb96b3cb0U, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3208             /* CodecName */          gif_codecname,
3209             /* DllName */            NULL,
3210             /* FormatDescription */  gif_format,
3211             /* FilenameExtension */  gif_extension,
3212             /* MimeType */           gif_mimetype,
3213             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3214             /* Version */            1,
3215             /* SigCount */           1,
3216             /* SigSize */            4,
3217             /* SigPattern */         gif_sig_pattern,
3218             /* SigMask */            gif_sig_mask,
3219         },
3220         NULL,
3221         decode_image_gif
3222     },
3223     {
3224         { /* TIFF */
3225             /* Clsid */              { 0x557cf405, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3226             /* FormatID */           { 0xb96b3cb1U, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3227             /* CodecName */          tiff_codecname,
3228             /* DllName */            NULL,
3229             /* FormatDescription */  tiff_format,
3230             /* FilenameExtension */  tiff_extension,
3231             /* MimeType */           tiff_mimetype,
3232             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3233             /* Version */            1,
3234             /* SigCount */           2,
3235             /* SigSize */            4,
3236             /* SigPattern */         tiff_sig_pattern,
3237             /* SigMask */            tiff_sig_mask,
3238         },
3239         NULL,
3240         decode_image_tiff
3241     },
3242     {
3243         { /* EMF */
3244             /* Clsid */              { 0x557cf403, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3245             /* FormatID */           { 0xb96b3cacU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3246             /* CodecName */          emf_codecname,
3247             /* DllName */            NULL,
3248             /* FormatDescription */  emf_format,
3249             /* FilenameExtension */  emf_extension,
3250             /* MimeType */           emf_mimetype,
3251             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportVector | ImageCodecFlagsBuiltin,
3252             /* Version */            1,
3253             /* SigCount */           1,
3254             /* SigSize */            4,
3255             /* SigPattern */         emf_sig_pattern,
3256             /* SigMask */            emf_sig_mask,
3257         },
3258         NULL,
3259         decode_image_olepicture_metafile
3260     },
3261     {
3262         { /* WMF */
3263             /* Clsid */              { 0x557cf404, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3264             /* FormatID */           { 0xb96b3cadU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3265             /* CodecName */          wmf_codecname,
3266             /* DllName */            NULL,
3267             /* FormatDescription */  wmf_format,
3268             /* FilenameExtension */  wmf_extension,
3269             /* MimeType */           wmf_mimetype,
3270             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportVector | ImageCodecFlagsBuiltin,
3271             /* Version */            1,
3272             /* SigCount */           1,
3273             /* SigSize */            2,
3274             /* SigPattern */         wmf_sig_pattern,
3275             /* SigMask */            wmf_sig_mask,
3276         },
3277         NULL,
3278         decode_image_olepicture_metafile
3279     },
3280     {
3281         { /* PNG */
3282             /* Clsid */              { 0x557cf406, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3283             /* FormatID */           { 0xb96b3cafU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3284             /* CodecName */          png_codecname,
3285             /* DllName */            NULL,
3286             /* FormatDescription */  png_format,
3287             /* FilenameExtension */  png_extension,
3288             /* MimeType */           png_mimetype,
3289             /* Flags */              ImageCodecFlagsEncoder | ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3290             /* Version */            1,
3291             /* SigCount */           1,
3292             /* SigSize */            8,
3293             /* SigPattern */         png_sig_pattern,
3294             /* SigMask */            png_sig_mask,
3295         },
3296         encode_image_png,
3297         decode_image_png
3298     },
3299     {
3300         { /* ICO */
3301             /* Clsid */              { 0x557cf407, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3302             /* FormatID */           { 0xb96b3cabU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3303             /* CodecName */          ico_codecname,
3304             /* DllName */            NULL,
3305             /* FormatDescription */  ico_format,
3306             /* FilenameExtension */  ico_extension,
3307             /* MimeType */           ico_mimetype,
3308             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3309             /* Version */            1,
3310             /* SigCount */           1,
3311             /* SigSize */            4,
3312             /* SigPattern */         ico_sig_pattern,
3313             /* SigMask */            ico_sig_mask,
3314         },
3315         NULL,
3316         decode_image_icon
3317     },
3318 };
3319
3320 /*****************************************************************************
3321  * GdipGetImageDecodersSize [GDIPLUS.@]
3322  */
3323 GpStatus WINGDIPAPI GdipGetImageDecodersSize(UINT *numDecoders, UINT *size)
3324 {
3325     int decoder_count=0;
3326     int i;
3327     TRACE("%p %p\n", numDecoders, size);
3328
3329     if (!numDecoders || !size)
3330         return InvalidParameter;
3331
3332     for (i=0; i<NUM_CODECS; i++)
3333     {
3334         if (codecs[i].info.Flags & ImageCodecFlagsDecoder)
3335             decoder_count++;
3336     }
3337
3338     *numDecoders = decoder_count;
3339     *size = decoder_count * sizeof(ImageCodecInfo);
3340
3341     return Ok;
3342 }
3343
3344 /*****************************************************************************
3345  * GdipGetImageDecoders [GDIPLUS.@]
3346  */
3347 GpStatus WINGDIPAPI GdipGetImageDecoders(UINT numDecoders, UINT size, ImageCodecInfo *decoders)
3348 {
3349     int i, decoder_count=0;
3350     TRACE("%u %u %p\n", numDecoders, size, decoders);
3351
3352     if (!decoders ||
3353         size != numDecoders * sizeof(ImageCodecInfo))
3354         return GenericError;
3355
3356     for (i=0; i<NUM_CODECS; i++)
3357     {
3358         if (codecs[i].info.Flags & ImageCodecFlagsDecoder)
3359         {
3360             if (decoder_count == numDecoders) return GenericError;
3361             memcpy(&decoders[decoder_count], &codecs[i].info, sizeof(ImageCodecInfo));
3362             decoder_count++;
3363         }
3364     }
3365
3366     if (decoder_count < numDecoders) return GenericError;
3367
3368     return Ok;
3369 }
3370
3371 /*****************************************************************************
3372  * GdipGetImageEncodersSize [GDIPLUS.@]
3373  */
3374 GpStatus WINGDIPAPI GdipGetImageEncodersSize(UINT *numEncoders, UINT *size)
3375 {
3376     int encoder_count=0;
3377     int i;
3378     TRACE("%p %p\n", numEncoders, size);
3379
3380     if (!numEncoders || !size)
3381         return InvalidParameter;
3382
3383     for (i=0; i<NUM_CODECS; i++)
3384     {
3385         if (codecs[i].info.Flags & ImageCodecFlagsEncoder)
3386             encoder_count++;
3387     }
3388
3389     *numEncoders = encoder_count;
3390     *size = encoder_count * sizeof(ImageCodecInfo);
3391
3392     return Ok;
3393 }
3394
3395 /*****************************************************************************
3396  * GdipGetImageEncoders [GDIPLUS.@]
3397  */
3398 GpStatus WINGDIPAPI GdipGetImageEncoders(UINT numEncoders, UINT size, ImageCodecInfo *encoders)
3399 {
3400     int i, encoder_count=0;
3401     TRACE("%u %u %p\n", numEncoders, size, encoders);
3402
3403     if (!encoders ||
3404         size != numEncoders * sizeof(ImageCodecInfo))
3405         return GenericError;
3406
3407     for (i=0; i<NUM_CODECS; i++)
3408     {
3409         if (codecs[i].info.Flags & ImageCodecFlagsEncoder)
3410         {
3411             if (encoder_count == numEncoders) return GenericError;
3412             memcpy(&encoders[encoder_count], &codecs[i].info, sizeof(ImageCodecInfo));
3413             encoder_count++;
3414         }
3415     }
3416
3417     if (encoder_count < numEncoders) return GenericError;
3418
3419     return Ok;
3420 }
3421
3422 GpStatus WINGDIPAPI GdipGetEncoderParameterListSize(GpImage *image,
3423     GDIPCONST CLSID* clsidEncoder, UINT *size)
3424 {
3425     static int calls;
3426
3427     TRACE("(%p,%s,%p)\n", image, debugstr_guid(clsidEncoder), size);
3428
3429     if(!(calls++))
3430         FIXME("not implemented\n");
3431
3432     *size = 0;
3433
3434     return NotImplemented;
3435 }
3436
3437 /*****************************************************************************
3438  * GdipCreateBitmapFromHBITMAP [GDIPLUS.@]
3439  */
3440 GpStatus WINGDIPAPI GdipCreateBitmapFromHBITMAP(HBITMAP hbm, HPALETTE hpal, GpBitmap** bitmap)
3441 {
3442     BITMAP bm;
3443     GpStatus retval;
3444     PixelFormat format;
3445     BitmapData lockeddata;
3446     INT y;
3447
3448     TRACE("%p %p %p\n", hbm, hpal, bitmap);
3449
3450     if(!hbm || !bitmap)
3451         return InvalidParameter;
3452
3453     /* TODO: Support for device-dependent bitmaps */
3454     if(hpal){
3455         FIXME("no support for device-dependent bitmaps\n");
3456         return NotImplemented;
3457     }
3458
3459     if (GetObjectA(hbm, sizeof(bm), &bm) != sizeof(bm))
3460             return InvalidParameter;
3461
3462     /* TODO: Figure out the correct format for 16, 32, 64 bpp */
3463     switch(bm.bmBitsPixel) {
3464         case 1:
3465             format = PixelFormat1bppIndexed;
3466             break;
3467         case 4:
3468             format = PixelFormat4bppIndexed;
3469             break;
3470         case 8:
3471             format = PixelFormat8bppIndexed;
3472             break;
3473         case 24:
3474             format = PixelFormat24bppRGB;
3475             break;
3476         case 32:
3477             format = PixelFormat32bppRGB;
3478             break;
3479         case 48:
3480             format = PixelFormat48bppRGB;
3481             break;
3482         default:
3483             FIXME("don't know how to handle %d bpp\n", bm.bmBitsPixel);
3484             return InvalidParameter;
3485     }
3486
3487     retval = GdipCreateBitmapFromScan0(bm.bmWidth, bm.bmHeight, 0,
3488         format, NULL, bitmap);
3489
3490     if (retval == Ok)
3491     {
3492         retval = GdipBitmapLockBits(*bitmap, NULL, ImageLockModeWrite,
3493             format, &lockeddata);
3494         if (retval == Ok)
3495         {
3496             if (bm.bmBits)
3497             {
3498                 for (y=0; y<bm.bmHeight; y++)
3499                 {
3500                     memcpy((BYTE*)lockeddata.Scan0+lockeddata.Stride*y,
3501                            (BYTE*)bm.bmBits+bm.bmWidthBytes*(bm.bmHeight-1-y),
3502                            bm.bmWidthBytes);
3503                 }
3504             }
3505             else
3506             {
3507                 HDC hdc;
3508                 HBITMAP oldhbm;
3509                 BITMAPINFO *pbmi;
3510                 INT src_height, dst_stride;
3511                 BYTE *dst_bits;
3512
3513                 hdc = CreateCompatibleDC(NULL);
3514                 oldhbm = SelectObject(hdc, hbm);
3515
3516                 pbmi = GdipAlloc(sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
3517
3518                 if (pbmi)
3519                 {
3520                     pbmi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
3521                     pbmi->bmiHeader.biBitCount = 0;
3522
3523                     GetDIBits(hdc, hbm, 0, 0, NULL, pbmi, DIB_RGB_COLORS);
3524
3525                     src_height = abs(pbmi->bmiHeader.biHeight);
3526
3527                     if (pbmi->bmiHeader.biHeight > 0)
3528                     {
3529                         dst_bits = (BYTE*)lockeddata.Scan0+lockeddata.Stride*(src_height-1);
3530                         dst_stride = -lockeddata.Stride;
3531                     }
3532                     else
3533                     {
3534                         dst_bits = lockeddata.Scan0;
3535                         dst_stride = lockeddata.Stride;
3536                     }
3537
3538                     for (y=0; y<src_height; y++)
3539                     {
3540                         GetDIBits(hdc, hbm, y, 1, dst_bits+dst_stride*y,
3541                             pbmi, DIB_RGB_COLORS);
3542                     }
3543
3544                     GdipFree(pbmi);
3545                 }
3546                 else
3547                     retval = OutOfMemory;
3548
3549                 SelectObject(hdc, oldhbm);
3550                 DeleteDC(hdc);
3551             }
3552
3553             GdipBitmapUnlockBits(*bitmap, &lockeddata);
3554         }
3555     }
3556
3557     return retval;
3558 }
3559
3560 GpStatus WINGDIPAPI GdipDeleteEffect(CGpEffect *effect)
3561 {
3562     FIXME("(%p): stub\n", effect);
3563     /* note: According to Jose Roca's GDI+ Docs, this is not implemented
3564      * in Windows's gdiplus */
3565     return NotImplemented;
3566 }
3567
3568 /*****************************************************************************
3569  * GdipSetEffectParameters [GDIPLUS.@]
3570  */
3571 GpStatus WINGDIPAPI GdipSetEffectParameters(CGpEffect *effect,
3572     const VOID *params, const UINT size)
3573 {
3574     static int calls;
3575
3576     TRACE("(%p,%p,%u)\n", effect, params, size);
3577
3578     if(!(calls++))
3579         FIXME("not implemented\n");
3580
3581     return NotImplemented;
3582 }
3583
3584 /*****************************************************************************
3585  * GdipGetImageFlags [GDIPLUS.@]
3586  */
3587 GpStatus WINGDIPAPI GdipGetImageFlags(GpImage *image, UINT *flags)
3588 {
3589     TRACE("%p %p\n", image, flags);
3590
3591     if(!image || !flags)
3592         return InvalidParameter;
3593
3594     *flags = image->flags;
3595
3596     return Ok;
3597 }
3598
3599 GpStatus WINGDIPAPI GdipTestControl(GpTestControlEnum control, void *param)
3600 {
3601     TRACE("(%d, %p)\n", control, param);
3602
3603     switch(control){
3604         case TestControlForceBilinear:
3605             if(param)
3606                 FIXME("TestControlForceBilinear not handled\n");
3607             break;
3608         case TestControlNoICM:
3609             if(param)
3610                 FIXME("TestControlNoICM not handled\n");
3611             break;
3612         case TestControlGetBuildNumber:
3613             *((DWORD*)param) = 3102;
3614             break;
3615     }
3616
3617     return Ok;
3618 }
3619
3620 GpStatus WINGDIPAPI GdipRecordMetafileFileName(GDIPCONST WCHAR* fileName,
3621                             HDC hdc, EmfType type, GDIPCONST GpRectF *pFrameRect,
3622                             MetafileFrameUnit frameUnit, GDIPCONST WCHAR *desc,
3623                             GpMetafile **metafile)
3624 {
3625     FIXME("%s %p %d %p %d %s %p stub!\n", debugstr_w(fileName), hdc, type, pFrameRect,
3626                                  frameUnit, debugstr_w(desc), metafile);
3627
3628     return NotImplemented;
3629 }
3630
3631 GpStatus WINGDIPAPI GdipRecordMetafileFileNameI(GDIPCONST WCHAR* fileName, HDC hdc, EmfType type,
3632                             GDIPCONST GpRect *pFrameRect, MetafileFrameUnit frameUnit,
3633                             GDIPCONST WCHAR *desc, GpMetafile **metafile)
3634 {
3635     FIXME("%s %p %d %p %d %s %p stub!\n", debugstr_w(fileName), hdc, type, pFrameRect,
3636                                  frameUnit, debugstr_w(desc), metafile);
3637
3638     return NotImplemented;
3639 }
3640
3641 GpStatus WINGDIPAPI GdipImageForceValidation(GpImage *image)
3642 {
3643     TRACE("%p\n", image);
3644
3645     return Ok;
3646 }
3647
3648 /*****************************************************************************
3649  * GdipGetImageThumbnail [GDIPLUS.@]
3650  */
3651 GpStatus WINGDIPAPI GdipGetImageThumbnail(GpImage *image, UINT width, UINT height,
3652                             GpImage **ret_image, GetThumbnailImageAbort cb,
3653                             VOID * cb_data)
3654 {
3655     GpStatus stat;
3656     GpGraphics *graphics;
3657     UINT srcwidth, srcheight;
3658
3659     TRACE("(%p %u %u %p %p %p)\n",
3660         image, width, height, ret_image, cb, cb_data);
3661
3662     if (!image || !ret_image)
3663         return InvalidParameter;
3664
3665     if (!width) width = 120;
3666     if (!height) height = 120;
3667
3668     GdipGetImageWidth(image, &srcwidth);
3669     GdipGetImageHeight(image, &srcheight);
3670
3671     stat = GdipCreateBitmapFromScan0(width, height, 0, PixelFormat32bppARGB,
3672         NULL, (GpBitmap**)ret_image);
3673
3674     if (stat == Ok)
3675     {
3676         stat = GdipGetImageGraphicsContext(*ret_image, &graphics);
3677
3678         if (stat == Ok)
3679         {
3680             stat = GdipDrawImageRectRectI(graphics, image,
3681                 0, 0, width, height, 0, 0, srcwidth, srcheight, UnitPixel,
3682                 NULL, NULL, NULL);
3683
3684             GdipDeleteGraphics(graphics);
3685         }
3686
3687         if (stat != Ok)
3688         {
3689             GdipDisposeImage(*ret_image);
3690             *ret_image = NULL;
3691         }
3692     }
3693
3694     return stat;
3695 }
3696
3697 /*****************************************************************************
3698  * GdipImageRotateFlip [GDIPLUS.@]
3699  */
3700 GpStatus WINGDIPAPI GdipImageRotateFlip(GpImage *image, RotateFlipType type)
3701 {
3702     GpBitmap *new_bitmap;
3703     GpBitmap *bitmap;
3704     int bpp, bytesperpixel;
3705     int rotate_90, flip_x, flip_y;
3706     int src_x_offset, src_y_offset;
3707     LPBYTE src_origin;
3708     UINT x, y, width, height;
3709     BitmapData src_lock, dst_lock;
3710     GpStatus stat;
3711
3712     TRACE("(%p, %u)\n", image, type);
3713
3714     rotate_90 = type&1;
3715     flip_x = (type&6) == 2 || (type&6) == 4;
3716     flip_y = (type&3) == 1 || (type&3) == 2;
3717
3718     if (image->type != ImageTypeBitmap)
3719     {
3720         FIXME("Not implemented for type %i\n", image->type);
3721         return NotImplemented;
3722     }
3723
3724     bitmap = (GpBitmap*)image;
3725     bpp = PIXELFORMATBPP(bitmap->format);
3726
3727     if (bpp < 8)
3728     {
3729         FIXME("Not implemented for %i bit images\n", bpp);
3730         return NotImplemented;
3731     }
3732
3733     if (rotate_90)
3734     {
3735         width = bitmap->height;
3736         height = bitmap->width;
3737     }
3738     else
3739     {
3740         width = bitmap->width;
3741         height = bitmap->height;
3742     }
3743
3744     bytesperpixel = bpp/8;
3745
3746     stat = GdipCreateBitmapFromScan0(width, height, 0, bitmap->format, NULL, &new_bitmap);
3747
3748     if (stat != Ok)
3749         return stat;
3750
3751     stat = GdipBitmapLockBits(bitmap, NULL, ImageLockModeRead, bitmap->format, &src_lock);
3752
3753     if (stat == Ok)
3754     {
3755         stat = GdipBitmapLockBits(new_bitmap, NULL, ImageLockModeWrite, bitmap->format, &dst_lock);
3756
3757         if (stat == Ok)
3758         {
3759             LPBYTE src_row, src_pixel;
3760             LPBYTE dst_row, dst_pixel;
3761
3762             src_origin = src_lock.Scan0;
3763             if (flip_x) src_origin += bytesperpixel * (bitmap->width - 1);
3764             if (flip_y) src_origin += src_lock.Stride * (bitmap->height - 1);
3765
3766             if (rotate_90)
3767             {
3768                 if (flip_y) src_x_offset = -src_lock.Stride;
3769                 else src_x_offset = src_lock.Stride;
3770                 if (flip_x) src_y_offset = -bytesperpixel;
3771                 else src_y_offset = bytesperpixel;
3772             }
3773             else
3774             {
3775                 if (flip_x) src_x_offset = -bytesperpixel;
3776                 else src_x_offset = bytesperpixel;
3777                 if (flip_y) src_y_offset = -src_lock.Stride;
3778                 else src_y_offset = src_lock.Stride;
3779             }
3780
3781             src_row = src_origin;
3782             dst_row = dst_lock.Scan0;
3783             for (y=0; y<height; y++)
3784             {
3785                 src_pixel = src_row;
3786                 dst_pixel = dst_row;
3787                 for (x=0; x<width; x++)
3788                 {
3789                     /* FIXME: This could probably be faster without memcpy. */
3790                     memcpy(dst_pixel, src_pixel, bytesperpixel);
3791                     dst_pixel += bytesperpixel;
3792                     src_pixel += src_x_offset;
3793                 }
3794                 src_row += src_y_offset;
3795                 dst_row += dst_lock.Stride;
3796             }
3797
3798             GdipBitmapUnlockBits(new_bitmap, &dst_lock);
3799         }
3800
3801         GdipBitmapUnlockBits(bitmap, &src_lock);
3802     }
3803
3804     if (stat == Ok)
3805         move_bitmap(bitmap, new_bitmap, FALSE);
3806     else
3807         GdipDisposeImage((GpImage*)new_bitmap);
3808
3809     return stat;
3810 }
3811
3812 /*****************************************************************************
3813  * GdipConvertToEmfPlusToFile [GDIPLUS.@]
3814  */
3815
3816 GpStatus WINGDIPAPI GdipConvertToEmfPlusToFile(const GpGraphics* refGraphics,
3817                                                GpMetafile* metafile, BOOL* conversionSuccess,
3818                                                const WCHAR* filename, EmfType emfType,
3819                                                const WCHAR* description, GpMetafile** out_metafile)
3820 {
3821     FIXME("stub: %p, %p, %p, %p, %u, %p, %p\n", refGraphics, metafile, conversionSuccess, filename, emfType, description, out_metafile);
3822     return NotImplemented;
3823 }