dlls/winex11.drv/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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include "windef.h"
  27 #include "wingdi.h"
  28 #include "wine/debug.h"
  29 #include "x11drv.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(x11drv);
  32
  33   /* GCs used for B&W and color bitmap operations */
  34 GC BITMAP_monoGC = 0, BITMAP_colorGC = 0;
  35 X_PHYSBITMAP BITMAP_stock_phys_bitmap = { 0 };  /* phys bitmap for the default stock bitmap */
  36
  37 static XContext bitmap_context;  /* X context to associate a phys bitmap to a handle */
  38
  39 /***********************************************************************
  40  *           X11DRV_BITMAP_Init
  41  */
  42 void X11DRV_BITMAP_Init(void)
  43 {
  44     Pixmap tmpPixmap;
  45
  46       /* Create the necessary GCs */
  47
  48     wine_tsx11_lock();
  49     bitmap_context = XUniqueContext();
  50     BITMAP_stock_phys_bitmap.pixmap_depth = 1;
  51     BITMAP_stock_phys_bitmap.pixmap = XCreatePixmap( gdi_display, root_window, 1, 1, 1 );
  52     BITMAP_monoGC = XCreateGC( gdi_display, BITMAP_stock_phys_bitmap.pixmap, 0, NULL );
  53     XSetGraphicsExposures( gdi_display, BITMAP_monoGC, False );
  54     XSetSubwindowMode( gdi_display, BITMAP_monoGC, IncludeInferiors );
  55
  56     if (screen_depth != 1)
  57     {
  58         if ((tmpPixmap = XCreatePixmap( gdi_display, root_window, 1, 1, screen_depth )))
  59         {
  60             BITMAP_colorGC = XCreateGC( gdi_display, tmpPixmap, 0, NULL );
  61             XSetGraphicsExposures( gdi_display, BITMAP_colorGC, False );
  62             XSetSubwindowMode( gdi_display, BITMAP_colorGC, IncludeInferiors );
  63             XFreePixmap( gdi_display, tmpPixmap );
  64         }
  65     }
  66     wine_tsx11_unlock();
  67 }
  68
  69 /***********************************************************************
  70  *           SelectBitmap   (X11DRV.@)
  71  */
  72 HBITMAP X11DRV_SelectBitmap( X11DRV_PDEVICE *physDev, HBITMAP hbitmap )
  73 {
  74     X_PHYSBITMAP *physBitmap;
  75     BITMAP bitmap;
  76
  77     if (!GetObjectW( hbitmap, sizeof(bitmap), &bitmap )) return 0;
  78
  79     if(physDev->xrender)
  80         X11DRV_XRender_UpdateDrawable( physDev );
  81
  82     if (hbitmap == BITMAP_stock_phys_bitmap.hbitmap) physBitmap = &BITMAP_stock_phys_bitmap;
  83     else if (!(physBitmap = X11DRV_get_phys_bitmap( hbitmap ))) return 0;
  84
  85     physDev->bitmap = physBitmap;
  86     physDev->drawable = physBitmap->pixmap;
  87     SetRect( &physDev->drawable_rect, 0, 0, bitmap.bmWidth, bitmap.bmHeight );
  88     physDev->dc_rect = physDev->drawable_rect;
  89
  90       /* Change GC depth if needed */
  91
  92     if (physDev->depth != physBitmap->pixmap_depth)
  93     {
  94         physDev->depth = physBitmap->pixmap_depth;
  95         wine_tsx11_lock();
  96         XFreeGC( gdi_display, physDev->gc );
  97         physDev->gc = XCreateGC( gdi_display, physDev->drawable, 0, NULL );
  98         XSetGraphicsExposures( gdi_display, physDev->gc, False );
  99         XSetSubwindowMode( gdi_display, physDev->gc, IncludeInferiors );
 100         XFlush( gdi_display );
 101         wine_tsx11_unlock();
 102     }
 103     return hbitmap;
 104 }
 105
 106
 107 /****************************************************************************
 108  *        CreateBitmap   (X11DRV.@)
 109  *
 110  * Create a device dependent X11 bitmap
 111  *
 112  * Returns TRUE on success else FALSE
 113  */
 114 BOOL X11DRV_CreateBitmap( X11DRV_PDEVICE *physDev, HBITMAP hbitmap, LPVOID bmBits )
 115 {
 116     X_PHYSBITMAP *physBitmap;
 117     BITMAP bitmap;
 118
 119     if (!GetObjectW( hbitmap, sizeof(bitmap), &bitmap )) return FALSE;
 120
 121       /* Check parameters */
 122     if (bitmap.bmPlanes != 1) return FALSE;
 123
 124     /* check if bpp is compatible with screen depth */
 125     if (!((bitmap.bmBitsPixel == 1) ||
 126           (bitmap.bmBitsPixel == screen_bpp) ||
 127           (bitmap.bmBitsPixel == 24 && screen_bpp == 32) ||   /* FIXME: Not compatible */
 128           (bitmap.bmBitsPixel == 32 && screen_bpp == 24) ||   /* FIXME: Not compatible */
 129           (bitmap.bmBitsPixel == 16 && screen_bpp == 15)))    /* TODO: Confirm this    */
 130     {
 131         ERR("Trying to make bitmap with planes=%d, bpp=%d\n",
 132             bitmap.bmPlanes, bitmap.bmBitsPixel);
 133         return FALSE;
 134     }
 135     if (hbitmap == BITMAP_stock_phys_bitmap.hbitmap)
 136     {
 137         ERR( "called for stock bitmap, please report\n" );
 138         return FALSE;
 139     }
 140
 141     TRACE("(%p) %dx%d %d bpp\n", hbitmap, bitmap.bmWidth, bitmap.bmHeight, bitmap.bmBitsPixel);
 142
 143     if (!(physBitmap = X11DRV_init_phys_bitmap( hbitmap ))) return FALSE;
 144
 145       /* Create the pixmap */
 146     wine_tsx11_lock();
 147     physBitmap->pixmap_depth = (bitmap.bmBitsPixel == 1) ? 1 : screen_depth;
 148     physBitmap->pixmap = XCreatePixmap(gdi_display, root_window,
 149                                        bitmap.bmWidth, bitmap.bmHeight, physBitmap->pixmap_depth);
 150     wine_tsx11_unlock();
 151     if (!physBitmap->pixmap)
 152     {
 153         WARN("Can't create Pixmap\n");
 154         HeapFree( GetProcessHeap(), 0, physBitmap );
 155         return FALSE;
 156     }
 157
 158     if (bmBits) /* Set bitmap bits */
 159     {
 160         X11DRV_SetBitmapBits( hbitmap, bmBits, bitmap.bmHeight * bitmap.bmWidthBytes );
 161     }
 162     else  /* else clear the bitmap */
 163     {
 164         wine_tsx11_lock();
 165         XSetFunction( gdi_display, BITMAP_GC(physBitmap), GXclear );
 166         XFillRectangle( gdi_display, physBitmap->pixmap, BITMAP_GC(physBitmap), 0, 0,
 167                         bitmap.bmWidth, bitmap.bmHeight );
 168         XSetFunction( gdi_display, BITMAP_GC(physBitmap), GXcopy );
 169         wine_tsx11_unlock();
 170     }
 171     return TRUE;
 172 }
 173
 174
 175 /***********************************************************************
 176  *           GetBitmapBits   (X11DRV.@)
 177  *
 178  * RETURNS
 179  *    Success: Number of bytes copied
 180  *    Failure: 0
 181  */
 182 LONG X11DRV_GetBitmapBits( HBITMAP hbitmap, void *buffer, LONG count )
 183 {
 184     BITMAP bitmap;
 185     X_PHYSBITMAP *physBitmap = X11DRV_get_phys_bitmap( hbitmap );
 186     LONG height;
 187     XImage *image;
 188     LPBYTE tbuf, startline;
 189     int h, w;
 190
 191     if (!physBitmap || !GetObjectW( hbitmap, sizeof(bitmap), &bitmap )) return 0;
 192
 193     TRACE("(bmp=%p, buffer=%p, count=0x%x)\n", hbitmap, buffer, count);
 194
 195     wine_tsx11_lock();
 196     height = count / bitmap.bmWidthBytes;
 197     image = XGetImage( gdi_display, physBitmap->pixmap, 0, 0,
 198                        bitmap.bmWidth, height, AllPlanes, ZPixmap );
 199
 200     /* copy XImage to 16 bit padded image buffer with real bitsperpixel */
 201
 202     startline = buffer;
 203     switch (bitmap.bmBitsPixel)
 204     {
 205     case 1:
 206         for (h=0;h<height;h++)
 207         {
 208             tbuf = startline;
 209             *tbuf = 0;
 210             for (w=0;w<bitmap.bmWidth;w++)
 211             {
 212                 if ((w%8) == 0)
 213                     *tbuf = 0;
 214                 *tbuf |= XGetPixel(image,w,h)<<(7-(w&7));
 215                 if ((w&7) == 7) ++tbuf;
 216             }
 217             startline += bitmap.bmWidthBytes;
 218         }
 219         break;
 220     case 4:
 221         for (h=0;h<height;h++)
 222         {
 223             tbuf = startline;
 224             for (w=0;w<bitmap.bmWidth;w++)
 225             {
 226                 if (!(w & 1)) *tbuf = XGetPixel( image, w, h) << 4;
 227                 else *tbuf++ |= XGetPixel( image, w, h) & 0x0f;
 228             }
 229             startline += bitmap.bmWidthBytes;
 230         }
 231         break;
 232     case 8:
 233         for (h=0;h<height;h++)
 234         {
 235             tbuf = startline;
 236             for (w=0;w<bitmap.bmWidth;w++)
 237                 *tbuf++ = XGetPixel(image,w,h);
 238             startline += bitmap.bmWidthBytes;
 239         }
 240         break;
 241     case 15:
 242     case 16:
 243         for (h=0;h<height;h++)
 244         {
 245             tbuf = startline;
 246             for (w=0;w<bitmap.bmWidth;w++)
 247             {
 248                 long pixel = XGetPixel(image,w,h);
 249
 250                 *tbuf++ = pixel & 0xff;
 251                 *tbuf++ = (pixel>>8) & 0xff;
 252             }
 253             startline += bitmap.bmWidthBytes;
 254         }
 255         break;
 256     case 24:
 257         for (h=0;h<height;h++)
 258         {
 259             tbuf = startline;
 260             for (w=0;w<bitmap.bmWidth;w++)
 261             {
 262                 long pixel = XGetPixel(image,w,h);
 263
 264                 *tbuf++ = pixel & 0xff;
 265                 *tbuf++ = (pixel>> 8) & 0xff;
 266                 *tbuf++ = (pixel>>16) & 0xff;
 267             }
 268             startline += bitmap.bmWidthBytes;
 269         }
 270         break;
 271
 272     case 32:
 273         for (h=0;h<height;h++)
 274         {
 275             tbuf = startline;
 276             for (w=0;w<bitmap.bmWidth;w++)
 277             {
 278                 long pixel = XGetPixel(image,w,h);
 279
 280                 *tbuf++ = pixel & 0xff;
 281                 *tbuf++ = (pixel>> 8) & 0xff;
 282                 *tbuf++ = (pixel>>16) & 0xff;
 283                 *tbuf++ = (pixel>>24) & 0xff;
 284             }
 285             startline += bitmap.bmWidthBytes;
 286         }
 287         break;
 288     default:
 289         FIXME("Unhandled bits:%d\n", bitmap.bmBitsPixel);
 290     }
 291     XDestroyImage( image );
 292     wine_tsx11_unlock();
 293     return count;
 294 }
 295
 296
 297
 298 /******************************************************************************
 299  *             SetBitmapBits   (X11DRV.@)
 300  *
 301  * RETURNS
 302  *    Success: Number of bytes used in setting the bitmap bits
 303  *    Failure: 0
 304  */
 305 LONG X11DRV_SetBitmapBits( HBITMAP hbitmap, const void *bits, LONG count )
 306 {
 307     BITMAP bitmap;
 308     X_PHYSBITMAP *physBitmap = X11DRV_get_phys_bitmap( hbitmap );
 309     LONG height;
 310     XImage *image;
 311     const BYTE *sbuf, *startline;
 312     int w, h;
 313
 314     if (!physBitmap || !GetObjectW( hbitmap, sizeof(bitmap), &bitmap )) return 0;
 315
 316     TRACE("(bmp=%p, bits=%p, count=0x%x)\n", hbitmap, bits, count);
 317
 318     height = count / bitmap.bmWidthBytes;
 319
 320     wine_tsx11_lock();
 321     image = XCreateImage( gdi_display, visual, physBitmap->pixmap_depth, ZPixmap, 0, NULL,
 322                           bitmap.bmWidth, height, 32, 0 );
 323     if (!(image->data = malloc(image->bytes_per_line * height)))
 324     {
 325         WARN("No memory to create image data.\n");
 326         XDestroyImage( image );
 327         wine_tsx11_unlock();
 328         return 0;
 329     }
 330
 331     /* copy 16 bit padded image buffer with real bitsperpixel to XImage */
 332
 333     startline = bits;
 334
 335     switch (bitmap.bmBitsPixel)
 336     {
 337     case 1:
 338         for (h=0;h<height;h++)
 339         {
 340             sbuf = startline;
 341             for (w=0;w<bitmap.bmWidth;w++)
 342             {
 343                 XPutPixel(image,w,h,(sbuf[0]>>(7-(w&7))) & 1);
 344                 if ((w&7) == 7)
 345                     sbuf++;
 346             }
 347             startline += bitmap.bmWidthBytes;
 348         }
 349         break;
 350     case 4:
 351         for (h=0;h<height;h++)
 352         {
 353             sbuf = startline;
 354             for (w=0;w<bitmap.bmWidth;w++)
 355             {
 356                 if (!(w & 1)) XPutPixel( image, w, h, *sbuf >> 4 );
 357                 else XPutPixel( image, w, h, *sbuf++ & 0xf );
 358             }
 359             startline += bitmap.bmWidthBytes;
 360         }
 361         break;
 362     case 8:
 363         for (h=0;h<height;h++)
 364         {
 365             sbuf = startline;
 366             for (w=0;w<bitmap.bmWidth;w++)
 367                 XPutPixel(image,w,h,*sbuf++);
 368             startline += bitmap.bmWidthBytes;
 369         }
 370         break;
 371     case 15:
 372     case 16:
 373         for (h=0;h<height;h++)
 374         {
 375             sbuf = startline;
 376             for (w=0;w<bitmap.bmWidth;w++)
 377             {
 378                 XPutPixel(image,w,h,sbuf[1]*256+sbuf[0]);
 379                 sbuf+=2;
 380             }
 381             startline += bitmap.bmWidthBytes;
 382         }
 383         break;
 384     case 24:
 385         for (h=0;h<height;h++)
 386         {
 387             sbuf = startline;
 388             for (w=0;w<bitmap.bmWidth;w++)
 389             {
 390                 XPutPixel(image,w,h,(sbuf[2]<<16)+(sbuf[1]<<8)+sbuf[0]);
 391                 sbuf += 3;
 392             }
 393             startline += bitmap.bmWidthBytes;
 394         }
 395         break;
 396     case 32:
 397         for (h=0;h<height;h++)
 398         {
 399             sbuf = startline;
 400             for (w=0;w<bitmap.bmWidth;w++)
 401             {
 402                 XPutPixel(image,w,h,(sbuf[3]<<24)+(sbuf[2]<<16)+(sbuf[1]<<8)+sbuf[0]);
 403                 sbuf += 4;
 404             }
 405             startline += bitmap.bmWidthBytes;
 406         }
 407         break;
 408     default:
 409       FIXME("Unhandled bits:%d\n", bitmap.bmBitsPixel);
 410
 411     }
 412     XPutImage( gdi_display, physBitmap->pixmap, BITMAP_GC(physBitmap),
 413                image, 0, 0, 0, 0, bitmap.bmWidth, height );
 414     XDestroyImage( image ); /* frees image->data too */
 415     wine_tsx11_unlock();
 416     return count;
 417 }
 418
 419 /***********************************************************************
 420  *           DeleteBitmap   (X11DRV.@)
 421  */
 422 BOOL X11DRV_DeleteBitmap( HBITMAP hbitmap )
 423 {
 424     X_PHYSBITMAP *physBitmap = X11DRV_get_phys_bitmap( hbitmap );
 425
 426     if (physBitmap)
 427     {
 428         DIBSECTION dib;
 429
 430         if (GetObjectW( hbitmap, sizeof(dib), &dib ) == sizeof(dib))
 431             X11DRV_DIB_DeleteDIBSection( physBitmap, &dib );
 432
 433         if (physBitmap->glxpixmap)
 434             destroy_glxpixmap( gdi_display, physBitmap->glxpixmap );
 435         wine_tsx11_lock();
 436         if (physBitmap->pixmap) XFreePixmap( gdi_display, physBitmap->pixmap );
 437         XDeleteContext( gdi_display, (XID)hbitmap, bitmap_context );
 438         wine_tsx11_unlock();
 439         HeapFree( GetProcessHeap(), 0, physBitmap );
 440     }
 441     return TRUE;
 442 }
 443
 444
 445 /***********************************************************************
 446  *           X11DRV_get_phys_bitmap
 447  *
 448  * Retrieve the X physical bitmap info.
 449  */
 450 X_PHYSBITMAP *X11DRV_get_phys_bitmap( HBITMAP hbitmap )
 451 {
 452     X_PHYSBITMAP *ret;
 453
 454     wine_tsx11_lock();
 455     if (XFindContext( gdi_display, (XID)hbitmap, bitmap_context, (char **)&ret )) ret = NULL;
 456     wine_tsx11_unlock();
 457     return ret;
 458 }
 459
 460
 461 /***********************************************************************
 462  *           X11DRV_init_phys_bitmap
 463  *
 464  * Initialize the X physical bitmap info.
 465  */
 466 X_PHYSBITMAP *X11DRV_init_phys_bitmap( HBITMAP hbitmap )
 467 {
 468     X_PHYSBITMAP *ret;
 469
 470     if ((ret = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*ret) )) != NULL)
 471     {
 472         ret->hbitmap = hbitmap;
 473         wine_tsx11_lock();
 474         XSaveContext( gdi_display, (XID)hbitmap, bitmap_context, (char *)ret );
 475         wine_tsx11_unlock();
 476     }
 477     return ret;
 478 }
 479
 480
 481 /***********************************************************************
 482  *           X11DRV_get_pixmap
 483  *
 484  * Retrieve the pixmap associated to a bitmap.
 485  */
 486 Pixmap X11DRV_get_pixmap( HBITMAP hbitmap )
 487 {
 488     X_PHYSBITMAP *physBitmap = X11DRV_get_phys_bitmap( hbitmap );
 489
 490     if (!physBitmap) return 0;
 491     return physBitmap->pixmap;
 492 }