420 lines
		
	
	
		
			9.3 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			420 lines
		
	
	
		
			9.3 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | |
|  * Id: s3curs.c,v 1.1 1999/11/02 08:17:24 keithp Exp $
 | |
|  *
 | |
|  * Copyright © 1999 Keith Packard
 | |
|  *
 | |
|  * 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, and that the name of Keith Packard not be used in
 | |
|  * advertising or publicity pertaining to distribution of the software without
 | |
|  * specific, written prior permission.  Keith Packard makes no
 | |
|  * representations about the suitability of this software for any purpose.  It
 | |
|  * is provided "as is" without express or implied warranty.
 | |
|  *
 | |
|  * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
 | |
|  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
 | |
|  * EVENT SHALL KEITH PACKARD 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.
 | |
|  */
 | |
| /* $RCSId: xc/programs/Xserver/hw/kdrive/trio/s3curs.c,v 1.2 1999/12/30 03:03:19 robin Exp $ */
 | |
| 
 | |
| #ifdef HAVE_CONFIG_H
 | |
| #include <kdrive-config.h>
 | |
| #endif
 | |
| #include "s3.h"
 | |
| #include "s3draw.h"
 | |
| #include "cursorstr.h"
 | |
| 
 | |
| #define SetupCursor(s)	    KdScreenPriv(s); \
 | |
| 			    s3CardInfo(pScreenPriv); \
 | |
| 			    s3ScreenInfo(pScreenPriv); \
 | |
| 			    S3Ptr s3 = s3c->s3; \
 | |
| 			    S3Cursor *pCurPriv = &s3s->cursor
 | |
| 
 | |
| static void
 | |
| _s3MoveCursor (ScreenPtr pScreen, int x, int y)
 | |
| {
 | |
|     SetupCursor(pScreen);
 | |
|     CARD8   xlow, xhigh, ylow, yhigh;
 | |
|     CARD8   xoff, yoff;
 | |
| 
 | |
|     x -= pCurPriv->xhot;
 | |
|     xoff = 0;
 | |
|     if (x < 0)
 | |
|     {
 | |
| 	xoff = -x;
 | |
| 	x = 0;
 | |
|     }
 | |
|     y -= pCurPriv->yhot;
 | |
|     yoff = 0;
 | |
|     if (y < 0)
 | |
|     {
 | |
| 	yoff = -y;
 | |
| 	y = 0;
 | |
|     }
 | |
|     xlow = (CARD8) x;
 | |
|     xhigh = (CARD8) (x >> 8);
 | |
|     ylow = (CARD8) y;
 | |
|     yhigh = (CARD8) (y >> 8);
 | |
|     
 | |
|     
 | |
|     /* This is the recommended order to move the cursor */
 | |
|     
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x46, xhigh);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x47, xlow);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x49, ylow);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4e, xoff);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4f, yoff);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x48, yhigh);
 | |
| }    
 | |
| 
 | |
| static void
 | |
| s3MoveCursor (ScreenPtr pScreen, int x, int y)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
|     
 | |
|     if (!pCurPriv->has_cursor)
 | |
| 	return;
 | |
|     
 | |
|     if (!pScreenPriv->enabled)
 | |
| 	return;
 | |
|     
 | |
|     LockS3(s3c);
 | |
|     _s3UnlockExt(s3);
 | |
|     _s3MoveCursor (pScreen, x, y);
 | |
|     _s3LockExt(s3);
 | |
|     UnlockS3(s3c);
 | |
| }
 | |
| 
 | |
| static void
 | |
