workbench/libs/commodities/setfilterix.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 <aros/debug.h>
  15 #include <libraries/commodities.h>
  16 #include <proto/exec.h>
  17
  18 #define DEBUG_BADFILTER(x)      x;
  19
  20     AROS_LH2(VOID, SetFilterIX,
  21
  22 /*  SYNOPSIS */
  23
  24         AROS_LHA(CxObj *, filter, A0),
  25         AROS_LHA(IX *   , ix    , A1),
  26
  27 /*  LOCATION */
  28
  29         struct Library *, CxBase, 21, Commodities)
  30
  31 /*  FUNCTION
  32
  33     Set the filter description by supplying an InputXpression.
  34
  35     INPUTS
  36
  37     filter  --  the commodity filter object the attributes of which to set
  38                 (may be NULL)
  39     ix      --  InputXpression describing the filter
  40
  41     RESULT
  42
  43     The internal error field will be updated (COERR_BADFILTER) depending on
  44     whether the function succeeded or failed.
  45
  46     NOTES
  47
  48     The first field in the IX structure must be set to IX_VERSION as
  49     defined in <libraries/commodities.h>, to indicate which version of
  50     the IX structure is used.
  51
  52     EXAMPLE
  53
  54     BUGS
  55
  56     SEE ALSO
  57
  58     SetFilter(), CxObjError(), <libraries/commodities.h>
  59
  60     INTERNALS
  61
  62     HISTORY
  63
  64 ******************************************************************************/
  65
  66 {
  67     AROS_LIBFUNC_INIT
  68
  69     if (filter == NULL)
  70     {
  71         return;
  72     }
  73
  74     ObtainSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  75
  76     if (CXOBJType(filter) == CX_FILTER)
  77     {
  78         if (ix->ix_Version == IX_VERSION)
  79         {
  80             CopyMem(ix, filter + 1, sizeof(IX));
  81             filter->co_Ext.co_FilterIX = (APTR)(filter + 1);
  82             filter->co_Error &= ~COERR_BADFILTER;
  83         }
  84         else
  85         {
  86             DEBUG_BADFILTER(dprintf("SetFilterIX: ix_Version == %lu (should be %lu)!\n", ix->ix_Version, IX_VERSION));
  87             filter->co_Error |= COERR_BADFILTER;
  88         }
  89     }
  90     else
  91     {
  92         filter->co_Error |= COERR_BADTYPE;
  93     }
  94
  95     ReleaseSemaphore(&GPB(CxBase)->cx_SignalSemaphore);
  96
  97     AROS_LIBFUNC_EXIT
  98 } /* SetFilterIX */