git.oblomov.eu Git - wine/blob - 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;
1630     INT row_size, dib_stride;
1631     HDC hdc;
1632     BYTE *bits;
1633     int i;
1634     REAL xres, yres;
1635     GpStatus stat;
1636
1637     TRACE("%d %d %d 0x%x %p %p\n", width, height, stride, format, scan0, bitmap);
1638
1639     if (!bitmap) return InvalidParameter;
1640
1641     if(width <= 0 || height <= 0 || (scan0 && (stride % 4))){
1642         *bitmap = NULL;
1643         return InvalidParameter;
1644     }
1645
1646     if(scan0 && !stride)
1647         return InvalidParameter;
1648
1649     stat = get_screen_resolution(&xres, &yres);
1650     if (stat != Ok) return stat;
1651
1652     row_size = (width * PIXELFORMATBPP(format)+7) / 8;
1653     dib_stride = (row_size + 3) & ~3;
1654
1655     if(stride == 0)
1656         stride = dib_stride;
1657
1658     pbmi = GdipAlloc(sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
1659     if (!pbmi)
1660         return OutOfMemory;
1661
1662     pbmi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
1663     pbmi->bmiHeader.biWidth = width;
1664     pbmi->bmiHeader.biHeight = -height;
1665     pbmi->bmiHeader.biPlanes = 1;
1666     /* FIXME: use the rest of the data from format */
1667     pbmi->bmiHeader.biBitCount = PIXELFORMATBPP(format);
1668     pbmi->bmiHeader.biCompression = BI_RGB;
1669     pbmi->bmiHeader.biSizeImage = 0;
1670     pbmi->bmiHeader.biXPelsPerMeter = 0;
1671     pbmi->bmiHeader.biYPelsPerMeter = 0;
1672     pbmi->bmiHeader.biClrUsed = 0;
1673     pbmi->bmiHeader.biClrImportant = 0;
1674
1675     hdc = CreateCompatibleDC(NULL);
1676     if (!hdc) {
1677         GdipFree(pbmi);
1678         return GenericError;
1679     }
1680
1681     hbitmap = CreateDIBSection(hdc, pbmi, DIB_RGB_COLORS, (void**)&bits, NULL, 0);
1682
1683     DeleteDC(hdc);
1684     GdipFree(pbmi);
1685
1686     if (!hbitmap) return GenericError;
1687
1688     /* copy bits to the dib if necessary */
1689     /* FIXME: should reference the bits instead of copying them */
1690     if (scan0)
1691         for (i=0; i<height; i++)
1692             memcpy(bits+i*dib_stride, scan0+i*stride, row_size);
1693
1694     *bitmap = GdipAlloc(sizeof(GpBitmap));
1695     if(!*bitmap)
1696     {
1697         DeleteObject(hbitmap);
1698         return OutOfMemory;
1699     }
1700
1701     (*bitmap)->image.type = ImageTypeBitmap;
1702     memcpy(&(*bitmap)->image.format, &ImageFormatMemoryBMP, sizeof(GUID));
1703     (*bitmap)->image.flags = ImageFlagsNone;
1704     (*bitmap)->image.palette_flags = 0;
1705     (*bitmap)->image.palette_count = 0;
1706     (*bitmap)->image.palette_size = 0;
1707     (*bitmap)->image.palette_entries = NULL;
1708     (*bitmap)->image.xres = xres;
1709     (*bitmap)->image.yres = yres;
1710     (*bitmap)->width = width;
1711     (*bitmap)->height = height;
1712     (*bitmap)->format = format;
1713     (*bitmap)->image.picture = NULL;
1714     (*bitmap)->hbitmap = hbitmap;
1715     (*bitmap)->hdc = NULL;
1716     (*bitmap)->bits = bits;
1717     (*bitmap)->stride = dib_stride;
1718
1719     if (format == PixelFormat1bppIndexed ||
1720         format == PixelFormat4bppIndexed ||
1721         format == PixelFormat8bppIndexed)
1722     {
1723         (*bitmap)->image.palette_size = (*bitmap)->image.palette_count = 1 << PIXELFORMATBPP(format);
1724         (*bitmap)->image.palette_entries = GdipAlloc(sizeof(ARGB) * ((*bitmap)->image.palette_size));
1725
1726         if (!(*bitmap)->image.palette_entries)
1727         {
1728             GdipDisposeImage(&(*bitmap)->image);
1729             *bitmap = NULL;
1730             return OutOfMemory;
1731         }
1732
1733         if (format == PixelFormat1bppIndexed)
1734         {
1735             (*bitmap)->image.palette_flags = PaletteFlagsGrayScale;
1736             (*bitmap)->image.palette_entries[0] = 0xff000000;
1737             (*bitmap)->image.palette_entries[1] = 0xffffffff;
1738         }
1739         else
1740         {
1741             if (format == PixelFormat8bppIndexed)
1742                 (*bitmap)->image.palette_flags = PaletteFlagsHalftone;
1743
1744             generate_halftone_palette((*bitmap)->image.palette_entries,
1745                 (*bitmap)->image.palette_count);
1746         }
1747     }
1748
1749     TRACE("<-- %p\n", *bitmap);
1750
1751     return Ok;
1752 }
1753
1754 GpStatus WINGDIPAPI GdipCreateBitmapFromStream(IStream* stream,
1755     GpBitmap **bitmap)
1756 {
1757     GpStatus stat;
1758
1759     TRACE("%p %p\n", stream, bitmap);
1760
1761     stat = GdipLoadImageFromStream(stream, (GpImage**) bitmap);
1762
1763     if(stat != Ok)
1764         return stat;
1765
1766     if((*bitmap)->image.type != ImageTypeBitmap){
1767         GdipDisposeImage(&(*bitmap)->image);
1768         *bitmap = NULL;
1769         return GenericError; /* FIXME: what error to return? */
1770     }
1771
1772     return Ok;
1773 }
1774
1775 /* FIXME: no icm */
1776 GpStatus WINGDIPAPI GdipCreateBitmapFromStreamICM(IStream* stream,
1777     GpBitmap **bitmap)
1778 {
1779     TRACE("%p %p\n", stream, bitmap);
1780
1781     return GdipCreateBitmapFromStream(stream, bitmap);
1782 }
1783
1784 GpStatus WINGDIPAPI GdipCreateCachedBitmap(GpBitmap *bitmap, GpGraphics *graphics,
1785     GpCachedBitmap **cachedbmp)
1786 {
1787     GpStatus stat;
1788
1789     TRACE("%p %p %p\n", bitmap, graphics, cachedbmp);
1790
1791     if(!bitmap || !graphics || !cachedbmp)
1792         return InvalidParameter;
1793
1794     *cachedbmp = GdipAlloc(sizeof(GpCachedBitmap));
1795     if(!*cachedbmp)
1796         return OutOfMemory;
1797
1798     stat = GdipCloneImage(&(bitmap->image), &(*cachedbmp)->image);
1799     if(stat != Ok){
1800         GdipFree(*cachedbmp);
1801         return stat;
1802     }
1803
1804     return Ok;
1805 }
1806
1807 GpStatus WINGDIPAPI GdipCreateHICONFromBitmap(GpBitmap *bitmap, HICON *hicon)
1808 {
1809     GpStatus stat;
1810     BitmapData lockeddata;
1811     ULONG andstride, xorstride, bitssize;
1812     LPBYTE andbits, xorbits, androw, xorrow, srcrow;
1813     UINT x, y;
1814
1815     TRACE("(%p, %p)\n", bitmap, hicon);
1816
1817     if (!bitmap || !hicon)
1818         return InvalidParameter;
1819
1820     stat = GdipBitmapLockBits(bitmap, NULL, ImageLockModeRead,
1821         PixelFormat32bppPARGB, &lockeddata);
1822     if (stat == Ok)
1823     {
1824         andstride = ((lockeddata.Width+31)/32)*4;
1825         xorstride = lockeddata.Width*4;
1826         bitssize = (andstride + xorstride) * lockeddata.Height;
1827
1828         andbits = GdipAlloc(bitssize);
1829
1830         if (andbits)
1831         {
1832             xorbits = andbits + andstride * lockeddata.Height;
1833
1834             for (y=0; y<lockeddata.Height; y++)
1835             {
1836                 srcrow = ((LPBYTE)lockeddata.Scan0) + lockeddata.Stride * y;
1837
1838                 androw = andbits + andstride * y;
1839                 for (x=0; x<lockeddata.Width; x++)
1840                     if (srcrow[3+4*x] >= 128)
1841                         androw[x/8] |= 1 << (7-x%8);
1842
1843                 xorrow = xorbits + xorstride * y;
1844                 memcpy(xorrow, srcrow, xorstride);
1845             }
1846
1847             *hicon = CreateIcon(NULL, lockeddata.Width, lockeddata.Height, 1, 32,
1848                 andbits, xorbits);
1849
1850             GdipFree(andbits);
1851         }
1852         else
1853             stat = OutOfMemory;
1854
1855         GdipBitmapUnlockBits(bitmap, &lockeddata);
1856     }
1857
1858     return stat;
1859 }
1860
1861 GpStatus WINGDIPAPI GdipDeleteCachedBitmap(GpCachedBitmap *cachedbmp)
1862 {
1863     TRACE("%p\n", cachedbmp);
1864
1865     if(!cachedbmp)
1866         return InvalidParameter;
1867
1868     GdipDisposeImage(cachedbmp->image);
1869     GdipFree(cachedbmp);
1870
1871     return Ok;
1872 }
1873
1874 GpStatus WINGDIPAPI GdipDrawCachedBitmap(GpGraphics *graphics,
1875     GpCachedBitmap *cachedbmp, INT x, INT y)
1876 {
1877     TRACE("%p %p %d %d\n", graphics, cachedbmp, x, y);
1878
1879     if(!graphics || !cachedbmp)
1880         return InvalidParameter;
1881
1882     return GdipDrawImage(graphics, cachedbmp->image, (REAL)x, (REAL)y);
1883 }
1884
1885 GpStatus WINGDIPAPI GdipEmfToWmfBits(HENHMETAFILE hemf, UINT cbData16,
1886     LPBYTE pData16, INT iMapMode, INT eFlags)
1887 {
1888     FIXME("(%p, %d, %p, %d, %d): stub\n", hemf, cbData16, pData16, iMapMode, eFlags);
1889     return NotImplemented;
1890 }
1891
1892 /* Internal utility function: Replace the image data of dst with that of src,
1893  * and free src. */
1894 static void move_bitmap(GpBitmap *dst, GpBitmap *src, BOOL clobber_palette)
1895 {
1896     GdipFree(dst->bitmapbits);
1897     DeleteDC(dst->hdc);
1898     DeleteObject(dst->hbitmap);
1899
1900     if (clobber_palette)
1901     {
1902         GdipFree(dst->image.palette_entries);
1903         dst->image.palette_flags = src->image.palette_flags;
1904         dst->image.palette_count = src->image.palette_count;
1905         dst->image.palette_entries = src->image.palette_entries;
1906     }
1907     else
1908         GdipFree(src->image.palette_entries);
1909
1910     dst->image.xres = src->image.xres;
1911     dst->image.yres = src->image.yres;
1912     dst->width = src->width;
1913     dst->height = src->height;
1914     dst->format = src->format;
1915     dst->hbitmap = src->hbitmap;
1916     dst->hdc = src->hdc;
1917     dst->bits = src->bits;
1918     dst->stride = src->stride;
1919
1920     GdipFree(src);
1921 }
1922
1923 GpStatus WINGDIPAPI GdipDisposeImage(GpImage *image)
1924 {
1925     TRACE("%p\n", image);
1926
1927     if(!image)
1928         return InvalidParameter;
1929
1930     if (image->picture)
1931         IPicture_Release(image->picture);
1932     if (image->type == ImageTypeBitmap)
1933     {
1934         GdipFree(((GpBitmap*)image)->bitmapbits);
1935         DeleteDC(((GpBitmap*)image)->hdc);
1936         DeleteObject(((GpBitmap*)image)->hbitmap);
1937     }
1938     GdipFree(image->palette_entries);
1939     GdipFree(image);
1940
1941     return Ok;
1942 }
1943
1944 GpStatus WINGDIPAPI GdipFindFirstImageItem(GpImage *image, ImageItemData* item)
1945 {
1946     static int calls;
1947
1948     TRACE("(%p,%p)\n", image, item);
1949
1950     if(!image || !item)
1951         return InvalidParameter;
1952
1953     if (!(calls++))
1954         FIXME("not implemented\n");
1955
1956     return NotImplemented;
1957 }
1958
1959 GpStatus WINGDIPAPI GdipGetImageItemData(GpImage *image, ImageItemData *item)
1960 {
1961     static int calls;
1962
1963     TRACE("(%p,%p)\n", image, item);
1964
1965     if (!(calls++))
1966         FIXME("not implemented\n");
1967
1968     return NotImplemented;
1969 }
1970
1971 GpStatus WINGDIPAPI GdipGetImageBounds(GpImage *image, GpRectF *srcRect,
1972     GpUnit *srcUnit)
1973 {
1974     TRACE("%p %p %p\n", image, srcRect, srcUnit);
1975
1976     if(!image || !srcRect || !srcUnit)
1977         return InvalidParameter;
1978     if(image->type == ImageTypeMetafile){
1979         *srcRect = ((GpMetafile*)image)->bounds;
1980         *srcUnit = ((GpMetafile*)image)->unit;
1981     }
1982     else if(image->type == ImageTypeBitmap){
1983         srcRect->X = srcRect->Y = 0.0;
1984         srcRect->Width = (REAL) ((GpBitmap*)image)->width;
1985         srcRect->Height = (REAL) ((GpBitmap*)image)->height;
1986         *srcUnit = UnitPixel;
1987     }
1988     else{
1989         srcRect->X = srcRect->Y = 0.0;
1990         srcRect->Width = ipicture_pixel_width(image->picture);
1991         srcRect->Height = ipicture_pixel_height(image->picture);
1992         *srcUnit = UnitPixel;
1993     }
1994
1995     TRACE("returning (%f, %f) (%f, %f) unit type %d\n", srcRect->X, srcRect->Y,
1996           srcRect->Width, srcRect->Height, *srcUnit);
1997
1998     return Ok;
1999 }
2000
2001 GpStatus WINGDIPAPI GdipGetImageDimension(GpImage *image, REAL *width,
2002     REAL *height)
2003 {
2004     TRACE("%p %p %p\n", image, width, height);
2005
2006     if(!image || !height || !width)
2007         return InvalidParameter;
2008
2009     if(image->type == ImageTypeMetafile){
2010         HDC hdc = GetDC(0);
2011
2012         *height = convert_unit(hdc, ((GpMetafile*)image)->unit) *
2013                         ((GpMetafile*)image)->bounds.Height;
2014
2015         *width = convert_unit(hdc, ((GpMetafile*)image)->unit) *
2016                         ((GpMetafile*)image)->bounds.Width;
2017
2018         ReleaseDC(0, hdc);
2019     }
2020
2021     else if(image->type == ImageTypeBitmap){
2022         *height = ((GpBitmap*)image)->height;
2023         *width = ((GpBitmap*)image)->width;
2024     }
2025     else{
2026         *height = ipicture_pixel_height(image->picture);
2027         *width = ipicture_pixel_width(image->picture);
2028     }
2029
2030     TRACE("returning (%f, %f)\n", *height, *width);
2031     return Ok;
2032 }
2033
2034 GpStatus WINGDIPAPI GdipGetImageGraphicsContext(GpImage *image,
2035     GpGraphics **graphics)
2036 {
2037     HDC hdc;
2038     GpStatus stat;
2039
2040     TRACE("%p %p\n", image, graphics);
2041
2042     if(!image || !graphics)
2043         return InvalidParameter;
2044
2045     if(image->type != ImageTypeBitmap){
2046         FIXME("not implemented for image type %d\n", image->type);
2047         return NotImplemented;
2048     }
2049
2050     hdc = ((GpBitmap*)image)->hdc;
2051
2052     if(!hdc){
2053         hdc = CreateCompatibleDC(0);
2054         SelectObject(hdc, ((GpBitmap*)image)->hbitmap);
2055         ((GpBitmap*)image)->hdc = hdc;
2056     }
2057
2058     stat = GdipCreateFromHDC(hdc, graphics);
2059
2060     if (stat == Ok)
2061         (*graphics)->image = image;
2062
2063     return stat;
2064 }
2065
2066 GpStatus WINGDIPAPI GdipGetImageHeight(GpImage *image, UINT *height)
2067 {
2068     TRACE("%p %p\n", image, height);
2069
2070     if(!image || !height)
2071         return InvalidParameter;
2072
2073     if(image->type == ImageTypeMetafile){
2074         HDC hdc = GetDC(0);
2075
2076         *height = roundr(convert_unit(hdc, ((GpMetafile*)image)->unit) *
2077                         ((GpMetafile*)image)->bounds.Height);
2078
2079         ReleaseDC(0, hdc);
2080     }
2081     else if(image->type == ImageTypeBitmap)
2082         *height = ((GpBitmap*)image)->height;
2083     else
2084         *height = ipicture_pixel_height(image->picture);
2085
2086     TRACE("returning %d\n", *height);
2087
2088     return Ok;
2089 }
2090
2091 GpStatus WINGDIPAPI GdipGetImageHorizontalResolution(GpImage *image, REAL *res)
2092 {
2093     if(!image || !res)
2094         return InvalidParameter;
2095
2096     *res = image->xres;
2097
2098     TRACE("(%p) <-- %0.2f\n", image, *res);
2099
2100     return Ok;
2101 }
2102
2103 GpStatus WINGDIPAPI GdipGetImagePaletteSize(GpImage *image, INT *size)
2104 {
2105     TRACE("%p %p\n", image, size);
2106
2107     if(!image || !size)
2108         return InvalidParameter;
2109
2110     if (image->palette_count == 0)
2111         *size = sizeof(ColorPalette);
2112     else
2113         *size = sizeof(UINT)*2 + sizeof(ARGB)*image->palette_count;
2114
2115     TRACE("<-- %u\n", *size);
2116
2117     return Ok;
2118 }
2119
2120 /* FIXME: test this function for non-bitmap types */
2121 GpStatus WINGDIPAPI GdipGetImagePixelFormat(GpImage *image, PixelFormat *format)
2122 {
2123     TRACE("%p %p\n", image, format);
2124
2125     if(!image || !format)
2126         return InvalidParameter;
2127
2128     if(image->type != ImageTypeBitmap)
2129         *format = PixelFormat24bppRGB;
2130     else
2131         *format = ((GpBitmap*) image)->format;
2132
2133     return Ok;
2134 }
2135
2136 GpStatus WINGDIPAPI GdipGetImageRawFormat(GpImage *image, GUID *format)
2137 {
2138     TRACE("(%p, %p)\n", image, format);
2139
2140     if(!image || !format)
2141         return InvalidParameter;
2142
2143     memcpy(format, &image->format, sizeof(GUID));
2144
2145     return Ok;
2146 }
2147
2148 GpStatus WINGDIPAPI GdipGetImageType(GpImage *image, ImageType *type)
2149 {
2150     TRACE("%p %p\n", image, type);
2151
2152     if(!image || !type)
2153         return InvalidParameter;
2154
2155     *type = image->type;
2156
2157     return Ok;
2158 }
2159
2160 GpStatus WINGDIPAPI GdipGetImageVerticalResolution(GpImage *image, REAL *res)
2161 {
2162     if(!image || !res)
2163         return InvalidParameter;
2164
2165     *res = image->yres;
2166
2167     TRACE("(%p) <-- %0.2f\n", image, *res);
2168
2169     return Ok;
2170 }
2171
2172 GpStatus WINGDIPAPI GdipGetImageWidth(GpImage *image, UINT *width)
2173 {
2174     TRACE("%p %p\n", image, width);
2175
2176     if(!image || !width)
2177         return InvalidParameter;
2178
2179     if(image->type == ImageTypeMetafile){
2180         HDC hdc = GetDC(0);
2181
2182         *width = roundr(convert_unit(hdc, ((GpMetafile*)image)->unit) *
2183                         ((GpMetafile*)image)->bounds.Width);
2184
2185         ReleaseDC(0, hdc);
2186     }
2187     else if(image->type == ImageTypeBitmap)
2188         *width = ((GpBitmap*)image)->width;
2189     else
2190         *width = ipicture_pixel_width(image->picture);
2191
2192     TRACE("returning %d\n", *width);
2193
2194     return Ok;
2195 }
2196
2197 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromMetafile(GpMetafile * metafile,
2198     MetafileHeader * header)
2199 {
2200     static int calls;
2201
2202     TRACE("(%p, %p)\n", metafile, header);
2203
2204     if(!metafile || !header)
2205         return InvalidParameter;
2206
2207     if(!(calls++))
2208         FIXME("not implemented\n");
2209
2210     memset(header, 0, sizeof(MetafileHeader));
2211
2212     return Ok;
2213 }
2214
2215 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromEmf(HENHMETAFILE hEmf,
2216     MetafileHeader *header)
2217 {
2218     static int calls;
2219
2220     if(!hEmf || !header)
2221         return InvalidParameter;
2222
2223     if(!(calls++))
2224         FIXME("not implemented\n");
2225
2226     memset(header, 0, sizeof(MetafileHeader));
2227
2228     return Ok;
2229 }
2230
2231 GpStatus WINGDIPAPI GdipGetMetafileHeaderFromFile(GDIPCONST WCHAR *filename,
2232     MetafileHeader *header)
2233 {
2234     static int calls;
2235
2236     TRACE("(%s,%p)\n", debugstr_w(filename), header);
2237
2238     if(!filename || !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 GdipGetMetafileHeaderFromStream(IStream *stream,
2250     MetafileHeader *header)
2251 {
2252     static int calls;
2253
2254     TRACE("(%p,%p)\n", stream, header);
2255
2256     if(!stream || !header)
2257         return InvalidParameter;
2258
2259     if(!(calls++))
2260         FIXME("not implemented\n");
2261
2262     memset(header, 0, sizeof(MetafileHeader));
2263
2264     return Ok;
2265 }
2266
2267 GpStatus WINGDIPAPI GdipGetAllPropertyItems(GpImage *image, UINT size,
2268     UINT num, PropertyItem* items)
2269 {
2270     static int calls;
2271
2272     TRACE("(%p, %u, %u, %p)\n", image, size, num, items);
2273
2274     if(!(calls++))
2275         FIXME("not implemented\n");
2276
2277     return InvalidParameter;
2278 }
2279
2280 GpStatus WINGDIPAPI GdipGetPropertyCount(GpImage *image, UINT* num)
2281 {
2282     static int calls;
2283
2284     TRACE("(%p, %p)\n", image, num);
2285
2286     if(!(calls++))
2287         FIXME("not implemented\n");
2288
2289     return InvalidParameter;
2290 }
2291
2292 GpStatus WINGDIPAPI GdipGetPropertyIdList(GpImage *image, UINT num, PROPID* list)
2293 {
2294     static int calls;
2295
2296     TRACE("(%p, %u, %p)\n", image, num, list);
2297
2298     if(!(calls++))
2299         FIXME("not implemented\n");
2300
2301     return InvalidParameter;
2302 }
2303
2304 GpStatus WINGDIPAPI GdipGetPropertyItem(GpImage *image, PROPID id, UINT size,
2305     PropertyItem* buffer)
2306 {
2307     static int calls;
2308
2309     TRACE("(%p, %u, %u, %p)\n", image, id, size, buffer);
2310
2311     if(!(calls++))
2312         FIXME("not implemented\n");
2313
2314     return InvalidParameter;
2315 }
2316
2317 GpStatus WINGDIPAPI GdipGetPropertyItemSize(GpImage *image, PROPID pid,
2318     UINT* size)
2319 {
2320     static int calls;
2321
2322     TRACE("%p %x %p\n", image, pid, size);
2323
2324     if(!size || !image)
2325         return InvalidParameter;
2326
2327     if(!(calls++))
2328         FIXME("not implemented\n");
2329
2330     return NotImplemented;
2331 }
2332
2333 GpStatus WINGDIPAPI GdipGetPropertySize(GpImage *image, UINT* size, UINT* num)
2334 {
2335     static int calls;
2336
2337     TRACE("(%p,%p,%p)\n", image, size, num);
2338
2339     if(!(calls++))
2340         FIXME("not implemented\n");
2341
2342     return InvalidParameter;
2343 }
2344
2345 struct image_format_dimension
2346 {
2347     const GUID *format;
2348     const GUID *dimension;
2349 };
2350
2351 struct image_format_dimension image_format_dimensions[] =
2352 {
2353     {&ImageFormatGIF, &FrameDimensionTime},
2354     {&ImageFormatIcon, &FrameDimensionResolution},
2355     {NULL}
2356 };
2357
2358 /* FIXME: Need to handle multi-framed images */
2359 GpStatus WINGDIPAPI GdipImageGetFrameCount(GpImage *image,
2360     GDIPCONST GUID* dimensionID, UINT* count)
2361 {
2362     static int calls;
2363
2364     TRACE("(%p,%s,%p)\n", image, debugstr_guid(dimensionID), count);
2365
2366     if(!image || !count)
2367         return InvalidParameter;
2368
2369     if(!(calls++))
2370         FIXME("returning frame count of 1\n");
2371
2372     *count = 1;
2373
2374     return Ok;
2375 }
2376
2377 GpStatus WINGDIPAPI GdipImageGetFrameDimensionsCount(GpImage *image,
2378     UINT* count)
2379 {
2380     TRACE("(%p, %p)\n", image, count);
2381
2382     /* Native gdiplus 1.1 does not yet support multiple frame dimensions. */
2383
2384     if(!image || !count)
2385         return InvalidParameter;
2386
2387     *count = 1;
2388
2389     return Ok;
2390 }
2391
2392 GpStatus WINGDIPAPI GdipImageGetFrameDimensionsList(GpImage* image,
2393     GUID* dimensionIDs, UINT count)
2394 {
2395     int i;
2396     const GUID *result=NULL;
2397
2398     TRACE("(%p,%p,%u)\n", image, dimensionIDs, count);
2399
2400     if(!image || !dimensionIDs || count != 1)
2401         return InvalidParameter;
2402
2403     for (i=0; image_format_dimensions[i].format; i++)
2404     {
2405         if (IsEqualGUID(&image->format, image_format_dimensions[i].format))
2406         {
2407             result = image_format_dimensions[i].dimension;
2408             break;
2409         }
2410     }
2411
2412     if (!result)
2413         result = &FrameDimensionPage;
2414
2415     memcpy(dimensionIDs, result, sizeof(GUID));
2416
2417     return Ok;
2418 }
2419
2420 GpStatus WINGDIPAPI GdipImageSelectActiveFrame(GpImage *image,
2421     GDIPCONST GUID* dimensionID, UINT frameidx)
2422 {
2423     static int calls;
2424
2425     TRACE("(%p, %s, %u)\n", image, debugstr_guid(dimensionID), frameidx);
2426
2427     if(!image || !dimensionID)
2428         return InvalidParameter;
2429
2430     if(!(calls++))
2431         FIXME("not implemented\n");
2432
2433     return Ok;
2434 }
2435
2436 GpStatus WINGDIPAPI GdipLoadImageFromFile(GDIPCONST WCHAR* filename,
2437                                           GpImage **image)
2438 {
2439     GpStatus stat;
2440     IStream *stream;
2441
2442     TRACE("(%s) %p\n", debugstr_w(filename), image);
2443
2444     if (!filename || !image)
2445         return InvalidParameter;
2446
2447     stat = GdipCreateStreamOnFile(filename, GENERIC_READ, &stream);
2448
2449     if (stat != Ok)
2450         return stat;
2451
2452     stat = GdipLoadImageFromStream(stream, image);
2453
2454     IStream_Release(stream);
2455
2456     return stat;
2457 }
2458
2459 /* FIXME: no icm handling */
2460 GpStatus WINGDIPAPI GdipLoadImageFromFileICM(GDIPCONST WCHAR* filename,GpImage **image)
2461 {
2462     TRACE("(%s) %p\n", debugstr_w(filename), image);
2463
2464     return GdipLoadImageFromFile(filename, image);
2465 }
2466
2467 static const WICPixelFormatGUID *wic_pixel_formats[] = {
2468     &GUID_WICPixelFormat16bppBGR555,
2469     &GUID_WICPixelFormat24bppBGR,
2470     &GUID_WICPixelFormat32bppBGR,
2471     &GUID_WICPixelFormat32bppBGRA,
2472     &GUID_WICPixelFormat32bppPBGRA,
2473     NULL
2474 };
2475
2476 static const PixelFormat wic_gdip_formats[] = {
2477     PixelFormat16bppRGB555,
2478     PixelFormat24bppRGB,
2479     PixelFormat32bppRGB,
2480     PixelFormat32bppARGB,
2481     PixelFormat32bppPARGB,
2482 };
2483
2484 static GpStatus decode_image_wic(IStream* stream, REFCLSID clsid, GpImage **image)
2485 {
2486     GpStatus status=Ok;
2487     GpBitmap *bitmap;
2488     HRESULT hr;
2489     IWICBitmapDecoder *decoder;
2490     IWICBitmapFrameDecode *frame;
2491     IWICBitmapSource *source=NULL;
2492     WICPixelFormatGUID wic_format;
2493     PixelFormat gdip_format=0;
2494     int i;
2495     UINT width, height;
2496     BitmapData lockeddata;
2497     WICRect wrc;
2498     HRESULT initresult;
2499
2500     initresult = CoInitialize(NULL);
2501
2502     hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER,
2503         &IID_IWICBitmapDecoder, (void**)&decoder);
2504     if (FAILED(hr)) goto end;
2505
2506     hr = IWICBitmapDecoder_Initialize(decoder, (IStream*)stream, WICDecodeMetadataCacheOnLoad);
2507     if (SUCCEEDED(hr))
2508         hr = IWICBitmapDecoder_GetFrame(decoder, 0, &frame);
2509
2510     if (SUCCEEDED(hr)) /* got frame */
2511     {
2512         hr = IWICBitmapFrameDecode_GetPixelFormat(frame, &wic_format);
2513
2514         if (SUCCEEDED(hr))
2515         {
2516             for (i=0; wic_pixel_formats[i]; i++)
2517             {
2518                 if (IsEqualGUID(&wic_format, wic_pixel_formats[i]))
2519                 {
2520                     source = (IWICBitmapSource*)frame;
2521                     IWICBitmapSource_AddRef(source);
2522                     gdip_format = wic_gdip_formats[i];
2523                     break;
2524                 }
2525             }
2526             if (!source)
2527             {
2528                 /* unknown format; fall back on 32bppARGB */
2529                 hr = WICConvertBitmapSource(&GUID_WICPixelFormat32bppBGRA, (IWICBitmapSource*)frame, &source);
2530                 gdip_format = PixelFormat32bppARGB;
2531             }
2532         }
2533
2534         if (SUCCEEDED(hr)) /* got source */
2535         {
2536             hr = IWICBitmapSource_GetSize(source, &width, &height);
2537
2538             if (SUCCEEDED(hr))
2539                 status = GdipCreateBitmapFromScan0(width, height, 0, gdip_format,
2540                     NULL, &bitmap);
2541
2542             if (SUCCEEDED(hr) && status == Ok) /* created bitmap */
2543             {
2544                 status = GdipBitmapLockBits(bitmap, NULL, ImageLockModeWrite,
2545                     gdip_format, &lockeddata);
2546                 if (status == Ok) /* locked bitmap */
2547                 {
2548                     wrc.X = 0;
2549                     wrc.Width = width;
2550                     wrc.Height = 1;
2551                     for (i=0; i<height; i++)
2552                     {
2553                         wrc.Y = i;
2554                         hr = IWICBitmapSource_CopyPixels(source, &wrc, abs(lockeddata.Stride),
2555                             abs(lockeddata.Stride), (BYTE*)lockeddata.Scan0+lockeddata.Stride*i);
2556                         if (FAILED(hr)) break;
2557                     }
2558
2559                     GdipBitmapUnlockBits(bitmap, &lockeddata);
2560                 }
2561
2562                 if (SUCCEEDED(hr) && status == Ok)
2563                     *image = (GpImage*)bitmap;
2564                 else
2565                 {
2566                     *image = NULL;
2567                     GdipDisposeImage((GpImage*)bitmap);
2568                 }
2569             }
2570
2571             IWICBitmapSource_Release(source);
2572         }
2573
2574         IWICBitmapFrameDecode_Release(frame);
2575     }
2576
2577     IWICBitmapDecoder_Release(decoder);
2578
2579 end:
2580     if (SUCCEEDED(initresult)) CoUninitialize();
2581
2582     if (FAILED(hr) && status == Ok) status = hresult_to_status(hr);
2583
2584     return status;
2585 }
2586
2587 static GpStatus decode_image_icon(IStream* stream, REFCLSID clsid, GpImage **image)
2588 {
2589     return decode_image_wic(stream, &CLSID_WICIcoDecoder, image);
2590 }
2591
2592 static GpStatus decode_image_bmp(IStream* stream, REFCLSID clsid, GpImage **image)
2593 {
2594     GpStatus status;
2595     GpBitmap* bitmap;
2596
2597     status = decode_image_wic(stream, &CLSID_WICBmpDecoder, image);
2598
2599     bitmap = (GpBitmap*)*image;
2600
2601     if (status == Ok && bitmap->format == PixelFormat32bppARGB)
2602     {
2603         /* WIC supports bmp files with alpha, but gdiplus does not */
2604         bitmap->format = PixelFormat32bppRGB;
2605     }
2606
2607     return status;
2608 }
2609
2610 static GpStatus decode_image_jpeg(IStream* stream, REFCLSID clsid, GpImage **image)
2611 {
2612     return decode_image_wic(stream, &CLSID_WICJpegDecoder, image);
2613 }
2614
2615 static GpStatus decode_image_png(IStream* stream, REFCLSID clsid, GpImage **image)
2616 {
2617     return decode_image_wic(stream, &CLSID_WICPngDecoder, image);
2618 }
2619
2620 static GpStatus decode_image_gif(IStream* stream, REFCLSID clsid, GpImage **image)
2621 {
2622     return decode_image_wic(stream, &CLSID_WICGifDecoder, image);
2623 }
2624
2625 static GpStatus decode_image_tiff(IStream* stream, REFCLSID clsid, GpImage **image)
2626 {
2627     return decode_image_wic(stream, &CLSID_WICTiffDecoder, image);
2628 }
2629
2630 static GpStatus decode_image_olepicture_metafile(IStream* stream, REFCLSID clsid, GpImage **image)
2631 {
2632     IPicture *pic;
2633
2634     TRACE("%p %p\n", stream, image);
2635
2636     if(!stream || !image)
2637         return InvalidParameter;
2638
2639     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
2640         (LPVOID*) &pic) != S_OK){
2641         TRACE("Could not load picture\n");
2642         return GenericError;
2643     }
2644
2645     /* FIXME: missing initialization code */
2646     *image = GdipAlloc(sizeof(GpMetafile));
2647     if(!*image) return OutOfMemory;
2648     (*image)->type = ImageTypeMetafile;
2649     (*image)->picture = pic;
2650     (*image)->flags   = ImageFlagsNone;
2651     (*image)->palette_flags = 0;
2652     (*image)->palette_count = 0;
2653     (*image)->palette_size = 0;
2654     (*image)->palette_entries = NULL;
2655
2656     TRACE("<-- %p\n", *image);
2657
2658     return Ok;
2659 }
2660
2661 typedef GpStatus (*encode_image_func)(GpImage *image, IStream* stream,
2662     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params);
2663
2664 typedef GpStatus (*decode_image_func)(IStream *stream, REFCLSID clsid, GpImage** image);
2665
2666 typedef struct image_codec {
2667     ImageCodecInfo info;
2668     encode_image_func encode_func;
2669     decode_image_func decode_func;
2670 } image_codec;
2671
2672 typedef enum {
2673     BMP,
2674     JPEG,
2675     GIF,
2676     TIFF,
2677     EMF,
2678     WMF,
2679     PNG,
2680     ICO,
2681     NUM_CODECS
2682 } ImageFormat;
2683
2684 static const struct image_codec codecs[NUM_CODECS];
2685
2686 static GpStatus get_decoder_info(IStream* stream, const struct image_codec **result)
2687 {
2688     BYTE signature[8];
2689     const BYTE *pattern, *mask;
2690     LARGE_INTEGER seek;
2691     HRESULT hr;
2692     UINT bytesread;
2693     int i, j, sig;
2694
2695     /* seek to the start of the stream */
2696     seek.QuadPart = 0;
2697     hr = IStream_Seek(stream, seek, STREAM_SEEK_SET, NULL);
2698     if (FAILED(hr)) return hresult_to_status(hr);
2699
2700     /* read the first 8 bytes */
2701     /* FIXME: This assumes all codecs have signatures <= 8 bytes in length */
2702     hr = IStream_Read(stream, signature, 8, &bytesread);
2703     if (FAILED(hr)) return hresult_to_status(hr);
2704     if (hr == S_FALSE || bytesread == 0) return GenericError;
2705
2706     for (i = 0; i < NUM_CODECS; i++) {
2707         if ((codecs[i].info.Flags & ImageCodecFlagsDecoder) &&
2708             bytesread >= codecs[i].info.SigSize)
2709         {
2710             for (sig=0; sig<codecs[i].info.SigCount; sig++)
2711             {
2712                 pattern = &codecs[i].info.SigPattern[codecs[i].info.SigSize*sig];
2713                 mask = &codecs[i].info.SigMask[codecs[i].info.SigSize*sig];
2714                 for (j=0; j<codecs[i].info.SigSize; j++)
2715                     if ((signature[j] & mask[j]) != pattern[j])
2716                         break;
2717                 if (j == codecs[i].info.SigSize)
2718                 {
2719                     *result = &codecs[i];
2720                     return Ok;
2721                 }
2722             }
2723         }
2724     }
2725
2726     TRACE("no match for %i byte signature %x %x %x %x %x %x %x %x\n", bytesread,
2727         signature[0],signature[1],signature[2],signature[3],
2728         signature[4],signature[5],signature[6],signature[7]);
2729
2730     return GenericError;
2731 }
2732
2733 GpStatus WINGDIPAPI GdipLoadImageFromStream(IStream* stream, GpImage **image)
2734 {
2735     GpStatus stat;
2736     LARGE_INTEGER seek;
2737     HRESULT hr;
2738     const struct image_codec *codec=NULL;
2739
2740     /* choose an appropriate image decoder */
2741     stat = get_decoder_info(stream, &codec);
2742     if (stat != Ok) return stat;
2743
2744     /* seek to the start of the stream */
2745     seek.QuadPart = 0;
2746     hr = IStream_Seek(stream, seek, STREAM_SEEK_SET, NULL);
2747     if (FAILED(hr)) return hresult_to_status(hr);
2748
2749     /* call on the image decoder to do the real work */
2750     stat = codec->decode_func(stream, &codec->info.Clsid, image);
2751
2752     /* take note of the original data format */
2753     if (stat == Ok)
2754     {
2755         memcpy(&(*image)->format, &codec->info.FormatID, sizeof(GUID));
2756     }
2757
2758     return stat;
2759 }
2760
2761 /* FIXME: no ICM */
2762 GpStatus WINGDIPAPI GdipLoadImageFromStreamICM(IStream* stream, GpImage **image)
2763 {
2764     TRACE("%p %p\n", stream, image);
2765
2766     return GdipLoadImageFromStream(stream, image);
2767 }
2768
2769 GpStatus WINGDIPAPI GdipRemovePropertyItem(GpImage *image, PROPID propId)
2770 {
2771     static int calls;
2772
2773     TRACE("(%p,%u)\n", image, propId);
2774
2775     if(!image)
2776         return InvalidParameter;
2777
2778     if(!(calls++))
2779         FIXME("not implemented\n");
2780
2781     return NotImplemented;
2782 }
2783
2784 GpStatus WINGDIPAPI GdipSetPropertyItem(GpImage *image, GDIPCONST PropertyItem* item)
2785 {
2786     static int calls;
2787
2788     TRACE("(%p,%p)\n", image, item);
2789
2790     if(!(calls++))
2791         FIXME("not implemented\n");
2792
2793     return NotImplemented;
2794 }
2795
2796 GpStatus WINGDIPAPI GdipSaveImageToFile(GpImage *image, GDIPCONST WCHAR* filename,
2797                                         GDIPCONST CLSID *clsidEncoder,
2798                                         GDIPCONST EncoderParameters *encoderParams)
2799 {
2800     GpStatus stat;
2801     IStream *stream;
2802
2803     TRACE("%p (%s) %p %p\n", image, debugstr_w(filename), clsidEncoder, encoderParams);
2804
2805     if (!image || !filename|| !clsidEncoder)
2806         return InvalidParameter;
2807
2808     stat = GdipCreateStreamOnFile(filename, GENERIC_WRITE, &stream);
2809     if (stat != Ok)
2810         return GenericError;
2811
2812     stat = GdipSaveImageToStream(image, stream, clsidEncoder, encoderParams);
2813
2814     IStream_Release(stream);
2815     return stat;
2816 }
2817
2818 /*************************************************************************
2819  * Encoding functions -
2820  *   These functions encode an image in different image file formats.
2821  */
2822 #define BITMAP_FORMAT_BMP   0x4d42 /* "BM" */
2823 #define BITMAP_FORMAT_JPEG  0xd8ff
2824 #define BITMAP_FORMAT_GIF   0x4947
2825 #define BITMAP_FORMAT_PNG   0x5089
2826 #define BITMAP_FORMAT_APM   0xcdd7
2827
2828 static GpStatus encode_image_WIC(GpImage *image, IStream* stream,
2829     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
2830 {
2831     GpStatus stat;
2832     GpBitmap *bitmap;
2833     IWICBitmapEncoder *encoder;
2834     IWICBitmapFrameEncode *frameencode;
2835     IPropertyBag2 *encoderoptions;
2836     HRESULT hr;
2837     UINT width, height;
2838     PixelFormat gdipformat=0;
2839     WICPixelFormatGUID wicformat;
2840     GpRect rc;
2841     BitmapData lockeddata;
2842     HRESULT initresult;
2843     UINT i;
2844
2845     if (image->type != ImageTypeBitmap)
2846         return GenericError;
2847
2848     bitmap = (GpBitmap*)image;
2849
2850     GdipGetImageWidth(image, &width);
2851     GdipGetImageHeight(image, &height);
2852
2853     rc.X = 0;
2854     rc.Y = 0;
2855     rc.Width = width;
2856     rc.Height = height;
2857
2858     initresult = CoInitialize(NULL);
2859
2860     hr = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER,
2861         &IID_IWICBitmapEncoder, (void**)&encoder);
2862     if (FAILED(hr))
2863     {
2864         if (SUCCEEDED(initresult)) CoUninitialize();
2865         return hresult_to_status(hr);
2866     }
2867
2868     hr = IWICBitmapEncoder_Initialize(encoder, stream, WICBitmapEncoderNoCache);
2869
2870     if (SUCCEEDED(hr))
2871     {
2872         hr = IWICBitmapEncoder_CreateNewFrame(encoder, &frameencode, &encoderoptions);
2873     }
2874
2875     if (SUCCEEDED(hr)) /* created frame */
2876     {
2877         hr = IWICBitmapFrameEncode_Initialize(frameencode, encoderoptions);
2878
2879         if (SUCCEEDED(hr))
2880             hr = IWICBitmapFrameEncode_SetSize(frameencode, width, height);
2881
2882         if (SUCCEEDED(hr))
2883             /* FIXME: use the resolution from the image */
2884             hr = IWICBitmapFrameEncode_SetResolution(frameencode, 96.0, 96.0);
2885
2886         if (SUCCEEDED(hr))
2887         {
2888             for (i=0; wic_pixel_formats[i]; i++)
2889             {
2890                 if (wic_gdip_formats[i] == bitmap->format)
2891                     break;
2892             }
2893             if (wic_pixel_formats[i])
2894                 memcpy(&wicformat, wic_pixel_formats[i], sizeof(GUID));
2895             else
2896                 memcpy(&wicformat, &GUID_WICPixelFormat32bppBGRA, sizeof(GUID));
2897
2898             hr = IWICBitmapFrameEncode_SetPixelFormat(frameencode, &wicformat);
2899
2900             for (i=0; wic_pixel_formats[i]; i++)
2901             {
2902                 if (IsEqualGUID(&wicformat, wic_pixel_formats[i]))
2903                     break;
2904             }
2905             if (wic_pixel_formats[i])
2906                 gdipformat = wic_gdip_formats[i];
2907             else
2908             {
2909                 ERR("cannot provide pixel format %s\n", debugstr_guid(&wicformat));
2910                 hr = E_FAIL;
2911             }
2912         }
2913
2914         if (SUCCEEDED(hr))
2915         {
2916             stat = GdipBitmapLockBits(bitmap, &rc, ImageLockModeRead, gdipformat,
2917                 &lockeddata);
2918
2919             if (stat == Ok)
2920             {
2921                 UINT row_size = (lockeddata.Width * PIXELFORMATBPP(gdipformat) + 7)/8;
2922                 BYTE *row;
2923
2924                 /* write one row at a time in case stride is negative */
2925                 row = lockeddata.Scan0;
2926                 for (i=0; i<lockeddata.Height; i++)
2927                 {
2928                     hr = IWICBitmapFrameEncode_WritePixels(frameencode, 1, row_size, row_size, row);
2929                     if (FAILED(hr)) break;
2930                     row += lockeddata.Stride;
2931                 }
2932
2933                 GdipBitmapUnlockBits(bitmap, &lockeddata);
2934             }
2935             else
2936                 hr = E_FAIL;
2937         }
2938
2939         if (SUCCEEDED(hr))
2940             hr = IWICBitmapFrameEncode_Commit(frameencode);
2941
2942         IWICBitmapFrameEncode_Release(frameencode);
2943         IPropertyBag2_Release(encoderoptions);
2944     }
2945
2946     if (SUCCEEDED(hr))
2947         hr = IWICBitmapEncoder_Commit(encoder);
2948
2949     IWICBitmapEncoder_Release(encoder);
2950
2951     if (SUCCEEDED(initresult)) CoUninitialize();
2952
2953     return hresult_to_status(hr);
2954 }
2955
2956 static GpStatus encode_image_BMP(GpImage *image, IStream* stream,
2957     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
2958 {
2959     return encode_image_WIC(image, stream, &CLSID_WICBmpEncoder, params);
2960 }
2961
2962 static GpStatus encode_image_png(GpImage *image, IStream* stream,
2963     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
2964 {
2965     return encode_image_WIC(image, stream, &CLSID_WICPngEncoder, params);
2966 }
2967
2968 /*****************************************************************************
2969  * GdipSaveImageToStream [GDIPLUS.@]
2970  */
2971 GpStatus WINGDIPAPI GdipSaveImageToStream(GpImage *image, IStream* stream,
2972     GDIPCONST CLSID* clsid, GDIPCONST EncoderParameters* params)
2973 {
2974     GpStatus stat;
2975     encode_image_func encode_image;
2976     int i;
2977
2978     TRACE("%p %p %p %p\n", image, stream, clsid, params);
2979
2980     if(!image || !stream)
2981         return InvalidParameter;
2982
2983     /* select correct encoder */
2984     encode_image = NULL;
2985     for (i = 0; i < NUM_CODECS; i++) {
2986         if ((codecs[i].info.Flags & ImageCodecFlagsEncoder) &&
2987             IsEqualCLSID(clsid, &codecs[i].info.Clsid))
2988             encode_image = codecs[i].encode_func;
2989     }
2990     if (encode_image == NULL)
2991         return UnknownImageFormat;
2992
2993     stat = encode_image(image, stream, clsid, params);
2994
2995     return stat;
2996 }
2997
2998 /*****************************************************************************
2999  * GdipGetImagePalette [GDIPLUS.@]
3000  */
3001 GpStatus WINGDIPAPI GdipGetImagePalette(GpImage *image, ColorPalette *palette, INT size)
3002 {
3003     TRACE("(%p,%p,%i)\n", image, palette, size);
3004
3005     if (!image || !palette)
3006         return InvalidParameter;
3007
3008     if (size < (sizeof(UINT)*2+sizeof(ARGB)*image->palette_count))
3009     {
3010         TRACE("<-- InsufficientBuffer\n");
3011         return InsufficientBuffer;
3012     }
3013
3014     palette->Flags = image->palette_flags;
3015     palette->Count = image->palette_count;
3016     memcpy(palette->Entries, image->palette_entries, sizeof(ARGB)*image->palette_count);
3017
3018     return Ok;
3019 }
3020
3021 /*****************************************************************************
3022  * GdipSetImagePalette [GDIPLUS.@]
3023  */
3024 GpStatus WINGDIPAPI GdipSetImagePalette(GpImage *image,
3025     GDIPCONST ColorPalette *palette)
3026 {
3027     TRACE("(%p,%p)\n", image, palette);
3028
3029     if(!image || !palette || palette->Count > 256)
3030         return InvalidParameter;
3031
3032     if (palette->Count > image->palette_size)
3033     {
3034         ARGB *new_palette;
3035
3036         new_palette = GdipAlloc(sizeof(ARGB) * palette->Count);
3037         if (!new_palette) return OutOfMemory;
3038
3039         GdipFree(image->palette_entries);
3040         image->palette_entries = new_palette;
3041         image->palette_size = palette->Count;
3042     }
3043
3044     image->palette_flags = palette->Flags;
3045     image->palette_count = palette->Count;
3046     memcpy(image->palette_entries, palette->Entries, sizeof(ARGB)*palette->Count);
3047
3048     return Ok;
3049 }
3050
3051 /*************************************************************************
3052  * Encoders -
3053  *   Structures that represent which formats we support for encoding.
3054  */
3055
3056 /* ImageCodecInfo creation routines taken from libgdiplus */
3057 static const WCHAR bmp_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'B', 'M', 'P', 0}; /* Built-in BMP */
3058 static const WCHAR bmp_extension[] = {'*','.','B', 'M', 'P',';', '*','.', 'D','I', 'B',';', '*','.', 'R', 'L', 'E',0}; /* *.BMP;*.DIB;*.RLE */
3059 static const WCHAR bmp_mimetype[] = {'i', 'm', 'a','g', 'e', '/', 'b', 'm', 'p', 0}; /* image/bmp */
3060 static const WCHAR bmp_format[] = {'B', 'M', 'P', 0}; /* BMP */
3061 static const BYTE bmp_sig_pattern[] = { 0x42, 0x4D };
3062 static const BYTE bmp_sig_mask[] = { 0xFF, 0xFF };
3063
3064 static const WCHAR jpeg_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'J','P','E','G', 0};
3065 static const WCHAR jpeg_extension[] = {'*','.','J','P','G',';', '*','.','J','P','E','G',';', '*','.','J','P','E',';', '*','.','J','F','I','F',0};
3066 static const WCHAR jpeg_mimetype[] = {'i','m','a','g','e','/','j','p','e','g', 0};
3067 static const WCHAR jpeg_format[] = {'J','P','E','G',0};
3068 static const BYTE jpeg_sig_pattern[] = { 0xFF, 0xD8 };
3069 static const BYTE jpeg_sig_mask[] = { 0xFF, 0xFF };
3070
3071 static const WCHAR gif_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'G','I','F', 0};
3072 static const WCHAR gif_extension[] = {'*','.','G','I','F',0};
3073 static const WCHAR gif_mimetype[] = {'i','m','a','g','e','/','g','i','f', 0};
3074 static const WCHAR gif_format[] = {'G','I','F',0};
3075 static const BYTE gif_sig_pattern[4] = "GIF8";
3076 static const BYTE gif_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3077
3078 static const WCHAR tiff_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'T','I','F','F', 0};
3079 static const WCHAR tiff_extension[] = {'*','.','T','I','F','F',';','*','.','T','I','F',0};
3080 static const WCHAR tiff_mimetype[] = {'i','m','a','g','e','/','t','i','f','f', 0};
3081 static const WCHAR tiff_format[] = {'T','I','F','F',0};
3082 static const BYTE tiff_sig_pattern[] = {0x49,0x49,42,0,0x4d,0x4d,0,42};
3083 static const BYTE tiff_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF };
3084
3085 static const WCHAR emf_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'E','M','F', 0};
3086 static const WCHAR emf_extension[] = {'*','.','E','M','F',0};
3087 static const WCHAR emf_mimetype[] = {'i','m','a','g','e','/','x','-','e','m','f', 0};
3088 static const WCHAR emf_format[] = {'E','M','F',0};
3089 static const BYTE emf_sig_pattern[] = { 0x01, 0x00, 0x00, 0x00 };
3090 static const BYTE emf_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3091
3092 static const WCHAR wmf_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'W','M','F', 0};
3093 static const WCHAR wmf_extension[] = {'*','.','W','M','F',0};
3094 static const WCHAR wmf_mimetype[] = {'i','m','a','g','e','/','x','-','w','m','f', 0};
3095 static const WCHAR wmf_format[] = {'W','M','F',0};
3096 static const BYTE wmf_sig_pattern[] = { 0xd7, 0xcd };
3097 static const BYTE wmf_sig_mask[] = { 0xFF, 0xFF };
3098
3099 static const WCHAR png_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'P','N','G', 0};
3100 static const WCHAR png_extension[] = {'*','.','P','N','G',0};
3101 static const WCHAR png_mimetype[] = {'i','m','a','g','e','/','p','n','g', 0};
3102 static const WCHAR png_format[] = {'P','N','G',0};
3103 static const BYTE png_sig_pattern[] = { 137, 80, 78, 71, 13, 10, 26, 10, };
3104 static const BYTE png_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF };
3105
3106 static const WCHAR ico_codecname[] = {'B', 'u', 'i','l', 't', '-','i', 'n', ' ', 'I','C','O', 0};
3107 static const WCHAR ico_extension[] = {'*','.','I','C','O',0};
3108 static const WCHAR ico_mimetype[] = {'i','m','a','g','e','/','x','-','i','c','o','n', 0};
3109 static const WCHAR ico_format[] = {'I','C','O',0};
3110 static const BYTE ico_sig_pattern[] = { 0x00, 0x00, 0x01, 0x00 };
3111 static const BYTE ico_sig_mask[] = { 0xFF, 0xFF, 0xFF, 0xFF };
3112
3113 static const struct image_codec codecs[NUM_CODECS] = {
3114     {
3115         { /* BMP */
3116             /* Clsid */              { 0x557cf400, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3117             /* FormatID */           { 0xb96b3cabU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3118             /* CodecName */          bmp_codecname,
3119             /* DllName */            NULL,
3120             /* FormatDescription */  bmp_format,
3121             /* FilenameExtension */  bmp_extension,
3122             /* MimeType */           bmp_mimetype,
3123             /* Flags */              ImageCodecFlagsEncoder | ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3124             /* Version */            1,
3125             /* SigCount */           1,
3126             /* SigSize */            2,
3127             /* SigPattern */         bmp_sig_pattern,
3128             /* SigMask */            bmp_sig_mask,
3129         },
3130         encode_image_BMP,
3131         decode_image_bmp
3132     },
3133     {
3134         { /* JPEG */
3135             /* Clsid */              { 0x557cf401, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3136             /* FormatID */           { 0xb96b3caeU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3137             /* CodecName */          jpeg_codecname,
3138             /* DllName */            NULL,
3139             /* FormatDescription */  jpeg_format,
3140             /* FilenameExtension */  jpeg_extension,
3141             /* MimeType */           jpeg_mimetype,
3142             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3143             /* Version */            1,
3144             /* SigCount */           1,
3145             /* SigSize */            2,
3146             /* SigPattern */         jpeg_sig_pattern,
3147             /* SigMask */            jpeg_sig_mask,
3148         },
3149         NULL,
3150         decode_image_jpeg
3151     },
3152     {
3153         { /* GIF */
3154             /* Clsid */              { 0x557cf402, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3155             /* FormatID */           { 0xb96b3cb0U, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3156             /* CodecName */          gif_codecname,
3157             /* DllName */            NULL,
3158             /* FormatDescription */  gif_format,
3159             /* FilenameExtension */  gif_extension,
3160             /* MimeType */           gif_mimetype,
3161             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3162             /* Version */            1,
3163             /* SigCount */           1,
3164             /* SigSize */            4,
3165             /* SigPattern */         gif_sig_pattern,
3166             /* SigMask */            gif_sig_mask,
3167         },
3168         NULL,
3169         decode_image_gif
3170     },
3171     {
3172         { /* TIFF */
3173             /* Clsid */              { 0x557cf405, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3174             /* FormatID */           { 0xb96b3cb1U, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3175             /* CodecName */          tiff_codecname,
3176             /* DllName */            NULL,
3177             /* FormatDescription */  tiff_format,
3178             /* FilenameExtension */  tiff_extension,
3179             /* MimeType */           tiff_mimetype,
3180             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3181             /* Version */            1,
3182             /* SigCount */           2,
3183             /* SigSize */            4,
3184             /* SigPattern */         tiff_sig_pattern,
3185             /* SigMask */            tiff_sig_mask,
3186         },
3187         NULL,
3188         decode_image_tiff
3189     },
3190     {
3191         { /* EMF */
3192             /* Clsid */              { 0x557cf403, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3193             /* FormatID */           { 0xb96b3cacU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3194             /* CodecName */          emf_codecname,
3195             /* DllName */            NULL,
3196             /* FormatDescription */  emf_format,
3197             /* FilenameExtension */  emf_extension,
3198             /* MimeType */           emf_mimetype,
3199             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportVector | ImageCodecFlagsBuiltin,
3200             /* Version */            1,
3201             /* SigCount */           1,
3202             /* SigSize */            4,
3203             /* SigPattern */         emf_sig_pattern,
3204             /* SigMask */            emf_sig_mask,
3205         },
3206         NULL,
3207         decode_image_olepicture_metafile
3208     },
3209     {
3210         { /* WMF */
3211             /* Clsid */              { 0x557cf404, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3212             /* FormatID */           { 0xb96b3cadU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3213             /* CodecName */          wmf_codecname,
3214             /* DllName */            NULL,
3215             /* FormatDescription */  wmf_format,
3216             /* FilenameExtension */  wmf_extension,
3217             /* MimeType */           wmf_mimetype,
3218             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportVector | ImageCodecFlagsBuiltin,
3219             /* Version */            1,
3220             /* SigCount */           1,
3221             /* SigSize */            2,
3222             /* SigPattern */         wmf_sig_pattern,
3223             /* SigMask */            wmf_sig_mask,
3224         },
3225         NULL,
3226         decode_image_olepicture_metafile
3227     },
3228     {
3229         { /* PNG */
3230             /* Clsid */              { 0x557cf406, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3231             /* FormatID */           { 0xb96b3cafU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3232             /* CodecName */          png_codecname,
3233             /* DllName */            NULL,
3234             /* FormatDescription */  png_format,
3235             /* FilenameExtension */  png_extension,
3236             /* MimeType */           png_mimetype,
3237             /* Flags */              ImageCodecFlagsEncoder | ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3238             /* Version */            1,
3239             /* SigCount */           1,
3240             /* SigSize */            8,
3241             /* SigPattern */         png_sig_pattern,
3242             /* SigMask */            png_sig_mask,
3243         },
3244         encode_image_png,
3245         decode_image_png
3246     },
3247     {
3248         { /* ICO */
3249             /* Clsid */              { 0x557cf407, 0x1a04, 0x11d3, { 0x9a, 0x73, 0x0, 0x0, 0xf8, 0x1e, 0xf3, 0x2e } },
3250             /* FormatID */           { 0xb96b3cabU, 0x0728U, 0x11d3U, {0x9d, 0x7b, 0x00, 0x00, 0xf8, 0x1e, 0xf3, 0x2e} },
3251             /* CodecName */          ico_codecname,
3252             /* DllName */            NULL,
3253             /* FormatDescription */  ico_format,
3254             /* FilenameExtension */  ico_extension,
3255             /* MimeType */           ico_mimetype,
3256             /* Flags */              ImageCodecFlagsDecoder | ImageCodecFlagsSupportBitmap | ImageCodecFlagsBuiltin,
3257             /* Version */            1,
3258             /* SigCount */           1,
3259             /* SigSize */            4,
3260             /* SigPattern */         ico_sig_pattern,
3261             /* SigMask */            ico_sig_mask,
3262         },
3263         NULL,
3264         decode_image_icon
3265     },
3266 };
3267
3268 /*****************************************************************************
3269  * GdipGetImageDecodersSize [GDIPLUS.@]
3270  */
3271 GpStatus WINGDIPAPI GdipGetImageDecodersSize(UINT *numDecoders, UINT *size)
3272 {
3273     int decoder_count=0;
3274     int i;
3275     TRACE("%p %p\n", numDecoders, size);
3276
3277     if (!numDecoders || !size)
3278         return InvalidParameter;
3279
3280     for (i=0; i<NUM_CODECS; i++)
3281     {
3282         if (codecs[i].info.Flags & ImageCodecFlagsDecoder)
3283             decoder_count++;
3284     }
3285
3286     *numDecoders = decoder_count;
3287     *size = decoder_count * sizeof(ImageCodecInfo);
3288
3289     return Ok;
3290 }
3291
3292 /*****************************************************************************
3293  * GdipGetImageDecoders [GDIPLUS.@]
3294  */
3295 GpStatus WINGDIPAPI GdipGetImageDecoders(UINT numDecoders, UINT size, ImageCodecInfo *decoders)
3296 {
3297     int i, decoder_count=0;
3298     TRACE("%u %u %p\n", numDecoders, size, decoders);
3299
3300     if (!decoders ||
3301         size != numDecoders * sizeof(ImageCodecInfo))
3302         return GenericError;
3303
3304     for (i=0; i<NUM_CODECS; i++)
3305     {
3306         if (codecs[i].info.Flags & ImageCodecFlagsDecoder)
3307         {
3308             if (decoder_count == numDecoders) return GenericError;
3309             memcpy(&decoders[decoder_count], &codecs[i].info, sizeof(ImageCodecInfo));
3310             decoder_count++;
3311         }
3312     }
3313
3314     if (decoder_count < numDecoders) return GenericError;
3315
3316     return Ok;
3317 }
3318
3319 /*****************************************************************************
3320  * GdipGetImageEncodersSize [GDIPLUS.@]
3321  */
3322 GpStatus WINGDIPAPI GdipGetImageEncodersSize(UINT *numEncoders, UINT *size)
3323 {
3324     int encoder_count=0;
3325     int i;
3326     TRACE("%p %p\n", numEncoders, size);
3327
3328     if (!numEncoders || !size)
3329         return InvalidParameter;
3330
3331     for (i=0; i<NUM_CODECS; i++)
3332     {
3333         if (codecs[i].info.Flags & ImageCodecFlagsEncoder)
3334             encoder_count++;
3335     }
3336
3337     *numEncoders = encoder_count;
3338     *size = encoder_count * sizeof(ImageCodecInfo);
3339
3340     return Ok;
3341 }
3342
3343 /*****************************************************************************
3344  * GdipGetImageEncoders [GDIPLUS.@]
3345  */
3346 GpStatus WINGDIPAPI GdipGetImageEncoders(UINT numEncoders, UINT size, ImageCodecInfo *encoders)
3347 {
3348     int i, encoder_count=0;
3349     TRACE("%u %u %p\n", numEncoders, size, encoders);
3350
3351     if (!encoders ||
3352         size != numEncoders * sizeof(ImageCodecInfo))
3353         return GenericError;
3354
3355     for (i=0; i<NUM_CODECS; i++)
3356     {
3357         if (codecs[i].info.Flags & ImageCodecFlagsEncoder)
3358         {
3359             if (encoder_count == numEncoders) return GenericError;
3360             memcpy(&encoders[encoder_count], &codecs[i].info, sizeof(ImageCodecInfo));
3361             encoder_count++;
3362         }
3363     }
3364
3365     if (encoder_count < numEncoders) return GenericError;
3366
3367     return Ok;
3368 }
3369
3370 GpStatus WINGDIPAPI GdipGetEncoderParameterListSize(GpImage *image,
3371     GDIPCONST CLSID* clsidEncoder, UINT *size)
3372 {
3373     static int calls;
3374
3375     TRACE("(%p,%s,%p)\n", image, debugstr_guid(clsidEncoder), size);
3376
3377     if(!(calls++))
3378         FIXME("not implemented\n");
3379
3380     *size = 0;
3381
3382     return NotImplemented;
3383 }
3384
3385 /*****************************************************************************
3386  * GdipCreateBitmapFromHBITMAP [GDIPLUS.@]
3387  */
3388 GpStatus WINGDIPAPI GdipCreateBitmapFromHBITMAP(HBITMAP hbm, HPALETTE hpal, GpBitmap** bitmap)
3389 {
3390     BITMAP bm;
3391     GpStatus retval;
3392     PixelFormat format;
3393     BitmapData lockeddata;
3394     INT y;
3395
3396     TRACE("%p %p %p\n", hbm, hpal, bitmap);
3397
3398     if(!hbm || !bitmap)
3399         return InvalidParameter;
3400
3401     /* TODO: Support for device-dependent bitmaps */
3402     if(hpal){
3403         FIXME("no support for device-dependent bitmaps\n");
3404         return NotImplemented;
3405     }
3406
3407     if (GetObjectA(hbm, sizeof(bm), &bm) != sizeof(bm))
3408             return InvalidParameter;
3409
3410     /* TODO: Figure out the correct format for 16, 32, 64 bpp */
3411     switch(bm.bmBitsPixel) {
3412         case 1:
3413             format = PixelFormat1bppIndexed;
3414             break;
3415         case 4:
3416             format = PixelFormat4bppIndexed;
3417             break;
3418         case 8:
3419             format = PixelFormat8bppIndexed;
3420             break;
3421         case 24:
3422             format = PixelFormat24bppRGB;
3423             break;
3424         case 32:
3425             format = PixelFormat32bppRGB;
3426             break;
3427         case 48:
3428             format = PixelFormat48bppRGB;
3429             break;
3430         default:
3431             FIXME("don't know how to handle %d bpp\n", bm.bmBitsPixel);
3432             return InvalidParameter;
3433     }
3434
3435     retval = GdipCreateBitmapFromScan0(bm.bmWidth, bm.bmHeight, 0,
3436         format, NULL, bitmap);
3437
3438     if (retval == Ok)
3439     {
3440         retval = GdipBitmapLockBits(*bitmap, NULL, ImageLockModeWrite,
3441             format, &lockeddata);
3442         if (retval == Ok)
3443         {
3444             if (bm.bmBits)
3445             {
3446                 for (y=0; y<bm.bmHeight; y++)
3447                 {
3448                     memcpy((BYTE*)lockeddata.Scan0+lockeddata.Stride*y,
3449                            (BYTE*)bm.bmBits+bm.bmWidthBytes*(bm.bmHeight-1-y),
3450                            bm.bmWidthBytes);
3451                 }
3452             }
3453             else
3454             {
3455                 HDC hdc;
3456                 HBITMAP oldhbm;
3457                 BITMAPINFO *pbmi;
3458                 INT src_height, dst_stride;
3459                 BYTE *dst_bits;
3460
3461                 hdc = CreateCompatibleDC(NULL);
3462                 oldhbm = SelectObject(hdc, hbm);
3463
3464                 pbmi = GdipAlloc(sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
3465
3466                 if (pbmi)
3467                 {
3468                     pbmi->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
3469                     pbmi->bmiHeader.biBitCount = 0;
3470
3471                     GetDIBits(hdc, hbm, 0, 0, NULL, pbmi, DIB_RGB_COLORS);
3472
3473                     src_height = abs(pbmi->bmiHeader.biHeight);
3474
3475                     if (pbmi->bmiHeader.biHeight > 0)
3476                     {
3477                         dst_bits = (BYTE*)lockeddata.Scan0+lockeddata.Stride*(src_height-1);
3478                         dst_stride = -lockeddata.Stride;
3479                     }
3480                     else
3481                     {
3482                         dst_bits = lockeddata.Scan0;
3483                         dst_stride = lockeddata.Stride;
3484                     }
3485
3486                     for (y=0; y<src_height; y++)
3487                     {
3488                         GetDIBits(hdc, hbm, y, 1, dst_bits+dst_stride*y,
3489                             pbmi, DIB_RGB_COLORS);
3490                     }
3491
3492                     GdipFree(pbmi);
3493                 }
3494                 else
3495                     retval = OutOfMemory;
3496
3497                 SelectObject(hdc, oldhbm);
3498                 DeleteDC(hdc);
3499             }
3500
3501             GdipBitmapUnlockBits(*bitmap, &lockeddata);
3502         }
3503     }
3504
3505     return retval;
3506 }
3507
3508 GpStatus WINGDIPAPI GdipDeleteEffect(CGpEffect *effect)
3509 {
3510     FIXME("(%p): stub\n", effect);
3511     /* note: According to Jose Roca's GDI+ Docs, this is not implemented
3512      * in Windows's gdiplus */
3513     return NotImplemented;
3514 }
3515
3516 /*****************************************************************************
3517  * GdipSetEffectParameters [GDIPLUS.@]
3518  */
3519 GpStatus WINGDIPAPI GdipSetEffectParameters(CGpEffect *effect,
3520     const VOID *params, const UINT size)
3521 {
3522     static int calls;
3523
3524     TRACE("(%p,%p,%u)\n", effect, params, size);
3525
3526     if(!(calls++))
3527         FIXME("not implemented\n");
3528
3529     return NotImplemented;
3530 }
3531
3532 /*****************************************************************************
3533  * GdipGetImageFlags [GDIPLUS.@]
3534  */
3535 GpStatus WINGDIPAPI GdipGetImageFlags(GpImage *image, UINT *flags)
3536 {
3537     TRACE("%p %p\n", image, flags);
3538
3539     if(!image || !flags)
3540         return InvalidParameter;
3541
3542     *flags = image->flags;
3543
3544     return Ok;
3545 }
3546
3547 GpStatus WINGDIPAPI GdipTestControl(GpTestControlEnum control, void *param)
3548 {
3549     TRACE("(%d, %p)\n", control, param);
3550
3551     switch(control){
3552         case TestControlForceBilinear:
3553             if(param)
3554                 FIXME("TestControlForceBilinear not handled\n");
3555             break;
3556         case TestControlNoICM:
3557             if(param)
3558                 FIXME("TestControlNoICM not handled\n");
3559             break;
3560         case TestControlGetBuildNumber:
3561             *((DWORD*)param) = 3102;
3562             break;
3563     }
3564
3565     return Ok;
3566 }
3567
3568 GpStatus WINGDIPAPI GdipRecordMetafileFileName(GDIPCONST WCHAR* fileName,
3569                             HDC hdc, EmfType type, GDIPCONST GpRectF *pFrameRect,
3570                             MetafileFrameUnit frameUnit, GDIPCONST WCHAR *desc,
3571                             GpMetafile **metafile)
3572 {
3573     FIXME("%s %p %d %p %d %s %p stub!\n", debugstr_w(fileName), hdc, type, pFrameRect,
3574                                  frameUnit, debugstr_w(desc), metafile);
3575
3576     return NotImplemented;
3577 }
3578
3579 GpStatus WINGDIPAPI GdipRecordMetafileFileNameI(GDIPCONST WCHAR* fileName, HDC hdc, EmfType type,
3580                             GDIPCONST GpRect *pFrameRect, MetafileFrameUnit frameUnit,
3581                             GDIPCONST WCHAR *desc, GpMetafile **metafile)
3582 {
3583     FIXME("%s %p %d %p %d %s %p stub!\n", debugstr_w(fileName), hdc, type, pFrameRect,
3584                                  frameUnit, debugstr_w(desc), metafile);
3585
3586     return NotImplemented;
3587 }
3588
3589 GpStatus WINGDIPAPI GdipImageForceValidation(GpImage *image)
3590 {
3591     TRACE("%p\n", image);
3592
3593     return Ok;
3594 }
3595
3596 /*****************************************************************************
3597  * GdipGetImageThumbnail [GDIPLUS.@]
3598  */
3599 GpStatus WINGDIPAPI GdipGetImageThumbnail(GpImage *image, UINT width, UINT height,
3600                             GpImage **ret_image, GetThumbnailImageAbort cb,
3601                             VOID * cb_data)
3602 {
3603     GpStatus stat;
3604     GpGraphics *graphics;
3605     UINT srcwidth, srcheight;
3606
3607     TRACE("(%p %u %u %p %p %p)\n",
3608         image, width, height, ret_image, cb, cb_data);
3609
3610     if (!image || !ret_image)
3611         return InvalidParameter;
3612
3613     if (!width) width = 120;
3614     if (!height) height = 120;
3615
3616     GdipGetImageWidth(image, &srcwidth);
3617     GdipGetImageHeight(image, &srcheight);
3618
3619     stat = GdipCreateBitmapFromScan0(width, height, 0, PixelFormat32bppARGB,
3620         NULL, (GpBitmap**)ret_image);
3621
3622     if (stat == Ok)
3623     {
3624         stat = GdipGetImageGraphicsContext(*ret_image, &graphics);
3625
3626         if (stat == Ok)
3627         {
3628             stat = GdipDrawImageRectRectI(graphics, image,
3629                 0, 0, width, height, 0, 0, srcwidth, srcheight, UnitPixel,
3630                 NULL, NULL, NULL);
3631
3632             GdipDeleteGraphics(graphics);
3633         }
3634
3635         if (stat != Ok)
3636         {
3637             GdipDisposeImage(*ret_image);
3638             *ret_image = NULL;
3639         }
3640     }
3641
3642     return stat;
3643 }
3644
3645 /*****************************************************************************
3646  * GdipImageRotateFlip [GDIPLUS.@]
3647  */
3648 GpStatus WINGDIPAPI GdipImageRotateFlip(GpImage *image, RotateFlipType type)
3649 {
3650     GpBitmap *new_bitmap;
3651     GpBitmap *bitmap;
3652     int bpp, bytesperpixel;
3653     int rotate_90, flip_x, flip_y;
3654     int src_x_offset, src_y_offset;
3655     LPBYTE src_origin;
3656     UINT x, y, width, height;
3657     BitmapData src_lock, dst_lock;
3658     GpStatus stat;
3659
3660     TRACE("(%p, %u)\n", image, type);
3661
3662     rotate_90 = type&1;
3663     flip_x = (type&6) == 2 || (type&6) == 4;
3664     flip_y = (type&3) == 1 || (type&3) == 2;
3665
3666     if (image->type != ImageTypeBitmap)
3667     {
3668         FIXME("Not implemented for type %i\n", image->type);
3669         return NotImplemented;
3670     }
3671
3672     bitmap = (GpBitmap*)image;
3673     bpp = PIXELFORMATBPP(bitmap->format);
3674
3675     if (bpp < 8)
3676     {
3677         FIXME("Not implemented for %i bit images\n", bpp);
3678         return NotImplemented;
3679     }
3680
3681     if (rotate_90)
3682     {
3683         width = bitmap->height;
3684         height = bitmap->width;
3685     }
3686     else
3687     {
3688         width = bitmap->width;
3689         height = bitmap->height;
3690     }
3691
3692     bytesperpixel = bpp/8;
3693
3694     stat = GdipCreateBitmapFromScan0(width, height, 0, bitmap->format, NULL, &new_bitmap);
3695
3696     if (stat != Ok)
3697         return stat;
3698
3699     stat = GdipBitmapLockBits(bitmap, NULL, ImageLockModeRead, bitmap->format, &src_lock);
3700
3701     if (stat == Ok)
3702     {
3703         stat = GdipBitmapLockBits(new_bitmap, NULL, ImageLockModeWrite, bitmap->format, &dst_lock);
3704
3705         if (stat == Ok)
3706         {
3707             LPBYTE src_row, src_pixel;
3708             LPBYTE dst_row, dst_pixel;
3709
3710             src_origin = src_lock.Scan0;
3711             if (flip_x) src_origin += bytesperpixel * (bitmap->width - 1);
3712             if (flip_y) src_origin += src_lock.Stride * (bitmap->height - 1);
3713
3714             if (rotate_90)
3715             {
3716                 if (flip_y) src_x_offset = -src_lock.Stride;
3717                 else src_x_offset = src_lock.Stride;
3718                 if (flip_x) src_y_offset = -bytesperpixel;
3719                 else src_y_offset = bytesperpixel;
3720             }
3721             else
3722             {
3723                 if (flip_x) src_x_offset = -bytesperpixel;
3724                 else src_x_offset = bytesperpixel;
3725                 if (flip_y) src_y_offset = -src_lock.Stride;
3726                 else src_y_offset = src_lock.Stride;
3727             }
3728
3729             src_row = src_origin;
3730             dst_row = dst_lock.Scan0;
3731             for (y=0; y<height; y++)
3732             {
3733                 src_pixel = src_row;
3734                 dst_pixel = dst_row;
3735                 for (x=0; x<width; x++)
3736                 {
3737                     /* FIXME: This could probably be faster without memcpy. */
3738                     memcpy(dst_pixel, src_pixel, bytesperpixel);
3739                     dst_pixel += bytesperpixel;
3740                     src_pixel += src_x_offset;
3741                 }
3742                 src_row += src_y_offset;
3743                 dst_row += dst_lock.Stride;
3744             }
3745
3746             GdipBitmapUnlockBits(new_bitmap, &dst_lock);
3747         }
3748
3749         GdipBitmapUnlockBits(bitmap, &src_lock);
3750     }
3751
3752     if (stat == Ok)
3753         move_bitmap(bitmap, new_bitmap, FALSE);
3754     else
3755         GdipDisposeImage((GpImage*)new_bitmap);
3756
3757     return stat;
3758 }