rom/oop/obtainattrbasesarray.c

   1 /*
   2     Copyright © 1995-2013, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Obtain array of attribute base IDs
   6     Lang: english
   7 */
   8
   9 #include <proto/exec.h>
  10 #include <exec/memory.h>
  11 #include <aros/debug.h>
  12
  13 #include "intern.h"
  14 #include "hash.h"
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19
  20 #include <proto/oop.h>
  21 #include <oop/oop.h>
  22
  23         AROS_LH2(ULONG, OOP_ObtainAttrBasesArray,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(OOP_AttrBase *, bases, A0),
  27         AROS_LHA(CONST_STRPTR const *, ids, A1),
  28
  29 /*  LOCATION */
  30         struct Library *, OOPBase, 23, OOP)
  31
  32 /*  FUNCTION
  33         Obtain several attribute base IDs, storing them in linear array.
  34
  35     INPUTS
  36         bases - a pointer to array to fill in
  37         ids   - a NULL-terminated array of interface IDs
  38
  39     RESULT
  40         Zero on success or number of failed bases on failure. Failed
  41         entries will be set to 0.
  42
  43     NOTES
  44
  45     EXAMPLE
  46
  47     BUGS
  48
  49     SEE ALSO
  50         OOP_ReleaseAttrBasesArray()
  51
  52     INTERNALS
  53
  54     HISTORY
  55
  56 ******************************************************************************/
  57 {
  58     AROS_LIBFUNC_INIT
  59
  60     ULONG failed = 0;
  61
  62     while (*ids)
  63     {
  64         *bases = OOP_ObtainAttrBase(*ids);
  65
  66         if (*bases == 0)
  67             failed++;
  68
  69         bases++;
  70         ids++;
  71     }
  72
  73     return failed;
  74
  75     AROS_LIBFUNC_EXIT
  76 }