arch/all-hosted/hidd/x11/x11mouse.c

   1 /*
   2     Copyright © 1995-2009, 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     EnterFunc(bug("[X11Mouse] New()\n"));
  71     ObtainSemaphoreShared( &XSD(cl)->sema);
  72
  73     if (XSD(cl)->mousehidd)
  74         has_mouse_hidd = TRUE;
  75
  76     ReleaseSemaphore( &XSD(cl)->sema);
  77
  78     if (has_mouse_hidd) /* Cannot open twice */
  79         return NULL; /* Should have some error code here */
  80
  81     o = (OOP_Object *)OOP_DoSuperMethod(cl, o, (OOP_Msg)msg);
  82     if (o)
  83     {
  84         struct x11mouse_data *data = OOP_INST_DATA(cl, o);
  85         struct TagItem       *tag, *tstate;
  86
  87         tstate = msg->attrList;
  88         while ((tag = NextTagItem((const struct TagItem **)&tstate)))
  89         {
  90             ULONG idx;
  91
  92             if (IS_HIDDMOUSE_ATTR(tag->ti_Tag, idx))
  93             {
  94                 switch (idx)
  95                 {
  96                     case aoHidd_Mouse_IrqHandler:
  97                         data->mouse_callback = (VOID (*)())tag->ti_Data;
  98                         break;
  99
 100                     case aoHidd_Mouse_IrqHandlerData:
 101                         data->callbackdata = (APTR)tag->ti_Data;
 102                         break;
 103                 }
 104             }
 105
 106         } /* while (tags to process) */
 107
 108         /* Install the mouse hidd */
 109
 110         ObtainSemaphore( &XSD(cl)->sema);
 111         XSD(cl)->mousehidd = o;
 112         ReleaseSemaphore( &XSD(cl)->sema);
 113
 114     }
 115
 116     return o;
 117 }
 118
 119 /****************************************************************************************/
 120
 121 VOID X11Mouse__Root__Dispose(OOP_Class *cl, OOP_Object *o, struct pRoot_Dispose *msg)
 122 {
 123     EnterFunc(bug("[X11Mouse] Dispose()\n"));
 124
 125     ObtainSemaphore( &XSD(cl)->sema);
 126     XSD(cl)->mousehidd = NULL;
 127     ReleaseSemaphore( &XSD(cl)->sema);
 128     OOP_DoSuperMethod(cl, o, msg);
 129 }
 130
 131 /****************************************************************************************/
 132
 133 VOID X11Mouse__Hidd_X11Mouse__HandleEvent(OOP_Class *cl, OOP_Object *o, struct pHidd_X11Mouse_HandleEvent *msg)
 134 {
 135
 136     struct x11mouse_data        *data = OOP_INST_DATA(cl, o);
 137     struct pHidd_Mouse_Event     e;
 138
 139     DB2(bug("[X11Mouse] HandleEvent()\n"));
 140     XButtonEvent *xb = &(msg->event->xbutton);
 141
 142     e.x = xb->x;
 143     e.y = xb->y;
 144
 145     if (msg->event->type == ButtonRelease)
 146     {
 147         switch(xb->button)
 148         {
 149             case Button1:
 150             case Button2:
 151             case Button3:
 152                 e.button = xbutton2hidd(xb);
 153                 e.type   = vHidd_Mouse_Release;
 154                 data->mouse_callback(data->callbackdata, &e);
 155                 break;
 156         }
 157     }
 158     else if (msg->event->type == ButtonPress)
 159     {
 160         switch(xb->button)
 161         {
 162             case Button1:
 163             case Button2:
 164             case Button3:
 165                 e.button = xbutton2hidd(xb);
 166                 e.type   = vHidd_Mouse_Press;
 167                 data->mouse_callback(data->callbackdata, &e);
 168                 break;
 169
 170             case Button4:
 171                 e.type   = vHidd_Mouse_WheelMotion;
 172                 e.button = vHidd_Mouse_NoButton;
 173                 e.x      = 0;
 174                 e.y      = -1;
 175                 data->mouse_callback(data->callbackdata, &e);
 176                 break;
 177
 178             case Button5:
 179                 e.type   = vHidd_Mouse_WheelMotion;
 180                 e.button = vHidd_Mouse_NoButton;
 181                 e.x      = 0;
 182                 e.y      = 1;
 183                 data->mouse_callback(data->callbackdata, &e);
 184                 break;
 185
 186         }
 187     }
 188     else if (msg->event->type == MotionNotify)
 189     {
 190         e.button = vHidd_Mouse_NoButton;
 191         e.type = vHidd_Mouse_Motion;
 192
 193         data->mouse_callback(data->callbackdata, &e);
 194     }
 195
 196 }
 197
 198 /****************************************************************************************/
 199
 200 #undef XSD
 201 #define XSD(cl) (&LIBBASE->xsd)
 202
 203 /****************************************************************************************/
 204
 205 static int X11Mouse_Init(LIBBASETYPEPTR LIBBASE)
 206 {
 207     return OOP_ObtainAttrBases(attrbases);
 208 }
 209
 210 /****************************************************************************************/
 211
 212 static int X11Mouse_Expunge(LIBBASETYPEPTR LIBBASE)
 213 {
 214     OOP_ReleaseAttrBases(attrbases);
 215     return TRUE;
 216 }
 217
 218 /****************************************************************************************/
 219
 220 ADD2INITLIB(X11Mouse_Init, 0)
 221 ADD2EXPUNGELIB(X11Mouse_Expunge, 0)