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