| s3AllocCursorColors (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
|     CursorPtr	    pCursor = pCurPriv->pCursor;
 | |
|     xColorItem	    sourceColor, maskColor;
 | |
|     
 | |
|     KdAllocateCursorPixels (pScreen, 0, pCursor,
 | |
| 			    &pCurPriv->source, &pCurPriv->mask);
 | |
|     switch (pScreenPriv->screen->fb[0].bitsPerPixel) {
 | |
|     case 4:
 | |
| 	pCurPriv->source |= pCurPriv->source << 4;
 | |
| 	pCurPriv->mask |= pCurPriv->mask << 4;
 | |
|     case 8:
 | |
| 	pCurPriv->source |= pCurPriv->source << 8;
 | |
| 	pCurPriv->mask |= pCurPriv->mask << 8;
 | |
|     case 16:
 | |
| 	pCurPriv->source |= pCurPriv->source << 16;
 | |
| 	pCurPriv->mask |= pCurPriv->mask << 16;
 | |
|     }
 | |
| }
 | |
| 
 | |
| static void
 | |
| _s3SetCursorColors (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
|     /* set foreground */
 | |
|     /* Reset cursor color stack pointers */
 | |
|     (void) _s3ReadIndexRegister(&s3->crt_vga_3d4, 0x45);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4a, pCurPriv->source);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4a, pCurPriv->source >> 8);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4a, pCurPriv->source >> 16);
 | |
| 	
 | |
|     /* set background */
 | |
|     /* Reset cursor color stack pointers */
 | |
|     (void) _s3ReadIndexRegister(&s3->crt_vga_3d4, 0x45);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4b, pCurPriv->mask);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4b, pCurPriv->mask >> 8);
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x4b, pCurPriv->mask >> 16);
 | |
| }
 | |
|     
 | |
| void
 | |
| s3RecolorCursor (ScreenPtr pScreen, int ndef, xColorItem *pdef)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
|     CursorPtr	    pCursor = pCurPriv->pCursor;
 | |
|     xColorItem	    sourceColor, maskColor;
 | |
| 
 | |
|     if (!pCurPriv->has_cursor || !pCursor)
 | |
| 	return;
 | |
|     
 | |
|     if (!pScreenPriv->enabled)
 | |
| 	return;
 | |
|     
 | |
|     if (pdef)
 | |
|     {
 | |
| 	while (ndef)
 | |
| 	{
 | |
| 	    if (pdef->pixel == pCurPriv->source || 
 | |
| 		pdef->pixel == pCurPriv->mask)
 | |
| 		break;
 | |
| 	    ndef--;
 | |
| 	}
 | |
| 	if (!ndef)
 | |
| 	    return;
 | |
|     }
 | |
|     s3AllocCursorColors (pScreen);
 | |
|     LockS3 (s3c);
 | |
|     _s3UnlockExt(s3);
 | |
|     _s3SetCursorColors (pScreen);
 | |
|     _s3LockExt (s3);
 | |
|     UnlockS3 (s3c);
 | |
| }
 | |
|     
 | |
| static void
 | |
| s3LoadCursor (ScreenPtr pScreen, int x, int y)
 | |
