git.oblomov.eu Git - wine/blob - dlls/gdi32/bitmap.c

   1 /*
   2  * GDI bitmap objects
   3  *
   4  * Copyright 1993 Alexandre Julliard
   5  *           1998 Huw D M Davies
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <stdarg.h>
  23 #include <stdlib.h>
  24 #include <string.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wingdi.h"
  29 #include "gdi_private.h"
  30 #include "wine/debug.h"
  31
  32 WINE_DEFAULT_DEBUG_CHANNEL(bitmap);
  33
  34
  35 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, HDC hdc );
  36 static INT BITMAP_GetObject( HGDIOBJ handle, INT count, LPVOID buffer );
  37 static BOOL BITMAP_DeleteObject( HGDIOBJ handle );
  38
  39 static const struct gdi_obj_funcs bitmap_funcs =
  40 {
  41     BITMAP_SelectObject,  /* pSelectObject */
  42     BITMAP_GetObject,     /* pGetObjectA */
  43     BITMAP_GetObject,     /* pGetObjectW */
  44     NULL,                 /* pUnrealizeObject */
  45     BITMAP_DeleteObject   /* pDeleteObject */
  46 };
  47
  48
  49 /***********************************************************************
  50  *           null driver fallback implementations
  51  */
  52
  53 LONG CDECL nulldrv_GetBitmapBits( HBITMAP bitmap, void *bits, LONG size )
  54 {
  55     BITMAPOBJ *bmp = GDI_GetObjPtr( bitmap, OBJ_BITMAP );
  56
  57     if (bmp->bitmap.bmBits) memcpy( bits, bmp->bitmap.bmBits, size );
  58     else memset( bits, 0, size );
  59     GDI_ReleaseObj( bitmap );
  60     return size;
  61 }
  62
  63 LONG CDECL nulldrv_SetBitmapBits( HBITMAP bitmap, const void *bits, LONG size )
  64 {
  65     BITMAPOBJ *bmp = GDI_GetObjPtr( bitmap, OBJ_BITMAP );
  66
  67     if (!bmp->bitmap.bmBits)
  68     {
  69         LONG total = bmp->bitmap.bmHeight * bmp->bitmap.bmWidthBytes;  /* alloc enough for entire bitmap */
  70         if (!(bmp->bitmap.bmBits = HeapAlloc( GetProcessHeap(), 0, total )))
  71         {
  72             GDI_ReleaseObj( bitmap );
  73             return 0;
  74         }
  75         if (size < total) memset( (char *)bmp->bitmap.bmBits + size, 0, total - size );
  76     }
  77     memcpy( bmp->bitmap.bmBits, bits, size );
  78     GDI_ReleaseObj( bitmap );
  79     return size;
  80 }
  81
  82 INT CDECL nulldrv_GetDIBits( PHYSDEV dev, HBITMAP bitmap, UINT start, UINT lines, LPVOID bits,
  83                              BITMAPINFO *info, UINT coloruse )
  84 {
  85     /* FIXME: transfer bits from bmp->bitmap.bmBits */
  86     return 0;
  87 }
  88
  89 INT CDECL nulldrv_SetDIBits( PHYSDEV dev, HBITMAP bitmap, UINT start, UINT lines,
  90                              const void *bits, const BITMAPINFO *info, UINT coloruse )
  91 {
  92     /* FIXME: transfer bits to bmp->bitmap.bmBits */
  93     return 0;
  94 }
  95
  96 /***********************************************************************
  97  *           BITMAP_GetWidthBytes
  98  *
  99  * Return number of bytes taken by a scanline of 16-bit aligned Windows DDB
 100  * data.
 101  */
 102 INT BITMAP_GetWidthBytes( INT bmWidth, INT bpp )
 103 {
 104     switch(bpp)
 105     {
 106     case 1:
 107         return 2 * ((bmWidth+15) >> 4);
 108
 109     case 24:
 110         bmWidth *= 3; /* fall through */
 111     case 8:
 112         return bmWidth + (bmWidth & 1);
 113
 114     case 32:
 115         return bmWidth * 4;
 116
 117     case 16:
 118     case 15:
 119         return bmWidth * 2;
 120
 121     case 4:
 122         return 2 * ((bmWidth+3) >> 2);
 123
 124     default:
 125         WARN("Unknown depth %d, please report.\n", bpp );
 126     }
 127     return -1;
 128 }
 129
 130
 131 /******************************************************************************
 132  * CreateBitmap [GDI32.@]
 133  *
 134  * Creates a bitmap with the specified info.
 135  *
 136  * PARAMS
 137  *    width  [I] bitmap width
 138  *    height [I] bitmap height
 139  *    planes [I] Number of color planes
 140  *    bpp    [I] Number of bits to identify a color
 141  *    bits   [I] Pointer to array containing color data
 142  *
 143  * RETURNS
 144  *    Success: Handle to bitmap
 145  *    Failure: 0
 146  */
 147 HBITMAP WINAPI CreateBitmap( INT width, INT height, UINT planes,
 148                              UINT bpp, LPCVOID bits )
 149 {
 150     BITMAP bm;
 151
 152     bm.bmType = 0;
 153     bm.bmWidth = width;
 154     bm.bmHeight = height;
 155     bm.bmWidthBytes = BITMAP_GetWidthBytes( width, bpp );
 156     bm.bmPlanes = planes;
 157     bm.bmBitsPixel = bpp;
 158     bm.bmBits = (LPVOID)bits;
 159
 160     return CreateBitmapIndirect( &bm );
 161 }
 162
 163 /******************************************************************************
 164  * CreateCompatibleBitmap [GDI32.@]
 165  *
 166  * Creates a bitmap compatible with the DC.
 167  *
 168  * PARAMS
 169  *    hdc    [I] Handle to device context
 170  *    width  [I] Width of bitmap
 171  *    height [I] Height of bitmap
 172  *
 173  * RETURNS
 174  *    Success: Handle to bitmap
 175  *    Failure: 0
 176  */
 177 HBITMAP WINAPI CreateCompatibleBitmap( HDC hdc, INT width, INT height)
 178 {
 179     HBITMAP hbmpRet = 0;
 180
 181     TRACE("(%p,%d,%d) =\n", hdc, width, height);
 182
 183     if (GetObjectType( hdc ) != OBJ_MEMDC)
 184     {
 185         hbmpRet = CreateBitmap(width, height,
 186                                GetDeviceCaps(hdc, PLANES),
 187                                GetDeviceCaps(hdc, BITSPIXEL),
 188                                NULL);
 189     }
 190     else  /* Memory DC */
 191     {
 192         DIBSECTION dib;
 193         HBITMAP bitmap = GetCurrentObject( hdc, OBJ_BITMAP );
 194         INT size = GetObjectW( bitmap, sizeof(dib), &dib );
 195
 196         if (!size) return 0;
 197
 198         if (size == sizeof(BITMAP))
 199         {
 200             /* A device-dependent bitmap is selected in the DC */
 201             hbmpRet = CreateBitmap(width, height,
 202                                    dib.dsBm.bmPlanes,
 203                                    dib.dsBm.bmBitsPixel,
 204                                    NULL);
 205         }
 206         else
 207         {
 208             /* A DIB section is selected in the DC */
 209             BITMAPINFO *bi;
 210             void *bits;
 211
 212             /* Allocate memory for a BITMAPINFOHEADER structure and a
 213                color table. The maximum number of colors in a color table
 214                is 256 which corresponds to a bitmap with depth 8.
 215                Bitmaps with higher depths don't have color tables. */
 216             bi = HeapAlloc(GetProcessHeap(), 0, sizeof(BITMAPINFOHEADER) + 256 * sizeof(RGBQUAD));
 217
 218             if (bi)
 219             {
 220                 bi->bmiHeader.biSize          = sizeof(bi->bmiHeader);
 221                 bi->bmiHeader.biWidth         = width;
 222                 bi->bmiHeader.biHeight        = height;
 223                 bi->bmiHeader.biPlanes        = dib.dsBmih.biPlanes;
 224                 bi->bmiHeader.biBitCount      = dib.dsBmih.biBitCount;
 225                 bi->bmiHeader.biCompression   = dib.dsBmih.biCompression;
 226                 bi->bmiHeader.biSizeImage     = 0;
 227                 bi->bmiHeader.biXPelsPerMeter = dib.dsBmih.biXPelsPerMeter;
 228                 bi->bmiHeader.biYPelsPerMeter = dib.dsBmih.biYPelsPerMeter;
 229                 bi->bmiHeader.biClrUsed       = dib.dsBmih.biClrUsed;
 230                 bi->bmiHeader.biClrImportant  = dib.dsBmih.biClrImportant;
 231
 232                 if (bi->bmiHeader.biCompression == BI_BITFIELDS)
 233                 {
 234                     /* Copy the color masks */
 235                     CopyMemory(bi->bmiColors, dib.dsBitfields, 3 * sizeof(DWORD));
 236                 }
 237                 else if (bi->bmiHeader.biBitCount <= 8)
 238                 {
 239                     /* Copy the color table */
 240                     GetDIBColorTable(hdc, 0, 256, bi->bmiColors);
 241                 }
 242
 243                 hbmpRet = CreateDIBSection(hdc, bi, DIB_RGB_COLORS, &bits, NULL, 0);
 244                 HeapFree(GetProcessHeap(), 0, bi);
 245             }
 246         }
 247     }
 248
 249     TRACE("\t\t%p\n", hbmpRet);
 250     return hbmpRet;
 251 }
 252
 253
 254 /******************************************************************************
 255  * CreateBitmapIndirect [GDI32.@]
 256  *
 257  * Creates a bitmap with the specified info.
 258  *
 259  * PARAMS
 260  *  bmp [I] Pointer to the bitmap info describing the bitmap
 261  *
 262  * RETURNS
 263  *    Success: Handle to bitmap
 264  *    Failure: NULL. Use GetLastError() to determine the cause.
 265  *
 266  * NOTES
 267  *  If a width or height of 0 are given, a 1x1 monochrome bitmap is returned.
 268  */
 269 HBITMAP WINAPI CreateBitmapIndirect( const BITMAP *bmp )
 270 {
 271     BITMAP bm;
 272     BITMAPOBJ *bmpobj;
 273     HBITMAP hbitmap;
 274
 275     if (!bmp || bmp->bmType)
 276     {
 277         SetLastError( ERROR_INVALID_PARAMETER );
 278         return NULL;
 279     }
 280
 281     if (bmp->bmWidth > 0x7ffffff || bmp->bmHeight > 0x7ffffff)
 282     {
 283         SetLastError( ERROR_INVALID_PARAMETER );
 284         return 0;
 285     }
 286
 287     bm = *bmp;
 288
 289     if (!bm.bmWidth || !bm.bmHeight)
 290     {
 291         return GetStockObject( DEFAULT_BITMAP );
 292     }
 293     else
 294     {
 295         if (bm.bmHeight < 0)
 296             bm.bmHeight = -bm.bmHeight;
 297         if (bm.bmWidth < 0)
 298             bm.bmWidth = -bm.bmWidth;
 299     }
 300
 301     if (bm.bmPlanes != 1)
 302     {
 303         FIXME("planes = %d\n", bm.bmPlanes);
 304         SetLastError( ERROR_INVALID_PARAMETER );
 305         return NULL;
 306     }
 307
 308     /* Windows only uses 1, 4, 8, 16, 24 and 32 bpp */
 309     if(bm.bmBitsPixel == 1)         bm.bmBitsPixel = 1;
 310     else if(bm.bmBitsPixel <= 4)    bm.bmBitsPixel = 4;
 311     else if(bm.bmBitsPixel <= 8)    bm.bmBitsPixel = 8;
 312     else if(bm.bmBitsPixel <= 16)   bm.bmBitsPixel = 16;
 313     else if(bm.bmBitsPixel <= 24)   bm.bmBitsPixel = 24;
 314     else if(bm.bmBitsPixel <= 32)   bm.bmBitsPixel = 32;
 315     else {
 316         WARN("Invalid bmBitsPixel %d, returning ERROR_INVALID_PARAMETER\n", bm.bmBitsPixel);
 317         SetLastError(ERROR_INVALID_PARAMETER);
 318         return NULL;
 319     }
 320
 321     /* Windows ignores the provided bm.bmWidthBytes */
 322     bm.bmWidthBytes = BITMAP_GetWidthBytes( bm.bmWidth, bm.bmBitsPixel );
 323     /* XP doesn't allow to create bitmaps larger than 128 Mb */
 324     if (bm.bmHeight > 128 * 1024 * 1024 / bm.bmWidthBytes)
 325     {
 326         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
 327         return 0;
 328     }
 329
 330     /* Create the BITMAPOBJ */
 331     if (!(bmpobj = HeapAlloc( GetProcessHeap(), 0, sizeof(*bmpobj) )))
 332     {
 333         SetLastError( ERROR_NOT_ENOUGH_MEMORY );
 334         return 0;
 335     }
 336
 337     bmpobj->size.cx = 0;
 338     bmpobj->size.cy = 0;
 339     bmpobj->bitmap = bm;
 340     bmpobj->bitmap.bmBits = NULL;
 341     bmpobj->funcs = &null_driver;
 342     bmpobj->dib = NULL;
 343     bmpobj->color_table = NULL;
 344     bmpobj->nb_colors = 0;
 345
 346     if (!(hbitmap = alloc_gdi_handle( &bmpobj->header, OBJ_BITMAP, &bitmap_funcs )))
 347     {
 348         HeapFree( GetProcessHeap(), 0, bmpobj );
 349         return 0;
 350     }
 351
 352     if (bm.bmBits)
 353         SetBitmapBits( hbitmap, bm.bmHeight * bm.bmWidthBytes, bm.bmBits );
 354
 355     TRACE("%dx%d, %d colors returning %p\n", bm.bmWidth, bm.bmHeight,
 356           1 << (bm.bmPlanes * bm.bmBitsPixel), hbitmap);
 357
 358     return hbitmap;
 359 }
 360
 361
 362 /***********************************************************************
 363  * GetBitmapBits [GDI32.@]
 364  *
 365  * Copies bitmap bits of bitmap to buffer.
 366  *
 367  * RETURNS
 368  *    Success: Number of bytes copied
 369  *    Failure: 0
 370  */
 371 LONG WINAPI GetBitmapBits(
 372     HBITMAP hbitmap, /* [in]  Handle to bitmap */
 373     LONG count,        /* [in]  Number of bytes to copy */
 374     LPVOID bits)       /* [out] Pointer to buffer to receive bits */
 375 {
 376     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
 377     LONG height, ret;
 378
 379     if (!bmp) return 0;
 380
 381     if (bmp->dib)  /* simply copy the bits from the DIB */
 382     {
 383         DIBSECTION *dib = bmp->dib;
 384         const char *src = dib->dsBm.bmBits;
 385         INT width_bytes = BITMAP_GetWidthBytes(dib->dsBm.bmWidth, dib->dsBm.bmBitsPixel);
 386         LONG max = width_bytes * bmp->bitmap.bmHeight;
 387
 388         if (!bits)
 389         {
 390             ret = max;
 391             goto done;
 392         }
 393
 394         if (count > max) count = max;
 395         ret = count;
 396
 397         /* GetBitmapBits returns not 32-bit aligned data */
 398
 399         if (bmp->dib->dsBmih.biHeight >= 0)  /* not top-down, need to flip contents vertically */
 400         {
 401             src += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
 402             while (count > 0)
 403             {
 404                 src -= dib->dsBm.bmWidthBytes;
 405                 memcpy( bits, src, min( count, width_bytes ) );
 406                 bits = (char *)bits + width_bytes;
 407                 count -= width_bytes;
 408             }
 409         }
 410         else
 411         {
 412             while (count > 0)
 413             {
 414                 memcpy( bits, src, min( count, width_bytes ) );
 415                 src += dib->dsBm.bmWidthBytes;
 416                 bits = (char *)bits + width_bytes;
 417                 count -= width_bytes;
 418             }
 419         }
 420         goto done;
 421     }
 422
 423     /* If the bits vector is null, the function should return the read size */
 424     if(bits == NULL)
 425     {
 426         ret = bmp->bitmap.bmWidthBytes * bmp->bitmap.bmHeight;
 427         goto done;
 428     }
 429
 430     if (count < 0) {
 431         WARN("(%d): Negative number of bytes passed???\n", count );
 432         count = -count;
 433     }
 434
 435     /* Only get entire lines */
 436     height = count / bmp->bitmap.bmWidthBytes;
 437     if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
 438     count = height * bmp->bitmap.bmWidthBytes;
 439     if (count == 0)
 440       {
 441         WARN("Less than one entire line requested\n");
 442         ret = 0;
 443         goto done;
 444       }
 445
 446
 447     TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
 448           hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 449           1 << bmp->bitmap.bmBitsPixel, height );
 450
 451     ret = bmp->funcs->pGetBitmapBits( hbitmap, bits, count );
 452  done:
 453     GDI_ReleaseObj( hbitmap );
 454     return ret;
 455 }
 456
 457
 458 /******************************************************************************
 459  * SetBitmapBits [GDI32.@]
 460  *
 461  * Sets bits of color data for a bitmap.
 462  *
 463  * RETURNS
 464  *    Success: Number of bytes used in setting the bitmap bits
 465  *    Failure: 0
 466  */
 467 LONG WINAPI SetBitmapBits(
 468     HBITMAP hbitmap, /* [in] Handle to bitmap */
 469     LONG count,        /* [in] Number of bytes in bitmap array */
 470     LPCVOID bits)      /* [in] Address of array with bitmap bits */
 471 {
 472     BITMAPOBJ *bmp;
 473     LONG height, ret;
 474
 475     if (!bits) return 0;
 476
 477     bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
 478     if (!bmp) return 0;
 479
 480     if (count < 0) {
 481         WARN("(%d): Negative number of bytes passed???\n", count );
 482         count = -count;
 483     }
 484
 485     if (bmp->dib)  /* simply copy the bits into the DIB */
 486     {
 487         DIBSECTION *dib = bmp->dib;
 488         char *dest = dib->dsBm.bmBits;
 489         LONG max = dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
 490         if (count > max) count = max;
 491         ret = count;
 492
 493         if (bmp->dib->dsBmih.biHeight >= 0)  /* not top-down, need to flip contents vertically */
 494         {
 495             dest += dib->dsBm.bmWidthBytes * dib->dsBm.bmHeight;
 496             while (count > 0)
 497             {
 498                 dest -= dib->dsBm.bmWidthBytes;
 499                 memcpy( dest, bits, min( count, dib->dsBm.bmWidthBytes ) );
 500                 bits = (const char *)bits + dib->dsBm.bmWidthBytes;
 501                 count -= dib->dsBm.bmWidthBytes;
 502             }
 503         }
 504         else memcpy( dest, bits, count );
 505
 506         GDI_ReleaseObj( hbitmap );
 507         return ret;
 508     }
 509
 510     /* Only get entire lines */
 511     height = count / bmp->bitmap.bmWidthBytes;
 512     if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
 513     count = height * bmp->bitmap.bmWidthBytes;
 514
 515     TRACE("(%p, %d, %p) %dx%d %d colors fetched height: %d\n",
 516           hbitmap, count, bits, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 517           1 << bmp->bitmap.bmBitsPixel, height );
 518
 519     ret = bmp->funcs->pSetBitmapBits( hbitmap, bits, count );
 520     GDI_ReleaseObj( hbitmap );
 521     return ret;
 522 }
 523
 524 /**********************************************************************
 525  *              BITMAP_CopyBitmap
 526  *
 527  */
 528 HBITMAP BITMAP_CopyBitmap(HBITMAP hbitmap)
 529 {
 530     HBITMAP res;
 531     DIBSECTION dib;
 532     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
 533
 534     if (!bmp) return 0;
 535     if (bmp->dib)
 536     {
 537         void *bits;
 538         BITMAPINFO *bi;
 539         HDC dc;
 540
 541         dib = *bmp->dib;
 542         GDI_ReleaseObj( hbitmap );
 543         dc = CreateCompatibleDC( NULL );
 544
 545         if (!dc) return 0;
 546         if (!(bi = HeapAlloc(GetProcessHeap(), 0, FIELD_OFFSET( BITMAPINFO, bmiColors[256] ))))
 547         {
 548             DeleteDC( dc );
 549             return 0;
 550         }
 551         bi->bmiHeader = dib.dsBmih;
 552
 553         /* Get the color table or the color masks */
 554         GetDIBits( dc, hbitmap, 0, 0, NULL, bi, DIB_RGB_COLORS );
 555         bi->bmiHeader.biHeight = dib.dsBmih.biHeight;
 556
 557         res = CreateDIBSection( dc, bi, DIB_RGB_COLORS, &bits, NULL, 0 );
 558         if (res) SetDIBits( dc, res, 0, dib.dsBm.bmHeight, dib.dsBm.bmBits, bi, DIB_RGB_COLORS );
 559         HeapFree( GetProcessHeap(), 0, bi );
 560         DeleteDC( dc );
 561         return res;
 562     }
 563     dib.dsBm = bmp->bitmap;
 564     dib.dsBm.bmBits = NULL;
 565     GDI_ReleaseObj( hbitmap );
 566
 567     res = CreateBitmapIndirect( &dib.dsBm );
 568     if(res) {
 569         char *buf = HeapAlloc( GetProcessHeap(), 0, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight );
 570         GetBitmapBits (hbitmap, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight, buf);
 571         SetBitmapBits (res, dib.dsBm.bmWidthBytes * dib.dsBm.bmHeight, buf);
 572         HeapFree( GetProcessHeap(), 0, buf );
 573     }
 574     return res;
 575 }
 576
 577
 578 /***********************************************************************
 579  *           BITMAP_SetOwnerDC
 580  *
 581  * Set the type of DC that owns the bitmap. This is used when the
 582  * bitmap is selected into a device to initialize the bitmap function
 583  * table.
 584  */
 585 BOOL BITMAP_SetOwnerDC( HBITMAP hbitmap, PHYSDEV physdev )
 586 {
 587     BITMAPOBJ *bitmap;
 588     BOOL ret = TRUE;
 589
 590     /* never set the owner of the stock bitmap since it can be selected in multiple DCs */
 591     if (hbitmap == GetStockObject(DEFAULT_BITMAP)) return TRUE;
 592
 593     if (!(bitmap = GDI_GetObjPtr( hbitmap, OBJ_BITMAP ))) return FALSE;
 594
 595     if (!bitmap->dib && bitmap->funcs != physdev->funcs)
 596     {
 597         /* we can only change from the null driver to some other driver */
 598         if (bitmap->funcs == &null_driver)
 599         {
 600             if (physdev->funcs->pCreateBitmap)
 601             {
 602                 ret = physdev->funcs->pCreateBitmap( physdev, hbitmap, bitmap->bitmap.bmBits );
 603                 if (ret) bitmap->funcs = physdev->funcs;
 604             }
 605             else
 606             {
 607                 WARN( "Trying to select bitmap %p in DC that doesn't support it\n", hbitmap );
 608                 ret = FALSE;
 609             }
 610         }
 611         else
 612         {
 613             FIXME( "Trying to select bitmap %p in different DC type\n", hbitmap );
 614             ret = FALSE;
 615         }
 616     }
 617     GDI_ReleaseObj( hbitmap );
 618     return ret;
 619 }
 620
 621
 622 /***********************************************************************
 623  *           BITMAP_SelectObject
 624  */
 625 static HGDIOBJ BITMAP_SelectObject( HGDIOBJ handle, HDC hdc )
 626 {
 627     HGDIOBJ ret;
 628     BITMAPOBJ *bitmap;
 629     DC *dc;
 630     PHYSDEV physdev = NULL, old_physdev = NULL;
 631
 632     if (!(dc = get_dc_ptr( hdc ))) return 0;
 633
 634     if (GetObjectType( hdc ) != OBJ_MEMDC)
 635     {
 636         ret = 0;
 637         goto done;
 638     }
 639     ret = dc->hBitmap;
 640     if (handle == dc->hBitmap) goto done;  /* nothing to do */
 641
 642     if (!(bitmap = GDI_GetObjPtr( handle, OBJ_BITMAP )))
 643     {
 644         ret = 0;
 645         goto done;
 646     }
 647
 648     if (bitmap->header.selcount && (handle != GetStockObject(DEFAULT_BITMAP)))
 649     {
 650         WARN( "Bitmap already selected in another DC\n" );
 651         GDI_ReleaseObj( handle );
 652         ret = 0;
 653         goto done;
 654     }
 655
 656     old_physdev = GET_DC_PHYSDEV( dc, pSelectBitmap );
 657     if(old_physdev == &dc->dibdrv.dev)
 658         pop_dc_driver( dc, old_physdev );
 659
 660     if(bitmap->dib)
 661     {
 662         physdev = &dc->dibdrv.dev;
 663         push_dc_driver( dc, physdev, physdev->funcs );
 664     }
 665     else
 666         physdev = GET_DC_PHYSDEV( dc, pSelectBitmap );
 667
 668     if (!BITMAP_SetOwnerDC( handle, physdev ))
 669     {
 670         GDI_ReleaseObj( handle );
 671         ret = 0;
 672         goto done;
 673     }
 674     if (!physdev->funcs->pSelectBitmap( physdev, handle ))
 675     {
 676         GDI_ReleaseObj( handle );
 677         ret = 0;
 678     }
 679     else
 680     {
 681         dc->hBitmap = handle;
 682         GDI_inc_ref_count( handle );
 683         dc->dirty = 0;
 684         dc->vis_rect.left   = 0;
 685         dc->vis_rect.top    = 0;
 686         dc->vis_rect.right  = bitmap->bitmap.bmWidth;
 687         dc->vis_rect.bottom = bitmap->bitmap.bmHeight;
 688         SetRectRgn( dc->hVisRgn, 0, 0, bitmap->bitmap.bmWidth, bitmap->bitmap.bmHeight);
 689         GDI_ReleaseObj( handle );
 690         DC_InitDC( dc );
 691         GDI_dec_ref_count( ret );
 692     }
 693
 694  done:
 695     if(!ret)
 696     {
 697         if(physdev == &dc->dibdrv.dev) pop_dc_driver( dc, physdev );
 698         if(old_physdev == &dc->dibdrv.dev) push_dc_driver( dc, old_physdev, old_physdev->funcs );
 699     }
 700     release_dc_ptr( dc );
 701     return ret;
 702 }
 703
 704
 705 /***********************************************************************
 706  *           BITMAP_DeleteObject
 707  */
 708 static BOOL BITMAP_DeleteObject( HGDIOBJ handle )
 709 {
 710     const DC_FUNCTIONS *funcs;
 711     BITMAPOBJ *bmp = GDI_GetObjPtr( handle, OBJ_BITMAP );
 712
 713     if (!bmp) return FALSE;
 714     funcs = bmp->funcs;
 715     GDI_ReleaseObj( handle );
 716
 717     funcs->pDeleteBitmap( handle );
 718
 719     if (!(bmp = free_gdi_handle( handle ))) return FALSE;
 720
 721     HeapFree( GetProcessHeap(), 0, bmp->bitmap.bmBits );
 722
 723     if (bmp->dib)
 724     {
 725         DIBSECTION *dib = bmp->dib;
 726
 727         if (dib->dsBm.bmBits)
 728         {
 729             if (dib->dshSection)
 730             {
 731                 SYSTEM_INFO SystemInfo;
 732                 GetSystemInfo( &SystemInfo );
 733                 UnmapViewOfFile( (char *)dib->dsBm.bmBits -
 734                                  (dib->dsOffset % SystemInfo.dwAllocationGranularity) );
 735             }
 736             else if (!dib->dsOffset)
 737                 VirtualFree(dib->dsBm.bmBits, 0L, MEM_RELEASE );
 738         }
 739         HeapFree(GetProcessHeap(), 0, dib);
 740         HeapFree(GetProcessHeap(), 0, bmp->color_table);
 741     }
 742     return HeapFree( GetProcessHeap(), 0, bmp );
 743 }
 744
 745
 746 /***********************************************************************
 747  *           BITMAP_GetObject
 748  */
 749 static INT BITMAP_GetObject( HGDIOBJ handle, INT count, LPVOID buffer )
 750 {
 751     INT ret;
 752     BITMAPOBJ *bmp = GDI_GetObjPtr( handle, OBJ_BITMAP );
 753
 754     if (!bmp) return 0;
 755
 756     if (!buffer) ret = sizeof(BITMAP);
 757     else if (count < sizeof(BITMAP)) ret = 0;
 758     else if (bmp->dib)
 759     {
 760         if (count >= sizeof(DIBSECTION))
 761         {
 762             DIBSECTION *dib = buffer;
 763             *dib = *bmp->dib;
 764             dib->dsBmih.biHeight = abs( dib->dsBmih.biHeight );
 765             ret = sizeof(DIBSECTION);
 766         }
 767         else /* if (count >= sizeof(BITMAP)) */
 768         {
 769             DIBSECTION *dib = bmp->dib;
 770             memcpy( buffer, &dib->dsBm, sizeof(BITMAP) );
 771             ret = sizeof(BITMAP);
 772         }
 773     }
 774     else
 775     {
 776         memcpy( buffer, &bmp->bitmap, sizeof(BITMAP) );
 777         ((BITMAP *) buffer)->bmBits = NULL;
 778         ret = sizeof(BITMAP);
 779     }
 780     GDI_ReleaseObj( handle );
 781     return ret;
 782 }
 783
 784
 785 /******************************************************************************
 786  * CreateDiscardableBitmap [GDI32.@]
 787  *
 788  * Creates a discardable bitmap.
 789  *
 790  * RETURNS
 791  *    Success: Handle to bitmap
 792  *    Failure: NULL
 793  */
 794 HBITMAP WINAPI CreateDiscardableBitmap(
 795     HDC hdc,    /* [in] Handle to device context */
 796     INT width,  /* [in] Bitmap width */
 797     INT height) /* [in] Bitmap height */
 798 {
 799     return CreateCompatibleBitmap( hdc, width, height );
 800 }
 801
 802
 803 /******************************************************************************
 804  * GetBitmapDimensionEx [GDI32.@]
 805  *
 806  * Retrieves dimensions of a bitmap.
 807  *
 808  * RETURNS
 809  *    Success: TRUE
 810  *    Failure: FALSE
 811  */
 812 BOOL WINAPI GetBitmapDimensionEx(
 813     HBITMAP hbitmap, /* [in]  Handle to bitmap */
 814     LPSIZE size)     /* [out] Address of struct receiving dimensions */
 815 {
 816     BITMAPOBJ * bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
 817     if (!bmp) return FALSE;
 818     *size = bmp->size;
 819     GDI_ReleaseObj( hbitmap );
 820     return TRUE;
 821 }
 822
 823
 824 /******************************************************************************
 825  * SetBitmapDimensionEx [GDI32.@]
 826  *
 827  * Assigns dimensions to a bitmap.
 828  * MSDN says that this function will fail if hbitmap is a handle created by
 829  * CreateDIBSection, but that's not true on Windows 2000.
 830  *
 831  * RETURNS
 832  *    Success: TRUE
 833  *    Failure: FALSE
 834  */
 835 BOOL WINAPI SetBitmapDimensionEx(
 836     HBITMAP hbitmap, /* [in]  Handle to bitmap */
 837     INT x,           /* [in]  Bitmap width */
 838     INT y,           /* [in]  Bitmap height */
 839     LPSIZE prevSize) /* [out] Address of structure for orig dims */
 840 {
 841     BITMAPOBJ * bmp = GDI_GetObjPtr( hbitmap, OBJ_BITMAP );
 842     if (!bmp) return FALSE;
 843     if (prevSize) *prevSize = bmp->size;
 844     bmp->size.cx = x;
 845     bmp->size.cy = y;
 846     GDI_ReleaseObj( hbitmap );
 847     return TRUE;
 848 }