workbench/libs/commodities/removecxobj.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 /*****************************************************************************
  10
  11     NAME */
  12
  13 #include "cxintern.h"
  14 #include <devices/input.h>
  15 #include <proto/exec.h>
  16 #include <proto/commodities.h>
  17 #include <aros/debug.h>
  18
  19 VOID RemoveHandler(struct CommoditiesBase *CxBase);
  20
  21     AROS_LH1(VOID, RemoveCxObj,
  22
  23 /*  SYNOPSIS */
  24
  25         AROS_LHA(CxObj *, co, A0),
  26
  27 /*  LOCATION */
  28
  29         struct Library *, CxBase, 17, Commodities)
  30
  31 /*  FUNCTION
  32
  33     Removes 'co' from the lists it's in. The function handles smoothly the
  34     cases when 'co' is NULL or haven't been inserted in a list.
  35
  36     INPUTS
  37
  38     co  --  the commodity object to remove (may be NULL)
  39
  40     RESULT
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49
  50     AttachCxObj(), EnqueueCxObj(), InsertCxObj()
  51
  52     INTERNALS
  53
  54     HISTORY
  55
  56 ******************************************************************************/
  57
  58 {
  59     AROS_LIBFUNC_INIT
  60
  61     if (co == NULL)
  62     {
  63         return;
  64     }
  65
  66     if ((co->co_Flags & COF_VALID) == 0)
  67     {
  68         return;
  69     }
  70
  71     ObtainSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  72
  73     Remove(&co->co_Node);
  74     co->co_Flags &= ~COF_VALID;
  75
  76     if ((CXOBJType(co) == CX_BROKER) || (CXOBJType(co) == CX_ZERO))
  77     {
  78         if (IsListEmpty(&GPB(CxBase)->cx_BrokerList))
  79         {
  80             RemoveHandler(GPB(CxBase));
  81         }
  82         else
  83         {
  84             /* Tell Exchange what happened */
  85             BrokerCommand(NULL, CXCMD_LIST_CHG);
  86         }
  87     }
  88
  89     ReleaseSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  90
  91     AROS_LIBFUNC_EXIT
  92 } /* RemoveCxObj */
  93
  94
  95 VOID RemoveHandler(struct CommoditiesBase *CxBase)
  96 {
  97     if (CxBase->cx_IORequest.io_Device == NULL)
  98     {
  99         return;
 100     }
 101
 102     CxBase->cx_InputMP.mp_SigTask = FindTask(NULL);
 103     CxBase->cx_IORequest.io_Command = IND_REMHANDLER;
 104     DoIO((struct IORequest *)&CxBase->cx_IORequest);
 105     CloseDevice((struct IORequest *)&CxBase->cx_IORequest);
 106     CxBase->cx_IORequest.io_Device = NULL;
 107     CxBase->cx_Running = FALSE;
 108 }