rom/intuition/request.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include <proto/layers.h>
   8 #include "intuition_intern.h"
   9 #include "inputhandler_actions.h"
  10
  11 struct RequestActionMsg
  12 {
  13     struct IntuiActionMsg    msg;
  14     struct Requester        *requester;
  15     struct Window           *window;
  16     BOOL                     success;
  17 };
  18
  19 static VOID int_request(struct RequestActionMsg *msg,
  20                         struct IntuitionBase *IntuitionBase);
  21
  22 /*****************************************************************************
  23
  24     NAME */
  25 #include <proto/intuition.h>
  26
  27     AROS_LH2(BOOL, Request,
  28
  29 /*  SYNOPSIS */
  30          AROS_LHA(struct Requester *, requester, A0),
  31          AROS_LHA(struct Window *   , window, A1),
  32
  33 /*  LOCATION */
  34          struct IntuitionBase *, IntuitionBase, 40, Intuition)
  35
  36 /*  FUNCTION
  37     Add a requester to specified window and display it.
  38
  39     INPUTS
  40     requester - The requester to be displayed
  41     window - The window to which the requester belongs
  42
  43     RESULT
  44     TRUE if requester was opened successfully, FALSE else.
  45
  46     NOTES
  47
  48     EXAMPLE
  49
  50     BUGS
  51
  52     SEE ALSO
  53     EndRequest(), InitRequester()
  54
  55     INTERNALS
  56
  57     HISTORY
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     struct RequestActionMsg msg;
  64
  65     DEBUG_REQUEST(dprintf("Request: requester 0x%lx window 0x%lx\n", requester, window));
  66
  67     SANITY_CHECKR(window,FALSE)
  68     SANITY_CHECKR(requester,FALSE)
  69
  70     msg.window    = window;
  71     msg.requester = requester;
  72
  73     DoSyncAction((APTR)int_request, &msg.msg, IntuitionBase);
  74
  75     DEBUG_REQUEST(dprintf("Request: requester (layer 0x%lx) setup %d\n",requester->ReqLayer,msg.success));
  76
  77     return msg.success;
  78
  79     AROS_LIBFUNC_EXIT
  80 } /* Request */
  81
  82
  83 static VOID int_request(struct RequestActionMsg *msg,
  84                         struct IntuitionBase *IntuitionBase)
  85 {
  86     struct Requester        *requester = msg->requester;
  87     struct Window           *window = msg->window;
  88   //ULONG                    layerflags = 0;
  89     int                      left, top, right, bottom;
  90   //LONG                     lock;
  91     struct Gadget           *gadgets;
  92     int                      wleft = window->LeftEdge + window->BorderLeft;
  93     int                      wtop = window->TopEdge + window->BorderTop;
  94     int                      wright = window->LeftEdge + window->Width - window->BorderRight- 1;
  95     int                      wbottom = window->TopEdge + window->Height - window->BorderBottom- 1;
  96
  97     if (requester->Flags & POINTREL)
  98     {
  99         if (requester == window->DMRequest)
 100         {
 101             left = window->LeftEdge + window->MouseX + requester->RelLeft;
 102             top = window->TopEdge + window->MouseY + requester->RelTop;
 103             if (left + requester->Width - 1 > wright)
 104                 left = wright - requester->Width + 1;
 105             if (top + requester->Height - 1 > wbottom)
 106                 top = wbottom - requester->Height + 1;
 107         }
 108         else
 109         {
 110             left = (wleft + wright - requester->Width) >> 1;
 111             top = (wtop + wbottom - requester->Height) >> 1;
 112             left += requester->RelLeft;
 113             top += requester->RelTop;
 114         }
 115     }
 116     else
 117     {
 118         left = wleft + requester->LeftEdge;
 119         top = wtop + requester->TopEdge;
 120     }
 121
 122     if (left < wleft)
 123         left = wleft;
 124     else if (left > wright)
 125         left = wright;
 126
 127     if (top < wtop)
 128         top = wtop;
 129     else if (top > wbottom)
 130         top = wbottom;
 131
 132     right = left + requester->Width - 1;
 133     bottom = top + requester->Height - 1;
 134
 135     if (right > wright)
 136         right = wright;
 137
 138     if (bottom > wbottom)
 139         bottom = wbottom;
 140
 141     requester->ReqLayer = NULL;
 142
 143     if ((right >= left) && (bottom >= top))
 144     {
 145         requester->ReqLayer = CreateUpfrontHookLayer(
 146                               &window->WScreen->LayerInfo
 147                               , window->WScreen->RastPort.BitMap
 148                               , left
 149                               , top
 150                               , right
 151                               , bottom
 152                               , (requester->Flags & SIMPLEREQ ? LAYERSIMPLE : LAYERSMART)
 153                               , LAYERS_NOBACKFILL
 154                               , NULL);
 155     }
 156
 157     if (requester->ReqLayer)
 158     {
 159         requester->ReqLayer->Window = window;
 160         requester->RWindow = window;
 161
 162         requester->LeftEdge = left - wleft;
 163         requester->TopEdge = top - wtop;
 164
 165         gadgets = requester->ReqGadget;
 166         requester->ReqGadget = NULL;
 167
 168         requester->OlderRequest = window->FirstRequest;
 169         window->FirstRequest = requester;
 170         ++window->ReqCount;
 171         requester->Flags |= REQACTIVE;
 172
 173         AddGList(window, gadgets, 0, -1, requester);
 174
 175         render_requester(requester, IntuitionBase);
 176
 177         msg->success = TRUE;
 178     }
 179     else
 180     {
 181         msg->success = FALSE;
 182     }
 183 }