369 lines
		
	
	
		
			11 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			369 lines
		
	
	
		
			11 KiB
		
	
	
	
		
			C
		
	
	
	
| /* $Xorg: mfbtegblt.c,v 1.4 2001/02/09 02:05:19 xorgcvs Exp $ */
 | |
| /* Combined Purdue/PurduePlus patches, level 2.0, 1/17/89 */
 | |
| /***********************************************************
 | |
| 
 | |
| 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.
 | |
| 
 | |
| ******************************************************************/
 | |
| 
 | |
| /* $XFree86: xc/programs/Xserver/mfb/mfbtegblt.c,v 1.7 2001/01/17 22:37:03 dawes Exp $ */
 | |
| 
 | |
| #ifdef HAVE_DIX_CONFIG_H
 | |
| #include <dix-config.h>
 | |
| #endif
 | |
| 
 | |
| #include	<X11/X.h>
 | |
| #include	<X11/Xmd.h>
 | |
| #include	<X11/Xproto.h>
 | |
| #include	"mfb.h"
 | |
| #include	<X11/fonts/fontstruct.h>
 | |
| #include	"dixfontstr.h"
 | |
| #include	"gcstruct.h"
 | |
| #include	"windowstr.h"
 | |
| #include	"scrnintstr.h"
 | |
| #include	"pixmapstr.h"
 | |
| #include	"regionstr.h"
 | |
| #include	"maskbits.h"
 | |
| 
 | |
| /*
 | |
|     this works for fonts with glyphs <= PPW bits wide.
 | |
| 
 | |
|     This should be called only with a terminal-emulator font;
 | |
| this means that the FIXED_METRICS flag is set, and that
 | |
| glyphbounds == charbounds.
 | |
| 
 | |
|     in theory, this goes faster; even if it doesn't, it reduces the
 | |
| flicker caused by writing a string over itself with image text (since
 | |
| the background gets repainted per character instead of per string.)
 | |
| this seems to be important for some converted X10 applications.
 | |
| 
 | |
|     Image text looks at the bits in the glyph and the fg and bg in the
 | |
| GC.  it paints a rectangle, as defined in the protocol dcoument,
 | |
| and the paints the characters.
 | |
| 
 | |
|    to avoid source proliferation, this file is compiled
 | |
| two times:
 | |
| 	MFBTEGLYPHBLT		OP
 | |
| 	mfbTEGlyphBltWhite		(white text, black bg )
 | |
| 	mfbTEGlyphBltBlack	~	(black text, white bg )
 | |
| 
 | |
| */
 | |
| 
 | |
| #if defined(NO_3_60_CG4) && defined(FASTPUTBITS) && defined(FASTGETBITS)
 | |
| #define FASTCHARS
 | |
| #endif
 | |
| 
 | |
| /*
 | |
|  * this macro "knows" that only characters <= 8 bits wide will
 | |
|  * fit this case (which is why it is independent of GLYPHPADBYTES)
 | |
|  */
 | |
| 
 | |
| #if (BITMAP_BIT_ORDER == MSBFirst) && (GLYPHPADBYTES != 4)
 | |
| #if GLYPHPADBYTES == 1
 | |
| #define ShiftAmnt   24
 | |
| #else
 | |
| #define ShiftAmnt   16
 | |
| #endif
 | |
| 
 | |
| /*
 | |
|  * XXX XXX XXX There is something horribly, massively wrong here. There are
 | |
|  * hardcoded shifts by 64 below; these cannot work on any present-day
 | |
|  * architecture.
 | |
|  */
 | |
| 
 | |
| /*
 | |
|  * Note: for BITMAP_BIT_ORDER != IMAGE_BYTE_ORDER, SCRRIGHT() evaluates its
 | |
|  * first argument more than once.  Thus the imbedded char++ have to be moved.
 | |
|  * (DHD)
 | |
|  */
 | |
| #if BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER
 | |
| #define GetBits4    c = (*char1++ << ShiftAmnt) | \
 | |
| 			SCRRIGHT (*char2++ << ShiftAmnt, xoff2) | \
 | |
| 			SCRRIGHT (*char3++ << ShiftAmnt, xoff3) | \
 | |
| 			SCRRIGHT (*char4++ << ShiftAmnt, xoff4);
 | |
| #else /* BITMAP_BIT_ORDER != IMAGE_BYTE_ORDER */
 | |
