405 lines
11 KiB
C
405 lines
11 KiB
C
/***********************************************************
|
|
|
|
Copyright 1987, 1998 The Open Group
|
|
|
|
Permission to use, copy, modify, distribute, and sell this software and its
|
|
documentation for any purpose is hereby granted without fee, provided that
|
|
the above copyright notice appear in all copies and that both that
|
|
copyright notice and this permission notice appear in supporting
|
|
documentation.
|
|
|
|
The above copyright notice and this permission notice shall be included in
|
|
all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
|
AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
Except as contained in this notice, the name of The Open Group shall not be
|
|
used in advertising or otherwise to promote the sale, use or other dealings
|
|
in this Software without prior written authorization from The Open Group.
|
|
|
|
|
|
Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
|
|
|
|
All Rights Reserved
|
|
|
|
Permission to use, copy, modify, and distribute this software and its
|
|
documentation for any purpose and without fee is hereby granted,
|
|
provided that the above copyright notice appear in all copies and that
|
|
both that copyright notice and this permission notice appear in
|
|
supporting documentation, and that the name of Digital not be
|
|
used in advertising or publicity pertaining to distribution of the
|
|
software without specific, written prior permission.
|
|
|
|
DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
|
|
ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
|
|
DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
|
|
ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
|
|
WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
|
|
ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
|
|
SOFTWARE.
|
|
|
|
******************************************************************/
|
|
#ifdef HAVE_DIX_CONFIG_H
|
|
#include <dix-config.h>
|
|
#endif
|
|
|
|
#include <X11/X.h>
|
|
#include "misc.h"
|
|
#include "cfb.h"
|
|
#include "cfbmskbits.h"
|
|
#include "miline.h"
|
|
|
|
/* Dashed bresenham line */
|
|
|
|
void
|
|
cfbBresD(rrops,
|
|
pdashIndex, pDash, numInDashList, pdashOffset, isDoubleDash,
|
|
addrl, nlwidth,
|
|
signdx, signdy, axis, x1, y1, e, e1, e2, len)
|
|
cfbRRopPtr rrops;
|
|
int *pdashIndex; /* current dash */
|
|
unsigned char *pDash; /* dash list */
|
|
int numInDashList; /* total length of dash list */
|
|
int *pdashOffset; /* offset into current dash */
|
|
int isDoubleDash;
|
|
CfbBits *addrl; /* pointer to base of bitmap */
|
|
int nlwidth; /* width in longwords of bitmap */
|
|
int signdx, signdy; /* signs of directions */
|
|
int axis; /* major axis (Y_AXIS or X_AXIS) */
|
|
int x1, y1; /* initial point */
|
|
register int e; /* error accumulator */
|
|
register int e1; /* bresenham increments */
|
|
int e2;
|
|
int len; /* length of line */
|
|
{
|
|
#ifdef PIXEL_ADDR
|
|
register PixelType *addrp;
|
|
#endif
|
|
register int e3 = e2-e1;
|
|
int dashIndex;
|
|
int dashOffset;
|
|
int dashRemaining;
|
|
CfbBits xorFg, andFg, xorBg, andBg;
|
|
Bool isCopy;
|
|
int thisDash;
|
|
#if PSZ == 24
|
|
CfbBits xorPiQxlFg[3], andPiQxlFg[3], xorPiQxlBg[3], andPiQxlBg[3];
|
|
char *addrb;
|
|
int signdx3, signdy3;
|
|
#endif
|
|
|
|
dashOffset = *pdashOffset;
|
|
dashIndex = *pdashIndex;
|
|
isCopy = (rrops[0].rop == GXcopy && rrops[1].rop == GXcopy);
|
|
#if PSZ == 24
|
|
xorFg = rrops[0].xor & 0xffffff;
|
|
andFg = rrops[0].and & 0xffffff;
|
|
xorBg = rrops[1].xor & 0xffffff;
|
|
andBg = rrops[1].and & 0xffffff;
|
|
xorPiQxlFg[0] = xorFg | (xorFg << 24);
|
|
xorPiQxlFg[1] = (xorFg >> 8) | (xorFg << 16);
|
|
xorPiQxlFg[2] = (xorFg >> 16) | (xorFg << 8);
|
|
andPiQxlFg[0] = andFg | (andFg << 24);
|
|
andPiQxlFg[1] = (andFg >> 8) | (andFg << 16);
|
|
andPiQxlFg[2] = (andFg >> 16) | (andFg << 8);
|
|
xorPiQxlBg[0] = xorBg | (xorBg << 24);
|
|
xorPiQxlBg[1] = (xorBg >> 8) | (xorBg << 16);
|
|
xorPiQxlBg[2] = (xorBg >> 16) | (xorBg << 8);
|
|
andPiQxlBg[0] = andBg | (andBg << 24);
|
|
andPiQxlBg[1] = (andBg >> 8) | (andBg << 16);
|
|
andPiQxlBg[2] = (andFg >> 16) | (andBg << 8);
|
|
#else
|
|
xorFg = rrops[0].xor;
|
|
andFg = rrops[0].and;
|
|
xorBg = rrops[1].xor;
|
|
andBg = rrops[1].and;
|
|
#endif
|
|
dashRemaining = pDash[dashIndex] - dashOffset;
|
|
if ((thisDash = dashRemaining) >= len)
|
|
{
|
|
thisDash = len;
|
|
dashRemaining -= len;
|
|
}
|
|
e = e-e1; /* to make looping easier */
|
|
|
|
#define BresStep(minor,major) {if ((e += e1) >= 0) { e += e3; minor; } major;}
|
|
|
|
#define NextDash {\
|
|
dashIndex++; \
|
|
if (dashIndex == numInDashList) \
|
|
dashIndex = 0; \
|
|
dashRemaining = pDash[dashIndex]; \
|
|
if ((thisDash = dashRemaining) >= len) \
|
|
{ \
|
|
dashRemaining -= len; \
|
|
thisDash = len; \
|
|
} \
|
|
}
|
|
|
|
#ifdef PIXEL_ADDR
|
|
|
|
#if PSZ == 24
|
|
#define Loop(store) while (thisDash--) {\
|
|
store; \
|
|
BresStep(addrb+=signdy3,addrb+=signdx3) \
|
|
}
|
|
/* point to first point */
|
|
nlwidth <<= PWSH;
|
|
addrp = (PixelType *)(addrl) + (y1 * nlwidth);
|
|
addrb = (char *)addrp + x1 * 3;
|
|
|
|
#else
|
|
#define Loop(store) while (thisDash--) {\
|
|
store; \
|
|
BresStep(addrp+=signdy,addrp+=signdx) \
|
|
}
|
|
/* point to first point */
|
|
nlwidth <<= PWSH;
|
|
addrp = (PixelType *)(addrl) + (y1 * nlwidth) + x1;
|
|
#endif
|
|
signdy *= nlwidth;
|
|
#if PSZ == 24
|
|
signdx3 = signdx * 3;
|
|
signdy3 = signdy * sizeof (CfbBits);
|
|
#endif
|
|
if (axis == Y_AXIS)
|
|
{
|
|
int t;
|
|
|
|
t = signdx;
|
|
signdx = signdy;
|
|
signdy = t;
|
|
#if PSZ == 24
|
|
t = signdx3;
|
|
signdx3 = signdy3;
|
|
signdy3 = t;
|
|
#endif
|
|
}
|
|
|
|
if (isCopy)
|
|
{
|
|
#if PSZ == 24
|
|
#define body_copy(pix) { \
|
|
addrp = (PixelType *)((unsigned long)addrb & ~0x03); \
|
|
switch((unsigned long)addrb & 3){ \
|
|
case 0: \
|
|
*addrp = (*addrp & 0xFF000000)|((pix)[0] & 0xFFFFFF); \
|
|
break; \
|
|
case 1: \
|
|
*addrp = (*addrp & 0xFF)|((pix)[2] & 0xFFFFFF00); \
|
|
break; \
|
|
case 3: \
|
|
*addrp = (*addrp & 0xFFFFFF)|((pix)[0] & 0xFF000000); \
|
|
*(addrp+1) = (*(addrp+1) & 0xFFFF0000)|((pix)[1] & 0xFFFF); \
|
|
break; \
|
|
case 2: \
|
|
*addrp = (*addrp & 0xFFFF)|((pix)[1] & 0xFFFF0000); \
|
|
*(addrp+1) = (*(addrp+1) & 0xFFFFFF00)|((pix)[2] & 0xFF); \
|
|
break; \
|
|
} \
|
|
}
|
|
#endif /* PSZ == 24 */
|
|
|
|
for (;;)
|
|
{
|
|
len -= thisDash;
|
|
if (dashIndex & 1) {
|
|
if (isDoubleDash) {
|
|
#if PSZ == 24
|
|
Loop(body_copy(xorPiQxlBg))
|
|
#else
|
|
Loop(*addrp = xorBg)
|
|
#endif
|
|
} else {
|
|
Loop(;)
|
|
}
|
|
} else {
|
|
#if PSZ == 24
|
|
Loop(body_copy(xorPiQxlFg))
|
|
#else
|
|
Loop(*addrp = xorFg)
|
|
#endif
|
|
}
|
|
if (!len)
|
|
break;
|
|
NextDash
|
|
}
|
|
#undef body_copy
|
|
}
|
|
else
|
|
{
|
|
#define body_set(and, xor) { \
|
|
addrp = (PixelType *)((unsigned long)addrb & ~0x03); \
|
|
switch((unsigned long)addrb & 3){ \
|
|
case 0: \
|
|
*addrp = (*addrp & ((and)[0]|0xFF000000)) ^ ((xor)[0] & 0xFFFFFF); \
|
|
break; \
|
|
case 1: \
|
|
*addrp = (*addrp & ((and)[2]|0xFF)) ^ ((xor)[2] & 0xFFFFFF00); \
|
|
break; \
|
|
case 3: \
|
|
*addrp = (*addrp & ((and)[0]|0xFFFFFF)) ^ ((xor)[0] & 0xFF000000); \
|
|
*(addrp+1)=(*(addrp+1)&((and)[1]|0xFFFF0000)) ^ ((xor)[1]&0xFFFF); \
|
|
break; \
|
|
case 2: \
|
|
*addrp = (*addrp & ((and)[1]|0xFFFF)) ^ ((xor)[1] & 0xFFFF0000); \
|
|
*(addrp+1)=(*(addrp+1)&((and)[2]|0xFFFFFF00)) ^ ((xor)[2] & 0xFF); \
|
|
break; \
|
|
} \
|
|
}
|
|
|
|
for (;;)
|
|
{
|
|
len -= thisDash;
|
|
if (dashIndex & 1) {
|
|
if (isDoubleDash) {
|
|
#if PSZ == 24
|
|
Loop(body_set(andPiQxlBg, xorPiQxlBg))
|
|
#else
|
|
Loop(*addrp = DoRRop(*addrp,andBg, xorBg))
|
|
#endif
|
|
} else {
|
|
Loop(;)
|
|
}
|
|
} else {
|
|
#if PSZ == 24
|
|
Loop(body_set(andPiQxlFg, xorPiQxlFg))
|
|
#else
|
|
Loop(*addrp = DoRRop(*addrp,andFg, xorFg))
|
|
#endif
|
|
}
|
|
if (!len)
|
|
break;
|
|
NextDash
|
|
}
|
|
#undef body_set
|
|
}
|
|
#else /* !PIXEL_ADDR */
|
|
{
|
|
register CfbBits tmp;
|
|
CfbBits startbit, bit;
|
|
|
|
/* point to longword containing first point */
|
|
#if PSZ == 24
|
|
addrl = (addrl + (y1 * nlwidth) + ((x1*3) >> 2);
|
|
#else
|
|
addrl = (addrl + (y1 * nlwidth) + (x1 >> PWSH));
|
|
#endif
|
|
signdy = signdy * nlwidth;
|
|
|
|
if (signdx > 0)
|
|
startbit = cfbmask[0];
|
|
else
|
|
#if PSZ == 24
|
|
startbit = cfbmask[(PPW-1)<<1];
|
|
bit = cfbmask[(x1 & 3)<<1];
|
|
#else
|
|
startbit = cfbmask[PPW-1];
|
|
bit = cfbmask[x1 & PIM];
|
|
#endif
|
|
|
|
#if PSZ == 24
|
|
#define X_Loop(store) while(thisDash--) {\
|
|
store; \
|
|
BresStep(addrl += signdy, \
|
|
if (signdx > 0) \
|
|
bit = SCRRIGHT(bit,1); \
|
|
else \
|
|
bit = SCRLEFT(bit,1); \
|
|
if (!bit) \
|
|
{ \
|
|
bit = startbit; \
|
|
addrl += signdx; \
|
|
}) \
|
|
}
|
|
#define Y_Loop(store) while(thisDash--) {\
|
|
store; \
|
|
BresStep(if (signdx > 0) \
|
|
bit = SCRRIGHT(bit,1); \
|
|
else \
|
|
bit = SCRLEFT(bit,1); \
|
|
if (!bit) \
|
|
{ \
|
|
bit = startbit; \
|
|
addrl += signdx; \
|
|
}, \
|
|
addrl += signdy) \
|
|
}
|
|
#else
|
|
#define X_Loop(store) while(thisDash--) {\
|
|
store; \
|
|
BresStep(addrl += signdy, \
|
|
if (signdx > 0) \
|
|
bit = SCRRIGHT(bit,1); \
|
|
else \
|
|
bit = SCRLEFT(bit,1); \
|
|
if (!bit) \
|
|
{ \
|
|
bit = startbit; \
|
|
addrl += signdx; \
|
|
}) \
|
|
}
|
|
#define Y_Loop(store) while(thisDash--) {\
|
|
store; \
|
|
BresStep(if (signdx > 0) \
|
|
bit = SCRRIGHT(bit,1); \
|
|
else \
|
|
bit = SCRLEFT(bit,1); \
|
|
if (!bit) \
|
|
{ \
|
|
bit = startbit; \
|
|
addrl += signdx; \
|
|
}, \
|
|
addrl += signdy) \
|
|
}
|
|
#endif
|
|
|
|
if (axis == X_AXIS)
|
|
{
|
|
for (;;)
|
|
{
|
|
len -= thisDash;
|
|
if (dashIndex & 1) {
|
|
if (isDoubleDash) {
|
|
X_Loop(*addrl = DoMaskRRop(*addrl, andBg, xorBg, bit));
|
|
} else {
|
|
X_Loop(;)
|
|
}
|
|
} else {
|
|
X_Loop(*addrl = DoMaskRRop(*addrl, andFg, xorFg, bit));
|
|
}
|
|
if (!len)
|
|
break;
|
|
NextDash
|
|
}
|
|
} /* if X_AXIS */
|
|
else
|
|
{
|
|
for (;;)
|
|
{
|
|
len -= thisDash;
|
|
if (dashIndex & 1) {
|
|
if (isDoubleDash) {
|
|
Y_Loop(*addrl = DoMaskRRop(*addrl, andBg, xorBg, bit));
|
|
} else {
|
|
Y_Loop(;)
|
|
}
|
|
} else {
|
|
Y_Loop(*addrl = DoMaskRRop(*addrl, andFg, xorFg, bit));
|
|
}
|
|
if (!len)
|
|
break;
|
|
NextDash
|
|
}
|
|
} /* else Y_AXIS */
|
|
}
|
|
#endif
|
|
*pdashIndex = dashIndex;
|
|
*pdashOffset = pDash[dashIndex] - dashRemaining;
|
|
}
|