arch/all-x11/hidd/x11mouse.c

   1 /*
   2     Copyright © 1995-2006, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: X11 hidd handling mouse events.
   6     Lang: English.
   7 */
   8
   9 #define __OOP_NOATTRBASES__
  10
  11 #include <proto/utility.h>
  12 #include <proto/oop.h>
  13 #include <oop/oop.h>
  14
  15 #include <X11/Xlib.h>
  16
  17 #include <hidd/hidd.h>
  18 #include <hidd/mouse.h>
  19
  20 #include <aros/symbolsets.h>
  21
  22 #define DEBUG 0
  23 #include <aros/debug.h>
  24
  25 #include LC_LIBDEFS_FILE
  26
  27 #include "x11.h"
  28
  29 /****************************************************************************************/
  30
  31 static OOP_AttrBase HiddMouseAB;
  32
  33 static struct OOP_ABDescr attrbases[] =
  34 {
  35     { IID_Hidd_Mouse, &HiddMouseAB  },
  36     { NULL          , NULL          }
  37 };
  38
  39 /****************************************************************************************/
  40
  41 static ULONG xbutton2hidd(XButtonEvent *xb)
  42 {
  43     ULONG button;
  44
  45     switch (xb->button)
  46     {
  47         case Button1:
  48             button = vHidd_Mouse_Button1;
  49             break;
  50
  51         case Button2:
  52             button = vHidd_Mouse_Button3;
  53             break;
  54
  55         case Button3:
  56             button = vHidd_Mouse_Button2;
  57             break;
  58
  59     }
  60
  61     return button;
  62 }
  63
  64 /****************************************************************************************/
  65
  66 OOP_Object * X11Mouse__Root__New(OOP_Class *cl, OOP_Object *o, struct pRoot_New *msg)
  67 {
  68     BOOL has_mouse_hidd = FALSE;
  69
  70     ObtainSemaphoreShared( &XSD(cl)->sema);
  71
  72     if (XSD(cl)->mousehidd)
  73         has_mouse_hidd = TRUE;
  74
  75     ReleaseSemaphore( &XSD(cl)->sema);
  76
  77     if (has_mouse_hidd) /* Cannot open twice */
  78         return NULL; /* Should have some error code here */
  79
  80     o = (OOP_Object *)OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
  81     if (o)
  82     {
  83         struct x11mouse_data *data = OOP_INST_DATA(cl, o);
  84         struct TagItem       *tag, *tstate;
  85
  86         tstate = msg->attrList;
  87         while ((tag = NextTagItem((const struct TagItem **)&tstate)))
  88         {
  89             ULONG idx;
  90
  91             if (IS_HIDDMOUSE_ATTR(tag->ti_Tag, idx))
  92             {
  93                 switch (idx)
  94                 {
  95                     case aoHidd_Mouse_IrqHandler:
  96                         data->mouse_callback = (VOID (*)())tag->ti_Data;
  97                         break;
  98
  99                     case aoHidd_Mouse_IrqHandlerData:
 100                         data->callbackdata = (APTR)tag->ti_Data;
 101                         break;
 102                 }
 103             }
 104
 105         } /* while (tags to process) */
 106
 107         /* Install the mouse hidd */
 108
 109         ObtainSemaphore( &XSD(cl)->sema);
 110         XSD(cl)->mousehidd = o;
 111         ReleaseSemaphore( &XSD(cl)->sema);
 112
 113     }
 114
 115     return o;
 116 }
 117
 118 /****************************************************************************************/
 119
 120 VOID X11Mouse__Hidd_X11Mouse__HandleEvent(OOP_Class *cl, OOP_Object *o, struct pHidd_X11Mouse_HandleEvent *msg)
 121 {
 122
 123     struct x11mouse_data        *data = OOP_INST_DATA(cl, o);
 124     struct pHidd_Mouse_Event     e;
 125
 126     XButtonEvent *xb = &(msg->event->xbutton);
 127
 128     e.x = xb->x;
 129     e.y = xb->y;
 130
 131     if (msg->event->type == ButtonRelease)
 132     {
 133         switch(xb->button)
 134         {
 135             case Button1:
 136             case Button2:
 137             case Button3:
 138                 e.button = xbutton2hidd(xb);
 139                 e.type   = vHidd_Mouse_Release;
 140                 data->mouse_callback(data->callbackdata, &e);
 141                 break;
 142         }
 143     }
 144     else if (msg->event->type == ButtonPress)
 145     {
 146         switch(xb->button)
 147         {
 148             case Button1:
 149             case Button2:
 150             case Button3:
 151                 e.button = xbutton2hidd(xb);
 152                 e.type   = vHidd_Mouse_Press;
 153                 data->mouse_callback(data->callbackdata, &e);
 154                 break;
 155
 156             case Button4:
 157                 e.type   = vHidd_Mouse_WheelMotion;
 158                 e.button = vHidd_Mouse_NoButton;
 159                 e.x      = 0;
 160                 e.y      = -1;
 161                 data->mouse_callback(data->callbackdata, &e);
 162                 break;
 163
 164             case Button5:
 165                 e.type   = vHidd_Mouse_WheelMotion;
 166                 e.button = vHidd_Mouse_NoButton;
 167                 e.x      = 0;
 168                 e.y      = 1;
 169                 data->mouse_callback(data->callbackdata, &e);
 170                 break;
 171
 172         }
 173     }
 174     else if (msg->event->type == MotionNotify)
 175     {
 176         e.button = vHidd_Mouse_NoButton;
 177         e.type = vHidd_Mouse_Motion;
 178
 179         data->mouse_callback(data->callbackdata, &e);
 180     }
 181
 182 }
 183
 184 /****************************************************************************************/
 185
 186 #undef XSD
 187 #define XSD(cl) (&LIBBASE->xsd)
 188
 189 /****************************************************************************************/
 190
 191 static int X11Mouse_Init(LIBBASETYPEPTR LIBBASE)
 192 {
 193     return OOP_ObtainAttrBases(attrbases);
 194 }
 195
 196 /****************************************************************************************/
 197
 198 static int X11Mouse_Expunge(LIBBASETYPEPTR LIBBASE)
 199 {
 200     OOP_ReleaseAttrBases(attrbases);
 201     return TRUE;
 202 }
 203
 204 /****************************************************************************************/
 205
 206 ADD2INITLIB(X11Mouse_Init, 0)
 207 ADD2EXPUNGELIB(X11Mouse_Expunge, 0)