objects/bitmap.c

   1 /*
   2  * GDI bitmap objects
   3  *
   4  * Copyright 1993 Alexandre Julliard
   5  */
   6 #include <stdio.h>
   7 #include <stdlib.h>
   8 #include <X11/Xlib.h>
   9 #include <X11/Xutil.h>
  10 #include "gdi.h"
  11 #include "callback.h"
  12 #include "dc.h"
  13 #include "bitmap.h"
  14 #include "stddebug.h"
  15 /* #define DEBUG_GDI    */
  16 /* #define DEBUG_BITMAP */
  17 #include "debug.h"
  18
  19   /* GCs used for B&W and color bitmap operations */
  20 GC BITMAP_monoGC = 0, BITMAP_colorGC = 0;
  21
  22 extern void CLIPPING_UpdateGCRegion( DC * dc );  /* objects/clipping.c */
  23
  24 /***********************************************************************
  25  *           BITMAP_Init
  26  */
  27 BOOL BITMAP_Init(void)
  28 {
  29     Pixmap tmpPixmap;
  30
  31       /* Create the necessary GCs */
  32
  33     if ((tmpPixmap = XCreatePixmap( display, rootWindow, 1, 1, 1 )))
  34     {
  35         BITMAP_monoGC = XCreateGC( display, tmpPixmap, 0, NULL );
  36         XSetGraphicsExposures( display, BITMAP_monoGC, False );
  37         XFreePixmap( display, tmpPixmap );
  38     }
  39
  40     if (screenDepth != 1)
  41     {
  42         if ((tmpPixmap = XCreatePixmap(display, rootWindow, 1,1,screenDepth)))
  43         {
  44             BITMAP_colorGC = XCreateGC( display, tmpPixmap, 0, NULL );
  45             XSetGraphicsExposures( display, BITMAP_colorGC, False );
  46             XFreePixmap( display, tmpPixmap );
  47         }
  48     }
  49     return TRUE;
  50 }
  51
  52
  53 /***********************************************************************
  54  *           BITMAP_BmpToImage
  55  *
  56  * Create an XImage pointing to the bitmap data.
  57  */
  58 static XImage *BITMAP_BmpToImage( BITMAP * bmp, void * bmpData )
  59 {
  60     extern void _XInitImageFuncPtrs( XImage* );
  61     XImage * image;
  62
  63     image = XCreateImage( display, DefaultVisualOfScreen(screen),
  64                           bmp->bmBitsPixel, ZPixmap, 0, bmpData,
  65                           bmp->bmWidth, bmp->bmHeight, 16, bmp->bmWidthBytes );
  66     if (!image) return 0;
  67     image->byte_order = MSBFirst;
  68     image->bitmap_bit_order = MSBFirst;
  69     image->bitmap_unit = 16;
  70     _XInitImageFuncPtrs(image);
  71     return image;
  72 }
  73
  74
  75 /***********************************************************************
  76  *           CreateBitmap    (GDI.48)
  77  */
  78 HBITMAP CreateBitmap( short width, short height,
  79                       BYTE planes, BYTE bpp, LPSTR bits )
  80 {
  81     BITMAPOBJ * bmpObjPtr;
  82     HBITMAP hbitmap;
  83
  84     dprintf_gdi( stddeb, "CreateBitmap: %dx%d, %d colors\n",
  85                  width, height, 1 << (planes*bpp) );
  86
  87       /* Check parameters */
  88     if (!height || !width || planes != 1) return 0;
  89     if ((bpp != 1) && (bpp != screenDepth)) return 0;
  90     if (height < 0) height = -height;
  91     if (width < 0) width = -width;
  92
  93       /* Create the BITMAPOBJ */
  94     hbitmap = GDI_AllocObject( sizeof(BITMAPOBJ), BITMAP_MAGIC );
  95     if (!hbitmap) return 0;
  96     bmpObjPtr = (BITMAPOBJ *) GDI_HEAP_LIN_ADDR( hbitmap );
  97
  98     bmpObjPtr->size.cx = 0;
  99     bmpObjPtr->size.cy = 0;
 100     bmpObjPtr->bitmap.bmType = 0;
 101     bmpObjPtr->bitmap.bmWidth = width;
 102     bmpObjPtr->bitmap.bmHeight = height;
 103     bmpObjPtr->bitmap.bmPlanes = planes;
 104     bmpObjPtr->bitmap.bmBitsPixel = bpp;
 105     bmpObjPtr->bitmap.bmWidthBytes = (width * bpp + 15) / 16 * 2;
 106     bmpObjPtr->bitmap.bmBits = NULL;
 107
 108       /* Create the pixmap */
 109     bmpObjPtr->pixmap = XCreatePixmap(display, rootWindow, width, height, bpp);
 110     if (!bmpObjPtr->pixmap)
 111     {
 112         GDI_HEAP_FREE( hbitmap );
 113         hbitmap = 0;
 114     }
 115     else if (bits)  /* Set bitmap bits */
 116         SetBitmapBits( hbitmap, height * bmpObjPtr->bitmap.bmWidthBytes, bits);
 117     return hbitmap;
 118 }
 119
 120
 121 /***********************************************************************
 122  *           CreateCompatibleBitmap    (GDI.51)
 123  */
 124 HBITMAP CreateCompatibleBitmap( HDC hdc, short width, short height )
 125 {
 126     DC * dc;
 127     dprintf_gdi(stddeb, "CreateCompatibleBitmap: "NPFMT" %dx%d\n",
 128                 hdc, width, height );
 129     if (!(dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC ))) return 0;
 130     return CreateBitmap( width, height, 1, dc->w.bitsPerPixel, NULL );
 131 }
 132
 133
 134 /***********************************************************************
 135  *           CreateBitmapIndirect    (GDI.49)
 136  */
 137 HBITMAP CreateBitmapIndirect( BITMAP * bmp )
 138 {
 139     return CreateBitmap( bmp->bmWidth, bmp->bmHeight, bmp->bmPlanes,
 140                          bmp->bmBitsPixel, PTR_SEG_TO_LIN( bmp->bmBits ) );
 141 }
 142
 143
 144 /***********************************************************************
 145  *           GetBitmapBits    (GDI.74)
 146  */
 147 LONG GetBitmapBits( HBITMAP hbitmap, LONG count, LPSTR buffer )
 148 {
 149     BITMAPOBJ * bmp;
 150     LONG height;
 151     XImage * image;
 152
 153     /* KLUDGE! */
 154     if (count < 0) {
 155         fprintf(stderr, "Negative number of bytes (%ld) passed to GetBitmapBits???\n", count );
 156         count = -count;
 157     }
 158     bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 159     if (!bmp) return 0;
 160
 161       /* Only get entire lines */
 162     height = count / bmp->bitmap.bmWidthBytes;
 163     if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
 164     dprintf_bitmap(stddeb, "GetBitmapBits: %dx%d %d colors %p fetched height: %ld\n",
 165             bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 166             1 << bmp->bitmap.bmBitsPixel, buffer, height );
 167     if (!height) return 0;
 168
 169     if (!(image = BITMAP_BmpToImage( &bmp->bitmap, buffer ))) return 0;
 170     CallTo32_LargeStack( (int(*)())XGetSubImage, 11,
 171                          display, bmp->pixmap, 0, 0, bmp->bitmap.bmWidth,
 172                          height, AllPlanes, ZPixmap, image, 0, 0 );
 173     image->data = NULL;
 174     XDestroyImage( image );
 175     return height * bmp->bitmap.bmWidthBytes;
 176 }
 177
 178
 179 /***********************************************************************
 180  *           SetBitmapBits    (GDI.106)
 181  */
 182 LONG SetBitmapBits( HBITMAP hbitmap, LONG count, LPSTR buffer )
 183 {
 184     BITMAPOBJ * bmp;
 185     LONG height;
 186     XImage * image;
 187
 188     /* KLUDGE! */
 189     if (count < 0) {
 190         fprintf(stderr, "Negative number of bytes (%ld) passed to SetBitmapBits???\n", count );
 191         count = -count;
 192     }
 193     bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 194     if (!bmp) return 0;
 195
 196     dprintf_bitmap(stddeb, "SetBitmapBits: %dx%d %d colors %p\n",
 197             bmp->bitmap.bmWidth, bmp->bitmap.bmHeight,
 198             1 << bmp->bitmap.bmBitsPixel, buffer );
 199
 200       /* Only set entire lines */
 201     height = count / bmp->bitmap.bmWidthBytes;
 202     if (height > bmp->bitmap.bmHeight) height = bmp->bitmap.bmHeight;
 203     if (!height) return 0;
 204
 205     if (!(image = BITMAP_BmpToImage( &bmp->bitmap, buffer ))) return 0;
 206     CallTo32_LargeStack( XPutImage, 10,
 207                          display, bmp->pixmap, BITMAP_GC(bmp), image, 0, 0,
 208                          0, 0, bmp->bitmap.bmWidth, height );
 209     image->data = NULL;
 210     XDestroyImage( image );
 211     return height * bmp->bitmap.bmWidthBytes;
 212 }
 213
 214
 215 /**********************************************************************
 216  *          LoadBitmap    (USER.175)
 217  */
 218 HBITMAP LoadBitmap( HANDLE instance, SEGPTR name )
 219 {
 220     HBITMAP hbitmap = 0;
 221     HDC hdc;
 222     HRSRC hRsrc;
 223     HGLOBAL handle;
 224     BITMAPINFO *info;
 225
 226     if (HIWORD(name))
 227     {
 228         char *str = (char *)PTR_SEG_TO_LIN( name );
 229         dprintf_bitmap( stddeb, "LoadBitmap("NPFMT",'%s')\n", instance, str );
 230         if (str[0] == '#') name = (SEGPTR)(DWORD)(WORD)atoi( str + 1 );
 231     }
 232     else
 233         dprintf_bitmap( stddeb, "LoadBitmap("NPFMT",%04x)\n",
 234                         instance, LOWORD(name) );
 235
 236     if (!instance)  /* OEM bitmap */
 237     {
 238         if (HIWORD((int)name)) return 0;
 239         return OBM_LoadBitmap( LOWORD((int)name) );
 240     }
 241
 242     if (!(hRsrc = FindResource( instance, name, RT_BITMAP ))) return 0;
 243     if (!(handle = LoadResource( instance, hRsrc ))) return 0;
 244
 245     info = (BITMAPINFO *)LockResource( handle );
 246     if ((hdc = GetDC(0)) != 0)
 247     {
 248         char *bits = (char *)info + DIB_BitmapInfoSize( info, DIB_RGB_COLORS );
 249         hbitmap = CreateDIBitmap( hdc, &info->bmiHeader, CBM_INIT,
 250                                   bits, info, DIB_RGB_COLORS );
 251         ReleaseDC( 0, hdc );
 252     }
 253     FreeResource( handle );
 254     return hbitmap;
 255 }
 256
 257
 258 /***********************************************************************
 259  *           BITMAP_DeleteObject
 260  */
 261 BOOL BITMAP_DeleteObject( HBITMAP hbitmap, BITMAPOBJ * bitmap )
 262 {
 263     XFreePixmap( display, bitmap->pixmap );
 264     return GDI_FreeObject( hbitmap );
 265 }
 266
 267
 268 /***********************************************************************
 269  *           BITMAP_GetObject
 270  */
 271 int BITMAP_GetObject( BITMAPOBJ * bmp, int count, LPSTR buffer )
 272 {
 273     if (count > sizeof(BITMAP)) count = sizeof(BITMAP);
 274     memcpy( buffer, &bmp->bitmap, count );
 275     return count;
 276 }
 277
 278
 279 /***********************************************************************
 280  *           BITMAP_SelectObject
 281  */
 282 HBITMAP BITMAP_SelectObject( HDC hdc, DC * dc, HBITMAP hbitmap,
 283                              BITMAPOBJ * bmp )
 284 {
 285     HRGN hrgn;
 286     HBITMAP prevHandle = dc->w.hBitmap;
 287
 288     if (!(dc->w.flags & DC_MEMORY)) return 0;
 289     hrgn = CreateRectRgn( 0, 0, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight );
 290     if (!hrgn) return 0;
 291
 292     DeleteObject( dc->w.hVisRgn );
 293     dc->w.hVisRgn    = hrgn;
 294     dc->u.x.drawable = bmp->pixmap;
 295     dc->w.hBitmap    = hbitmap;
 296
 297       /* Change GC depth if needed */
 298
 299     if (dc->w.bitsPerPixel != bmp->bitmap.bmBitsPixel)
 300     {
 301         XFreeGC( display, dc->u.x.gc );
 302         dc->u.x.gc = XCreateGC( display, dc->u.x.drawable, 0, NULL );
 303         dc->w.bitsPerPixel = bmp->bitmap.bmBitsPixel;
 304         DC_InitDC( hdc );
 305     }
 306     else CLIPPING_UpdateGCRegion( dc );  /* Just update GC clip region */
 307     return prevHandle;
 308 }
 309
 310 /***********************************************************************
 311  *           CreateDiscardableBitmap    (GDI.156)
 312  */
 313 HBITMAP CreateDiscardableBitmap(HDC hdc, short width, short height)
 314 {
 315     dprintf_bitmap(stddeb,"CreateDiscardableBitmap("NPFMT", %d, %d); "
 316            "// call CreateCompatibleBitmap() for now!\n",
 317            hdc, width, height);
 318     return CreateCompatibleBitmap(hdc, width, height);
 319 }
 320
 321 /***********************************************************************
 322  *           GetBitmapDimensionEx    (GDI.468)
 323  */
 324 BOOL GetBitmapDimensionEx( HBITMAP hbitmap, LPSIZE size )
 325 {
 326     BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 327     if (!bmp) return FALSE;
 328     *size = bmp->size;
 329     return TRUE;
 330 }
 331
 332
 333 /***********************************************************************
 334  *           GetBitmapDimension    (GDI.162)
 335  */
 336 DWORD GetBitmapDimension( HBITMAP hbitmap )
 337 {
 338     SIZE size;
 339     if (!GetBitmapDimensionEx( hbitmap, &size )) return 0;
 340     return size.cx | (size.cy << 16);
 341 }
 342
 343 /***********************************************************************
 344  *           SetBitmapDimensionEx    (GDI.478)
 345  */
 346 BOOL SetBitmapDimensionEx( HBITMAP hbitmap, short x, short y, LPSIZE prevSize )
 347 {
 348     BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
 349     if (!bmp) return FALSE;
 350     if (prevSize) *prevSize = bmp->size;
 351     bmp->size.cx = x;
 352     bmp->size.cy = y;
 353     return TRUE;
 354 }
 355
 356
 357 /***********************************************************************
 358  *           SetBitmapDimension    (GDI.163)
 359  */
 360 DWORD SetBitmapDimension( HBITMAP hbitmap, short x, short y )
 361 {
 362     SIZE size;
 363     if (!SetBitmapDimensionEx( hbitmap, x, y, &size )) return 0;
 364     return size.cx | (size.cy << 16);
 365 }