SDL_hashevent.c

#include <SDL/SDL.h>
#include <stdio.h>
#include <string.h>
#include "SDL_eventmap.h"
#include "SDL_eventmap_internal.h"

char hashname[300]={'\0'};

#define JOYAXIS_SNAP 1600
#define JOYBALL_SNAP 1600
#define MOUSE_SNAP   20

Uint8 MotionDirection(Sint16 xrel, Sint16 yrel, Sint16 snap);

const char *SDLH_HashName(Uint32 hash)
{
  SDL_EventHash ehash;

  ehash.hash=hash;

  switch(ehash.values[0])
  {
  char buf[256];
  Uint8 tmp;
  const char *tstr;
  case SDL_MOUSEBUTTONDOWN:
    sprintf(hashname,"[MOUSEDN]\t[%d]\t[0x%02x]",ehash.values[1],ehash.values[2]);
    break;

  case SDL_MOUSEBUTTONUP:
    sprintf(hashname,"[MOUSEUP]\t[%d]\t[0x%02x]",ehash.values[1],ehash.values[2]);
    break;

  case SDL_MOUSEMOTION:
    tmp=ehash.values[1];
    buf[0]='\0';

    if(tmp&SDL_HAT_UP)        strcat(buf,"UP ");
    else if(tmp&SDL_HAT_DOWN) strcat(buf,"DOWN ");

    if(tmp&SDL_HAT_LEFT)      strcat(buf,"LEFT ");
    else if(tmp&SDL_HAT_RIGHT)strcat(buf,"RIGHT ");

    sprintf(hashname,"[MOUSEMV]\t[%s]\t[0x%02x]",buf,ehash.values[2]);    
    break;

  case SDL_KEYDOWN:
    if(ehash.lvalues[1]>=SDLK_LAST)
    {
      sprintf(buf,"U0x%04x",ehash.lvalues[1]-SDLK_LAST);
      tstr=buf;
    }
    else
      tstr=SDL_GetKeyName((SDLKey)ehash.lvalues[1]);

    sprintf(hashname,"[KEYDOWN]\t[M0x%02x]\t[%s]",ehash.values[1],tstr);
    break;

  case SDL_KEYUP:
    if(ehash.lvalues[1]>=SDLK_LAST)
    {
      sprintf(buf,"U0x%04x",ehash.lvalues[1]-SDLK_LAST);
      tstr=buf;
    }
    else
      tstr=SDL_GetKeyName((SDLKey)ehash.lvalues[1]);

    sprintf(hashname,"[KEYUP  ]\t[M0x%02x]\t[%s]",ehash.values[1],tstr);
    break;

  case SDL_JOYAXISMOTION:
    tmp=ehash.values[3];
    sprintf(hashname,"[JOYAXIS]\t[Joy#%d]\t[Axis#%d]\t[",ehash.values[1],ehash.values[2]);

    if(tmp&SDL_HAT_LEFT)       strcat(hashname," NEG");
    else if(tmp&SDL_HAT_RIGHT) strcat(hashname," POS");
    else                       strcat(hashname," CENTER");

    strcat(hashname," ]");
    break;

  case SDL_JOYHATMOTION:
    tmp=ehash.values[3];
    buf[0]='\0';

    if(tmp&SDL_HAT_UP)        strcat(buf,"UP ");
    else if(tmp&SDL_HAT_DOWN) strcat(buf,"DOWN ");

    if(tmp&SDL_HAT_LEFT)      strcat(buf,"LEFT ");
    else if(tmp&SDL_HAT_RIGHT)strcat(buf,"RIGHT ");

    sprintf(hashname,"[JOYHAT]\t[Joy#%d]\t[Hat#%d]\t[%s]",ehash.values[1],ehash.values[2],buf);
    break;

  case SDL_JOYBALLMOTION:
    tmp=ehash.values[3];
    buf[0]='\0';

    if(tmp&SDL_HAT_UP)        strcat(buf,"UP ");
    else if(tmp&SDL_HAT_DOWN) strcat(buf,"DOWN ");

    if(tmp&SDL_HAT_LEFT)      strcat(buf,"LEFT ");
    else if(tmp&SDL_HAT_RIGHT)strcat(buf,"RIGHT ");
    sprintf(hashname,"[JOYBAL]\t[Joy#%d]\t[Ball#%d]\t[%s]",ehash.values[1],ehash.values[2],buf);
    break;

  case SDL_JOYBUTTONDOWN:
    sprintf(hashname,"[JOYBDN]\t[Joy#%d]\t[But#%d]",ehash.values[1],ehash.values[2]);
    break;

  case SDL_JOYBUTTONUP:
    sprintf(hashname,"[JOYBUP]\t[Joy#%d]\t[But#%d]",ehash.values[1],ehash.values[2]);
    break;

  case 0:
    sprintf(hashname,"Invalid hash");
    break;
  
  default:
    hashname[0]='\0';
  }

  return(hashname);
}

