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