/*
* Copyright 2000-2007 Sun Microsystems, Inc. All Rights Reserved.
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
* This code is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License version 2 only, as
* published by the Free Software Foundation. Sun designates this
* particular file as subject to the "Classpath" exception as provided
* by Sun in the LICENSE file that accompanied this code.
*
* This code is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
* version 2 for more details (a copy is included in the LICENSE file that
* accompanied this code).
*
* You should have received a copy of the GNU General Public License version
* 2 along with this work; if not, write to the Free Software Foundation,
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
*
* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
* CA 95054 USA or visit www.sun.com if you need additional information or
* have any questions.
*/
#include <stdlib.h>
#include <jni.h>
#include <jlong.h>
#include "X11SurfaceData.h"
#include "Region.h"
JNIEXPORT void JNICALL
Java_sun_java2d_x11_X11PMBlitLoops_nativeBlit
(JNIEnv *env, jobject joSelf,
jlong srcData, jlong dstData,
jlong gc, jobject clip,
jint srcx, jint srcy,
jint dstx, jint dsty,
jint width, jint height)
{
#ifndef HEADLESS
X11SDOps *srcXsdo, *dstXsdo;
SurfaceDataBounds span, srcBounds;
RegionData clipInfo;
GC xgc;
if (width <= 0 || height <= 0) {
return;
}
srcXsdo = (X11SDOps *)jlong_to_ptr(srcData);
if (srcXsdo == NULL) {
return;
}
dstXsdo = (X11SDOps *)jlong_to_ptr(dstData);
if (dstXsdo == NULL) {
return;
}
if (Region_GetInfo(env, clip, &clipInfo)) {
return;
}
xgc = (GC)gc;
if (xgc == NULL) {
return;
}
#ifdef MITSHM
if (srcXsdo->isPixmap) {
X11SD_UnPuntPixmap(srcXsdo);
}
#endif /* MITSHM */
/* clip the source rect to the source pixmap's dimensions */
srcBounds.x1 = srcx;
srcBounds.y1 = srcy;
srcBounds.x2 = srcx + width;
srcBounds.y2 = srcy + height;
SurfaceData_IntersectBoundsXYXY(&srcBounds,
0, 0, srcXsdo->pmWidth, srcXsdo->pmHeight);
span.x1 = dstx;
span.y1 = dsty;
span.x2 = dstx + width;
span.y2 = dsty + height;
/* intersect the source and dest rects */
SurfaceData_IntersectBlitBounds(&srcBounds, &span,
dstx - srcx, dsty - srcy);
srcx = srcBounds.x1;
srcy = srcBounds.y1;
dstx = span.x1;
dsty = span.y1;
if (srcXsdo->bitmask != 0) {
XSetClipOrigin(awt_display, xgc, dstx - srcx, dsty - srcy);
XSetClipMask(awt_display, xgc, srcXsdo->bitmask);
}
Region_IntersectBounds(&clipInfo, &span);
if (!Region_IsEmpty(&clipInfo)) {
Region_StartIteration(env, &clipInfo);
srcx -= dstx;
srcy -= dsty;
while (Region_NextIteration(&clipInfo, &span)) {
XCopyArea(awt_display, srcXsdo->drawable, dstXsdo->drawable, xgc,
srcx + span.x1, srcy + span.y1,
span.x2 - span.x1, span.y2 - span.y1,
span.x1, span.y1);
}
Region_EndIteration(env, &clipInfo);
}
if (srcXsdo->bitmask != 0) {
XSetClipMask(awt_display, xgc, None);
}
#ifdef MITSHM
if (srcXsdo->shmPMData.usingShmPixmap) {
srcXsdo->shmPMData.xRequestSent = JNI_TRUE;
}
#endif /* MITSHM */
X11SD_DirectRenderNotify(env, dstXsdo);
#endif /* !HEADLESS */
}
JNIEXPORT void JNICALL
Java_sun_java2d_x11_X11PMBlitBgLoops_nativeBlitBg
(JNIEnv *env, jobject joSelf,
jlong srcData, jlong dstData,
jlong xgc, jint pixel,
jint srcx, jint srcy,
jint dstx, jint dsty,
jint width, jint height)
{
#ifndef HEADLESS
X11SDOps *srcXsdo, *dstXsdo;
GC dstGC;
SurfaceDataBounds dstBounds, srcBounds;
Drawable srcDrawable;
if (width <= 0 || height <= 0) {
return;
}
srcXsdo = (X11SDOps *)jlong_to_ptr(srcData);
if (srcXsdo == NULL) {
return;
}
dstXsdo = (X11SDOps *)jlong_to_ptr(dstData);
if (dstXsdo == NULL) {
return;
}
dstGC = (GC)xgc;
if (dstGC == NULL) {
return;
}
#ifdef MITSHM
if (srcXsdo->isPixmap) {
X11SD_UnPuntPixmap(srcXsdo);
}
#endif /* MITSHM */
srcDrawable = srcXsdo->GetPixmapWithBg(env, srcXsdo, pixel);
if (srcDrawable == 0) {
return;
}
/* clip the source rect to the source pixmap's dimensions */
srcBounds.x1 = srcx;
srcBounds.y1 = srcy;
srcBounds.x2 = srcx + width;
srcBounds.y2 = srcy + height;
SurfaceData_IntersectBoundsXYXY(&srcBounds,
0, 0, srcXsdo->pmWidth, srcXsdo->pmHeight);
dstBounds.x1 = dstx;
dstBounds.y1 = dsty;
dstBounds.x2 = dstx + width;
dstBounds.y2 = dsty + height;
/* intersect the source and dest rects */
SurfaceData_IntersectBlitBounds(&srcBounds, &dstBounds,
dstx - srcx, dsty - srcy);
srcx = srcBounds.x1;
srcy = srcBounds.y1;
dstx = dstBounds.x1;
dsty = dstBounds.y1;
width = srcBounds.x2 - srcBounds.x1;
height = srcBounds.y2 - srcBounds.y1;
/* do an unmasked copy as we've already filled transparent
pixels of the source image with the desired color */
XCopyArea(awt_display, srcDrawable, dstXsdo->drawable, dstGC,
srcx, srcy, width, height, dstx, dsty);
srcXsdo->ReleasePixmapWithBg(env, srcXsdo);
X11SD_DirectRenderNotify(env, dstXsdo);
#endif /* !HEADLESS */
}
/*
* Class: sun_java2d_x11_X11PMBlitLoops
* Method: updateBitmask
* Signature: (Lsun/java2d/SurfaceData;Lsun/java2d/SurfaceData;)V
*/
JNIEXPORT void JNICALL
Java_sun_java2d_x11_X11PMBlitLoops_updateBitmask
(JNIEnv *env, jclass xpmbl, jobject srcsd, jobject dstsd, jboolean isICM)
{
#ifndef HEADLESS
SurfaceDataOps *srcOps = SurfaceData_GetOps(env, srcsd);
X11SDOps *xsdo = (X11SDOps *) SurfaceData_GetOps(env, dstsd);
SurfaceDataRasInfo srcInfo;
int flags;
int screen;
int width;
int height;
jint srcScan, dstScan;
int rowCount;
unsigned char *pDst;
XImage *image;
GC xgc;
if (srcOps == NULL || xsdo == NULL) {
JNU_ThrowNullPointerException(env, "Null BISD in updateMaskRegion");
return;
}
AWT_LOCK();
screen = xsdo->configData->awt_visInfo.screen;
width = xsdo->pmWidth;
height = xsdo->pmHeight;
if (xsdo->bitmask == 0) {
/* create the bitmask if it is not yet created */
xsdo->bitmask = XCreatePixmap(awt_display,
RootWindow(awt_display, screen),
width, height, 1);
if (xsdo->bitmask == 0) {
AWT_UNLOCK();
JNU_ThrowOutOfMemoryError(env,
"Cannot create bitmask for "
"offscreen surface");
return;
}
}
/* Create a bitmask image and then blit it to the pixmap. */
image = XCreateImage(awt_display, DefaultVisual(awt_display, screen),
1, XYBitmap, 0, NULL, width, height, 32, 0);
if (image == NULL) {
AWT_UNLOCK();
JNU_ThrowOutOfMemoryError(env, "Cannot allocate bitmask for mask");
return;
}
dstScan = image->bytes_per_line;
image->data = malloc(dstScan * height);
if (image->data == NULL) {
XFree(image);
AWT_UNLOCK();
JNU_ThrowOutOfMemoryError(env, "Cannot allocate bitmask for mask");
return;
}
pDst = (unsigned char *)image->data;
srcInfo.bounds.x1 = 0;
srcInfo.bounds.y1 = 0;
srcInfo.bounds.x2 = width;
srcInfo.bounds.y2 = height;
flags = (isICM ? (SD_LOCK_LUT | SD_LOCK_READ) : SD_LOCK_READ);
if (srcOps->Lock(env, srcOps, &srcInfo, flags) != SD_SUCCESS) {
XDestroyImage(image);
AWT_UNLOCK();
return;
}
srcOps->GetRasInfo(env, srcOps, &srcInfo);
rowCount = height;
if (isICM) {
unsigned char *pSrc;
jint *srcLut;
srcScan = srcInfo.scanStride;
srcLut = srcInfo.lutBase;
pSrc = (unsigned char *)srcInfo.rasBase;
if (image->bitmap_bit_order == MSBFirst) {
do {
int x = 0, bx = 0;
unsigned int pix = 0;
unsigned int bit = 0x80;
unsigned char *srcPixel = pSrc;
do {
if (bit == 0) {
pDst[bx++] = (unsigned char)pix;
pix = 0;
bit = 0x80;
}
pix |= bit & (srcLut[*srcPixel++] >> 31);
bit >>= 1;
} while (++x < width);
pDst[bx] = (unsigned char)pix;
pDst += dstScan;
pSrc = (unsigned char *) (((intptr_t)pSrc) + srcScan);
} while (--rowCount > 0);
} else {
do {
int x = 0, bx = 0;
unsigned int pix = 0;
unsigned int bit = 1;
unsigned char *srcPixel = pSrc;
do {
if ((bit >> 8) != 0) {
pDst[bx++] = (unsigned char) pix;
pix = 0;
bit = 1;
}
pix |= bit & (srcLut[*srcPixel++] >> 31);
bit <<= 1;
} while (++x < width);
pDst[bx] = (unsigned char) pix;
pDst += dstScan;
pSrc = (unsigned char *) (((intptr_t)pSrc) + srcScan);
} while (--rowCount > 0);
}
} else /*DCM with ARGB*/ {
unsigned int *pSrc;
/* this is a number of pixels in a row, not number of bytes */
srcScan = srcInfo.scanStride;
pSrc = (unsigned int *)srcInfo.rasBase;
if (image->bitmap_bit_order == MSBFirst) {
do {
int x = 0, bx = 0;
unsigned int pix = 0;
unsigned int bit = 0x80;
int *srcPixel = (int *) pSrc;
do {
if (bit == 0) {
/* next word */
pDst[bx++] = (unsigned char)pix;
pix = 0;
bit = 0x80;
}
if (*srcPixel++ & 0xff000000) {
/* if src pixel is opaque, set the bit in the bitmap */
pix |= bit;
}
bit >>= 1;
} while (++x < width);
/* last pixels in a row */
pDst[bx] = (unsigned char)pix;
pDst += dstScan;
pSrc = (unsigned int *) (((intptr_t)pSrc) + srcScan);
} while (--rowCount > 0);
} else {
do {
int x = 0, bx = 0;
unsigned int pix = 0;
unsigned int bit = 1;
int *srcPixel = (int *) pSrc;
do {
if ((bit >> 8) != 0) {
pDst[bx++] = (unsigned char)pix;
pix = 0;
bit = 1;
}
if (*srcPixel++ & 0xff000000) {
/* if src pixel is opaque, set the bit in the bitmap */
pix |= bit;
}
bit <<= 1;
} while (++x < width);
pDst[bx] = (unsigned char)pix;
pDst += dstScan;
pSrc = (unsigned int *) (((intptr_t)pSrc) + srcScan);
} while (--rowCount > 0);
}
}
SurfaceData_InvokeRelease(env, srcOps, &srcInfo);
SurfaceData_InvokeUnlock(env, srcOps, &srcInfo);
xgc = XCreateGC(awt_display, xsdo->bitmask, 0L, NULL);
XSetForeground(awt_display, xgc, 1);
XSetBackground(awt_display, xgc, 0);
XPutImage(awt_display, xsdo->bitmask, xgc,
image, 0, 0, 0, 0, width, height);
XFreeGC(awt_display, xgc);
XDestroyImage(image);
AWT_UNLOCK();
#endif /* !HEADLESS */
}