workbench/libs/datatypes/copydtmethods.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8 #include <proto/exec.h>
   9 #include <proto/datatypes.h>
  10 #include "datatypes_intern.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15
  16         AROS_LH3(ULONG *, CopyDTMethods,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(ULONG *, methods, A0),
  20         AROS_LHA(ULONG *, include, A1),
  21         AROS_LHA(ULONG *, exclude, A2),
  22
  23 /*  LOCATION */
  24         struct Library *, DataTypesBase, 45, DataTypes)
  25
  26 /*  FUNCTION
  27
  28     Copy and modify an array of methods. This is used by subclass implementors
  29     who want to add supported methods to an existing class.
  30
  31     INPUTS
  32
  33     methods  --  array of methods; may be NULL
  34     include  --  array of methods to include terminated with ~0UL; may be NULL
  35     method   --  array of methods to exclude terminated with ~0UL; may be NULL.
  36
  37     RESULT
  38
  39     The new array of methods or NULL if something went wrong (like out of
  40     memory).
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49
  50     FindMethod(), CopyDTTriggerMethods(), FreeDTMethods()
  51
  52     INTERNALS
  53
  54     When a method is specified both in the 'include' and the 'exclude',
  55     it will be included.
  56
  57     HISTORY
  58
  59     2.8.99  SDuvan  implemented
  60
  61 *****************************************************************************/
  62 {
  63     AROS_LIBFUNC_INIT
  64
  65     ULONG *inc = include;
  66     ULONG *exc = exclude;
  67     ULONG *met = methods;
  68     ULONG  nMethods = 0;
  69     ULONG *newM;
  70     ULONG *newmets;
  71
  72     if(methods == NULL)
  73         return NULL;
  74
  75     if(inc != NULL)
  76     {
  77         while(*inc++ != ~0)
  78             nMethods++;
  79     }
  80
  81     if(exc != NULL)
  82     {
  83         while(*exc != ~0)
  84         {
  85             if(FindMethod(methods, *exc) != NULL)
  86                 nMethods--;
  87
  88             exc++;
  89         }
  90     }
  91
  92     while(*met++ != ~0)
  93         nMethods++;
  94
  95     newM = AllocVec((nMethods + 1)*sizeof(ULONG), MEMF_PUBLIC);
  96
  97     /* No memory available? */
  98     if(newM == NULL)
  99         return NULL;
 100
 101     newmets = newM;
 102     met     = methods;
 103
 104     /* Copy new methods */
 105     if(include != NULL)
 106     {
 107         while(*include != ~0)
 108             *newmets++ = *include++;
 109     }
 110
 111     /* Copy old methods except the excluded ones */
 112     while(*met != ~0)
 113     {
 114         if(FindMethod(exclude, *met) == NULL)
 115             *newmets++ = *met;
 116
 117         met++;
 118     }
 119
 120     *newmets = ~0;
 121
 122     return newM;
 123
 124     AROS_LIBFUNC_EXIT
 125 } /* CopyDTMethods */