| /* |
| * GDI device-independent bitmaps |
| * |
| * Copyright 1993,1994 Alexandre Julliard |
| */ |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <X11/Xlib.h> |
| #include <X11/Xutil.h> |
| #include "dc.h" |
| #include "bitmap.h" |
| #include "callback.h" |
| #include "palette.h" |
| #include "icon.h" |
| #include "stackframe.h" |
| #include "stddebug.h" |
| #include "color.h" |
| #include "debug.h" |
| |
| |
| /*********************************************************************** |
| * DIB_GetImageWidthBytes |
| * |
| * Return the width of an X image in bytes |
| */ |
| int DIB_GetImageWidthBytes( int width, int depth ) |
| { |
| int words; |
| |
| switch(depth) |
| { |
| case 1: words = (width + 31) / 32; break; |
| case 4: words = (width + 7) / 8; break; |
| case 8: words = (width + 3) / 4; break; |
| case 15: |
| case 16: words = (width + 1) / 2; break; |
| case 24: words = width; break; |
| default: |
| fprintf(stderr, "DIB: unsupported depth %d.\n", depth ); |
| exit(1); |
| } |
| return 4 * words; |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_BitmapInfoSize |
| * |
| * Return the size of the bitmap info structure. |
| */ |
| int DIB_BitmapInfoSize( BITMAPINFO * info, WORD coloruse ) |
| { |
| int size = info->bmiHeader.biClrUsed; |
| if (!size && (info->bmiHeader.biBitCount != 24)) |
| size = 1 << info->bmiHeader.biBitCount; |
| if (coloruse == DIB_RGB_COLORS) |
| size = info->bmiHeader.biSize + size * sizeof(RGBQUAD); |
| else |
| size = info->bmiHeader.biSize + size * sizeof(WORD); |
| return size; |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_DIBmpToImage |
| * |
| * Create an XImage pointing to the bitmap data. |
| */ |
| static XImage *DIB_DIBmpToImage( BITMAPINFOHEADER * bmp, void * bmpData ) |
| { |
| extern void _XInitImageFuncPtrs( XImage* ); |
| XImage * image; |
| |
| image = XCreateImage(display, DefaultVisualOfScreen( screen ), |
| bmp->biBitCount, ZPixmap, 0, bmpData, |
| bmp->biWidth, bmp->biHeight, 32, |
| DIB_GetImageWidthBytes(bmp->biWidth,bmp->biBitCount)); |
| if (!image) return 0; |
| image->byte_order = MSBFirst; |
| image->bitmap_bit_order = MSBFirst; |
| image->bitmap_unit = 16; |
| _XInitImageFuncPtrs(image); |
| return image; |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_1 |
| * |
| * SetDIBits for a 1-bit deep DIB. |
| */ |
| static void DIB_SetImageBits_1( WORD lines, BYTE *bits, WORD width, |
| int *colors, XImage *bmpImage ) |
| { |
| WORD i, x; |
| BYTE pad, pix; |
| |
| if (!(width & 31)) pad = 0; |
| else pad = ((32 - (width & 31)) + 7) / 8; |
| |
| while (lines--) |
| { |
| for (i = width/8, x = 0; (i > 0); i--) |
| { |
| pix = *bits++; |
| XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 6) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 5) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 4) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 3) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 2) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[(pix >> 1) & 1] ); |
| XPutPixel( bmpImage, x++, lines, colors[pix & 1] ); |
| } |
| pix = *bits; |
| switch(width & 7) |
| { |
| case 7: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 6: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 5: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 4: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 3: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 2: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); pix <<= 1; |
| case 1: XPutPixel( bmpImage, x++, lines, colors[pix >> 7] ); |
| } |
| bits += pad; |
| } |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_4 |
| * |
| * SetDIBits for a 4-bit deep DIB. |
| */ |
| static void DIB_SetImageBits_4( WORD lines, BYTE *bits, WORD width, |
| int *colors, XImage *bmpImage ) |
| { |
| WORD i, x; |
| BYTE pad; |
| |
| if (!(width & 7)) pad = 0; |
| else pad = ((8 - (width & 7)) + 1) / 2; |
| |
| while (lines--) |
| { |
| for (i = width/2, x = 0; i > 0; i--) |
| { |
| BYTE pix = *bits++; |
| XPutPixel( bmpImage, x++, lines, colors[pix >> 4] ); |
| XPutPixel( bmpImage, x++, lines, colors[pix & 0x0f] ); |
| } |
| if (width & 1) XPutPixel( bmpImage, x, lines, colors[*bits >> 4] ); |
| bits += pad; |
| } |
| } |
| |
| #define check_xy(x,y) \ |
| if (x > width) { \ |
| x = 0; \ |
| if (lines) \ |
| lines--; \ |
| } |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_RLE4 |
| * |
| * SetDIBits for a 4-bit deep compressed DIB. |
| */ |
| static void DIB_SetImageBits_RLE4( WORD lines, BYTE *bits, WORD width, |
| int *colors, XImage *bmpImage ) |
| { |
| int x = 0, c, length; |
| BYTE *begin = bits; |
| |
| lines--; |
| while ((INT)lines >= 0) |
| { |
| length = *bits++; |
| if (length) { /* encoded */ |
| c = *bits++; |
| while (length--) { |
| XPutPixel(bmpImage, x++, lines, colors[c >> 4]); |
| check_xy(x, y); |
| if (length) { |
| length--; |
| XPutPixel(bmpImage, x++, lines, colors[c & 0xf]); |
| check_xy(x, y); |
| } |
| } |
| } else { |
| length = *bits++; |
| switch (length) { |
| case 0: /* eol */ |
| x = 0; |
| lines--; |
| continue; |
| |
| case 1: /* eopicture */ |
| return; |
| |
| case 2: /* delta */ |
| x += *bits++; |
| lines -= *bits++; |
| continue; |
| |
| default: /* absolute */ |
| while (length--) { |
| c = *bits++; |
| XPutPixel(bmpImage, x++, lines, colors[c >> 4]); |
| check_xy(x, y); |
| if (length) { |
| length--; |
| XPutPixel(bmpImage, x++, lines, colors[c & 0xf]); |
| check_xy(x, y); |
| } |
| } |
| if ((bits - begin) & 1) |
| bits++; |
| } |
| } |
| } |
| } |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_8 |
| * |
| * SetDIBits for an 8-bit deep DIB. |
| */ |
| static void DIB_SetImageBits_8( WORD lines, BYTE *bits, WORD width, |
| int *colors, XImage *bmpImage ) |
| { |
| WORD x; |
| BYTE pad = (4 - (width & 3)) & 3; |
| |
| while (lines--) |
| { |
| for (x = 0; x < width; x++) |
| XPutPixel( bmpImage, x, lines, colors[*bits++] ); |
| bits += pad; |
| } |
| } |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_RLE8 |
| * |
| * SetDIBits for an 8-bit deep compressed DIB. |
| * |
| * This function rewritten 941113 by James Youngman. WINE blew out when I |
| * first ran it because my desktop wallpaper is a (large) RLE8 bitmap. |
| * |
| * This was because the algorithm assumed that all RLE8 bitmaps end with the |
| * 'End of bitmap' escape code. This code is very much laxer in what it |
| * allows to end the expansion. Possibly too lax. See the note by |
| * case RleDelta. BTW, MS's documentation implies that a correct RLE8 |
| * bitmap should end with RleEnd, but on the other hand, software exists |
| * that produces ones that don't and Windows 3.1 doesn't complain a bit |
| * about it. |
| * |
| * (No) apologies for my English spelling. [Emacs users: c-indent-level=4]. |
| * James A. Youngman <mbcstjy@afs.man.ac.uk> |
| * [JAY] |
| */ |
| |
| enum Rle8_EscapeCodes |
| { |
| /* |
| * Apologies for polluting your file's namespace... |
| */ |
| RleEol = 0, /* End of line */ |
| RleEnd = 1, /* End of bitmap */ |
| RleDelta = 2 /* Delta */ |
| }; |
| |
| static void DIB_SetImageBits_RLE8(WORD lines, |
| BYTE *bits, |
| WORD width, |
| int *colors, |
| XImage *bmpImage) |
| { |
| int x; /* X-positon on each line. Increases. */ |
| int line; /* Line #. Starts at lines-1, decreases */ |
| BYTE *pIn = bits; /* Pointer to current position in bits */ |
| BYTE length; /* The length pf a run */ |
| BYTE color_index; /* index into colors[] as read from bits */ |
| BYTE escape_code; /* See enum Rle8_EscapeCodes.*/ |
| WORD color; /* value of colour[color_index] */ |
| |
| if (lines == 0) /* Let's hope this doesn't happen. */ |
| return; |
| |
| /* |
| * Note that the bitmap data is stored by Windows starting at the |
| * bottom line of the bitmap and going upwards. Within each line, |
| * the data is stored left-to-right. That's the reason why line |
| * goes from lines-1 to 0. [JAY] |
| */ |
| |
| x = 0; |
| line = lines-1; |
| do |
| { |
| length = *pIn++; |
| |
| /* |
| * If the length byte is not zero (which is the escape value), |
| * We have a run of length pixels all the same colour. The colour |
| * index is stored next. |
| * |
| * If the length byte is zero, we need to read the next byte to |
| * know what to do. [JAY] |
| */ |
| if (length != 0) |
| { |
| /* |
| * [Run-Length] Encoded mode |
| */ |
| color_index = (*pIn++); /* Get the colour index. */ |
| color = colors[color_index]; |
| |
| while(length--) |
| XPutPixel(bmpImage, x++, line, color); |
| } |
| else |
| { |
| /* |
| * Escape codes (may be an absolute sequence though) |
| */ |
| escape_code = (*pIn++); |
| switch(escape_code) |
| { |
| case RleEol: /* =0, end of line */ |
| { |
| x = 0; |
| line--; |
| break; |
| } |
| |
| case RleEnd: /* =1, end of bitmap */ |
| { |
| /* |
| * Not all RLE8 bitmaps end with this |
| * code. For example, Paint Shop Pro |
| * produces some that don't. That's (I think) |
| * what caused the previous implementation to |
| * fail. [JAY] |
| */ |
| line=0; /* Cause exit from do loop. */ |
| } |
| |
| case RleDelta: /* =2, a delta */ |
| { |
| /* |
| * Note that deltaing to line 0 |
| * will cause an exit from the loop, |
| * which may not be what is intended. |
| * The fact that there is a delta in the bits |
| * almost certainly implies that there is data |
| * to follow. You may feel that we should |
| * jump to the top of the loop to avoid exiting |
| * in this case. |
| * |
| * TODO: Decide what to do here in that case. [JAY] |
| */ |
| x += (*pIn++); |
| line -= (*pIn++); |
| if (line == 0) |
| { |
| dprintf_bitmap(stddeb, |
| "DIB_SetImageBits_RLE8(): " |
| "Delta to last line of bitmap " |
| "(wrongly?) causes loop exit\n"); |
| } |
| break; |
| } |
| |
| default: /* >2, switch to absolute mode */ |
| { |
| /* |
| * Absolute Mode |
| */ |
| length = escape_code; |
| while(length--) |
| { |
| color_index = (*pIn++); |
| XPutPixel(bmpImage, x++, line, |
| colors[color_index]); |
| } |
| |
| /* |
| * If you think for a moment you'll realise that the |
| * only time we could ever possibly read an odd |
| * number of bytes is when there is a 0x00 (escape), |
| * a value >0x02 (absolute mode) and then an odd- |
| * length run. Therefore this is the only place we |
| * need to worry about it. Everywhere else the |
| * bytes are always read in pairs. [JAY] |
| */ |
| if (escape_code & 1) |
| pIn++; /* Throw away the pad byte. */ |
| break; |
| } |
| } /* switch (escape_code) : Escape sequence */ |
| } /* process either an encoded sequence or an escape sequence */ |
| |
| /* We expect to come here more than once per line. */ |
| } while (line > 0); /* Do this until the bitmap is filled */ |
| |
| /* |
| * Everybody comes here at the end. |
| * Check how we exited the loop and print a message if it's a bit odd. |
| * [JAY] |
| */ |
| if ( (*(pIn-2) != 0/*escape*/) || (*(pIn-1)!= RleEnd) ) |
| { |
| dprintf_bitmap(stddeb, "DIB_SetImageBits_RLE8(): End-of-bitmap " |
| "without (strictly) proper escape code. Last two " |
| "bytes were: %02X %02X.\n", |
| (int)*(pIn-2), |
| (int)*(pIn-1)); |
| } |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_SetImageBits_24 |
| * |
| * SetDIBits for a 24-bit deep DIB. |
| */ |
| static void DIB_SetImageBits_24( WORD lines, BYTE *bits, WORD width, |
| DC *dc, XImage *bmpImage ) |
| { |
| WORD x; |
| BYTE pad = (4 - ((width*3) & 3)) & 3; |
| |
| while (lines--) |
| { |
| for (x = 0; x < width; x++, bits += 3) |
| { |
| XPutPixel( bmpImage, x, lines, |
| COLOR_ToPhysical( dc, RGB(bits[0],bits[1],bits[2]) )); |
| } |
| bits += pad; |
| } |
| } |
| |
| |
| /*********************************************************************** |
| * DIB_SetImageBits |
| * |
| * Transfer the bits to an X image. |
| * Helper function for SetDIBits() and SetDIBitsToDevice(). |
| */ |
| static int DIB_SetImageBits( DC *dc, WORD lines, WORD depth, LPSTR bits, |
| BITMAPINFO *info, WORD coloruse, |
| Drawable drawable, GC gc, int xSrc, int ySrc, |
| int xDest, int yDest, int width, int height ) |
| { |
| int *colorMapping; |
| XImage *bmpImage; |
| int i, colors; |
| |
| /* Build the color mapping table */ |
| |
| if (info->bmiHeader.biBitCount == 24) colorMapping = NULL; |
| else |
| { |
| colors = info->bmiHeader.biClrUsed; |
| if (!colors) colors = 1 << info->bmiHeader.biBitCount; |
| if (!(colorMapping = (int *)malloc( colors * sizeof(int) ))) |
| return 0; |
| if (coloruse == DIB_RGB_COLORS) |
| { |
| RGBQUAD * rgbPtr = info->bmiColors; |
| for (i = 0; i < colors; i++, rgbPtr++) |
| colorMapping[i] = COLOR_ToPhysical( dc, RGB(rgbPtr->rgbRed, |
| rgbPtr->rgbGreen, |
| rgbPtr->rgbBlue) ); |
| } |
| else |
| { |
| WORD * index = (WORD *)info->bmiColors; |
| for (i = 0; i < colors; i++, index++) |
| colorMapping[i] = COLOR_ToPhysical( dc, PALETTEINDEX(*index) ); |
| } |
| } |
| |
| /* Transfer the pixels */ |
| XCREATEIMAGE(bmpImage, info->bmiHeader.biWidth, lines, depth ); |
| |
| switch(info->bmiHeader.biBitCount) |
| { |
| case 1: |
| DIB_SetImageBits_1( lines, bits, info->bmiHeader.biWidth, |
| colorMapping, bmpImage ); |
| break; |
| case 4: |
| if (info->bmiHeader.biCompression) |
| DIB_SetImageBits_RLE4( lines, bits, info->bmiHeader.biWidth, |
| colorMapping, bmpImage ); |
| else |
| DIB_SetImageBits_4( lines, bits, info->bmiHeader.biWidth, |
| colorMapping, bmpImage ); |
| break; |
| case 8: |
| if (info->bmiHeader.biCompression) |
| DIB_SetImageBits_RLE8( lines, bits, info->bmiHeader.biWidth, |
| colorMapping, bmpImage ); |
| else |
| DIB_SetImageBits_8( lines, bits, info->bmiHeader.biWidth, |
| colorMapping, bmpImage ); |
| break; |
| case 24: |
| DIB_SetImageBits_24( lines, bits, info->bmiHeader.biWidth, |
| dc, bmpImage ); |
| break; |
| } |
| if (colorMapping) free(colorMapping); |
| XPutImage( display, drawable, gc, bmpImage, xSrc, ySrc, |
| xDest, yDest, width, height ); |
| XDestroyImage( bmpImage ); |
| return lines; |
| } |
| |
| |
| /*********************************************************************** |
| * StretchDIBits (GDI.439) |
| */ |
| int StretchDIBits( HDC hdc, |
| WORD xDest, WORD yDest, WORD wDestWidth, WORD wDestHeight, |
| WORD xSrc, WORD ySrc, WORD wSrcWidth, WORD wSrcHeight, |
| LPSTR bits, LPBITMAPINFO info, WORD wUsage, DWORD dwRop ) |
| { |
| HBITMAP hBitmap, hOldBitmap; |
| HDC hdcMem; |
| |
| hBitmap = CreateDIBitmap( hdc, &info->bmiHeader, CBM_INIT, |
| bits, info, wUsage ); |
| hdcMem = CreateCompatibleDC( hdc ); |
| hOldBitmap = SelectObject( hdcMem, hBitmap ); |
| StretchBlt( hdc, xDest, yDest, wDestWidth, wDestHeight, |
| hdcMem, xSrc, ySrc, wSrcWidth, wSrcHeight, dwRop ); |
| SelectObject( hdcMem, hOldBitmap ); |
| DeleteDC( hdcMem ); |
| DeleteObject( hBitmap ); |
| return wSrcHeight; |
| } |
| |
| /*********************************************************************** |
| * SetDIBits (GDI.440) |
| */ |
| int SetDIBits( HDC hdc, HBITMAP hbitmap, WORD startscan, WORD lines, |
| LPSTR bits, BITMAPINFO * info, WORD coloruse ) |
| { |
| DC * dc; |
| BITMAPOBJ * bmp; |
| |
| /* Check parameters */ |
| |
| if (!(dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC ))) return 0; |
| if (!(bmp = (BITMAPOBJ *)GDI_GetObjPtr( hbitmap, BITMAP_MAGIC ))) |
| return 0; |
| if (!lines || (startscan >= (WORD)info->bmiHeader.biHeight)) return 0; |
| if (startscan+lines > info->bmiHeader.biHeight) |
| lines = info->bmiHeader.biHeight - startscan; |
| |
| return CallTo32_LargeStack( (int(*)())DIB_SetImageBits, 14, |
| dc, lines, bmp->bitmap.bmBitsPixel, |
| bits, info, coloruse, bmp->pixmap, |
| BITMAP_GC(bmp), 0, 0, 0, startscan, |
| bmp->bitmap.bmWidth, lines ); |
| } |
| |
| |
| /*********************************************************************** |
| * SetDIBitsToDevice (GDI.443) |
| */ |
| int SetDIBitsToDevice( HDC hdc, short xDest, short yDest, WORD cx, WORD cy, |
| WORD xSrc, WORD ySrc, WORD startscan, WORD lines, |
| LPSTR bits, BITMAPINFO * info, WORD coloruse ) |
| { |
| DC * dc; |
| |
| /* Check parameters */ |
| |
| if (!(dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC ))) return 0; |
| if (!lines || (startscan >= info->bmiHeader.biHeight)) return 0; |
| if (startscan+lines > info->bmiHeader.biHeight) |
| lines = info->bmiHeader.biHeight - startscan; |
| if (ySrc < startscan) ySrc = startscan; |
| else if (ySrc >= startscan+lines) return 0; |
| if (xSrc >= info->bmiHeader.biWidth) return 0; |
| if (ySrc+cy >= startscan+lines) cy = startscan + lines - ySrc; |
| if (xSrc+cx >= info->bmiHeader.biWidth) cx = info->bmiHeader.biWidth-xSrc; |
| if (!cx || !cy) return 0; |
| |
| DC_SetupGCForText( dc ); /* To have the correct colors */ |
| XSetFunction( display, dc->u.x.gc, DC_XROPfunction[dc->w.ROPmode-1] ); |
| return CallTo32_LargeStack( (int(*)())DIB_SetImageBits, 14, |
| dc, lines, dc->w.bitsPerPixel, bits, info, |
| coloruse, dc->u.x.drawable, dc->u.x.gc, |
| xSrc, ySrc - startscan, |
| dc->w.DCOrgX + XLPTODP( dc, xDest ), |
| dc->w.DCOrgY + YLPTODP( dc, yDest ), |
| cx, cy ); |
| } |
| |
| |
| |
| /*********************************************************************** |
| * GetDIBits (GDI.441) |
| */ |
| int GetDIBits( HDC hdc, HBITMAP hbitmap, WORD startscan, WORD lines, |
| LPSTR bits, BITMAPINFO * info, WORD coloruse ) |
| { |
| DC * dc; |
| BITMAPOBJ * bmp; |
| PALETTEENTRY * palEntry; |
| PALETTEOBJ * palette; |
| XImage * bmpImage, * dibImage; |
| int i, x, y; |
| |
| if (!lines) return 0; |
| if (!(dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC ))) return 0; |
| if (!(bmp = (BITMAPOBJ *)GDI_GetObjPtr( hbitmap, BITMAP_MAGIC ))) |
| return 0; |
| if (!(palette = (PALETTEOBJ*)GDI_GetObjPtr( dc->w.hPalette, PALETTE_MAGIC ))) |
| return 0; |
| |
| /* Transfer color info */ |
| |
| palEntry = palette->logpalette.palPalEntry; |
| for (i = 0; i < info->bmiHeader.biClrUsed; i++, palEntry++) |
| { |
| if (coloruse == DIB_RGB_COLORS) |
| { |
| info->bmiColors[i].rgbRed = palEntry->peRed; |
| info->bmiColors[i].rgbGreen = palEntry->peGreen; |
| info->bmiColors[i].rgbBlue = palEntry->peBlue; |
| info->bmiColors[i].rgbReserved = 0; |
| } |
| else ((WORD *)info->bmiColors)[i] = (WORD)i; |
| } |
| |
| /* Transfer the pixels (very slow...) */ |
| |
| if (bits) |
| { |
| bmpImage = (XImage *)CallTo32_LargeStack( (int (*)())XGetImage, 8, |
| display, bmp->pixmap, 0, 0, bmp->bitmap.bmWidth, |
| bmp->bitmap.bmHeight, AllPlanes, ZPixmap ); |
| dibImage = DIB_DIBmpToImage( &info->bmiHeader, bits ); |
| |
| for (y = 0; y < lines; y++) |
| { |
| for (x = 0; x < info->bmiHeader.biWidth; x++) |
| { |
| XPutPixel( dibImage, x, y, |
| XGetPixel(bmpImage, x, bmp->bitmap.bmHeight-startscan-y-1) ); |
| |
| } |
| } |
| |
| dibImage->data = NULL; |
| XDestroyImage( dibImage ); |
| XDestroyImage( bmpImage ); |
| } |
| return lines; |
| } |
| |
| |
| /*********************************************************************** |
| * CreateDIBitmap (GDI.442) |
| */ |
| HBITMAP CreateDIBitmap( HDC hdc, BITMAPINFOHEADER * header, DWORD init, |
| LPSTR bits, BITMAPINFO * data, WORD coloruse ) |
| { |
| HBITMAP handle; |
| |
| handle = CreateCompatibleBitmap( hdc, header->biWidth, header->biHeight ); |
| /* handle = CreateBitmap( header->biWidth, header->biHeight, |
| 1, header->biBitCount, NULL ); |
| */ |
| if (!handle) return 0; |
| if (init == CBM_INIT) SetDIBits( hdc, handle, 0, header->biHeight, |
| bits, data, coloruse ); |
| return handle; |
| } |
| |
| /*********************************************************************** |
| * DrawIcon (USER.84) |
| */ |
| BOOL DrawIcon(HDC hDC, short x, short y, HICON hIcon) |
| { |
| ICONALLOC *lpico; |
| BITMAP bm; |
| HBITMAP hBitTemp; |
| HDC hMemDC; |
| COLORREF oldFg, oldBg; |
| |
| oldFg = SetTextColor( hDC, RGB(0,0,0) ); |
| oldBg = SetBkColor( hDC, RGB(255,255,255) ); |
| dprintf_icon(stddeb,"DrawIcon(%04X, %d, %d, %04X) \n", hDC, x, y, hIcon); |
| if (hIcon == (HICON)NULL) return FALSE; |
| lpico = (ICONALLOC *)GlobalLock(hIcon); |
| GetObject(lpico->hBitmap, sizeof(BITMAP), (LPSTR)&bm); |
| hMemDC = CreateCompatibleDC(hDC); |
| if (lpico->hBitMask) |
| { |
| hBitTemp = SelectObject(hMemDC, lpico->hBitMask); |
| BitBlt(hDC, x, y, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCAND); |
| SelectObject(hMemDC, lpico->hBitmap); |
| BitBlt(hDC, x, y, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCINVERT); |
| } |
| else /* no mask -> everything is masked; so use SRCCOPY as it's faster */ |
| { |
| hBitTemp = SelectObject(hMemDC, lpico->hBitmap); |
| BitBlt(hDC, x, y, bm.bmWidth, bm.bmHeight, hMemDC, 0, 0, SRCCOPY); |
| } |
| SelectObject( hMemDC, hBitTemp ); |
| DeleteDC(hMemDC); |
| GlobalUnlock( hIcon ); |
| SetTextColor( hDC, oldFg ); |
| SetBkColor( hDC, oldBg ); |
| return TRUE; |
| } |