workbench/libs/commodities/copybrokerlist.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 #define AROS_ALMOST_COMPATIBLE
  14
  15 #include "cxintern.h"
  16 #include <exec/memory.h>
  17 #include <libraries/commodities.h>
  18 #include <proto/exec.h>
  19 #include <proto/commodities.h>
  20
  21     AROS_LH1(LONG, CopyBrokerList,
  22
  23 /*  SYNOPSIS */
  24
  25         AROS_LHA(struct List *, CopyofList, A0),
  26
  27 /*  LOCATION */
  28
  29         struct Library *, CxBase, 31, Commodities)
  30
  31 /*  FUNCTION
  32
  33     Get a copy of the internal list of brokers.
  34
  35     INPUTS
  36
  37     CopyofList -- pointer to a list
  38
  39     RESULT
  40
  41     The number of brokers in the list. The elements of the input list will
  42     be deallocated.
  43
  44     NOTES
  45
  46     This function is present in AmigaOS too but undocumented.
  47
  48     EXAMPLE
  49
  50     BUGS
  51
  52     SEE ALSO
  53
  54     INTERNALS
  55
  56     HISTORY
  57
  58 ******************************************************************************/
  59
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     LONG               count = 0;
  64     struct BrokerCopy *brokerCopy;
  65     CxObj             *broker;
  66
  67     FreeBrokerList(CopyofList);
  68
  69     ObtainSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  70
  71     ForeachNode(&GPB(CxBase)->cx_BrokerList, broker)
  72     {
  73         if (CxObjType(broker) == CX_ZERO)
  74         {
  75             break;
  76         }
  77
  78         brokerCopy = AllocVec(sizeof(struct BrokerCopy), MEMF_PUBLIC | MEMF_CLEAR);
  79
  80         if (brokerCopy == NULL)
  81         {
  82             break;
  83         }
  84
  85         /* Copy the broker name */
  86         CopyMem(broker->co_Ext.co_BExt, brokerCopy->bc_Name, sizeof(*broker->co_Ext.co_BExt));
  87         brokerCopy->bc_Flags = broker->co_Flags;
  88         /* Point the node name to the broker name */
  89         brokerCopy->bc_Node.ln_Name = brokerCopy->bc_Name;
  90
  91
  92         AddTail(CopyofList, &brokerCopy->bc_Node);
  93         count++;
  94     }
  95
  96     ReleaseSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  97
  98     return count;
  99
 100     AROS_LIBFUNC_EXIT
 101 } /* CopyBrokerList */