rom/intuition/rethinkdisplay.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include <intuition/pointerclass.h>
   8 #include <proto/graphics.h>
   9 #include "intuition_intern.h"
  10 #include "inputhandler.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/intuition.h>
  16
  17     AROS_LH0(LONG, RethinkDisplay,
  18
  19 /*  SYNOPSIS */
  20
  21 /*  LOCATION */
  22          struct IntuitionBase *, IntuitionBase, 65, Intuition)
  23
  24 /*  FUNCTION
  25     Check and update, ie. redisplay the whole Intuition display.
  26
  27     INPUTS
  28     None.
  29
  30     RESULT
  31     Zero for success, non-zero for failure.
  32
  33     NOTES
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40     RemakeDisplay(), MakeScreen(), graphics.library/MakeVPort(),
  41     graphics.library/MrgCop(), graphics.library/LoadView()
  42
  43     INTERNALS
  44
  45     HISTORY
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct GfxBase   *GfxBase = GetPrivIBase(IntuitionBase)->GfxBase;
  52     struct Screen    *screen;
  53     struct ViewPort  *viewport;
  54     struct ViewPort **viewportptr;
  55     UWORD             modes;
  56     LONG              failure = 0;
  57     ULONG             ilock = LockIBase(0);
  58
  59     DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay:\n"));
  60
  61     screen = IntuitionBase->FirstScreen;
  62
  63     DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: screen 0x%lx\n",screen));
  64
  65     if (screen == NULL)
  66     {
  67         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: LoadView(NULL)\n"));
  68         IntuitionBase->ViewLord.ViewPort = NULL;
  69         LoadView(NULL);
  70     }
  71     else
  72     {
  73         /* Find visible screens */
  74         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: Find visible screens\n"));
  75
  76         screen->ViewPort.Modes |= SPRITES;
  77
  78         screen->ViewPort.Modes &= ~VP_HIDE;
  79
  80         /* Not needed. Perhaps... Pavel Fedin <pavel_fedin@mail.ru>
  81         if (!(GetPrivScreen(screen)->SpecialFlags & SF_Compose)) {
  82             while ((screen = screen->NextScreen))
  83                 screen->ViewPort.Modes |= VP_HIDE;
  84         }
  85         */
  86         /* Build the list of viewports in the view */
  87         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: Building viewports list\n"));
  88         viewportptr = &IntuitionBase->ViewLord.ViewPort;
  89         for (screen = IntuitionBase->FirstScreen; screen; screen = screen->NextScreen)
  90         {
  91             if ((screen->ViewPort.Modes & VP_HIDE) == 0)
  92             {
  93                 DEBUG_RETHINKDISPLAY(bug("RethinkDisplay: Adding ViewPort 0x%p for screen 0x%p\n", &screen->ViewPort, screen));
  94                 *viewportptr = &screen->ViewPort;
  95                 viewportptr = &screen->ViewPort.Next;
  96             }
  97         }
  98         *viewportptr = NULL;
  99
 100         /* Find view mode */
 101         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: Find view mode\n"));
 102         modes = (IntuitionBase->ViewLord.Modes & ~LACE) | SPRITES;
 103         for (viewport = IntuitionBase->ViewLord.ViewPort; viewport; viewport = viewport->Next) {
 104             modes |= viewport->Modes & LACE;
 105         }
 106
 107         /* Reinitialize the view */
 108 #ifdef __MORPHOS__
 109         /* Under AROS this will cause unneeded screen flicker and even significant slowdown */
 110         FreeSprite(GetPrivIBase(IntuitionBase)->SpriteNum);
 111         GetPrivIBase(IntuitionBase)->SpriteNum = -1;
 112         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: LoadView(NULL)\n"));
 113
 114         LoadView(NULL);
 115
 116         if (IntuitionBase->ViewLord.LOFCprList)
 117             FreeCprList(IntuitionBase->ViewLord.LOFCprList);
 118
 119         if (IntuitionBase->ViewLord.SHFCprList)
 120             FreeCprList(IntuitionBase->ViewLord.SHFCprList);
 121
 122         IntuitionBase->ViewLord.LOFCprList = NULL;
 123         IntuitionBase->ViewLord.SHFCprList = NULL;
 124 #endif
 125         IntuitionBase->ViewLord.DxOffset = 0; /***/
 126         IntuitionBase->ViewLord.DyOffset = 0; /***/
 127         IntuitionBase->ViewLord.Modes = modes;
 128         screen = IntuitionBase->FirstScreen;
 129 #ifdef __MORPHOS__
 130         GetPrivIBase(IntuitionBase)->ViewLordExtra->Monitor = GetPrivScreen(screen)->Monitor;
 131 #endif
 132         /* Rebuild copper lists for screens needing a mode change */
 133
 134         DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: Making viewports\n"));
 135         for (viewport = IntuitionBase->ViewLord.ViewPort; viewport; viewport = viewport->Next)
 136         {
 137             if ((viewport->Modes ^ modes) & LACE)
 138             {
 139                 LONG error;
 140
 141                 viewport->Modes = (viewport->Modes & ~LACE) | (modes & LACE);
 142                 error = MakeVPort(&IntuitionBase->ViewLord, viewport);
 143
 144                 if (error)
 145                     failure = error;
 146             }
 147         }
 148
 149         if (!failure)
 150         {
 151             failure = MrgCop(&IntuitionBase->ViewLord);
 152
 153             if (!failure)
 154             {
 155                 DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: LoadView ViewLord 0x%lx\n",&IntuitionBase->ViewLord));
 156                 LoadView(&IntuitionBase->ViewLord);
 157
 158                 DEBUG_INIT(dprintf("RethinkDisplay: ActiveScreen %p Pointer %p Sprite %p\n",
 159                             IntuitionBase->ActiveScreen,
 160                             GetPrivScreen(IntuitionBase->ActiveScreen)->Pointer,
 161                             GetPrivScreen(IntuitionBase->ActiveScreen)->Pointer->sprite));
 162 #ifdef __MORPHOS__
 163                 if (GetPrivIBase(IntuitionBase)->SpriteNum == -1 &&
 164                         IntuitionBase->FirstScreen &&
 165                         GetPrivScreen(IntuitionBase->FirstScreen)->Pointer &&
 166                         GetPrivScreen(IntuitionBase->FirstScreen)->Pointer->sprite)
 167                 {
 168                     struct IIHData *iihd = (struct IIHData *)GetPrivIBase(IntuitionBase)->InputHandler->is_Data;
 169                     WORD            xpos,ypos;
 170
 171                     xpos = iihd->LastMouseX; ypos = iihd->LastMouseY;
 172                     GetPrivIBase(IntuitionBase)->SpriteNum = GetExtSpriteA(GetPrivScreen(IntuitionBase->FirstScreen)->Pointer->sprite, NULL);
 173
 174                     DEBUG_INIT(dprintf("RethinkDisplay: Sprite num %ld\n", GetPrivIBase(IntuitionBase)->SpriteNum));
 175
 176                     if (xpos >= IntuitionBase->FirstScreen->Width) xpos = IntuitionBase->FirstScreen->Width - 1;
 177                     if (ypos >= IntuitionBase->FirstScreen->Height) ypos = IntuitionBase->FirstScreen->Height - 1;
 178
 179                     MySetPointerPos(IntuitionBase, xpos, ypos);
 180                     IntuitionBase->FirstScreen->MouseX = xpos;
 181                     IntuitionBase->FirstScreen->MouseY = ypos;
 182                 }
 183 #endif
 184             }
 185         }
 186     }
 187
 188     if (!failure)
 189     {
 190         /* validate screen positions, scrolling limits are not necessarily same anymore. */
 191         for (screen = IntuitionBase->FirstScreen; screen; screen = screen->NextScreen)
 192         {
 193             if ((screen->ViewPort.Modes & VP_HIDE) == 0)
 194             {
 195                 ScreenPosition( screen, SPOS_RELATIVE, 0,0,0,0  );
 196             }
 197         }
 198         /* Ensure that empty displays get normal pointer */
 199         ResetPointer(IntuitionBase);
 200     }
 201
 202     UnlockIBase(ilock);
 203
 204     DEBUG_RETHINKDISPLAY(dprintf("RethinkDisplay: failure 0x%lx\n",failure));
 205
 206     return failure;
 207
 208     AROS_LIBFUNC_EXIT
 209 } /* RethinkDisplay */