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