scalos/main/PopOpenWindows.c

   1 // PopOpenWindows.c
   2 // $Date$
   3 // $Revision$
   4
   5
   6 #include <exec/types.h>
   7 #include <graphics/rastport.h>
   8 #include <utility/hooks.h>
   9
  10 #define __USE_SYSBASE
  11
  12 #include <proto/exec.h>
  13 #include <proto/intuition.h>
  14 #include "debug.h"
  15 #include <proto/scalos.h>
  16 #include <clib/alib_protos.h>
  17
  18 #include <defs.h>
  19 #include <scalos/scalos.h>
  20
  21 #include "scalos_structures.h"
  22 #include "functions.h"
  23 #include "Variables.h"
  24
  25 //----------------------------------------------------------------------------
  26
  27 // local data structures
  28
  29 struct PopOpenData
  30         {
  31         struct internalScaWindowTask *pod_ParentWindowTask;
  32         struct DragHandle *pod_DragHandle;
  33         };
  34
  35 //----------------------------------------------------------------------------
  36
  37 // local functions
  38
  39 static SAVEDS(ULONG) PopOpenProcess(struct PopOpenData *sMsg, struct SM_RunProcess *msg);
  40
  41 //----------------------------------------------------------------------------
  42
  43 void PopOpenWindow(struct internalScaWindowTask *iwt, struct DragHandle *dh)
  44 {
  45         struct ScaPopChildWindow *spcw = NULL;
  46
  47         do      {
  48                 struct PopOpenData pod;
  49
  50                 pod.pod_ParentWindowTask = iwt;
  51                 pod.pod_DragHandle = dh;
  52
  53                 if (iwt->iwt_CloseWindow)
  54                         break;
  55
  56                 spcw = ScalosAlloc(sizeof(struct ScaPopChildWindow));
  57                 if (NULL == spcw)
  58                         break;
  59
  60                 d1(KPrintF("%s/%s/%ld:  before SuspendDrag\n", __FILE__, __FUNC__, __LINE__));
  61                 d1(KPrintF("%s/%s/%ld:  Task=%08lx <%s>\n", __FILE__, __FUNC__, __LINE__,  FindTask(NULL), FindTask(NULL)->tc_Node.ln_Name));
  62
  63                 spcw->spcw_DragHandle = dh;
  64                 spcw->spcw_WasLocked = SuspendDrag(dh, iwt);
  65                 spcw->spcw_DestWindowTask = dh->drgh_PopOpenDestWindow;
  66
  67                 spcw->spcw_EventHandle = (APTR) DoMethod(spcw->spcw_DestWindowTask->iwt_WindowTask.mt_MainObject,
  68                         SCCM_AddListener,
  69                         SCCM_WindowStartComplete,
  70                         iwt->iwt_WindowTask.wt_IconPort,
  71                         1);
  72                 d1(KPrintF("%s/%s/%ld:  spcw_EventHandle=%08lx\n", __FILE__, __FUNC__, __LINE__, spcw->spcw_EventHandle));
  73                 if (NULL == spcw->spcw_EventHandle)
  74                         break;
  75
  76                 ScalosObtainSemaphore(&iwt->iwt_PopChildListSemaphore);
  77                 AddTail(&iwt->iwt_PopChildList, &spcw->spcw_Node);
  78                 spcw = NULL;
  79                 ScalosReleaseSemaphore(&iwt->iwt_PopChildListSemaphore);
  80
  81                 DoMethod(dh->drgh_PopOpenDestWindow->iwt_WindowTask.mt_MainObject,
  82                         SCCM_RunProcess,
  83                         PopOpenProcess,
  84                         &pod,
  85                         sizeof(pod),
  86                         dh->drgh_PopOpenDestWindow->iwt_WindowTask.wt_IconPort);
  87                 } while (0);
  88
  89         if (spcw)
  90                 PopChildWindowDispose(iwt, spcw);
  91 }
  92
  93 //----------------------------------------------------------------------------
  94
  95 void PopChildWindowDispose(struct internalScaWindowTask *iwt, struct ScaPopChildWindow *spcw)
  96 {
  97         d1(KPrintF("%s/%s/%ld:  START  iwt=%08lx  spcw=%08lx\n", __FILE__, __FUNC__, __LINE__, iwt, spcw));
  98
  99         if (spcw)
 100                 {
 101                 d1(KPrintF("%s/%s/%ld:  spcw_EventHandle=%08lx\n", __FILE__, __FUNC__, __LINE__, spcw->spcw_EventHandle));
 102                 if (spcw->spcw_EventHandle)
 103                         {
 104                         DoMethod(spcw->spcw_DestWindowTask->iwt_WindowTask.mt_MainObject,
 105                                 SCCM_RemListener,
 106                                 spcw->spcw_EventHandle);
 107                         }
 108                 d1(KPrintF("%s/%s/%ld:  spcw_WasLocked=%ld\n", __FILE__, __FUNC__, __LINE__, spcw->spcw_WasLocked));
 109                 if (spcw->spcw_WasLocked)
 110                         {
 111                         d1(KPrintF("%s/%s/%ld:  xii_GlobalDragHandle=%08lx  spcw_DragHandle=%08lx\n", __FILE__, __FUNC__, __LINE__, iInfos.xii_GlobalDragHandle, spcw->spcw_DragHandle));
 112
 113                         if (iInfos.xii_GlobalDragHandle != spcw->spcw_DragHandle)
 114                                 spcw->spcw_DragHandle = NULL;
 115
 116                         ResumeDrag(spcw->spcw_DragHandle, iwt, spcw->spcw_WasLocked);
 117                         }
 118                 ScalosFree(spcw);
 119                 }
 120
 121         d1(KPrintF("%s/%s/%ld:  END  iwt=%08lx  spcw=%08lx\n", __FILE__, __FUNC__, __LINE__, iwt, spcw));
 122 }
 123
 124 //----------------------------------------------------------------------------
 125
 126 static SAVEDS(ULONG) PopOpenProcess(struct PopOpenData *pod, struct SM_RunProcess *msg)
 127 {
 128
 129         d1(KPrintF("%s/%s/%ld:  START\n", __FILE__, __FUNC__, __LINE__));
 130
 131         do      {
 132                 ULONG Success;
 133
 134                 d1(KPrintF("%s/%s/%ld: before SCCM_AddListener\n", __FILE__, __FUNC__, __LINE__));
 135
 136                 Success = DoMethod(pod->pod_DragHandle->drgh_PopOpenDestWindow->iwt_WindowTask.mt_MainObject,
 137                         SCCM_IconWin_Open,
 138                         pod->pod_DragHandle->drgh_PopOpenIcon,
 139                         ICONWINOPENF_DoNotActivateWindow | ICONWINOPENF_NewWindow
 140                                 | ICONWINOPENF_IgnoreFileTypes | ICONWINOPENF_DdPopupWindow);
 141
 142                 d1(KPrintF("%s/%s/%ld:  Success=%ld\n", __FILE__, __FUNC__, __LINE__, Success));
 143                 if (!Success)
 144                         break;
 145                 } while (0);
 146
 147         d1(KPrintF("%s/%s/%ld:  END\n", __FILE__, __FUNC__, __LINE__));
 148
 149         return 0;
 150 }
 151
 152 //----------------------------------------------------------------------------
 153
 154 // If CloseAll is FALSE, window under mouse pointer will not be closed
 155 // If CloseAll is TRUE, all popup windows are closed
 156
 157 void ClosePopupWindows(BOOL CloseAll)
 158 {
 159         struct ScaWindowStruct *ws, *wsNext;
 160         struct internalScaWindowTask *iwtUnderMouse;
 161         struct ScaIconNode *in;
 162         struct ScaIconNode *inOuterBounds;
 163         struct Window *foreignWin;
 164
 165         d1(kprintf("%s/%s/%ld: START  CloseAll=%ld\n", __FILE__, __FUNC__, __LINE__, CloseAll));
 166
 167         QueryObjectUnderPointer(&iwtUnderMouse, &in, &inOuterBounds, &foreignWin);
 168
 169         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 170
 171         // Close all windows that have popped up during D&D
 172         if (NULL == iwtUnderMouse)
 173                 {
 174                 SCA_LockWindowList(SCA_LockWindowList_Exclusiv);
 175                 }
 176         else
 177                 {
 178                 if (in)
 179                         ScalosUnLockIconList(iwtUnderMouse);
 180                 }
 181
 182         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 183
 184         for (ws = winlist.wl_WindowStruct; ws; ws = wsNext)
 185                 {
 186                 wsNext = (struct ScaWindowStruct *) ws->ws_Node.mln_Succ;
 187
 188                 d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 189
 190                 if ((CloseAll || (NULL == iwtUnderMouse) || (ws != iwtUnderMouse->iwt_WindowTask.mt_WindowStruct)) && (ws->ws_Flags & WSV_FlagF_DdPopupWindow))
 191                         {
 192                         struct SM_CloseWindow *msg;
 193
 194                         msg = (struct SM_CloseWindow *) SCA_AllocMessage(MTYP_CloseWindow, 0);
 195                         if (msg)
 196                                 {
 197                                 msg->ScalosMessage.sm_Message.mn_ReplyPort = iInfos.xii_iinfos.ii_MainMsgPort;
 198                                 PutMsg(ws->ws_MessagePort, &msg->ScalosMessage.sm_Message);
 199                                 }
 200                         }
 201                 d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 202                 }
 203
 204         SCA_UnLockWindowList();
 205
 206         d1(kprintf("%s/%s/%ld: END\n", __FILE__, __FUNC__, __LINE__));
 207 }
 208
 209 //----------------------------------------------------------------------------
 210
 211