| #define GetBits4    c = (*char1++ << ShiftAmnt) | \
 | |
| 			SCRRIGHT (*char2 << ShiftAmnt, xoff2) | \
 | |
| 			SCRRIGHT (*char3 << ShiftAmnt, xoff3) | \
 | |
| 			SCRRIGHT (*char4 << ShiftAmnt, xoff4); \
 | |
| 			char2++; char3++; char4++;
 | |
| #endif /* BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER */
 | |
| 
 | |
| #else /* (BITMAP_BIT_ORDER != MSBFirst) || (GLYPHPADBYTES == 4) */
 | |
| 
 | |
| #if BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER
 | |
| #define GetBits4    c = *char1++ | \
 | |
| 			SCRRIGHT (*char2++, xoff2) | \
 | |
| 			SCRRIGHT (*char3++, xoff3) | \
 | |
| 			SCRRIGHT (*char4++, xoff4);
 | |
| #else /* BITMAP_BIT_ORDER != IMAGE_BYTE_ORDER */
 | |
| #define GetBits4    c = *char1++ | \
 | |
| 			SCRRIGHT (*char2, xoff2) | \
 | |
| 			SCRRIGHT (*char3, xoff3) | \
 | |
| 			SCRRIGHT (*char4, xoff4); \
 | |
| 			char2++; char3++; char4++;
 | |
| #endif /* BITMAP_BIT_ORDER == IMAGE_BYTE_ORDER */
 | |
| 
 | |
| #endif /* BITMAP_BIT_ORDER && GLYPHPADBYTES */
 | |
| 
 | |
| 
 | |
| #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
 | |
| MFBTEGLYPHBLT(pDrawable, pGC, x, y, nglyph, ppci, pglyphBase)
 | |
|     DrawablePtr pDrawable;
 | |
|     GC 		*pGC;
 | |
|     int 	x, y;
 | |
|     unsigned int nglyph;
 | |
|     CharInfoPtr *ppci;		/* array of character info */
 | |
|     pointer	pglyphBase;	/* start of array of glyphs */
 | |
| {
 | |
|     FontPtr	pfont = pGC->font;
 | |
|     int widthDst;
 | |
|     PixelType *pdstBase;	/* pointer to longword with top row 
 | |
| 				   of current glyph */
 | |
| 
 | |
|     int h;			/* height of glyph and char */
 | |
|     register int xpos;		/* current x  */
 | |
|     int ypos;			/* current y */
 | |
|     int widthGlyph;
 | |
| 
 | |
|     int hTmp;			/* counter for height */
 | |
|     register PixelType startmask, endmask;
 | |
|     int nfirst;			/* used if glyphs spans a longword boundary */
 | |
|     BoxRec bbox;		/* for clipping */
 | |
|     int	widthGlyphs;
 | |
|     register PixelType  *dst;
 | |
|     register PixelType  c;
 | |
|     register int	    xoff1, xoff2, xoff3, xoff4;
 | |
|     register glyphPointer   char1, char2, char3, char4;
 | |
| 
 | |
| #ifdef USE_LEFTBITS
 | |
|     register PixelType  glyphMask;
 | |
|     register PixelType  tmpSrc;
 | |
|     register int	    glyphBytes;
 | |
| #endif
 | |
| 
 | |
|     if (!(pGC->planemask & 1))
 | |
| 	return;
 | |
| 
 | |
|     mfbGetPixelWidthAndPointer(pDrawable, widthDst, 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);
 | |
| 
 | |
|     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:
 | |
| 	/* this is the WRONG thing to do, but it works.
 | |
| 	   calling the non-terminal text is easy, but slow, given
 | |
| 	   what we know about the font.
 | |
| 
 | |
| 	   the right thing to do is something like:
 | |
| 	    for each clip rectangle
 | |
| 		compute at which row the glyph starts to be in it,
 | |
| 		   and at which row the glyph ceases to be in it
 | |
| 		compute which is the first glyph inside the left
 | |
| 		    edge, and the last one inside the right edge
 | |
| 		draw a fractional first glyph, using only
 | |
| 		    the rows we know are in
 | |
| 		draw all the whole glyphs, using the appropriate rows
 | |
| 		draw any pieces of the last glyph, using the right rows
 | |
| 
 | |
| 	   this way, the code would take advantage of knowing that
 | |
| 	   all glyphs are the same height and don't overlap.
 | |
| 
 | |
| 	   one day...
 | |
| 	*/
 | |
| 	CLIPTETEXT(pDrawable, pGC, x, y, nglyph, ppci, pglyphBase);
 | |
|       case rgnOUT:
 | |
| 	return;
 | |
|     }
 | |
