Initial revision

1 files changed, 537 insertions, 0 deletions

diff --git a/hw/xwin/winfillsp.c b/hw/xwin/winfillsp.c
new file mode 100644
index 000000000..faf9c67fc
--- /dev/null
+++ b/hw/xwin/winfillsp.c
@@ -0,0 +1,537 @@
+/*
+ *Copyright (C) 1994-2000 The XFree86 Project, Inc. All Rights Reserved.
+ *
+ *Permission is hereby granted, free of charge, to any person obtaining
+ * a copy of this software and associated documentation files (the
+ *"Software"), to deal in the Software without restriction, including
+ *without limitation the rights to use, copy, modify, merge, publish,
+ *distribute, sublicense, and/or sell copies of the Software, and to
+ *permit persons to whom the Software is furnished to do so, subject to
+ *the following conditions:
+ *
+ *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 XFREE86 PROJECT 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 XFree86 Project
+ *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 XFree86 Project.
+ *
+ * Authors:	Harold L Hunt II
+ */
+/* $XFree86: xc/programs/Xserver/hw/xwin/winfillsp.c,v 1.9 2001/11/01 12:19:40 alanh Exp $ */
+
+#include "win.h"
+
+/* See Porting Layer Definition - p. 54 */
+void
+winFillSpansNativeGDI (DrawablePtr	pDrawable,
+		       GCPtr		pGC,
+		       int		iSpans,
+		       DDXPointPtr	pPoints,
+		       int		*piWidths,
+		       int		fSorted)
+{
+  winGCPriv(pGC);
+  int			iSpan;
+  DDXPointPtr		pPoint = NULL;
+  int			*piWidth = 0;
+  HBITMAP		hbmpOrig = NULL, hbmpOrigStipple = NULL;
+  PixmapPtr		pPixmap = NULL;
+  winPrivPixmapPtr	pPixmapPriv = NULL;
+  HBITMAP		hbmpFilledStipple = NULL, hbmpMaskedForeground = NULL;
+  PixmapPtr		pStipple = NULL;
+  winPrivPixmapPtr	pStipplePriv = NULL;
+  PixmapPtr		pTile = NULL;
+  winPrivPixmapPtr	pTilePriv = NULL;
+  HBRUSH		hbrushStipple = NULL;
+  HDC			hdcStipple = NULL;
+  BYTE			*pbbitsFilledStipple = NULL;
+  int			iX;
+  DEBUG_FN_NAME("winFillSpans");
+  DEBUGVARS;
+  DEBUGPROC_MSG;
+
+  /* Branch on the type of drawable we have */
+  switch (pDrawable->type)
+    {
+    case DRAWABLE_PIXMAP:
+      ErrorF ("winFillSpans - DRAWABLE_PIXMAP\n");
+#if 0
+      /* Branch on the raster operation type */
+      switch (pGC->alu)
+	{
+	case GXclear:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXclear\n");
+	  break;
+	case GXand:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXand\n");
+	  break;
+	case GXandReverse:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXandReverse\n");
+	  break;
+	case GXcopy:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXcopy\n");
+	  break;
+	case GXandInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXandInverted\n");
+	  break;
+	case GXnoop:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXnoop\n");
+	  break;
+	case GXxor:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXxor\n");
+	  break;
+	case GXor:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXor\n");
+	  break;
+	case GXnor:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXnor\n");
+	  break;
+	case GXequiv:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXequiv\n");
+	  break;
+	case GXinvert:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXinvert\n");
+	  break;
+	case GXorReverse:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXorReverse\n");
+	  break;
+	case GXcopyInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXcopyInverted\n");
+	  break;
+	case GXorInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXorInverted\n");
+	  break;
+	case GXnand:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXnand\n");
+	  break;
+	case GXset:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - GXset\n");
+	  break;
+	default:
+	  FatalError ("winFillSpans - DRAWABLE_PIXMAP - Unknown ROP\n");
+	  break;
+	}
+#endif
+
+      /* Get a pixmap pointer from the drawable pointer, and fetch privates  */
+      pPixmap = (PixmapPtr) pDrawable;
+      pPixmapPriv = winGetPixmapPriv (pPixmap);
+
+      /* Select the drawable pixmap into memory hdc */
+      hbmpOrig = SelectObject (pGCPriv->hdcMem, pPixmapPriv->hBitmap);
+      if (hbmpOrig == NULL)
+	FatalError ("winFillSpans - DRAWABLE_PIXMAP - "
+		    "SelectObject () failed on pPixmapPriv->hBitmap\n");
+      
+      /* Branch on the fill type */
+      switch (pGC->fillStyle)
+	{
+	case FillSolid:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - FillSolid %08x\n",
+		  pDrawable);
+	  
+	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc, 
+		  pDrawable->width, pDrawable->height,
+		  pDrawable->width, pDrawable->height,
+		  pGCPriv->hdcMem,
+		  0, 0, 
+		  SRCCOPY);
+	  DEBUG_MSG ("FillSolid - Original bitmap");
+
+	  /* Enumerate spans */
+	  for (iSpan = 0; iSpan < iSpans; ++iSpan)
+	    {
+	      /* Get pointers to the current span location and width */
+	      pPoint = pPoints + iSpan;
+	      piWidth = piWidths + iSpan;
+
+	      /* Display some useful information */
+	      ErrorF ("(%dx%dx%d) (%d,%d) fg: %d bg: %d w: %d\n",
+		      pDrawable->width, pDrawable->height, pDrawable->depth,
+		      pPoint->x, pPoint->y,
+		      pGC->fgPixel, pGC->bgPixel,
+		      *piWidth);
+
+	      /* Draw the requested line */
+	      MoveToEx (pGCPriv->hdcMem, pPoint->x, pPoint->y, NULL);
+	      LineTo (pGCPriv->hdcMem, pPoint->x + *piWidth, pPoint->y);
+	    }
+
+	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc, 
+		  pDrawable->width * 2, pDrawable->height,
+		  pDrawable->width, pDrawable->height,
+		  pGCPriv->hdcMem,
+		  0, 0, 
+		  SRCCOPY);
+	  DEBUG_MSG ("FillSolid - Filled bitmap");
+
+	  
+	  /* Push the drawable pixmap out of the GC HDC */
+	  SelectObject (pGCPriv->hdcMem, hbmpOrig);
+	  break;
+
+	case FillStippled:
+	  ErrorF ("winFillSpans - DRAWABLE_PIXMAP - FillStippled %08x\n",
+		  pDrawable);
+
+	  /*
+	   * FIXME: Assuming that pGC->patOrg.x = pGC->patOrg.y = 0
+	   */
+
+	  pStipple = pGC->stipple;
+	  pStipplePriv = winGetPixmapPriv (pStipple);
+
+	  /* Create a memory DC to hold the stipple */
+	  hdcStipple = CreateCompatibleDC (pGCPriv->hdc);
+
+	  /* Create a destination sized compatible bitmap */
+	  hbmpFilledStipple = winCreateDIBNativeGDI (pDrawable->width,
+						     pDrawable->height,
+						     pDrawable->depth,
+						     &pbbitsFilledStipple,
+						     NULL);
+
+	  /* Select the stipple bitmap into the stipple DC */
+	  hbmpOrigStipple = SelectObject (hdcStipple, hbmpFilledStipple);
+	  if (hbmpOrigStipple == NULL)
+	    FatalError ("winFillSpans () - DRAWABLE_PIXMAP - FillStippled - "
+			"SelectObject () failed on hbmpFilledStipple\n");
+
+	  /* Create a pattern brush from the original stipple */
+	  hbrushStipple = CreatePatternBrush (pStipplePriv->hBitmap);
+
+	  /* Select the original stipple brush into the stipple DC */
+	  SelectObject (hdcStipple, hbrushStipple);
+
+	  /* PatBlt the original stipple to the filled stipple */
+	  PatBlt (hdcStipple,
+		  0, 0,
+		  pDrawable->width, pDrawable->height,
+		  PATCOPY);
+
+	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc,
+		  pDrawable->width, 0,
+		  pDrawable->width, pDrawable->height,
+		  hdcStipple,
+		  0, 0,
+		  SRCCOPY);
+	  DEBUG_MSG("Filled a drawable-sized stipple");
+
+	  /*
+	   * Mask out the bits from the drawable that are being preserved;
+	   * hbmpFilledStipple now contains the preserved original bits.
+	   */
+	  BitBlt (hdcStipple,
+		  0, 0,
+		  pDrawable->width, pDrawable->height,
+		  pGCPriv->hdcMem,
+		  0, 0,
+		  SRCERASE);
+
+      	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc,
+		  pDrawable->width * 2, 0,
+		  pDrawable->width, pDrawable->height,
+		  hdcStipple,
+		  0, 0,
+		  SRCCOPY);
+	  DEBUG_MSG("Preserved original bits");
+
+	  /*
+	   * Create a destination sized compatible bitmap to hold
+	   * the masked foreground color.
+	   */
+	  hbmpMaskedForeground = winCreateDIBNativeGDI (pDrawable->width,
+							pDrawable->height,
+							pDrawable->depth,
+							NULL,
+							NULL);
+
+	  /*
+	   * Select the masked foreground bitmap into the default memory DC;
+	   * this should pop the drawable bitmap out of the default DC.
+	   */
+	  if (SelectObject (pGCPriv->hdcMem, hbmpMaskedForeground) == NULL)
+	    FatalError ("winFillSpans () - DRAWABLE_PIXMAP - FillStippled - "
+			"SelectObject () failed on hbmpMaskedForeground\n");
+
+	  /* Free the original drawable */
+	  DeleteObject (pPixmapPriv->hBitmap);
+	  pPixmapPriv->hBitmap = NULL;
+	  pPixmapPriv->pbBits = NULL;
+
+	  /* Select the stipple brush into the default memory DC */
+	  SelectObject (pGCPriv->hdcMem, hbrushStipple);
+
+	  /* Create the masked foreground bitmap using the original stipple */
+	  PatBlt (pGCPriv->hdcMem,
+		  0, 0,
+		  pDrawable->width, pDrawable->height,
+		  PATCOPY);
+	  
+      	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc,
+		  pDrawable->width * 3, 0,
+		  pDrawable->width, pDrawable->height,
+		  pGCPriv->hdcMem,
+		  0, 0,
+		  SRCCOPY);
+	  DEBUG_MSG("Masked foreground bitmap");
+      
+	  /*
+	   * Combine the masked foreground with the masked drawable;
+	   * hbmpFilledStipple will contain the drawable stipple filled
+	   * with the current foreground color
+	   */
+	  BitBlt (hdcStipple,
+		  0, 0,
+		  pDrawable->width, pDrawable->height,
+		  pGCPriv->hdcMem,
+		  0, 0,
+		  SRCPAINT);
+
+	  /*
+	   * REMOVE - Visual verification only.
+	   */
+	  BitBlt (pGCPriv->hdc,
+		  pDrawable->width * 4, 0,
+		  pDrawable->width, pDrawable->height,
+		  hdcStipple,
+		  0, 0,
+		  SRCCOPY);
+	  DEBUG_MSG("Completed stipple");
+	  
+	  /* Release the stipple DC */
+	  SelectObject (hdcStipple, hbmpOrig);
+	  DeleteDC (hdcStipple);
+      
+	  /* Pop the stipple pattern brush out of the default mem DC */
+	  SelectObject (pGCPriv->hdcMem, GetStockObject (WHITE_BRUSH));
+
+	  /* Destroy the original stipple pattern brush */
+	  DeleteObject (hbrushStipple);
+
+	  /* Clear the memory DC */
+	  SelectObject (pGCPriv->hdcMem, hbmpOrig);
+
+	  /* Free the masked foreground bitmap */
+	  DeleteObject (hbmpMaskedForeground);
+
+	  /* Point the drawable to the new bitmap */
+	  pPixmapPriv->hBitmap = hbmpFilledStipple;
+	  pPixmapPriv->pbBits = pbbitsFilledStipple;
+	  break;
+
+	case FillTiled:
+	  FatalError ("\nwinFillSpans - DRAWABLE_PIXMAP - FillTiled\n\n");
+	  break;
+
+	case FillOpaqueStippled:
+	  FatalError ("winFillSpans - DRAWABLE_PIXMAP - OpaqueStippled\n");
+	  break;
+
+	default:
+	  FatalError ("winFillSpans - DRAWABLE_PIXMAP - Unknown "
+		      "fillStyle\n");
+	  break;
+	}
+      break;
+  
+    case DRAWABLE_WINDOW:
+      /* Branch on fill style */
+      switch (pGC->fillStyle)
+	{
+	case FillSolid:
+	  ErrorF ("\nwinFillSpans - DRAWABLE_WINDOW - FillSolid\n\n");
+
+	  /* Enumerate spans */
+	  for (iSpan = 0; iSpan < iSpans; ++iSpan)
+	    {
+	      /* Get pointers to the current span location and width */
+	      pPoint = pPoints + iSpan;
+	      piWidth = piWidths + iSpan;
+
+	      /* Display some useful information */
+	      ErrorF ("(%dx%dx%d) (%d,%d) fg: %d bg: %d w: %d\n",
+		      pDrawable->width, pDrawable->height, pDrawable->depth,
+		      pPoint->x, pPoint->y,
+		      pGC->fgPixel, pGC->bgPixel,
+		      *piWidth);
+
+	      /* Draw the requested line */
+	      MoveToEx (pGCPriv->hdc, pPoint->x, pPoint->y, NULL);
+	      LineTo (pGCPriv->hdc, pPoint->x + *piWidth, pPoint->y);
+	    }
+	  break;
+
+	case FillStippled:
+	  FatalError ("winFillSpans - DRAWABLE_WINDOW - FillStippled\n\n");
+	  break;
+
+	case FillTiled:
+	  ErrorF ("\nwinFillSpans - DRAWABLE_WINDOW - FillTiled\n\n");
+
+	  /* Get a pixmap pointer from the tile pointer, and fetch privates  */
+	  pTile = (PixmapPtr) pGC->tile.pixmap;
+	  pTilePriv = winGetPixmapPriv (pTile);
+
+	  /* Select the tile into a DC */
+	  hbmpOrig = SelectObject (pGCPriv->hdcMem, pTilePriv->hBitmap);
+	  if (hbmpOrig == NULL)
+	    FatalError ("winFillSpans - DRAWABLE_WINDOW - FillTiled - "
+			"SelectObject () failed on pTilePric->hBitmap\n");
+
+	  /* Enumerate spans */
+	  for (iSpan = 0; iSpan < iSpans; ++iSpan)
+	    {
+	      /* Get pointers to the current span location and width */
+	      pPoint = pPoints + iSpan;
+	      piWidth = piWidths + iSpan;
+	  
+	      for (iX = 0; iX < *piWidth; iX += pTile->drawable.width)
+		{
+		  /* Blit the tile to the screen, one line at a time */
+		  BitBlt (pGCPriv->hdc,
+			  pPoint->x + iX, pPoint->y,
+			  pTile->drawable.width, 1,
+			  pGCPriv->hdcMem,
+			  0, pPoint->y % pTile->drawable.height,
+			  SRCCOPY);
+		}
+	    }
+      
+	  /* Push the drawable pixmap out of the GC HDC */
+	  SelectObject (pGCPriv->hdcMem, hbmpOrig);
+
+#if 0
+	  DEBUG_MSG("Completed tile fill");
+#endif
+	  break;
+
+	case FillOpaqueStippled:
+	  FatalError ("winFillSpans - DRAWABLE_WINDOW - "
+		      "OpaqueStippled\n");
+	  break;
+
+	default:
+	  FatalError ("winFillSpans - DRAWABLE_WINDOW - Unknown "
+		      "fillStyle\n");
+	}
+
+      /* Branch on the raster operation type */
+      switch (pGC->alu)
+	{
+	case GXclear:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXclear\n");
+	  break;
+	case GXand:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXand\n");
+	  break;
+	case GXandReverse:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXandReverse\n");
+	  break;
+	case GXcopy:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXcopy\n");
+	  break;
+	case GXandInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXandInverted\n");
+	  break;
+	case GXnoop:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXnoop\n");
+	  break;
+	case GXxor:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXxor\n");
+	  break;
+	case GXor:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXor\n");
+	  break;
+	case GXnor:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXnor\n");
+	  break;
+	case GXequiv:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXequiv\n");
+	  break;
+	case GXinvert:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXinvert\n");
+	  break;
+	case GXorReverse:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXorReverse\n");
+	  break;
+	case GXcopyInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXcopyInverted\n");
+	  break;
+	case GXorInverted:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXorInverted\n");
+	  break;
+	case GXnand:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXnand\n");
+	  break;
+	case GXset:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - GXset\n");
+	  break;
+	default:
+	  ErrorF ("winFillSpans - DRAWABLE_WINDOW - Unknown ROP\n");
+	  break;
+	}
+      break;
+  
+    case UNDRAWABLE_WINDOW:
+      FatalError ("winFillSpans - UNDRAWABLE_WINDOW\n\n");
+
+      switch (pGC->fillStyle)
+	{
+	case FillSolid:
+	  ErrorF ("\nwinFillSpans - UNDRAWABLE_WINDOW - FillSolid\n\n");
+	  break;
+
+	case FillStippled:
+	  ErrorF ("\nwinFillSpans - UNDRAWABLE_WINDOW - FillStippled\n\n");
+	  break;
+
+	case FillTiled:
+	  ErrorF ("\nwinFillSpans - UNDRAWABLE_WINDOW - FillTiled\n\n");
+	  break;
+
+	case FillOpaqueStippled:
+	  FatalError ("winFillSpans () - UNDRAWABLE_WINDOW - "
+		      "OpaqueStippled\n");
+	  break;
+
+	default:
+	  FatalError ("winFillSpans () - UNDRAWABLE_WINDOW - Unknown "
+		      "fillStyle\n");
+	}
+      break;
+
+    case DRAWABLE_BUFFER:
+      FatalError ("winFillSpansNativeGDI - DRAWABLE_BUFFER\n");
+      break;
+
+    default:
+      FatalError ("winFillSpansNativeGDI - Unknown drawable type\n");
+      break;
+    }
+}