workbench/libs/commodities/matchix.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 <libraries/commodities.h>
  15 #include <devices/inputevent.h>
  16 #include <proto/commodities.h>
  17
  18 #include <aros/debug.h>
  19
  20 #define DEBUG_MATCHIX(x)        ;//if ((event->ie_Class == IECLASS_RAWMOUSE) || (event->ie_Class == IECLASS_POINTERPOS) || (event->ie_Class == IECLASS_NEWPOINTERPOS)) x;
  21
  22
  23     AROS_LH2(BOOL, MatchIX,
  24
  25 /*  SYNOPSIS */
  26
  27         AROS_LHA(struct InputEvent *, event, A0),
  28         AROS_LHA(IX *               , ix   , A1),
  29
  30 /*  LOCATION */
  31
  32         struct Library *, CxBase, 34, Commodities)
  33
  34 /*  FUNCTION
  35
  36     Check if an input event matches an input expression.
  37
  38     INPUTS
  39
  40     event  --  the input event to match against the input expression
  41     ix     --  the input expression
  42
  43     RESULT
  44
  45     TRUE if the input event matches the input expression, FALSE otherwise.
  46
  47     NOTES
  48
  49     Applications don't normally need this function as filter objects take
  50     care of the event filtering. However, this function is in some cases
  51     nice to have.
  52
  53     EXAMPLE
  54
  55     BUGS
  56
  57     SEE ALSO
  58
  59     <libraries/commodities.h>, ParseIX()
  60
  61     INTERNALS
  62
  63     HISTORY
  64
  65 ******************************************************************************/
  66
  67 {
  68     AROS_LIBFUNC_INIT
  69
  70     UWORD temp = 0;
  71     UWORD qual;
  72
  73     DEBUG_MATCHIX(dprintf("MatchIX: ev[0x%lx, 0x%lx, 0x%lx] ix[0x%lx, (0x%lx, 0x%lx), (0x%lx, 0x%lx, 0x%lx)]\n",
  74                           event->ie_Class, event->ie_Code, event->ie_Qualifier,
  75                           ix->ix_Class, ix->ix_Code, ix->ix_CodeMask,
  76                           ix->ix_Qualifier, ix->ix_QualMask, ix->ix_QualSame));
  77
  78     if (ix->ix_Class == IECLASS_NULL)
  79     {
  80         DEBUG_MATCHIX(dprintf("MatchIX: IECLASS_NULL\n"));
  81         return TRUE;
  82     }
  83
  84     if (event->ie_Class != ix->ix_Class)
  85     {
  86         DEBUG_MATCHIX(dprintf("MatchIX: fail\n"));
  87         return FALSE;
  88     }
  89
  90     DEBUG_MATCHIX(dprintf("Code: ie %lx ix: %lx\n", event->ie_Code, ix->ix_Code));
  91
  92     if (((ix->ix_Code ^ event->ie_Code) & ix->ix_CodeMask) != 0)
  93     {
  94         DEBUG_MATCHIX(dprintf("MatchIX: fail\n"));
  95         return FALSE;
  96     }
  97
  98     temp = event->ie_Qualifier;
  99     DEBUG_MATCHIX(dprintf("Code: temp %lx\n", temp));
 100
 101     if ((qual = ix->ix_QualSame) != 0)
 102     {
 103         if ((qual & IXSYM_SHIFT) != 0)
 104         {
 105             if ((temp & IXSYM_SHIFTMASK) != 0)
 106             {
 107                 temp |= IXSYM_SHIFTMASK;
 108             }
 109         }
 110
 111         if ((qual & IXSYM_CAPS) != 0)
 112         {
 113             if ((temp & IXSYM_CAPSMASK) != 0)
 114             {
 115                 temp |= IXSYM_CAPSMASK;
 116             }
 117         }
 118
 119         if ((qual & IXSYM_ALT) != 0)
 120         {
 121             if ((temp & IXSYM_ALTMASK) != 0)
 122             {
 123                 temp |= IXSYM_ALTMASK;
 124             }
 125         }
 126     }
 127     DEBUG_MATCHIX(dprintf("Code: temp %lx\n", temp));
 128
 129     if (((temp ^ ix->ix_Qualifier) & ix->ix_QualMask) == 0)
 130     {
 131         DEBUG_MATCHIX(dprintf("MatchIX: ok\n"));
 132         return TRUE;
 133     }
 134     else
 135     {
 136         DEBUG_MATCHIX(dprintf("MatchIX: fail\n"));
 137         return FALSE;
 138     }
 139
 140     AROS_LIBFUNC_EXIT
 141 } /* MatchIX */