|     pdstBase = mfbScanlineDeltaNoBankSwitch(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;
 | |
| 	    char1 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
 | |
| 	    char2 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
 | |
| 	    char3 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
 | |
| 	    char4 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
 | |
| 
 | |
| 	    hTmp = h;
 | |
| 	    dst = mfbScanlineOffset(pdstBase, (xpos >> PWSH)); /* switch now */
 | |
| 
 | |
| #ifndef FASTCHARS
 | |
| 	    if (xoff1 + widthGlyphs <= PPW)
 | |
| 	    {
 | |
| 		maskpartialbits (xoff1, widthGlyphs, startmask);
 | |
| #endif
 | |
| 		while (hTmp--)
 | |
| 		{
 | |
| 		    GetBits4
 | |
| #ifdef FASTCHARS
 | |
| # if BITMAP_BIT_ORDER == MSBFirst
 | |
| 		    c >>= PPW - widthGlyphs;
 | |
| # endif
 | |
| 		    FASTPUTBITS(OP(c), xoff1, widthGlyphs, dst);
 | |
| #else
 | |
| 		    *(dst) = ((*dst) & ~startmask) | (OP(SCRRIGHT(c, xoff1)) & startmask);
 | |
| #endif
 | |
| 		    mfbScanlineInc(dst, widthDst);
 | |
| 		}
 | |
| #ifndef FASTCHARS
 | |
| 	    }
 | |
| 	    else
 | |
| 	    {
 | |
| 		maskPPWbits (xoff1, widthGlyphs, startmask, endmask);
 | |
| 		nfirst = PPW - xoff1;
 | |
| 		while (hTmp--)
 | |
| 		{
 | |
| 		    GetBits4
 | |
| 		    dst[0] = (dst[0] & ~startmask) |
 | |
| 			     (OP(SCRRIGHT(c,xoff1)) & startmask);
 | |
| 		    dst[1] = (dst[1] & ~endmask) |
 | |
| 			     (OP(SCRLEFT(c,nfirst)) & endmask);
 | |
| 		    mfbScanlineInc(dst, widthDst);
 | |
| 		}
 | |
| 	    }
 | |
| #endif
 | |
| 	    xpos += widthGlyphs;
 | |
| 	}
 | |
|     }
 | |
| 
 | |
|     while(nglyph--)
 | |
|     {
 | |
| 	xoff1 = xpos & PIM;
 | |
| 	char1 = (glyphPointer) FONTGLYPHBITS(pglyphBase,(*ppci++));
 | |
| 	hTmp = h;
 | |
| 	dst = mfbScanlineOffset(pdstBase, (xpos >> PWSH));
 | |
| 
 | |
| #ifndef FASTCHARS
 | |
| 	if (xoff1 + widthGlyph <= PPW)
 | |
| 	{
 | |
| 	    maskpartialbits (xoff1, widthGlyph, startmask);
 | |
| #endif
 | |
| 	    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 (OP(c),xoff1,widthGlyph,dst);
 | |
| #else
 | |
| 		GetBits1
 | |
| 		(*dst) = ((*dst) & ~startmask) | (OP(SCRRIGHT(c, xoff1)) & startmask);
 | |
| #endif
 | |
| 		mfbScanlineInc(dst, widthDst);
 | |
| 	    }
 | |
| #ifndef FASTCHARS
 | |
| 	}
 | |
| 	else
 | |
| 	{
 | |
| 	    maskPPWbits (xoff1, widthGlyph, startmask, endmask);
 | |
| 	    nfirst = PPW - xoff1;
 | |
| 	    while (hTmp--)
 | |
| 	    {
 | |
| 		GetBits1
 | |
| 		dst[0] = (dst[0] & ~startmask) |
 | |
| 			 (OP(SCRRIGHT(c,xoff1)) & startmask);
 | |
| 		dst[1] = (dst[1] & ~endmask) |
 | |
| 			 (OP(SCRLEFT(c,nfirst)) & endmask);
 | |
| 		mfbScanlineInc(dst, widthDst);
 | |
| 	    }
 | |
| 	}
 | |
| #endif
 | |
| 	xpos += widthGlyph;
 | |
|     }
 | |
| }
 |