Uint32 SDLH_HashEvent(SDL_Event *event, Uint32 flags)
{
  SDL_EventHash hash;
  if(event==NULL) return(0);

  hash.hash=0;

  switch(event->type)
  {
  case SDL_KEYUP:
    if(flags&FILTER_NOKEYUP) break;
    /* else fall through to SDL_KEYDOWN case */
  case SDL_KEYDOWN:
    hash.values[0]=event->type;

    /* If SDL doesn't recognize the key, use the keycode instead */
    if(event->key.keysym.sym==SDLK_UNKNOWN)
      hash.lvalues[1]=event->key.keysym.scancode+SDLK_LAST;
    else
      hash.lvalues[1]=event->key.keysym.sym;

    if(flags&FILTER_NOKEYMOD)
      hash.values[1]=0;
    else
      hash.values[1]=SDL_GetModState();
    break;
  
  case SDL_MOUSEMOTION:
    hash.values[0]=event->type;
    hash.values[1]=MotionDirection(event->motion.xrel,-event->motion.yrel,MOUSE_SNAP);
    hash.values[2]=event->motion.state;
    if((flags&FILTER_NOCENTER)&&(hash.values[1]==0)) hash.hash=0;
    break;

  case SDL_MOUSEBUTTONUP:
    if(flags&FILTER_NOMOUSEUP) break;
    /* else fall through to SDL_MOUSEBUTTONDOWN */
  case SDL_MOUSEBUTTONDOWN:
    hash.values[0]=event->type;
    hash.values[1]=event->button.button;

    if(flags&FILTER_NOMOUSEMOD)
      hash.values[2]=0;
    else
      hash.values[2]=SDL_GetMouseState(NULL,NULL);
    break;

  case SDL_JOYAXISMOTION:
    hash.values[0]=event->type;
    hash.values[1]=event->jaxis.which;
    hash.values[2]=event->jaxis.axis;
    hash.values[3]=MotionDirection(event->jaxis.value,0,JOYAXIS_SNAP);
    if((flags&FILTER_NOCENTER)&&(hash.values[3]==0))
      hash.hash=0;
    break;

  case SDL_JOYBALLMOTION:
    hash.values[0]=event->type;
    hash.values[1]=event->jball.which;
    hash.values[2]=event->jball.ball;
    hash.values[3]=MotionDirection(event->jball.xrel,-event->jball.yrel,JOYBALL_SNAP);
    if((flags&FILTER_NOCENTER)&&(hash.values[3]==0))
      hash.hash=0;
    break;

  case SDL_JOYHATMOTION:
    hash.values[0]=event->type;
    hash.values[1]=event->jhat.which;
    hash.values[2]=event->jhat.hat;
    hash.values[3]=event->jhat.value;
    if((flags&FILTER_NOCENTER)&&(hash.values[3]==0))
      hash.hash=0;

    break;

  case SDL_JOYBUTTONUP:
    if(flags&FILTER_NOJOYBUP) break;
    /* else fall through to SDL_JOYBUTTONDOWN */
  case SDL_JOYBUTTONDOWN:
    hash.values[0]=event->type;
    hash.values[1]=event->jbutton.which;
    hash.values[2]=event->jbutton.button;
    break;

  default:
    break;
  }

  return(hash.hash);
}

Uint8 MotionDirection(Sint16 xrel, Sint16 yrel, Sint16 snap)
{
  Uint8 val=0;

  if(xrel>snap)
    val|=SDL_HAT_RIGHT;
  else if(xrel<-snap)
    val|=SDL_HAT_LEFT;

  if(yrel>snap)
    val|=SDL_HAT_UP;
  else if(yrel<-snap)
    val|=SDL_HAT_DOWN;

  if(val==0) val|=SDL_HAT_CENTERED;

  return(val);
}

---