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

   1 /*
   2  * X11DRV bitmap objects
   3  *
   4  * Copyright 1993 Alexandre Julliard
   5  *           1999 Noel Borthwick
   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include "gdi.h"
  27 #include "bitmap.h"
  28 #include "wine/debug.h"
  29 #include "x11drv.h"
  30 #include "wingdi.h"
  31 #include "windef.h"
  32 #include "wine/winuser16.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(x11drv);
  35
  36   /* GCs used for B&W and color bitmap operations */
  37 GC BITMAP_monoGC = 0, BITMAP_colorGC = 0;
  38 Pixmap BITMAP_stock_pixmap;   /* pixmap for the default stock bitmap */
  39
  40 extern const DC_FUNCTIONS *X11DRV_DC_Funcs;  /* hack */
  41
  42 /***********************************************************************
  43  *           X11DRV_BITMAP_Init
  44  */
  45 BOOL X11DRV_BITMAP_Init(void)
  46 {
  47     Pixmap tmpPixmap;
  48
  49       /* Create the necessary GCs */
  50
  51     wine_tsx11_lock();
  52     BITMAP_stock_pixmap = XCreatePixmap( gdi_display, root_window, 1, 1, 1 );
  53     BITMAP_monoGC = XCreateGC( gdi_display, BITMAP_stock_pixmap, 0, NULL );
  54     XSetGraphicsExposures( gdi_display, BITMAP_monoGC, False );
  55     XSetSubwindowMode( gdi_display, BITMAP_monoGC, IncludeInferiors );
  56
  57     if (screen_depth != 1)
  58     {
  59         if ((tmpPixmap = XCreatePixmap( gdi_display, root_window, 1, 1, screen_depth )))
  60         {
  61             BITMAP_colorGC = XCreateGC( gdi_display, tmpPixmap, 0, NULL );
  62             XSetGraphicsExposures( gdi_display, BITMAP_colorGC, False );
  63             XSetSubwindowMode( gdi_display, BITMAP_colorGC, IncludeInferiors );
  64             XFreePixmap( gdi_display, tmpPixmap );
  65         }
  66     }
  67     wine_tsx11_unlock();
  68     return TRUE;
  69 }
  70
  71 /***********************************************************************
  72  *           SelectBitmap   (X11DRV.@)
  73  */
  74 HBITMAP X11DRV_SelectBitmap( X11DRV_PDEVICE *physDev, HBITMAP hbitmap )
  75 {
  76     BITMAPOBJ *bmp;
  77     DC *dc = physDev->dc;
  78
  79     if (!(bmp = GDI_GetObjPtr( hbitmap, BITMAP_MAGIC ))) return 0;
  80
  81     if(physDev->xrender)
  82         X11DRV_XRender_UpdateDrawable( physDev );
  83
  84     if (hbitmap == GetStockObject(DEFAULT_BITMAP))
  85         physDev->drawable = BITMAP_stock_pixmap;
  86     else
  87         physDev->drawable = (Pixmap)bmp->physBitmap;
  88
  89       /* Change GC depth if needed */
  90
  91     if (dc->bitsPerPixel != bmp->bitmap.bmBitsPixel)
  92     {
  93         wine_tsx11_lock();
  94         XFreeGC( gdi_display, physDev->gc );
  95         physDev->gc = XCreateGC( gdi_display, physDev->drawable, 0, NULL );
  96         XSetGraphicsExposures( gdi_display, physDev->gc, False );
  97         XSetSubwindowMode( gdi_display, physDev->gc, IncludeInferiors );
  98         XFlush( gdi_display );
  99         wine_tsx11_unlock();
 100     }
 101     GDI_ReleaseObj( hbitmap );
 102     return hbitmap;
 103 }
 104
 105
 106 /****************************************************************************
 107  *        CreateBitmap   (X11DRV.@)
 108  *
 109  * Create a device dependent X11 bitmap
 110  *
 111  * Returns TRUE on success else FALSE
 112  */
 113 BOOL X11DRV_CreateBitmap( X11DRV_PDEVICE *physDev, HBITMAP hbitmap )
 114 {
 115     BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 116
 117     if(!bmp) {
 118         WARN("Bad bitmap handle %p\n", hbitmap);
 119         return FALSE;
 120     }
 121
 122       /* Check parameters */
 123     if (bmp->bitmap.bmPlanes != 1)
 124     {
 125         GDI_ReleaseObj( hbitmap );
 126         return 0;
 127     }
 128     if ((bmp->bitmap.bmBitsPixel != 1) && (bmp->bitmap.bmBitsPixel != screen_depth))
 129     {
 130         ERR("Trying to make bitmap with planes=%d, bpp=%d\n",
 131             bmp->bitmap.bmPlanes, bmp->bitmap.bmBitsPixel);
 132         GDI_ReleaseObj( hbitmap );
 133         return FALSE;
 134     }
 135     if (hbitmap == GetStockObject(DEFAULT_BITMAP))
 136     {
 137         ERR( "called for stock bitmap, please report\n" );
 138         GDI_ReleaseObj( hbitmap );
 139         return FALSE;
 140     }
 141
 142     TRACE("(%p) %dx%d %d bpp\n", hbitmap, bmp->bitmap.bmWidth,
 143           bmp->bitmap.bmHeight, bmp->bitmap.bmBitsPixel);
 144
 145       /* Create the pixmap */
 146     wine_tsx11_lock();
 147     bmp->physBitmap = (void *)XCreatePixmap(gdi_display, root_window,
 148                                             bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 149                                             bmp->bitmap.bmBitsPixel);
 150     wine_tsx11_unlock();
 151     if (!bmp->physBitmap)
 152     {
 153         WARN("Can't create Pixmap\n");
 154         GDI_ReleaseObj( hbitmap );
 155         return FALSE;
 156     }
 157
 158     if (bmp->bitmap.bmBits) /* Set bitmap bits */
 159         X11DRV_SetBitmapBits( hbitmap, bmp->bitmap.bmBits,
 160                               bmp->bitmap.bmHeight * bmp->bitmap.bmWidthBytes );
 161
 162     GDI_ReleaseObj( hbitmap );
 163     return TRUE;
 164 }
 165
 166
 167 /***********************************************************************
 168  *           GetBitmapBits   (X11DRV.@)
 169  *
 170  * RETURNS
 171  *    Success: Number of bytes copied
 172  *    Failure: 0
 173  */
 174 LONG X11DRV_GetBitmapBits( HBITMAP hbitmap, void *buffer, LONG count )
 175 {
 176     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 177     LONG old_height, height;
 178     XImage *image;
 179     LPBYTE tbuf, startline;
 180     int h, w;
 181
 182     if (!bmp) return 0;
 183     TRACE("(bmp=%p, buffer=%p, count=0x%lx)\n", bmp, buffer, count);
 184
 185     wine_tsx11_lock();
 186
 187     /* Hack: change the bitmap height temporarily to avoid */
 188     /*       getting unnecessary bitmap rows. */
 189
 190     old_height = bmp->bitmap.bmHeight;
 191     height = bmp->bitmap.bmHeight = count / bmp->bitmap.bmWidthBytes;
 192
 193     image = XGetImage( gdi_display, (Pixmap)bmp->physBitmap,
 194                        0, 0, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 195                        AllPlanes, ZPixmap );
 196     bmp->bitmap.bmHeight = old_height;
 197
 198     /* copy XImage to 16 bit padded image buffer with real bitsperpixel */
 199
 200     startline = buffer;
 201     switch (bmp->bitmap.bmBitsPixel)
 202     {
 203     case 1:
 204         for (h=0;h<height;h++)
 205         {
 206             tbuf = startline;
 207             *tbuf = 0;
 208             for (w=0;w<bmp->bitmap.bmWidth;w++)
 209             {
 210                 if ((w%8) == 0)
 211                     *tbuf = 0;
 212                 *tbuf |= XGetPixel(image,w,h)<<(7-(w&7));
 213                 if ((w&7) == 7) ++tbuf;
 214             }
 215             startline += bmp->bitmap.bmWidthBytes;
 216         }
 217         break;
 218     case 4:
 219         for (h=0;h<height;h++)
 220         {
 221             tbuf = startline;
 222             for (w=0;w<bmp->bitmap.bmWidth;w++)
 223             {
 224                 if (!(w & 1)) *tbuf = XGetPixel( image, w, h) << 4;
 225                 else *tbuf++ |= XGetPixel( image, w, h) & 0x0f;
 226             }
 227             startline += bmp->bitmap.bmWidthBytes;
 228         }
 229         break;
 230     case 8:
 231         for (h=0;h<height;h++)
 232         {
 233             tbuf = startline;
 234             for (w=0;w<bmp->bitmap.bmWidth;w++)
 235                 *tbuf++ = XGetPixel(image,w,h);
 236             startline += bmp->bitmap.bmWidthBytes;
 237         }
 238         break;
 239     case 15:
 240     case 16:
 241         for (h=0;h<height;h++)
 242         {
 243             tbuf = startline;
 244             for (w=0;w<bmp->bitmap.bmWidth;w++)
 245             {
 246                 long pixel = XGetPixel(image,w,h);
 247
 248                 *tbuf++ = pixel & 0xff;
 249                 *tbuf++ = (pixel>>8) & 0xff;
 250             }
 251             startline += bmp->bitmap.bmWidthBytes;
 252         }
 253         break;
 254     case 24:
 255         for (h=0;h<height;h++)
 256         {
 257             tbuf = startline;
 258             for (w=0;w<bmp->bitmap.bmWidth;w++)
 259             {
 260                 long pixel = XGetPixel(image,w,h);
 261
 262                 *tbuf++ = pixel & 0xff;
 263                 *tbuf++ = (pixel>> 8) & 0xff;
 264                 *tbuf++ = (pixel>>16) & 0xff;
 265             }
 266             startline += bmp->bitmap.bmWidthBytes;
 267         }
 268         break;
 269
 270     case 32:
 271         for (h=0;h<height;h++)
 272         {
 273             tbuf = startline;
 274             for (w=0;w<bmp->bitmap.bmWidth;w++)
 275             {
 276                 long pixel = XGetPixel(image,w,h);
 277
 278                 *tbuf++ = pixel & 0xff;
 279                 *tbuf++ = (pixel>> 8) & 0xff;
 280                 *tbuf++ = (pixel>>16) & 0xff;
 281                 *tbuf++ = (pixel>>24) & 0xff;
 282             }
 283             startline += bmp->bitmap.bmWidthBytes;
 284         }
 285         break;
 286     default:
 287         FIXME("Unhandled bits:%d\n", bmp->bitmap.bmBitsPixel);
 288     }
 289     XDestroyImage( image );
 290     wine_tsx11_unlock();
 291     GDI_ReleaseObj( hbitmap );
 292     return count;
 293 }
 294
 295
 296
 297 /******************************************************************************
 298  *             SetBitmapBits   (X11DRV.@)
 299  *
 300  * RETURNS
 301  *    Success: Number of bytes used in setting the bitmap bits
 302  *    Failure: 0
 303  */
 304 LONG X11DRV_SetBitmapBits( HBITMAP hbitmap, const void *bits, LONG count )
 305 {
 306     BITMAPOBJ *bmp = GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 307     LONG height;
 308     XImage *image;
 309     const BYTE *sbuf, *startline;
 310     int w, h;
 311
 312     if (!bmp) return 0;
 313     TRACE("(bmp=%p, bits=%p, count=0x%lx)\n", bmp, bits, count);
 314
 315     height = count / bmp->bitmap.bmWidthBytes;
 316
 317     wine_tsx11_lock();
 318     image = XCreateImage( gdi_display, visual, bmp->bitmap.bmBitsPixel, ZPixmap, 0, NULL,
 319                           bmp->bitmap.bmWidth, height, 32, 0 );
 320     if (!(image->data = (LPBYTE)malloc(image->bytes_per_line * height)))
 321     {
 322         WARN("No memory to create image data.\n");
 323         XDestroyImage( image );
 324         wine_tsx11_unlock();
 325         GDI_ReleaseObj( hbitmap );
 326         return 0;
 327     }
 328
 329     /* copy 16 bit padded image buffer with real bitsperpixel to XImage */
 330
 331     startline = bits;
 332
 333     switch (bmp->bitmap.bmBitsPixel)
 334     {
 335     case 1:
 336         for (h=0;h<height;h++)
 337         {
 338             sbuf = startline;
 339             for (w=0;w<bmp->bitmap.bmWidth;w++)
 340             {
 341                 XPutPixel(image,w,h,(sbuf[0]>>(7-(w&7))) & 1);
 342                 if ((w&7) == 7)
 343                     sbuf++;
 344             }
 345             startline += bmp->bitmap.bmWidthBytes;
 346         }
 347         break;
 348     case 4:
 349         for (h=0;h<height;h++)
 350         {
 351             sbuf = startline;
 352             for (w=0;w<bmp->bitmap.bmWidth;w++)
 353             {
 354                 if (!(w & 1)) XPutPixel( image, w, h, *sbuf >> 4 );
 355                 else XPutPixel( image, w, h, *sbuf++ & 0xf );
 356             }
 357             startline += bmp->bitmap.bmWidthBytes;
 358         }
 359         break;
 360     case 8:
 361         for (h=0;h<height;h++)
 362         {
 363             sbuf = startline;
 364             for (w=0;w<bmp->bitmap.bmWidth;w++)
 365                 XPutPixel(image,w,h,*sbuf++);
 366             startline += bmp->bitmap.bmWidthBytes;
 367         }
 368         break;
 369     case 15:
 370     case 16:
 371         for (h=0;h<height;h++)
 372         {
 373             sbuf = startline;
 374             for (w=0;w<bmp->bitmap.bmWidth;w++)
 375             {
 376                 XPutPixel(image,w,h,sbuf[1]*256+sbuf[0]);
 377                 sbuf+=2;
 378             }
 379             startline += bmp->bitmap.bmWidthBytes;
 380         }
 381         break;
 382     case 24:
 383         for (h=0;h<height;h++)
 384         {
 385             sbuf = startline;
 386             for (w=0;w<bmp->bitmap.bmWidth;w++)
 387             {
 388                 XPutPixel(image,w,h,(sbuf[2]<<16)+(sbuf[1]<<8)+sbuf[0]);
 389                 sbuf += 3;
 390             }
 391             startline += bmp->bitmap.bmWidthBytes;
 392         }
 393         break;
 394     case 32:
 395         for (h=0;h<height;h++)
 396         {
 397             sbuf = startline;
 398             for (w=0;w<bmp->bitmap.bmWidth;w++)
 399             {
 400                 XPutPixel(image,w,h,(sbuf[3]<<24)+(sbuf[2]<<16)+(sbuf[1]<<8)+sbuf[0]);
 401                 sbuf += 4;
 402             }
 403             startline += bmp->bitmap.bmWidthBytes;
 404         }
 405         break;
 406     default:
 407       FIXME("Unhandled bits:%d\n", bmp->bitmap.bmBitsPixel);
 408
 409     }
 410     XPutImage( gdi_display, (Pixmap)bmp->physBitmap, BITMAP_GC(bmp),
 411                image, 0, 0, 0, 0, bmp->bitmap.bmWidth, height );
 412     XDestroyImage( image ); /* frees image->data too */
 413     wine_tsx11_unlock();
 414     GDI_ReleaseObj( hbitmap );
 415     return count;
 416 }
 417
 418 /***********************************************************************
 419  *           DeleteBitmap   (X11DRV.@)
 420  */
 421 BOOL X11DRV_DeleteBitmap( HBITMAP hbitmap )
 422 {
 423     BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 424     if (bmp)
 425     {
 426         wine_tsx11_lock();
 427         if (bmp->physBitmap) XFreePixmap( gdi_display, (Pixmap)bmp->physBitmap );
 428         bmp->physBitmap = NULL;
 429         wine_tsx11_unlock();
 430         if (bmp->dib) X11DRV_DIB_DeleteDIBSection( bmp );
 431         GDI_ReleaseObj( hbitmap );
 432     }
 433     return TRUE;
 434 }
 435
 436 /**************************************************************************
 437  *              X11DRV_BITMAP_CreateBitmapHeaderFromPixmap
 438  *
 439  *  Allocates an HBITMAP which references the Pixmap passed in.
 440  *  Note: This function makes the bitmap an owner of the Pixmap so subsequently
 441  *  calling DeleteObject on this will free the Pixmap as well.
 442  */
 443 HBITMAP X11DRV_BITMAP_CreateBitmapHeaderFromPixmap(Pixmap pixmap)
 444 {
 445     HBITMAP hBmp = 0;
 446     BITMAPOBJ *pBmp = NULL;
 447     Window root;
 448     int x,y;               /* Unused */
 449     unsigned border_width; /* Unused */
 450     unsigned int depth, width, height;
 451
 452     /* Get the Pixmap dimensions and bit depth */
 453     wine_tsx11_lock();
 454     if (!XGetGeometry(gdi_display, pixmap, &root, &x, &y, &width, &height,
 455                       &border_width, &depth)) depth = 0;
 456     wine_tsx11_unlock();
 457     if (!depth) goto END;
 458
 459     TRACE("\tPixmap properties: width=%d, height=%d, depth=%d\n",
 460           width, height, depth);
 461
 462     /*
 463      * Create an HBITMAP with the same dimensions and BPP as the pixmap,
 464      * and make it a container for the pixmap passed.
 465      */
 466     hBmp = CreateBitmap( width, height, 1, depth, NULL );
 467
 468     pBmp = (BITMAPOBJ *)GDI_GetObjPtr( hBmp, BITMAP_MAGIC );
 469
 470     pBmp->funcs = X11DRV_DC_Funcs;
 471     pBmp->physBitmap = (void *)pixmap;
 472     GDI_ReleaseObj( hBmp );
 473
 474 END:
 475     TRACE("\tReturning HBITMAP %p\n", hBmp);
 476     return hBmp;
 477 }
 478
 479
 480 /**************************************************************************
 481  *              X11DRV_BITMAP_CreateBitmapFromPixmap
 482  *
 483  *  Allocates an HBITMAP and copies the Pixmap data into it.
 484  *  If bDeletePixmap is TRUE, the Pixmap passed in is deleted after the conversion.
 485  */
 486 HBITMAP X11DRV_BITMAP_CreateBitmapFromPixmap(Pixmap pixmap, BOOL bDeletePixmap)
 487 {
 488     HBITMAP hBmp = 0, hBmpCopy = 0;
 489     BITMAPOBJ *pBmp = NULL;
 490     unsigned int width, height;
 491
 492     /* Allocate an HBITMAP which references the Pixmap passed to us */
 493     hBmp = X11DRV_BITMAP_CreateBitmapHeaderFromPixmap(pixmap);
 494     if (!hBmp)
 495     {
 496         TRACE("\tCould not create bitmap header for Pixmap\n");
 497         goto END;
 498     }
 499
 500     /* Get the bitmap dimensions */
 501     width = pBmp->bitmap.bmWidth;
 502     height = pBmp->bitmap.bmHeight;
 503
 504     hBmpCopy = (HBITMAP)CopyImage(hBmp, IMAGE_BITMAP, width, height, LR_CREATEDIBSECTION);
 505
 506     /* We can now get rid of the HBITMAP wrapper we created earlier.
 507      * Note: Simply calling DeleteObject will free the embedded Pixmap as well.
 508      */
 509     if (!bDeletePixmap)
 510     {
 511         /* Manually clear the bitmap internals to prevent the Pixmap
 512          * from being deleted by DeleteObject.
 513          */
 514         pBmp->physBitmap = NULL;
 515         pBmp->funcs = NULL;
 516     }
 517     DeleteObject(hBmp);
 518
 519 END:
 520     TRACE("\tReturning HBITMAP %p\n", hBmpCopy);
 521     return hBmpCopy;
 522 }
 523
 524
 525 /**************************************************************************
 526  *                 X11DRV_BITMAP_CreatePixmapFromBitmap
 527  *
 528  *    Creates a Pixmap from a bitmap
 529  */
 530 Pixmap X11DRV_BITMAP_CreatePixmapFromBitmap( HBITMAP hBmp, HDC hdc )
 531 {
 532     HGLOBAL hPackedDIB = 0;
 533     Pixmap pixmap = 0;
 534
 535     /*
 536      * Create a packed DIB from the bitmap passed to us.
 537      * A packed DIB contains a BITMAPINFO structure followed immediately by
 538      * an optional color palette and the pixel data.
 539      */
 540     hPackedDIB = DIB_CreateDIBFromBitmap(hdc, hBmp);
 541
 542     /* Create a Pixmap from the packed DIB */
 543     pixmap = X11DRV_DIB_CreatePixmapFromDIB( hPackedDIB, hdc );
 544
 545     /* Free the temporary packed DIB */
 546     GlobalFree(hPackedDIB);
 547
 548     return pixmap;
 549 }
 550
 551
 552 /***********************************************************************
 553  *           X11DRV_BITMAP_Pixmap
 554  *
 555  * This function exists solely for x11 driver of the window system.
 556  */
 557 Pixmap X11DRV_BITMAP_Pixmap(HBITMAP hbitmap)
 558 {
 559     Pixmap pixmap;
 560     BITMAPOBJ *bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 561     if (bmp) {
 562       pixmap = (Pixmap)bmp->physBitmap;
 563       GDI_ReleaseObj( hbitmap );
 564     }
 565     else {
 566       ERR("handle %p returned no obj\n", hbitmap);
 567       pixmap = 0;
 568     }
 569     return pixmap;
 570 }