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