| {
 | |
|     SetupCursor(pScreen);
 | |
|     CursorPtr	    pCursor = pCurPriv->pCursor;
 | |
|     CursorBitsPtr   bits = pCursor->bits;
 | |
|     int	w, h;
 | |
|     unsigned char   r[2], g[2], b[2];
 | |
|     unsigned long   *ram;
 | |
|     unsigned long   *msk, *mskLine, *src, *srcLine;
 | |
|     unsigned long   and, xor;
 | |
|     int		    i, j;
 | |
|     int		    cursor_address;
 | |
|     int		    wsrc;
 | |
|     unsigned char   ramdac_control_;
 | |
| 
 | |
|     /*
 | |
|      * Allocate new colors
 | |
|      */
 | |
|     s3AllocCursorColors (pScreen);
 | |
|     
 | |
|     pCurPriv->pCursor = pCursor;
 | |
|     pCurPriv->xhot = pCursor->bits->xhot;
 | |
|     pCurPriv->yhot = pCursor->bits->yhot;
 | |
|     
 | |
|     /*
 | |
|      * Stick new image into cursor memory
 | |
|      */
 | |
|     ram = (unsigned long *) s3s->cursor_base;
 | |
|     mskLine = (unsigned long *) bits->mask;
 | |
|     srcLine = (unsigned long *) bits->source;
 | |
| 
 | |
|     h = bits->height;
 | |
|     if (h > S3_CURSOR_HEIGHT)
 | |
| 	h = S3_CURSOR_HEIGHT;
 | |
| 
 | |
|     wsrc = BitmapBytePad(bits->width) / 4;        /* ulongs per line */
 | |
| 
 | |
|     for (i = 0; i < S3_CURSOR_HEIGHT; i++) 
 | |
|     {
 | |
| 	msk = mskLine;
 | |
| 	src = srcLine;
 | |
| 	mskLine += wsrc;
 | |
| 	srcLine += wsrc;
 | |
| 	for (j = 0; j < S3_CURSOR_WIDTH / 32; j++) {
 | |
| 
 | |
| 	    unsigned long  m, s;
 | |
| 
 | |
| 	    if (i < h && j < wsrc) 
 | |
| 	    {
 | |
| 		m = *msk++;
 | |
| 		s = *src++;
 | |
| 		xor = m & s;
 | |
| 		and = ~m;
 | |
| 	    }
 | |
| 	    else
 | |
| 	    {
 | |
| 		and = 0xffffffff;
 | |
| 		xor = 0x00000000;
 | |
| 	    }
 | |
| 		
 | |
| 	    S3AdjustBits32(and);
 | |
| 	    S3AdjustBits32(xor);
 | |
| 	    *ram++ = (and & 0xffff) | (xor << 16);
 | |
| 	    *ram++ = (and >> 16) | (xor & 0xffff0000);
 | |
| 	}
 | |
|     }
 | |
|     
 | |
|     _s3WaitIdle (s3);
 | |
|     _s3UnlockExt (s3);
 | |
|     
 | |
|     /* Set new color */
 | |
|     _s3SetCursorColors (pScreen);
 | |
|      
 | |
|     /* Enable the cursor */
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x45, 0x01);
 | |
|     
 | |
|     /* Wait for VRetrace to make sure the position is read */
 | |
|     _s3WaitVRetrace (s3);
 | |
|     
 | |
|     /* Move to new position */
 | |
|     _s3MoveCursor (pScreen, x, y);
 | |
|     
 | |
|     _s3LockExt (s3);
 | |
|     UnlockS3(s3c);
 | |
| }
 | |
| 
 | |
| static void
 | |
| s3UnloadCursor (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     LockS3 (s3c);
 | |
|     _s3UnlockExt(s3);
 | |
| 
 | |
|     /* Disable cursor */
 | |
|     _s3WriteIndexRegister (&s3->crt_vga_3d4, 0x45, 0);
 | |
|     
 | |
|     _s3LockExt(s3);
 | |
|     UnlockS3 (s3c);
 | |
| }
 | |
| 
 | |
| static Bool
 | |
| s3RealizeCursor (ScreenPtr pScreen, CursorPtr pCursor)
 | |
| {
 | |
|     SetupCursor(pScreen);
 | |
| 
 | |
|     if (!pScreenPriv->enabled)
 | |
| 	return TRUE;
 | |
|     
 | |
|     /* miRecolorCursor does this */
 | |
|     if (pCurPriv->pCursor == pCursor)
 | |
|     {
 | |
| 	if (pCursor)
 | |
| 	{
 | |
| #ifdef FB_OLD_SCREEN
 | |
| 	    short	x, y;
 | |
| #else
 | |
| 	    int		x, y;
 | |
| #endif
 | |
| 	    
 | |
| 	    miPointerPosition (&x, &y);
 | |
| 	    s3LoadCursor (pScreen, x, y);
 | |
| 	}
 | |
|     }
 | |
|     return TRUE;
 | |
| }
 | |
| 
 | |
| static Bool
 | |
| s3UnrealizeCursor (ScreenPtr pScreen, CursorPtr pCursor)
 | |
| {
 | |
|     return TRUE;
 | |
| }
 | |
| 
 | |
| static void
 | |
