rom/intuition/request.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 <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 LayersBase       *LayersBase = GetPrivIBase(IntuitionBase)->LayersBase;
  87     struct Requester        *requester = msg->requester;
  88     struct Window           *window = msg->window;
  89   //ULONG                    layerflags = 0;
  90     int                      left, top, right, bottom;
  91   //LONG                     lock;
  92     struct Gadget           *gadgets;
  93     int                      wleft = window->LeftEdge + window->BorderLeft;
  94     int                      wtop = window->TopEdge + window->BorderTop;
  95     int                      wright = window->LeftEdge + window->Width - window->BorderRight- 1;
  96     int                      wbottom = window->TopEdge + window->Height - window->BorderBottom- 1;
  97
  98     if (requester->Flags & POINTREL)
  99     {
 100         if (requester == window->DMRequest)
 101         {
 102             left = window->LeftEdge + window->MouseX + requester->RelLeft;
 103             top = window->TopEdge + window->MouseY + requester->RelTop;
 104             if (left + requester->Width - 1 > wright)
 105                 left = wright - requester->Width + 1;
 106             if (top + requester->Height - 1 > wbottom)
 107                 top = wbottom - requester->Height + 1;
 108         }
 109         else
 110         {
 111             left = (wleft + wright - requester->Width) >> 1;
 112             top = (wtop + wbottom - requester->Height) >> 1;
 113             left += requester->RelLeft;
 114             top += requester->RelTop;
 115         }
 116     }
 117     else
 118     {
 119         left = wleft + requester->LeftEdge;
 120         top = wtop + requester->TopEdge;
 121     }
 122
 123     if (left < wleft)
 124         left = wleft;
 125     else if (left > wright)
 126         left = wright;
 127
 128     if (top < wtop)
 129         top = wtop;
 130     else if (top > wbottom)
 131         top = wbottom;
 132
 133     right = left + requester->Width - 1;
 134     bottom = top + requester->Height - 1;
 135
 136     if (right > wright)
 137         right = wright;
 138
 139     if (bottom > wbottom)
 140         bottom = wbottom;
 141
 142     requester->ReqLayer = NULL;
 143
 144     if ((right >= left) && (bottom >= top))
 145     {
 146         requester->ReqLayer = CreateUpfrontHookLayer(
 147                               &window->WScreen->LayerInfo
 148                               , window->WScreen->RastPort.BitMap
 149                               , left
 150                               , top
 151                               , right
 152                               , bottom
 153                               , (requester->Flags & SIMPLEREQ ? LAYERSIMPLE : LAYERSMART)
 154                               , LAYERS_NOBACKFILL
 155                               , NULL);
 156     }
 157
 158     if (requester->ReqLayer)
 159     {
 160         requester->ReqLayer->Window = window;
 161         requester->RWindow = window;
 162
 163         requester->LeftEdge = left - wleft;
 164         requester->TopEdge = top - wtop;
 165
 166         gadgets = requester->ReqGadget;
 167         requester->ReqGadget = NULL;
 168
 169         requester->OlderRequest = window->FirstRequest;
 170         window->FirstRequest = requester;
 171         ++window->ReqCount;
 172         requester->Flags |= REQACTIVE;
 173
 174         AddGList(window, gadgets, 0, -1, requester);
 175
 176         render_requester(requester, IntuitionBase);
 177
 178         msg->success = TRUE;
 179     }
 180     else
 181     {
 182         msg->success = FALSE;
 183     }
 184 }