rom/intuition/freesysrequest.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 "intuition_intern.h"
   8 #include <proto/exec.h>
   9
  10 #define DEBUG_FREESYSREQUEST(x) ;
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/intuition.h>
  16 #include <exec/types.h>
  17 #include <intuition/intuition.h>
  18
  19     AROS_LH1(void, FreeSysRequest,
  20
  21 /*  SYNOPSIS */
  22          AROS_LHA(struct Window *, window, A0),
  23
  24 /*  LOCATION */
  25          struct IntuitionBase *, IntuitionBase, 62, Intuition)
  26
  27 /*  FUNCTION
  28     Frees a requester made with BuildSysRequest() or
  29     BuildEasyRequestArgs().
  30
  31     INPUTS
  32     Window - The requester to be freed. May be NULL or 1.
  33
  34     RESULT
  35
  36     NOTES
  37
  38     EXAMPLE
  39
  40     BUGS
  41     BuildSysRequest() requesters not supported, yet.
  42
  43     SEE ALSO
  44     BuildSysRequest(), BuildEasyRequestArgs()
  45
  46     INTERNALS
  47
  48     HISTORY
  49
  50 *****************************************************************************/
  51 {
  52     AROS_LIBFUNC_INIT
  53
  54     struct Screen               *scr;
  55     struct Gadget               *gadgets;
  56     STRPTR                      *gadgetlabels;
  57     struct IntRequestUserData   *requserdata;
  58
  59     DEBUG_FREESYSREQUEST(dprintf("intrequest_freesysrequest: window 0x%lx\n", (ULONG) window));
  60
  61     if ((window == NULL) || (window == (void *)1L))
  62         return;
  63
  64     scr = window->WScreen;
  65
  66     requserdata = (struct IntRequestUserData *)window->UserData;
  67
  68     DEBUG_FREESYSREQUEST(dprintf("intrequest_freesysrequest: requserdata 0x%lx\n", (ULONG) requserdata));
  69
  70     gadgets = requserdata->Gadgets;
  71
  72     DEBUG_FREESYSREQUEST(dprintf("intrequest_freesysrequest: gadgets 0x%lx\n", (ULONG) gadgets));
  73
  74     /* Remove gadgets before closing window to avoid conflicts with system gadgets */
  75     RemoveGList(window, gadgets, requserdata->NumGadgets);
  76
  77     gadgetlabels = requserdata->GadgetLabels;
  78
  79     DEBUG_FREESYSREQUEST(dprintf("intrequest_freesysrequest: gadgetlabels 0x%lx\n", (ULONG) gadgetlabels));
  80
  81     window->UserData = 0;
  82     CloseWindow(window);
  83     intrequest_freegadgets(gadgets, IntuitionBase);
  84     intrequest_freelabels(gadgetlabels, IntuitionBase);
  85
  86 #ifdef SKINS
  87     DEBUG_FREESYSREQUEST(dprintf("intrequest_freesysrequest: freeitext 0x%lx\n", (ULONG) requserdata->freeitext));
  88     if (requserdata->freeitext) intrequest_freeitext(requserdata->Text,IntuitionBase);
  89     if (requserdata->backfilldata.image) int_FreeCustomImage(TYPE_REQUESTERCLASS,requserdata->dri,IntuitionBase);
  90     if (requserdata->Logo) int_FreeCustomImage(TYPE_REQUESTERCLASS,requserdata->dri,IntuitionBase);
  91     if (requserdata->ReqGadgets) FreeVec(requserdata->ReqGadgets);
  92     if (requserdata->dri) FreeScreenDrawInfo(requserdata->ReqScreen,(struct DrawInfo *)requserdata->dri);
  93 #endif
  94     FreeVec(requserdata);
  95
  96     return;
  97     AROS_LIBFUNC_EXIT
  98 } /* FreeSysRequest */