4.4BSD/usr/src/contrib/X11R5-hp300/mit/server/ddx/hpbsd/cfb/cfbpixmap.c
/* $XConsortium: cfbpixmap.c,v 5.7 91/07/18 23:36:46 keith Exp $ */
/***********************************************************
Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts,
and the Massachusetts Institute of Technology, Cambridge, 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 names of Digital or MIT 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.
******************************************************************/
/* pixmap management
written by drewry, september 1986
on a monchrome device, a pixmap is a bitmap.
*/
#include "Xmd.h"
#include "servermd.h"
#include "pixmapstr.h"
#include "cfbmskbits.h"
#include "cfb.h"
#include "mi.h"
#include "scrnintstr.h"
#include "gcstruct.h"
extern void mfbXRotatePixmap(), mfbYRotatePixmap();
#if (BITMAP_BIT_ORDER == MSBFirst)
static int masktab[32] =
{
0x00000000,
0x80000000,
0xC0000000,
0xE0000000,
0xF0000000,
0xF8000000,
0xFC000000,
0xFE000000,
0xFF000000,
0xFF800000,
0xFFC00000,
0xFFE00000,
0xFFF00000,
0xFFF80000,
0xFFFC0000,
0xFFFE0000,
0xFFFF0000,
0xFFFF8000,
0xFFFFC000,
0xFFFFE000,
0xFFFFF000,
0xFFFFF800,
0xFFFFFC00,
0xFFFFFE00,
0xFFFFFF00,
0xFFFFFF80,
0xFFFFFFC0,
0xFFFFFFE0,
0xFFFFFFF0,
0xFFFFFFF8,
0xFFFFFFFC,
0xFFFFFFFE
};
#else
static int masktab[32] =
{
0x00000000,
0x00000001,
0x00000003,
0x00000007,
0x0000000F,
0x0000001F,
0x0000003F,
0x0000007F,
0x000000FF,
0x000001FF,
0x000003FF,
0x000007FF,
0x00000FFF,
0x00001FFF,
0x00003FFF,
0x00007FFF,
0x0000FFFF,
0x0001FFFF,
0x0003FFFF,
0x0007FFFF,
0x000FFFFF,
0x001FFFFF,
0x003FFFFF,
0x007FFFFF,
0x00FFFFFF,
0x01FFFFFF,
0x03FFFFFF,
0x07FFFFFF,
0x0FFFFFFF,
0x1FFFFFFF,
0x3FFFFFFF,
0x7FFFFFFF
};
#endif
PixmapPtr
cfbCreatePixmap (pScreen, width, height, bitsPerPixel)
ScreenPtr pScreen;
int width;
int height;
int bitsPerPixel;
{
register PixmapPtr pPixmap;
register hpPrivPixmapPtr pPrivPixmap;
int size;
if (bitsPerPixel != 1 && bitsPerPixel != PSZ)
return NullPixmap;
pPixmap = (PixmapPtr) xalloc(sizeof(PixmapRec) + sizeof(hpPrivPixmap));
if (!pPixmap)
return NullPixmap;
pPixmap->devPrivate.ptr = (pointer)(pPixmap+1);
pPixmap->drawable.type = DRAWABLE_PIXMAP;
pPixmap->drawable.class = 0;
pPixmap->drawable.pScreen = pScreen;
pPixmap->drawable.depth = bitsPerPixel;
pPixmap->drawable.bitsPerPixel = bitsPerPixel;
pPixmap->drawable.id = 0;
pPixmap->drawable.serialNumber = NEXT_SERIAL_NUMBER;
pPixmap->drawable.x = 0;
pPixmap->drawable.y = 0;
pPixmap->drawable.width = width;
pPixmap->drawable.height = height;
pPixmap->refcnt = 1;
pPrivPixmap = (hpPrivPixmapPtr) pPixmap->devPrivate.ptr;
pPrivPixmap->stride = PixmapBytePad(width, bitsPerPixel);
if ((bitsPerPixel == PSZ) &&
(pPrivPixmap->pChunk = hpBufAlloc(pScreen, pPrivPixmap->stride, height)))
{
pPrivPixmap->stride =
((hpPrivScreenPtr)(pScreen->devPrivate))->stride;
pPixmap->devKind = PIXMAP_FRAME_BUFFER;
pPrivPixmap->bits = (pointer)
(((hpPrivScreenPtr)(pScreen->devPrivate))->bits) +
(pPrivPixmap->pChunk->y * pPrivPixmap->stride) +
pPrivPixmap->pChunk->x;
}
else /* depth == 1 or no off-screen memory */
{
pPixmap->devKind = PIXMAP_HOST_MEMORY;
size = height * pPrivPixmap->stride;
if ( !(pPrivPixmap->bits = (pointer)xalloc(size)))
{
xfree(pPixmap);
return NullPixmap;
}
else
bzero((char *)pPrivPixmap->bits, size);
}
return pPixmap;
}
PixmapPtr
cfbCreateOffscreenPixmap (pScreen, width, height, bitsPerPixel)
ScreenPtr pScreen;
int width;
int height;
int bitsPerPixel;
{
register PixmapPtr pPixmap;
register hpPrivPixmapPtr pPrivPixmap;
int size;
if (bitsPerPixel != PSZ)
return NullPixmap;
pPixmap = (PixmapPtr) xalloc(sizeof(PixmapRec) + sizeof(hpPrivPixmap));
if (!pPixmap)
return NullPixmap;
pPixmap->devPrivate.ptr = (pointer)(pPixmap+1);
pPixmap->drawable.type = DRAWABLE_PIXMAP;
pPixmap->drawable.class = 0;
pPixmap->drawable.pScreen = pScreen;
pPixmap->drawable.depth = bitsPerPixel;
pPixmap->drawable.bitsPerPixel = bitsPerPixel;
pPixmap->drawable.id = 0;
pPixmap->drawable.serialNumber = NEXT_SERIAL_NUMBER;
pPixmap->drawable.x = 0;
pPixmap->drawable.y = 0;
pPixmap->drawable.width = width;
pPixmap->drawable.height = height;
pPixmap->refcnt = 1;
pPrivPixmap = (hpPrivPixmapPtr) pPixmap->devPrivate.ptr;
pPrivPixmap->stride = PixmapBytePad(width, bitsPerPixel);
if ((pPrivPixmap->pChunk = hpBufAlloc(pScreen, pPrivPixmap->stride, height)))
{
pPrivPixmap->stride =
((hpPrivScreenPtr)(pScreen->devPrivate))->stride;
pPixmap->devKind = PIXMAP_FRAME_BUFFER;
pPrivPixmap->bits = (pointer)
(((hpPrivScreenPtr)(pScreen->devPrivate))->bits) +
(pPrivPixmap->pChunk->y * pPrivPixmap->stride) +
pPrivPixmap->pChunk->x;
}
else /* Cannot create offscreen pixmap */
{
xfree(pPixmap);
return NullPixmap;
}
return pPixmap;
}
Bool
cfbDestroyPixmap(pPixmap)
PixmapPtr pPixmap;
{
/* BOGOSITY ALERT */
if ((unsigned) pPixmap < 42)
return TRUE;
if(--pPixmap->refcnt)
return TRUE;
if (pPixmap->devKind == PIXMAP_FRAME_BUFFER)
hpBufFree (pPixmap->drawable.pScreen,
((hpPrivPixmapPtr)pPixmap->devPrivate.ptr)->pChunk);
else
xfree(((hpPrivPixmapPtr)pPixmap->devPrivate.ptr)->bits);
xfree(pPixmap);
return TRUE;
}
PixmapPtr
cfbCopyPixmap(pSrc)
register PixmapPtr pSrc;
{
register PixmapPtr pDst;
register int *pSrcInt, *pDstInt, *pSrcI, *pDstI, *pDstMax;
register hpPrivPixmapPtr pPrivDst, pPrivSrc;
int copyWords, i;
void (*bitMover)();
pDst = cfbCreatePixmap(pSrc->drawable.pScreen, pSrc->drawable.width,
pSrc->drawable.height, pSrc->drawable.bitsPerPixel);
if (!pDst)
return NullPixmap;
pPrivSrc = (hpPrivPixmapPtr) pSrc->devPrivate.ptr;
pPrivDst = (hpPrivPixmapPtr) pDst->devPrivate.ptr;
pSrcInt = (int *)pPrivSrc->bits;
pDstInt = (int *)pPrivDst->bits;
if (pSrc->drawable.depth == 1)
{ /* bit per pixel */
pDstMax = pDstInt + ((pDst->drawable.height * pPrivDst->stride) >> 2);
/* Copy words */
while(pDstInt < pDstMax)
*pDstInt++ = *pSrcInt++;
}
else
{ /* byte per pixel */
if ((pSrc->devKind == PIXMAP_FRAME_BUFFER) &&
(pDst->devKind == PIXMAP_FRAME_BUFFER))
{
bitMover = ((hpPrivScreenPtr)
(pSrc->drawable.pScreen->devPrivate))->MoveBits;
(*bitMover)(pSrc->drawable.pScreen, ~0, GXcopy,
pPrivSrc->pChunk->x,
pPrivSrc->pChunk->y,
pPrivDst->pChunk->x,
pPrivDst->pChunk->y,
pSrc->drawable.width, pSrc->drawable.height);
}
else
{
if (pSrc->devKind == PIXMAP_FRAME_BUFFER)
WAIT_READY_TO_RENDER(pSrc->drawable.pScreen);
if (pDst->devKind == PIXMAP_FRAME_BUFFER)
SET_REGISTERS_FOR_WRITING(pDst->drawable.pScreen, ~0, GXcopy);
copyWords = (pDst->drawable.width + 3) >> 2; /* width will be in bytes */
for (i=0;
i < pDst->drawable.height;
pSrcInt = (int *)((char *)pSrcInt + pPrivSrc->stride),
pDstInt = (int *)((char *)pDstInt + pPrivDst->stride),
i++)
{
pDstMax = pDstInt + copyWords;
pSrcI = pSrcInt;
pDstI = pDstInt;
while (pDstI < pDstMax)
*pDstI++ = *pSrcI++;
}
}
}
return pDst;
}
/* replicates a pattern to be a full 32 bits wide.
relies on the fact that each scnaline is longword padded.
doesn't do anything if pixmap is not a factor of 32 wide.
changes width field of pixmap if successful, so that the fast
cfbXRotatePixmap code gets used if we rotate the pixmap later.
cfbYRotatePixmap code gets used if we rotate the pixmap later.
calculate number of times to repeat
for each scanline of pattern
zero out area to be filled with replicate
left shift and or in original as many times as needed
*/
void
cfbPadPixmap(pPixmap)
PixmapPtr pPixmap;
{
register int width = (pPixmap->drawable.width) * (pPixmap->drawable.bitsPerPixel);
register int h;
register int mask;
register unsigned int *p;
register unsigned int bits; /* real pattern bits */
register int i;
int rep; /* repeat count for pattern */
int stride;
if (width >= 32)
return;
if (pPixmap->devKind == PIXMAP_FRAME_BUFFER)
stride = ((hpPrivPixmapPtr) pPixmap->devPrivate.ptr)->stride >> 2;
else
stride = 1;
rep = 32/width;
if (rep*width != 32)
return;
mask = masktab[width];
p = (unsigned int *)(((hpPrivPixmapPtr)(pPixmap->devPrivate.ptr))->bits);
for (h=0; h < pPixmap->drawable.height; h++)
{
*p &= mask;
bits = *p;
for(i=1; i<rep; i++)
{
#if (BITMAP_BIT_ORDER == MSBFirst)
bits >>= width;
#else
bits <<= width;
#endif
*p |= bits;
}
p += stride;
}
pPixmap->drawable.width = 32/(pPixmap->drawable.bitsPerPixel);
}
#ifdef notdef
/*
* cfb debugging routine -- assumes pixmap is 1 byte deep
*/
static cfbdumppixmap(pPix)
PixmapPtr pPix;
{
unsigned int *pw;
char *psrc, *pdst;
int i, j;
char line[66];
ErrorF( "pPixmap: 0x%x\n", pPix);
ErrorF( "%d wide %d high\n", pPix->drawable.width, pPix->drawable.height);
if (pPix->drawable.width > 64)
{
ErrorF( "too wide to see\n");
return;
}
pw = (unsigned int *) (((hpPrivPixmapPtr)(pPix->devPrivate.ptr))->bits;
psrc = (char *) pw;
/*
for ( i=0; i<pPix->drawable.height; ++i )
ErrorF( "0x%x\n", pw[i] );
*/
for ( i = 0; i < pPix->drawable.height; ++i ) {
pdst = line;
for(j = 0; j < pPix->drawable.width; j++) {
*pdst++ = *psrc++ ? 'X' : ' ' ;
}
*pdst++ = '\n';
*pdst++ = '\0';
ErrorF( "%s", line);
}
}
#endif /* notdef */
/* Rotates pixmap pPix by w pixels to the right on the screen. Assumes that
* words are 32 bits wide, and that the least significant bit appears on the
* left.
*/
void
cfbXRotatePixmap(pPix, rw)
PixmapPtr pPix;
register int rw;
{
register unsigned int *pw, *pwFinal;
register unsigned int t;
int rot;
hpPrivPixmapPtr pPrivPix;
int i;
if (pPix == NullPixmap)
return;
switch (((DrawablePtr) pPix)->bitsPerPixel) {
case PSZ:
break;
case 1:
mfbXRotatePixmap(pPix, rw);
return;
default:
ErrorF("cfbXRotatePixmap: unsupported bitsPerPixel %d\n", ((DrawablePtr) pPix)->bitsPerPixel);
return;
}
pPrivPix = (hpPrivPixmapPtr) (pPix->devPrivate.ptr);
pw = (unsigned int *) pPrivPix->bits;
modulus (rw, (int) pPix->drawable.width, rot);
if (rot == 0)
return;
if(pPix->drawable.width == PPW)
{
if (pPix->devKind == PIXMAP_HOST_MEMORY)
{
pwFinal = pw + pPix->drawable.height;
while(pw < pwFinal)
{
t = *pw;
*pw++ = SCRRIGHT(t, rot) |
(SCRLEFT(t, (PPW-rot)) & cfbendtab[rot]);
}
}
else /* PIXMAP_FRAME_BUFFER */
{
int stride = pPrivPix->stride >> 2;
SET_REGISTERS_FOR_WRITING(pPix->drawable.pScreen, ~0, GXcopy);
for (i=0; i<pPix->drawable.height; i++, pw += stride)
{
t = *pw;
*pw = SCRRIGHT(t, rot) |
(SCRLEFT(t, (PPW-rot)) & cfbendtab[rot]);
}
}
}
else /* slow case */
{
ErrorF("cfb internal error: trying to rotate odd-sized pixmap.\n");
#ifdef notdef
register unsigned int *pwTmp;
int size, tsize;
tsize = PixmapBytePad(pPix->drawable.width - rot, PSZ);
pwTmp = (unsigned int *) ALLOCATE_LOCAL(pPix->drawable.height * tsize);
if (!pwTmp)
return;
/* divide pw (the pixmap) in two vertically at (w - rot) and swap */
tsize >>= 2;
size = pPix->devKind >> 2;
cfbQuickBlt((int *)pw, (int *)pwTmp,
0, 0, 0, 0,
(int)pPix->drawable.width - rot, (int)pPix->drawable.height,
size, tsize);
cfbQuickBlt((int *)pw, (int *)pw,
(int)pPix->drawable.width - rot, 0, 0, 0,
rot, (int)pPix->drawable.height,
size, size);
cfbQuickBlt((int *)pwTmp, (int *)pw,
0, 0, rot, 0,
(int)pPix->drawable.width - rot, (int)pPix->drawable.height,
tsize, size);
DEALLOCATE_LOCAL(pwTmp);
#endif
}
}
/* Rotates pixmap pPix by h lines. Assumes that h is always less than
pPix->drawable.height
works on any width.
*/
void
cfbYRotatePixmap(pPix, rh)
register PixmapPtr pPix;
int rh;
{
int nbyDown; /* bytes to move down to row 0; also offset of
row rh */
int nbyUp; /* bytes to move up to line rh; also
offset of first line moved down to 0 */
char *pbase;
char *ptmp;
int rot;
hpPrivPixmapPtr pPrivPix;
if (pPix == NullPixmap)
return;
switch (((DrawablePtr) pPix)->bitsPerPixel) {
case PSZ:
break;
case 1:
mfbYRotatePixmap(pPix, rh);
return;
default:
ErrorF("cfbYRotatePixmap: unsupported bitsPerPixel %d\n", ((DrawablePtr) pPix)->bitsPerPixel);
return;
}
pPrivPix = (hpPrivPixmapPtr) (pPix->devPrivate.ptr);
modulus (rh, (int) pPix->drawable.height, rot);
if (rot == 0)
return;
if (pPix->devKind == PIXMAP_HOST_MEMORY)
{
pbase = (char *)pPrivPix->bits;
nbyDown = rot * pPrivPix->stride;
nbyUp = (pPrivPix->stride * pPix->drawable.height) - nbyDown;
if(!(ptmp = (char *)ALLOCATE_LOCAL(nbyUp)))
return;
bcopy(pbase, ptmp, nbyUp); /* save the low rows */
bcopy(pbase+nbyUp, pbase, nbyDown); /* slide the top rows down */
bcopy(ptmp, pbase+nbyDown, nbyUp); /* move lower rows up to row rot */
DEALLOCATE_LOCAL(ptmp);
}
else /* PIXMAP_FRAME_BUFFER */
{
/* o.k., divide the pixmap in two horizontally at (h - rh)
* pick up the part on the top and make it the temp
* pixmap. then pick up the part on the bottom and make it the top
* of the original pixmap. now copy in the part saved in temp and
* discard temp. All done.
*/
PixmapPtr pTemp;
short realTemp = 0;
if ((pPix->drawable.width > PRIV_PIX_WIDTH) ||
((pPix->drawable.height - rot) > PRIV_PIX_HEIGHT))
{
pTemp = (* pPix->drawable.pScreen->CreatePixmap)
(pPix->drawable.pScreen, pPix->drawable.width,
pPix->drawable.height - rot, pPix->drawable.depth);
realTemp = 1;
}
else
{ /* use pre-allocated pixmap */
pTemp =
(PixmapPtr)
((hpPrivScreen *)
(pPix->drawable.pScreen->devPrivate))->pTmpPixmap;
}
if (pTemp->devKind == PIXMAP_FRAME_BUFFER)
{
register hpChunk *pixChunk;
register hpChunk *tempChunk;
register void (*bitMover)();
tempChunk = ((hpPrivPixmapPtr)(pTemp->devPrivate.ptr))->pChunk;
pixChunk = pPrivPix->pChunk;
bitMover = ((hpPrivScreenPtr)
(pPix->drawable.pScreen->devPrivate))->MoveBits;
(*bitMover)(pPix->drawable.pScreen, ~0, GXcopy,
pixChunk->x,
pixChunk->y,
tempChunk->x,
tempChunk->y,
pPix->drawable.width, pPix->drawable.height - rot);
(*bitMover)(pPix->drawable.pScreen, ~0, GXcopy,
pixChunk->x,
(pixChunk->y + pPix->drawable.height - rot),
pixChunk->x,
pixChunk->y,
pPix->drawable.width, rot);
(*bitMover)(pPix->drawable.pScreen, ~0, GXcopy,
tempChunk->x,
tempChunk->y,
pixChunk->x,
(pixChunk->y + rot),
pPix->drawable.width, pPix->drawable.height - rot);
if (realTemp)
(* pPix->drawable.pScreen->DestroyPixmap)(pTemp);
}
else /* forced to use generic code */
{
GCPtr pGC;
CARD32 attribute;
pGC = GetScratchGC(pPix->drawable.depth,
pPix->drawable.pScreen);
attribute = GXcopy;
ChangeGC(pGC, GCFunction, &attribute, 1);
ValidateGC(pTemp, pGC);
(* pGC->ops->CopyArea)(pPix, pTemp, pGC,
0, 0,
pPix->drawable.width, pPix->drawable.height - rot,
0, 0);
ValidateGC(pPix, pGC);
(* pGC->ops->CopyArea)(pPix, pPix, pGC,
0, pPix->drawable.height - rot,
pPix->drawable.width, rot,
0, 0);
(* pGC->ops->CopyArea)(pTemp, pPix, pGC,
0, 0,
pPix->drawable.width, pPix->drawable.height - rot,
0, rot);
(* pPix->drawable.pScreen->DestroyPixmap)(pTemp);
FreeScratchGC(pGC);
}
}
}
void
cfbCopyRotatePixmap(psrcPix, ppdstPix, xrot, yrot)
register PixmapPtr psrcPix, *ppdstPix;
int xrot, yrot;
{
register PixmapPtr pdstPix = *ppdstPix;
#if 0
if (pdstPix &&
(pdstPix->devKind == psrcPix->devKind) &&
(pdstPix->drawable.height == psrcPix->drawable.height))
{
bcopy((char *)psrcPix->devPrivate.ptr,
(char *)pdstPix->devPrivate.ptr,
psrcPix->drawable.height * psrcPix->devKind);
pdstPix->drawable.width = psrcPix->drawable.width;
pdstPix->drawable.depth = psrcPix->drawable.depth;
pdstPix->drawable.bitsPerPixel = psrcPix->drawable.bitsPerPixel;
pdstPix->drawable.serialNumber = NEXT_SERIAL_NUMBER;
}
else
#endif
{
if (pdstPix)
cfbDestroyPixmap(pdstPix);
*ppdstPix = pdstPix = cfbCopyPixmap(psrcPix);
if (!pdstPix)
return;
}
cfbPadPixmap(pdstPix);
if (xrot)
cfbXRotatePixmap(pdstPix, xrot);
if (yrot)
cfbYRotatePixmap(pdstPix, yrot);
}