#include "X.h"
#include "Xmd.h"
#include "Xproto.h"
#include "afb.h"
#include "fontstruct.h"
#include "dixfontstr.h"
#include "gcstruct.h"
#include "windowstr.h"
#include "scrnintstr.h"
#include "pixmapstr.h"
#include "regionstr.h"
#include "maskbits.h"
#if defined(NO_3_60_CG4) && defined(FASTPUTBITS) && defined(FASTGETBITS)
#define FASTCHARS
#endif
#if (BITMAP_BIT_ORDER == MSBFirst) && (GLYPHPADBYTES != 4)
#if GLYPHPADBYTES == 1
#define ShiftAmnt 24
#else
#define ShiftAmnt 16
#endif
#if BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER
#if PPW == 32
#define GetBits4 c = (*char1++ << ShiftAmnt) | \
SCRRIGHT (*char2++ << ShiftAmnt, xoff2) | \
SCRRIGHT (*char3++ << ShiftAmnt, xoff3) | \
SCRRIGHT (*char4++ << ShiftAmnt, xoff4);
#else
#define GetBits4 c = ((unsigned long)(*char1++ << ShiftAmnt) << 32 ) | \
(SCRRIGHT (*char2++ << ShiftAmnt, xoff2) << 32 ) | \
(SCRRIGHT (*char3++ << ShiftAmnt, xoff3) << 32 ) | \
(SCRRIGHT (*char4++ << ShiftAmnt, xoff4) << 32 ) | \
(*char5++ << ShiftAmnt) | \
SCRRIGHT (*char6++ << ShiftAmnt, xoff6) | \
SCRRIGHT (*char7++ << ShiftAmnt, xoff7) | \
SCRRIGHT (*char8++ << ShiftAmnt, xoff8);
#endif
#else
#if PPW == 32
#define GetBits4 c = (*char1++ << ShiftAmnt) | \
SCRRIGHT (*char2 << ShiftAmnt, xoff2) | \
SCRRIGHT (*char3 << ShiftAmnt, xoff3) | \
SCRRIGHT (*char4 << ShiftAmnt, xoff4); \
char2++; char3++; char4++;
#else
#define GetBits4 c = ((unsigned long)(*char1++ << ShiftAmnt) << 32 ) | \
(SCRRIGHT (*char2 << ShiftAmnt, xoff2) << 32 ) | \
(SCRRIGHT (*char3 << ShiftAmnt, xoff3) << 32 ) | \
(SCRRIGHT (*char4 << ShiftAmnt, xoff4) << 32 ) | \
(*char5++ << ShiftAmnt) | \
SCRRIGHT (*char6 << ShiftAmnt, xoff6) | \
SCRRIGHT (*char7 << ShiftAmnt, xoff7) | \
SCRRIGHT (*char8 << ShiftAmnt, xoff8); \
char2++; char3++; char4++; char6++; char7++; char8++;
#endif
#endif
#else
#if BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER
#if PPW == 32
#define GetBits4 c = *char1++ | \
SCRRIGHT (*char2++, xoff2) | \
SCRRIGHT (*char3++, xoff3) | \
SCRRIGHT (*char4++, xoff4);
#else
#define GetBits4 c = (unsigned long)(((*char1++) << 64 ) | \
(SCRRIGHT (*char2++, xoff2) << 64 ) | \
(SCRRIGHT (*char3++, xoff3) << 64 ) | \
(SCRRIGHT (*char4++, xoff4) << 64 ) | \
SCRRIGHT (*char5++, xoff5) | \
SCRRIGHT (*char6++, xoff6) | \
SCRRIGHT (*char7++, xoff7) | \
SCRRIGHT (*char8++, xoff8));
#endif
#else
#if PPW == 32
#define GetBits4 c = *char1++ | \
SCRRIGHT (*char2, xoff2) | \
SCRRIGHT (*char3, xoff3) | \
SCRRIGHT (*char4, xoff4); \
char2++; char3++; char4++;
#else
#define GetBits4 c = (unsigned long)(((*char1++) << 64 ) | \
(SCRRIGHT (*char2, xoff2) << 64 ) | \
(SCRRIGHT (*char3, xoff3) << 64 ) | \
(SCRRIGHT (*char4, xoff4) << 64 ) | \
SCRRIGHT (*char5, xoff5) | \
SCRRIGHT (*char6, xoff6) | \
SCRRIGHT (*char7, xoff7) | \
SCRRIGHT (*char8, xoff8)); \
char2++; char3++; char4++; \
char5++; char6++; char7++; char8++;
#endif
#endif
#endif
#if GLYPHPADBYTES == 1
typedef unsigned char *glyphPointer;
#define USE_LEFTBITS
#endif
#if GLYPHPADBYTES == 2
typedef unsigned short *glyphPointer;
#define USE_LEFTBITS
#endif
#if GLYPHPADBYTES == 4
typedef unsigned int *glyphPointer;
#endif
#ifdef USE_LEFTBITS
#define GetBits1 getleftbits (char1, widthGlyph, c); \
c &= glyphMask; \
char1 = (glyphPointer) (((char *) char1) + glyphBytes);
#else
#define GetBits1 c = *char1++;
#endif
void
afbTEGlyphBlt (pDrawable, pGC, x, y, nglyph, ppci, pglyphBase)
DrawablePtr pDrawable;
GC *pGC;
int x, y;
unsigned int nglyph;
CharInfoPtr *ppci;
pointer pglyphBase;
{
FontPtr pfont = pGC->font;
int widthDst;
PixelType *pdstBase;
int h;
register int xpos;
int ypos;
int widthGlyph;
int hTmp;
register PixelType startmask, endmask;
int nfirst;
BoxRec bbox;
int widthGlyphs;
int sizeDst;
int depthDst;
PixelType *saveDst;
register PixelType *dst;
register PixelType c;
register int d;
register int xoff1, xoff2, xoff3, xoff4;
register glyphPointer char1, char2, char3, char4;
glyphPointer schar1, schar2, schar3, schar4;
#if PPW == 64
register int xoff5, xoff6, xoff7, xoff8;
register glyphPointer char5, char6, char7, char8;
glyphPointer schar5, schar6, schar7, schar8;
#endif
unsigned char *rrops;
#ifdef USE_LEFTBITS
register PixelType glyphMask;
register PixelType tmpSrc;
register int glyphBytes;
#endif
afbGetPixelWidthSizeDepthAndPointer(pDrawable, widthDst, sizeDst, depthDst,
pdstBase);
xpos = x + pDrawable->x;
ypos = y + pDrawable->y;
widthGlyph = FONTMAXBOUNDS(pfont,characterWidth);
h = FONTASCENT(pfont) + FONTDESCENT(pfont);
xpos += FONTMAXBOUNDS(pfont,leftSideBearing);
ypos -= FONTASCENT(pfont);
rrops = ((afbPrivGCPtr) pGC->devPrivates[afbGCPrivateIndex].ptr)->rropOS;
bbox.x1 = xpos;
bbox.x2 = xpos + (widthGlyph * nglyph);
bbox.y1 = ypos;
bbox.y2 = ypos + h;
switch (RECT_IN_REGION(pGC->pScreen, pGC->pCompositeClip, &bbox)) {
case rgnPART:
afbImageGlyphBlt (pDrawable, pGC, x, y, nglyph, ppci, pglyphBase);
case rgnOUT:
return;
}
pdstBase = afbScanlineDeltaNoBankSwitch(pdstBase, ypos, widthDst);
widthGlyphs = widthGlyph * PGSZB;
#ifdef USE_LEFTBITS
glyphMask = endtab[widthGlyph];
glyphBytes = GLYPHWIDTHBYTESPADDED(*ppci);
#endif
if (nglyph >= PGSZB && widthGlyphs <= PPW) {
while (nglyph >= PGSZB) {
nglyph -= PGSZB;
xoff1 = xpos & PIM;
xoff2 = widthGlyph;
xoff3 = xoff2 + widthGlyph;
xoff4 = xoff3 + widthGlyph;
#if PPW == 64
xoff5 = xoff4 + widthGlyph;
xoff6 = xoff5 + widthGlyph;
xoff7 = xoff6 + widthGlyph;
xoff8 = xoff7 + widthGlyph;
#endif
schar1 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar2 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar3 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar4 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
#if PPW == 64
schar5 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar6 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar7 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
schar8 = (glyphPointer)FONTGLYPHBITS(pglyphBase,(*ppci++));
#endif
hTmp = h;
saveDst = afbScanlineOffset(pdstBase, (xpos >> PWSH));
#ifndef FASTCHARS
if (xoff1 + widthGlyphs <= PPW) {
maskpartialbits (xoff1, widthGlyphs, startmask);
#endif
for (d = 0; d < depthDst; d++) {
hTmp = h;
dst = saveDst;
saveDst += sizeDst;
switch (rrops[d]) {
case RROP_BLACK:
while (hTmp--) {
#ifdef FASTCHARS
FASTPUTBITS(0, xoff1, widthGlyphs, dst);
#else
*(dst) &= ~startmask;
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_WHITE:
while (hTmp--) {
#ifdef FASTCHARS
FASTPUTBITS(~0, xoff1, widthGlyphs, dst);
#else
*(dst) |= startmask;
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_INVERT:
char1 = schar1;
char2 = schar2;
char3 = schar3;
char4 = schar4;
while (hTmp--) {
GetBits4
#ifdef FASTCHARS
# if BITMAP_BIT_ORDER == MSBFirst
c >>= PPW - widthGlyphs;
# endif
FASTPUTBITS(~c, xoff1, widthGlyphs, dst);
#else
*(dst) = ((*dst) & ~startmask) | (~SCRRIGHT(c, xoff1) & startmask);
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_COPY:
char1 = schar1;
char2 = schar2;
char3 = schar3;
char4 = schar4;
while (hTmp--) {
GetBits4
#ifdef FASTCHARS
# if BITMAP_BIT_ORDER == MSBFirst
c >>= PPW - widthGlyphs;
#endif
FASTPUTBITS(c, xoff1, widthGlyphs, dst);
#else
*(dst) = ((*dst) & ~startmask) | (SCRRIGHT(c, xoff1) & startmask);
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_NOP:
break;
}
}
#ifndef FASTCHARS
} else {
maskPPWbits (xoff1, widthGlyphs, startmask, endmask);
nfirst = PPW - xoff1;
for (d = 0; d < depthDst; d++) {
hTmp = h;
dst = saveDst;
saveDst += sizeDst;
switch (rrops[d]) {
case RROP_BLACK:
while (hTmp--) {
dst[0] &= ~startmask;
dst[1] &= ~endmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_WHITE:
while (hTmp--) {
dst[0] |= startmask;
dst[1] |= endmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_INVERT:
char1 = schar1;
char2 = schar2;
char3 = schar3;
char4 = schar4;
while (hTmp--) {
GetBits4
dst[0] = (dst[0] & ~startmask) | (~SCRRIGHT(c,xoff1) & startmask);
dst[1] = (dst[1] & ~endmask) | (~SCRLEFT(c,nfirst) & endmask);
afbScanlineInc(dst, widthDst);
}
break;
case RROP_COPY:
char1 = schar1;
char2 = schar2;
char3 = schar3;
char4 = schar4;
while (hTmp--) {
GetBits4
dst[0] = (dst[0] & ~startmask) | (SCRRIGHT(c,xoff1) & startmask);
dst[1] = (dst[1] & ~endmask) | (SCRLEFT(c,nfirst) & endmask);
afbScanlineInc(dst, widthDst);
}
break;
case RROP_NOP:
break;
}
}
}
#endif
xpos += widthGlyphs;
}
}
while(nglyph--) {
xoff1 = xpos & PIM;
schar1 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
hTmp = h;
saveDst = afbScanlineOffset(pdstBase, (xpos >> PWSH));
if (xoff1 + widthGlyph <= PPW) {
maskpartialbits (xoff1, widthGlyph, startmask);
for (d = 0; d < depthDst; d++) {
hTmp = h;
dst = saveDst;
saveDst += sizeDst;
char1 = schar1;
switch (rrops[d]) {
case RROP_BLACK:
while (hTmp--) {
(*dst) &= ~startmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_WHITE:
while (hTmp--) {
(*dst) |= startmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_INVERT:
while (hTmp--) {
#ifdef FASTCHARS
#ifdef USE_LEFTBITS
FASTGETBITS (char1,0,widthGlyph,c);
char1 = (glyphPointer) (((char *) char1) + glyphBytes);
#else
c = *char1++;
#if BITMAP_BIT_ORDER == MSBFirst
c >>= PPW - widthGlyph;
#endif
#endif
FASTPUTBITS (~c,xoff1,widthGlyph,dst);
#else
GetBits1
(*dst) = ((*dst) & ~startmask) | (~SCRRIGHT(c, xoff1) & startmask);
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_COPY:
while (hTmp--) {
#ifdef FASTCHARS
#ifdef USE_LEFTBITS
FASTGETBITS (char1,0,widthGlyph,c);
char1 = (glyphPointer) (((char *) char1) + glyphBytes);
#else
c = *char1++;
#if BITMAP_BIT_ORDER == MSBFirst
c >>= PPW - widthGlyph;
#endif
#endif
FASTPUTBITS (c,xoff1,widthGlyph,dst);
#else
GetBits1
(*dst) = ((*dst) & ~startmask) | (SCRRIGHT(c, xoff1) & startmask);
#endif
afbScanlineInc(dst, widthDst);
}
break;
case RROP_NOP:
break;
}
}
} else {
maskPPWbits (xoff1, widthGlyph, startmask, endmask);
nfirst = PPW - xoff1;
for (d = 0; d < depthDst; d++) {
hTmp = h;
dst = saveDst;
saveDst += sizeDst;
char1 = schar1;
switch (rrops[d]) {
case RROP_BLACK:
while (hTmp--) {
dst[0] &= ~startmask;
dst[1] &= ~endmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_WHITE:
while (hTmp--) {
dst[0] |= startmask;
dst[1] |= endmask;
afbScanlineInc(dst, widthDst);
}
break;
case RROP_INVERT:
while (hTmp--) {
GetBits1
dst[0] = (dst[0] & ~startmask) | (~SCRRIGHT(c,xoff1) & startmask);
dst[1] = (dst[1] & ~endmask) | (~SCRLEFT(c,nfirst) & endmask);
afbScanlineInc(dst, widthDst);
}
break;
case RROP_COPY:
while (hTmp--) {
GetBits1
dst[0] = (dst[0] & ~startmask) | (SCRRIGHT(c,xoff1) & startmask);
dst[1] = (dst[1] & ~endmask) | (SCRLEFT(c,nfirst) & endmask);
afbScanlineInc(dst, widthDst);
}
break;
case RROP_NOP:
break;
}
}
}
xpos += widthGlyph;
}
}