/* * GDI bit-blit operations * * Copyright 1993 Alexandre Julliard */ static char Copyright[] = "Copyright Alexandre Julliard, 1993"; #include #include #include #include #include "gdi.h" #include "metafile.h" extern const int DC_XROPfunction[]; #define MIN(a,b) ((a) < (b) ? (a) : (b)) #define MAX(a,b) ((a) > (b) ? (a) : (b)) /*********************************************************************** * PatBlt (GDI.29) */ BOOL PatBlt( HDC hdc, short left, short top, short width, short height, DWORD rop) { int x1, x2, y1, y2; DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC ); if (!dc) { dc = (DC *)GDI_GetObjPtr(hdc, METAFILE_DC_MAGIC); if (!dc) return FALSE; MF_MetaParam6(dc, META_PATBLT, left, top, width, height, HIWORD(rop), LOWORD(rop)); return TRUE; } #ifdef DEBUG_GDI printf( "PatBlt: %d %d,%d %dx%d %06x\n", hdc, left, top, width, height, rop ); #endif rop >>= 16; if (!DC_SetupGCForBrush( dc )) rop &= 0x0f; else rop = (rop & 0x03) | ((rop >> 4) & 0x0c); XSetFunction( XT_display, dc->u.x.gc, DC_XROPfunction[rop] ); x1 = dc->w.DCOrgX + XLPTODP( dc, left ); x2 = dc->w.DCOrgX + XLPTODP( dc, left + width ); y1 = dc->w.DCOrgY + YLPTODP( dc, top ); y2 = dc->w.DCOrgY + YLPTODP( dc, top + height ); XFillRectangle( XT_display, dc->u.x.drawable, dc->u.x.gc, MIN(x1,x2), MIN(y1,y2), abs(x2-x1), abs(y2-y1) ); return TRUE; } /*********************************************************************** * BitBlt (GDI.34) */ BOOL BitBlt( HDC hdcDest, short xDest, short yDest, short width, short height, HDC hdcSrc, short xSrc, short ySrc, DWORD rop ) { int xs1, xs2, ys1, ys2; int xd1, xd2, yd1, yd2; DC *dcDest, *dcSrc; #ifdef DEBUG_GDI printf( "BitBlt: %d %d,%d %dx%d %d %d,%d %08x\n", hdcDest, xDest, yDest, width, height, hdcSrc, xSrc, ySrc, rop ); #endif if (width == 0 || height == 0) return FALSE; if ((rop & 0xcc0000) == ((rop & 0x330000) << 2)) return PatBlt( hdcDest, xDest, yDest, width, height, rop ); rop >>= 16; if ((rop & 0x0f) != (rop >> 4)) { printf( "BitBlt: Unimplemented ROP %02x\n", rop ); return FALSE; } dcDest = (DC *) GDI_GetObjPtr( hdcDest, DC_MAGIC ); if (!dcDest) return FALSE; dcSrc = (DC *) GDI_GetObjPtr( hdcSrc, DC_MAGIC ); if (!dcSrc) return FALSE; xs1 = dcSrc->w.DCOrgX + XLPTODP( dcSrc, xSrc ); xs2 = dcSrc->w.DCOrgX + XLPTODP( dcSrc, xSrc + width ); ys1 = dcSrc->w.DCOrgY + YLPTODP( dcSrc, ySrc ); ys2 = dcSrc->w.DCOrgY + YLPTODP( dcSrc, ySrc + height ); xd1 = dcDest->w.DCOrgX + XLPTODP( dcDest, xDest ); xd2 = dcDest->w.DCOrgX + XLPTODP( dcDest, xDest + width ); yd1 = dcDest->w.DCOrgY + YLPTODP( dcDest, yDest ); yd2 = dcDest->w.DCOrgY + YLPTODP( dcDest, yDest + height ); if ((abs(xs2-xs1) != abs(xd2-xd1)) || (abs(ys2-ys1) != abs(yd2-yd1))) return FALSE; /* Should call StretchBlt here */ DC_SetupGCForText( dcDest ); XSetFunction( XT_display, dcDest->u.x.gc, DC_XROPfunction[rop & 0x0f] ); if (dcSrc->w.bitsPerPixel == dcDest->w.bitsPerPixel) { XCopyArea( XT_display, dcSrc->u.x.drawable, dcDest->u.x.drawable, dcDest->u.x.gc, MIN(xs1,xs2), MIN(ys1,ys2), abs(xs2-xs1), abs(ys2-ys1), MIN(xd1,xd2), MIN(yd1,yd2) ); } else { if (dcSrc->w.bitsPerPixel != 1) return FALSE; XCopyPlane( XT_display, dcSrc->u.x.drawable, dcDest->u.x.drawable, dcDest->u.x.gc, MIN(xs1,xs2), MIN(ys1,ys2), abs(xs2-xs1), abs(ys2-ys1), MIN(xd1,xd2), MIN(yd1,yd2), 1 ); } return TRUE; } /*********************************************************************** * black on white stretch -- favors color pixels over white * */ static void bonw_stretch(XImage *sxi, XImage *dxi, short widthSrc, short heightSrc, short widthDest, short heightDest) { float deltax, deltay, sourcex, sourcey, oldsourcex, oldsourcey; register int x, y; Pixel whitep; int totalx, totaly, xavgwhite, yavgwhite; register int i; int endx, endy; deltax = (float)widthSrc/widthDest; deltay = (float)heightSrc/heightDest; whitep = WhitePixel(display, DefaultScreen(display)); oldsourcex = 0; for (x=0, sourcex=0.0; x 1.0) { totalx = 0; endx = (int)sourcex; for (i=(int)oldsourcex; i<=endx; i++) if (XGetPixel(sxi, i, (int)sourcey) == whitep) totalx++; xavgwhite = (totalx > (int)(deltax / 2.0)); } else { xavgwhite = 0; } oldsourcey = 0; for (y=0, sourcey=0.0; y 1.0) { totaly = 0; endy = (int)sourcey; for (i=(int)oldsourcey; i<=endy; i++) if (XGetPixel(sxi, (int)sourcex, i) == whitep) totaly++; yavgwhite = (totaly > ((int)deltay / 2)); } else { yavgwhite = 0; } if (xavgwhite && yavgwhite) XPutPixel(dxi, x, y, whitep); else XPutPixel(dxi, x, y, XGetPixel(sxi, (int)sourcex, (int)sourcey)); } /* for all y in dest */ } /* for all x in dest */ } /*********************************************************************** * white on black stretch -- favors color pixels over black * */ static void wonb_stretch(XImage *sxi, XImage *dxi, short widthSrc, short heightSrc, short widthDest, short heightDest) { float deltax, deltay, sourcex, sourcey, oldsourcex, oldsourcey; register int x, y; Pixel blackp; int totalx, totaly, xavgblack, yavgblack; register int i; int endx, endy; deltax = (float)widthSrc/widthDest; deltay = (float)heightSrc/heightDest; blackp = WhitePixel(display, DefaultScreen(display)); oldsourcex = 0; for (x=0, sourcex=0.0; x 1.0) { totalx = 0; endx = (int)sourcex; for (i=(int)oldsourcex; i<=endx; i++) if (XGetPixel(sxi, i, (int)sourcey) == blackp) totalx++; xavgblack = (totalx > (int)(deltax / 2.0)); } else { xavgblack = 0; } oldsourcey = 0; for (y=0, sourcey=0.0; y 1.0) { totaly = 0; endy = (int)sourcey; for (i=(int)oldsourcey; i<=endy; i++) if (XGetPixel(sxi, (int)sourcex, i) == blackp) totaly++; yavgblack = (totaly > ((int)deltay / 2)); } else { yavgblack = 0; } if (xavgblack && yavgblack) XPutPixel(dxi, x, y, blackp); else XPutPixel(dxi, x, y, XGetPixel(sxi, (int)sourcex, (int)sourcey)); } /* for all y in dest */ } /* for all x in dest */ } /* We use the 32-bit to 64-bit multiply and 64-bit to 32-bit divide of the */ /* 386 (which gcc doesn't know well enough) to efficiently perform integer */ /* scaling without having to worry about overflows. */ /* ##### muldiv64() borrowed from svgalib 1.03 ##### */ static inline int muldiv64( int m1, int m2, int d ) { /* int32 * int32 -> int64 / int32 -> int32 */ #ifdef i386 int result; __asm__( "imull %%edx\n\t" "idivl %3\n\t" : "=a" (result) /* out */ : "a" (m1), "d" (m2), "g" (d) /* in */ : "ax", "dx" /* mod */ ); return result; #else return m1 * m2 / d; #endif } /*********************************************************************** * color stretch -- deletes unused pixels * */ static void color_stretch(XImage *sxi, XImage *dxi, short widthSrc, short heightSrc, short widthDest, short heightDest) { register int x, y, sx, sy, xfactor, yfactor; xfactor = muldiv64(widthSrc, 65536, widthDest); yfactor = muldiv64(heightSrc, 65536, heightDest); sy = 0; for (y = 0; y < heightDest;) { int sourcey = sy >> 16; sx = 0; for (x = 0; x < widthDest; x++) { XPutPixel(dxi, x, y, XGetPixel(sxi, sx >> 16, sourcey)); sx += xfactor; } y++; while (y < heightDest) { int py; sourcey = sy >> 16; sy += yfactor; if ((sy >> 16) != sourcey) break; /* vertical stretch => copy previous line */ py = y - 1; for (x = 0; x < widthDest; x++) XPutPixel(dxi, x, y, XGetPixel(dxi, x, py)); y++; } } } /*********************************************************************** * StretchBlt (GDI.35) * * o StretchBlt is CPU intensive so we only call it if we have * to. Checks are made to see if we can call BitBlt instead. * * o the stretching is slowish, some integer interpolation would * speed it up. * * o only black on white and color copy have been tested */ BOOL StretchBlt( HDC hdcDest, short xDest, short yDest, short widthDest, short heightDest, HDC hdcSrc, short xSrc, short ySrc, short widthSrc, short heightSrc, DWORD rop ) { int xs1, xs2, ys1, ys2; int xd1, xd2, yd1, yd2; DC *dcDest, *dcSrc; XImage *sxi, *dxi; WORD stretchmode; BOOL flg; #ifdef DEBUG_GDI fprintf(stderr, "StretchBlt: %d %d,%d %dx%d %d %d,%d %dx%d %08x\n", hdcDest, xDest, yDest, widthDest, heightDest, hdcSrc, xSrc, ySrc, widthSrc, heightSrc, rop ); printf("StretchMode is %x\n", ((DC *)GDI_GetObjPtr(hdcDest, DC_MAGIC))->w.stretchBltMode); #endif if (widthDest == 0 || heightDest == 0) return FALSE; if (widthSrc == 0 || heightSrc == 0) return FALSE; if ((rop & 0xcc0000) == ((rop & 0x330000) << 2)) return PatBlt( hdcDest, xDest, yDest, widthDest, heightDest, rop ); /* don't stretch the bitmap unless we have to; if we don't, * call BitBlt for a performance boost */ if (widthSrc == widthDest && heightSrc == heightDest) { return BitBlt(hdcDest, xDest, yDest, widthSrc, heightSrc, hdcSrc, xSrc, ySrc, rop); } rop >>= 16; if ((rop & 0x0f) != (rop >> 4)) { printf( "StretchBlt: Unimplemented ROP %02x\n", rop ); return FALSE; } dcDest = (DC *) GDI_GetObjPtr( hdcDest, DC_MAGIC ); if (!dcDest) return FALSE; dcSrc = (DC *) GDI_GetObjPtr( hdcSrc, DC_MAGIC ); if (!dcSrc) return FALSE; xs1 = dcSrc->w.DCOrgX + XLPTODP( dcSrc, xSrc ); xs2 = dcSrc->w.DCOrgX + XLPTODP( dcSrc, xSrc + widthSrc ); ys1 = dcSrc->w.DCOrgY + YLPTODP( dcSrc, ySrc ); ys2 = dcSrc->w.DCOrgY + YLPTODP( dcSrc, ySrc + heightSrc ); xd1 = dcDest->w.DCOrgX + XLPTODP( dcDest, xDest ); xd2 = dcDest->w.DCOrgX + XLPTODP( dcDest, xDest + widthDest ); yd1 = dcDest->w.DCOrgY + YLPTODP( dcDest, yDest ); yd2 = dcDest->w.DCOrgY + YLPTODP( dcDest, yDest + heightDest ); /* get a source and destination image so we can manipulate * the pixels */ sxi = XGetImage(display, dcSrc->u.x.drawable, xs1, ys1, widthSrc, heightSrc, AllPlanes, ZPixmap); dxi = XCreateImage(display, DefaultVisualOfScreen(screen), screenDepth, ZPixmap, 0, NULL, widthDest, heightDest, 32, 0); dxi->data = malloc(dxi->bytes_per_line * heightDest); stretchmode = ((DC *)GDI_GetObjPtr(hdcDest, DC_MAGIC))->w.stretchBltMode; /* the actual stretching is done here, we'll try to use * some interolation to get some speed out of it in * the future */ switch (stretchmode) { case BLACKONWHITE: color_stretch(sxi, dxi, widthSrc, heightSrc, widthDest, heightDest); /* bonw_stretch(sxi, dxi, widthSrc, heightSrc, widthDest, heightDest); */ break; case WHITEONBLACK: color_stretch(sxi, dxi, widthSrc, heightSrc, widthDest, heightDest); /* wonb_stretch(sxi, dxi, widthSrc, heightSrc, widthDest, heightDest); */ break; case COLORONCOLOR: color_stretch(sxi, dxi, widthSrc, heightSrc, widthDest, heightDest); break; default: fprintf(stderr, "StretchBlt: unknown stretchmode '%d'\n", stretchmode); break; } DC_SetupGCForText(dcDest); XSetFunction(display, dcDest->u.x.gc, DC_XROPfunction[rop & 0x0f]); XPutImage(display, dcDest->u.x.drawable, dcDest->u.x.gc, dxi, 0, 0, MIN(xd1,xd2), MIN(yd1,yd2), widthDest, heightDest); /* now free the images we created */ XDestroyImage(sxi); XDestroyImage(dxi); return TRUE; }