453 lines
11 KiB
C
453 lines
11 KiB
C
/*
|
|
* Copyright 2001 by Alan Hourihane, Sychdyn, North Wales, UK.
|
|
*
|
|
* 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 Alan Hourihane not be used in
|
|
* advertising or publicity pertaining to distribution of the software without
|
|
* specific, written prior permission. Alan Hourihane makes no representations
|
|
* about the suitability of this software for any purpose. It is provided
|
|
* "as is" without express or implied warranty.
|
|
*
|
|
* ALAN HOURIHANE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
|
|
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
|
|
* EVENT SHALL ALAN HOURIHANE 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.
|
|
*
|
|
* Authors: Alan Hourihane, <alanh@fairlite.demon.co.uk>
|
|
*/
|
|
/* $RCSId: $ */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include <kdrive-config.h>
|
|
#endif
|
|
#include "pcmcia.h"
|
|
#include "cursorstr.h"
|
|
|
|
#define SetupCursor(s) KdScreenPriv(s); \
|
|
pcmciaCardInfo(pScreenPriv); \
|
|
pcmciaScreenInfo(pScreenPriv); \
|
|
pcmciaCursor *pCurPriv = &pcmcias->cursor
|
|
|
|
static void
|
|
_pcmciaMoveCursor (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;
|
|
}
|
|
|
|
/* This is the recommended order to move the cursor */
|
|
if (pcmciac->HP) {
|
|
xlow = (CARD8) x;
|
|
xhigh = (CARD8) (x >> 8);
|
|
ylow = (CARD8) y;
|
|
yhigh = (CARD8) (y >> 8);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x40, xlow);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x41, xhigh);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x42, ylow);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x43, yhigh);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x46, xoff);
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x47, yoff);
|
|
} else {
|
|
x >>= 3;
|
|
y >>= 3;
|
|
xlow = (CARD8) x;
|
|
xhigh = (CARD8) (x >> 8);
|
|
ylow = (CARD8) y;
|
|
yhigh = (CARD8) (y >> 8);
|
|
/* Don't be alarmed, yes the upper 3bits of the index are correct */
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x10 | xhigh << 5, xlow);
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x11 | yhigh << 5, ylow);
|
|
}
|
|
}
|
|
|
|
static void
|
|
pcmciaMoveCursor (ScreenPtr pScreen, int x, int y)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
if (!pCurPriv->has_cursor)
|
|
return;
|
|
|
|
if (!pScreenPriv->enabled)
|
|
return;
|
|
|
|
_pcmciaMoveCursor (pScreen, x, y);
|
|
}
|
|
|
|
static void
|
|
pcmciaAllocCursorColors (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
CursorPtr pCursor = pCurPriv->pCursor;
|
|
|
|
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
|
|
pcmciaSetCursorColors (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
CursorPtr pCursor = pCurPriv->pCursor;
|
|
CARD32 fg, bg;
|
|
|
|
fg = pCurPriv->source;
|
|
bg = pCurPriv->mask;
|
|
|
|
if (pcmciac->HP) {
|
|
/*
|
|
* This trident chip uses the palette for it's cursor colors - ouch!
|
|
* We enforce it to always stay the black/white colors as we don't
|
|
* want it to muck with the overscan color. Tough. Use softCursor
|
|
* if you want to change cursor colors.
|
|
*/
|
|
pcmciaWriteReg (pcmciac, 0x3c8, 0xff); /* DAC 0 */
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x00);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x00);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x00);
|
|
pcmciaWriteReg (pcmciac, 0x3c8, 0x00); /* DAC 255 */
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x3f);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x3f);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, 0x3f);
|
|
} else {
|
|
CARD8 temp;
|
|
temp = pcmciaReadIndex(pcmciac, 0x3c4, 0x12);
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x12, (temp & 0xFE) | 0x02);
|
|
|
|
pcmciaWriteReg (pcmciac, 0x3c8, 0x00); /* DAC 256 */
|
|
pcmciaWriteReg (pcmciac, 0x3c9, fg);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, fg >> 8);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, fg >> 16);
|
|
pcmciaWriteReg (pcmciac, 0x3c8, 0x00); /* DAC 257 */
|
|
pcmciaWriteReg (pcmciac, 0x3c9, bg);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, bg >> 8);
|
|
pcmciaWriteReg (pcmciac, 0x3c9, bg >> 16);
|
|
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x12, temp);
|
|
}
|
|
}
|
|
|
|
void
|
|
pcmciaRecolorCursor (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;
|
|
}
|
|
pcmciaAllocCursorColors (pScreen);
|
|
pcmciaSetCursorColors (pScreen);
|
|
}
|
|
|
|
#define InvertBits32(v) { \
|
|
v = ((v & 0x55555555) << 1) | ((v >> 1) & 0x55555555); \
|
|
v = ((v & 0x33333333) << 2) | ((v >> 2) & 0x33333333); \
|
|
v = ((v & 0x0f0f0f0f) << 4) | ((v >> 4) & 0x0f0f0f0f); \
|
|
}
|
|
|
|
static void
|
|
pcmciaLoadCursor (ScreenPtr pScreen, int x, int y)
|
|
{
|
|
SetupCursor(pScreen);
|
|
CursorPtr pCursor = pCurPriv->pCursor;
|
|
CursorBitsPtr bits = pCursor->bits;
|
|
int w, h;
|
|
CARD8 *ram;
|
|
CARD32 *msk, *mskLine, *src, *srcLine;
|
|
int i, j;
|
|
int cursor_address;
|
|
int lwsrc;
|
|
unsigned char ramdac_control_;
|
|
CARD32 offset;
|
|
|
|
/*
|
|
* Allocate new colors
|
|
*/
|
|
pcmciaAllocCursorColors (pScreen);
|
|
|
|
pCurPriv->pCursor = pCursor;
|
|
pCurPriv->xhot = pCursor->bits->xhot;
|
|
pCurPriv->yhot = pCursor->bits->yhot;
|
|
|
|
/*
|
|
* Stick new image into cursor memory
|
|
*/
|
|
if (pcmciac->HP) {
|
|
ram = (CARD8 *) pcmcias->cursor_base;
|
|
} else {
|
|
/* The last bank */
|
|
ram = (CARD8 *) pcmciac->fb;
|
|
pcmciaWriteIndex (pcmciac, 0x3ce, 0x09, 0x7f);
|
|
pcmciaWriteIndex (pcmciac, 0x3ce, 0x0A, 0x7f);
|
|
}
|
|
|
|
mskLine = (CARD32 *) bits->mask;
|
|
srcLine = (CARD32 *) bits->source;
|
|
|
|
h = bits->height;
|
|
if (h > PCMCIA_CURSOR_HEIGHT)
|
|
h = PCMCIA_CURSOR_HEIGHT;
|
|
|
|
lwsrc = BitmapBytePad(bits->width) / 4;
|
|
|
|
for (i = 0; i < PCMCIA_CURSOR_HEIGHT; i++) {
|
|
msk = mskLine;
|
|
src = srcLine;
|
|
mskLine += lwsrc;
|
|
srcLine += lwsrc;
|
|
for (j = 0; j < PCMCIA_CURSOR_WIDTH / 32; j++) {
|
|
|
|
CARD32 m, s;
|
|
|
|
if (i < h && j < lwsrc)
|
|
{
|
|
m = *msk++;
|
|
s = *src++;
|
|
InvertBits32(m);
|
|
InvertBits32(s);
|
|
}
|
|
else
|
|
{
|
|
m = 0;
|
|
s = 0;
|
|
}
|
|
|
|
/* Do 8bit access */
|
|
*ram++ = (m & 0xff);
|
|
*ram++ = (m & 0xff00) >> 8;
|
|
*ram++ = (m & 0xff0000) >> 16;
|
|
*ram++ = (m & 0xff000000) >> 24;
|
|
*ram++ = (s & 0xff);
|
|
*ram++ = (s & 0xff00) >> 8;
|
|
*ram++ = (s & 0xff0000) >> 16;
|
|
*ram++ = (s & 0xff000000) >> 24;
|
|
}
|
|
}
|
|
|
|
/* Set address for cursor bits */
|
|
if (pcmciac->HP) {
|
|
offset = pcmcias->cursor_base - (CARD8 *) pcmcias->screen;
|
|
offset >>= 10;
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x44, (CARD8) (offset & 0xff));
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x45, (CARD8) (offset >> 8));
|
|
} else {
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x13, 15); /* ?? */
|
|
}
|
|
|
|
/* Set new color */
|
|
pcmciaSetCursorColors (pScreen);
|
|
|
|
/* Enable the cursor */
|
|
if (pcmciac->HP)
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x50, 0xc1);
|
|
else
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x12, 0x05);
|
|
|
|
/* Move to new position */
|
|
pcmciaMoveCursor (pScreen, x, y);
|
|
}
|
|
|
|
static void
|
|
pcmciaUnloadCursor (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
/* Disable cursor */
|
|
if (pcmciac->HP)
|
|
pcmciaWriteIndex (pcmciac, 0x3d4, 0x50, 0);
|
|
else
|
|
pcmciaWriteIndex (pcmciac, 0x3c4, 0x12, 0);
|
|
}
|
|
|
|
static Bool
|
|
pcmciaRealizeCursor (ScreenPtr pScreen, CursorPtr pCursor)
|
|
{
|
|
SetupCursor(pScreen);
|
|
|
|
if (!pScreenPriv->enabled)
|
|
return TRUE;
|
|
|
|
/* miRecolorCursor does this */
|
|
if (pCurPriv->pCursor == pCursor)
|
|
{
|
|
if (pCursor)
|
|
{
|
|
int x, y;
|
|
|
|
miPointerPosition (&x, &y);
|
|
pcmciaLoadCursor (pScreen, x, y);
|
|
}
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
static Bool
|
|
pcmciaUnrealizeCursor (ScreenPtr pScreen, CursorPtr pCursor)
|
|
{
|
|
return TRUE;
|
|
}
|
|
|
|
static void
|
|
pcmciaSetCursor (ScreenPtr pScreen, CursorPtr pCursor, int x, int y)
|
|
{
|
|
SetupCursor(pScreen);
|
|
|
|
pCurPriv->pCursor = pCursor;
|
|
|
|
if (!pScreenPriv->enabled)
|
|
return;
|
|
|
|
if (pCursor)
|
|
pcmciaLoadCursor (pScreen, x, y);
|
|
else
|
|
pcmciaUnloadCursor (pScreen);
|
|
}
|
|
|
|
miPointerSpriteFuncRec pcmciaPointerSpriteFuncs = {
|
|
pcmciaRealizeCursor,
|
|
pcmciaUnrealizeCursor,
|
|
pcmciaSetCursor,
|
|
pcmciaMoveCursor,
|
|
};
|
|
|
|
static void
|
|
pcmciaQueryBestSize (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
|
|
pcmciaCursorInit (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
if (!pcmcias->cursor_base)
|
|
{
|
|
pCurPriv->has_cursor = FALSE;
|
|
return FALSE;
|
|
}
|
|
|
|
pCurPriv->width = PCMCIA_CURSOR_WIDTH;
|
|
pCurPriv->height= PCMCIA_CURSOR_HEIGHT;
|
|
pScreen->QueryBestSize = pcmciaQueryBestSize;
|
|
miPointerInitialize (pScreen,
|
|
&pcmciaPointerSpriteFuncs,
|
|
&kdPointerScreenFuncs,
|
|
FALSE);
|
|
pCurPriv->has_cursor = TRUE;
|
|
pCurPriv->pCursor = NULL;
|
|
return TRUE;
|
|
}
|
|
|
|
void
|
|
pcmciaCursorEnable (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
if (pCurPriv->has_cursor)
|
|
{
|
|
if (pCurPriv->pCursor)
|
|
{
|
|
int x, y;
|
|
|
|
miPointerPosition (&x, &y);
|
|
pcmciaLoadCursor (pScreen, x, y);
|
|
}
|
|
else
|
|
pcmciaUnloadCursor (pScreen);
|
|
}
|
|
}
|
|
|
|
void
|
|
pcmciaCursorDisable (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
if (!pScreenPriv->enabled)
|
|
return;
|
|
|
|
if (pCurPriv->has_cursor)
|
|
{
|
|
if (pCurPriv->pCursor)
|
|
{
|
|
pcmciaUnloadCursor (pScreen);
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
pcmciaCursorFini (ScreenPtr pScreen)
|
|
{
|
|
SetupCursor (pScreen);
|
|
|
|
pCurPriv->pCursor = NULL;
|
|
}
|