workbench/libs/gallium/bltpiperesourcerastport.c

   1 /*
   2     Copyright 2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <graphics/rastport.h>
   7 #include <hidd/graphics.h>
   8 #include <proto/alib.h>
   9 #include <proto/layers.h>
  10 #include <proto/graphics.h>
  11 #include <gallium/pipe/p_state.h>
  12 #include <aros/debug.h>
  13
  14 #include "gallium_intern.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19
  20       AROS_LH8(void, BltPipeResourceRastPort,
  21
  22 /*  SYNOPSIS */
  23       AROS_LHA(struct pipe_resource *, srcPipeResource, A0),
  24       AROS_LHA(LONG                  , xSrc, D0),
  25       AROS_LHA(LONG                  , ySrc, D1),
  26       AROS_LHA(struct RastPort *     , destRP, A1),
  27       AROS_LHA(LONG                  , xDest, D2),
  28       AROS_LHA(LONG                  , yDest, D3),
  29       AROS_LHA(LONG                  , xSize, D4),
  30       AROS_LHA(LONG                  , ySize, D5),
  31
  32 /*  LOCATION */
  33       struct Library *, GalliumBase, 8, Gallium)
  34
  35 /*  FUNCTION
  36         Copies part of pipe resource onto rast port. Clips output by using layers of
  37         rastport.
  38
  39     INPUTS
  40         srcPipeResource - Copy from this pipe resource.
  41         xSrc, ySrc - This is the upper left corner of the area to copy.
  42         destRP - Destination RastPort.
  43         xDest, yDest - Upper left corner where to place the copy
  44         xSize, ySize - The size of the area to copy
  45
  46     RESULT
  47
  48     BUGS
  49
  50     INTERNALS
  51
  52     HISTORY
  53
  54 *****************************************************************************/
  55 {
  56     AROS_LIBFUNC_INIT
  57
  58     struct Layer *L = destRP->Layer;
  59     struct ClipRect *CR;
  60     struct Rectangle renderableLayerRect;
  61     BOOL copied = FALSE;
  62
  63     struct HIDDT_WinSys * ws = (struct HIDDT_WinSys *)srcPipeResource->screen->winsys;
  64     if (!ws)
  65         return;
  66
  67     if (!IsLayerVisible(L))
  68         return;
  69
  70     LockLayerRom(L);
  71
  72     renderableLayerRect.MinX = L->bounds.MinX + xDest;
  73     renderableLayerRect.MaxX = L->bounds.MinX + xDest + xSize - 1;
  74     renderableLayerRect.MinY = L->bounds.MinY + yDest;
  75     renderableLayerRect.MaxY = L->bounds.MinY + yDest + ySize - 1;
  76     if (renderableLayerRect.MinX < L->bounds.MinX)
  77         renderableLayerRect.MinX = L->bounds.MinX;
  78     if (renderableLayerRect.MaxX > L->bounds.MaxX)
  79         renderableLayerRect.MaxX = L->bounds.MaxX;
  80     if (renderableLayerRect.MinY < L->bounds.MinY)
  81         renderableLayerRect.MinY = L->bounds.MinY;
  82     if (renderableLayerRect.MaxY > L->bounds.MaxY)
  83         renderableLayerRect.MaxY = L->bounds.MaxY;
  84
  85
  86     /*  Do not clip renderableLayerRect to screen rast port. CRs are already clipped and unclipped
  87         layer coords are needed. */
  88
  89     CR = L->ClipRect;
  90
  91     for (;NULL != CR; CR = CR->Next)
  92     {
  93         D(bug("Cliprect (%d, %d, %d, %d), lobs=%p\n",
  94             CR->bounds.MinX, CR->bounds.MinY, CR->bounds.MaxX, CR->bounds.MaxY,
  95             CR->lobs));
  96
  97         /* I assume this means the cliprect is visible */
  98         if (NULL == CR->lobs)
  99         {
 100             struct Rectangle result;
 101
 102             if (AndRectRect(&renderableLayerRect, &CR->bounds, &result))
 103             {
 104                 /* This clip rect intersects renderable layer rect */
 105                 struct pHidd_Gallium_DisplayResource drmsg = {
 106                 mID : OOP_GetMethodID(IID_Hidd_Gallium, moHidd_Gallium_DisplayResource),
 107                 resource : srcPipeResource,
 108                 srcx : xSrc + result.MinX - L->bounds.MinX - xDest, /* x in the source buffer */
 109                 srcy : ySrc + result.MinY - L->bounds.MinY - yDest, /* y in the source buffer */
 110                 bitmap: destRP->BitMap,
 111                 dstx : result.MinX, /* Absolute (on bitmap) X of dest blit */
 112                 dsty : result.MinY, /* Absolute (on bitmap) Y of dest blit */
 113                 width : result.MaxX - result.MinX + 1, /* width of the rect in source buffer */
 114                 height : result.MaxY - result.MinY + 1, /* height of the rect in source buffer */
 115                 };
 116                 OOP_DoMethod(ws->driver, (OOP_Msg)&drmsg);
 117
 118                 copied = TRUE;
 119             }
 120         }
 121     }
 122
 123     /* Notify the bitmap about blitting */
 124     if (copied)
 125     {
 126         struct pHidd_BitMap_UpdateRect urmsg = {
 127             mID     :   OOP_GetMethodID(IID_Hidd_BitMap, moHidd_BitMap_UpdateRect),
 128             x       :   renderableLayerRect.MinX,
 129             y       :   renderableLayerRect.MinY,
 130             width   :   renderableLayerRect.MaxX - renderableLayerRect.MinX + 1,
 131             height  :   renderableLayerRect.MaxY - renderableLayerRect.MinY + 1
 132         };
 133
 134         OOP_Object * bm = HIDD_BM_OBJ(destRP->BitMap);
 135         OOP_DoMethod(bm, (OOP_Msg)&urmsg);
 136     }
 137
 138     UnlockLayerRom(L);
 139
 140     AROS_LIBFUNC_EXIT
 141 }