| s3SetCursor (ScreenPtr pScreen, CursorPtr pCursor, int x, int y)
 | |
| {
 | |
|     SetupCursor(pScreen);
 | |
| 
 | |
|     pCurPriv->pCursor = pCursor;
 | |
|     
 | |
|     if (!pScreenPriv->enabled)
 | |
| 	return;
 | |
|     
 | |
|     if (pCursor)
 | |
| 	s3LoadCursor (pScreen, x, y);
 | |
|     else
 | |
| 	s3UnloadCursor (pScreen);
 | |
| }
 | |
| 
 | |
| miPointerSpriteFuncRec s3PointerSpriteFuncs = {
 | |
|     s3RealizeCursor,
 | |
|     s3UnrealizeCursor,
 | |
|     s3SetCursor,
 | |
|     s3MoveCursor,
 | |
| };
 | |
| 
 | |
| static void
 | |
| s3QueryBestSize (int class, 
 | |
| 		 unsigned short *pwidth, unsigned short *pheight, 
 | |
| 		 ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     switch (class)
 | |
|     {
 | |
|     case CursorShape:
 | |
| 	if (*pwidth > pCurPriv->width)
 | |
| 	    *pwidth = pCurPriv->width;
 | |
| 	if (*pheight > pCurPriv->height)
 | |
| 	    *pheight = pCurPriv->height;
 | |
| 	if (*pwidth > pScreen->width)
 | |
| 	    *pwidth = pScreen->width;
 | |
| 	if (*pheight > pScreen->height)
 | |
| 	    *pheight = pScreen->height;
 | |
| 	break;
 | |
|     default:
 | |
| 	fbQueryBestSize (class, pwidth, pheight, pScreen);
 | |
| 	break;
 | |
|     }
 | |
| }
 | |
| 
 | |
| Bool
 | |
| s3CursorInit (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     if (!s3s->cursor_base)
 | |
|     {
 | |
| 	pCurPriv->has_cursor = FALSE;
 | |
| 	return FALSE;
 | |
|     }
 | |
|     
 | |
|     pCurPriv->width = S3_CURSOR_WIDTH;
 | |
|     pCurPriv->height= S3_CURSOR_HEIGHT;
 | |
|     pScreen->QueryBestSize = s3QueryBestSize;
 | |
|     miPointerInitialize (pScreen,
 | |
| 			 &s3PointerSpriteFuncs,
 | |
| 			 &kdPointerScreenFuncs,
 | |
| 			 FALSE);
 | |
|     pCurPriv->has_cursor = TRUE;
 | |
|     pCurPriv->pCursor = NULL;
 | |
|     return TRUE;
 | |
| }
 | |
| 
 | |
| void
 | |
| s3CursorEnable (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     if (pCurPriv->has_cursor)
 | |
|     {
 | |
| 	if (pCurPriv->pCursor)
 | |
| 	{
 | |
| #ifdef FB_OLD_SCREEN
 | |
| 	    short	x, y;
 | |
| #else
 | |
| 	    int		x, y;
 | |
| #endif
 | |
| 	    
 | |
| 	    miPointerPosition (&x, &y);
 | |
| 	    s3LoadCursor (pScreen, x, y);
 | |
| 	}
 | |
| 	else
 | |
| 	    s3UnloadCursor (pScreen);
 | |
|     }
 | |
| }
 | |
| 
 | |
| void
 | |
| s3CursorDisable (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     if (!pScreenPriv->enabled)
 | |
| 	return;
 | |
|     
 | |
|     if (pCurPriv->has_cursor)
 | |
|     {
 | |
| 	if (pCurPriv->pCursor)
 | |
| 	{
 | |
| 	    s3UnloadCursor (pScreen);
 | |
| 	}
 | |
|     }
 | |
| }
 | |
| 
 | |
| void
 | |
| s3CursorFini (ScreenPtr pScreen)
 | |
| {
 | |
|     SetupCursor (pScreen);
 | |
| 
 | |
|     pCurPriv->pCursor = NULL;
 | |
| }
 |