/*

 * AT-SPI - Assistive Technology Service Provider Interface

 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)

 *

 * Copyright 2009 Nokia.

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Library General Public

 * License as published by the Free Software Foundation; either

 * version 2 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Library General Public License for more details.

 *

 * You should have received a copy of the GNU Library General Public

 * License along with this library; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

#include <glib.h>

#include "event-source.h"

typedef struct _DisplaySource

{

  GSource source;

  Display *display;

  GPollFD  event_poll_fd;

} DisplaySource;

/*---------------------------------------------------------------------------*/

static void (*_spi_default_filter) (XEvent*, void*) = NULL;

static void* _spi_default_filter_data = NULL;

/*---------------------------------------------------------------------------*/

static gboolean  

event_prepare (GSource *source, gint *timeout)

{

  Display *display = ((DisplaySource *)source)->display;

  gboolean retval;

  *timeout = -1;

  retval = XPending (display);

  return retval;

}

static gboolean  

event_check (GSource *source) 

{

  DisplaySource *display_source = (DisplaySource*)source;

  gboolean retval;

  if (display_source->event_poll_fd.revents & G_IO_IN)

    retval = XPending (display_source->display);

  else

    retval = FALSE;

  return retval;

}

static gboolean  

event_dispatch (GSource *source, GSourceFunc callback, gpointer  user_data)

{

  Display *display = ((DisplaySource*)source)->display;

  XEvent xevent;

  /* TODO - Should this be "if (XPending (display))"?

   *        The effect of this might be to run other main loop functions

   *        before dispatching the next XEvent.

   */

  while (XPending (display))

    {

      XNextEvent (display, &xevent);

      switch (xevent.type)

	{

	case KeyPress:

	case KeyRelease:

	  break;

	default:

	  if (XFilterEvent (&xevent, None))

	    continue;

	}

      if (_spi_default_filter)

        {

          _spi_default_filter (&xevent, _spi_default_filter_data);

        }  

    }

  return TRUE;

}

/*---------------------------------------------------------------------------*/

static GSourceFuncs event_funcs = {

  event_prepare,

  event_check,

  event_dispatch,

  NULL

};

static GSource *

display_source_new (Display *display)

{

  GSource *source = g_source_new (&event_funcs, sizeof (DisplaySource));

  DisplaySource *display_source = (DisplaySource *) source;

  g_source_set_name (source, "[at-spi2-core] display_source_funcs");

  display_source->display = display;

  return source;

}

/*---------------------------------------------------------------------------*/

static DisplaySource *spi_display_source = NULL;

void 

spi_events_init (Display *display)

{

  GSource *source;

  int connection_number = ConnectionNumber (display);

  source = display_source_new (display);

  spi_display_source = (DisplaySource*) source;

  g_source_set_priority (source, G_PRIORITY_DEFAULT);

  spi_display_source->event_poll_fd.fd = connection_number;

  spi_display_source->event_poll_fd.events = G_IO_IN;

  g_source_add_poll (source, &spi_display_source->event_poll_fd);

  g_source_set_can_recurse (source, TRUE);

  g_source_attach (source, NULL);

}

void

spi_events_uninit ()

{

  if (spi_display_source)

    {

      g_source_destroy ((GSource *) spi_display_source);

      g_source_unref ((GSource *) spi_display_source);

      spi_display_source = NULL;

    }

}

void

spi_set_events (long event_mask)

{

  long xevent_mask = StructureNotifyMask | PropertyChangeMask;

  xevent_mask |= event_mask;

  XSelectInput (spi_display_source->display, 

                DefaultRootWindow (spi_display_source->display),

                xevent_mask);

}

void

spi_set_filter (void (*filter) (XEvent*, void*), void* data)

{

  _spi_default_filter = filter;

  _spi_default_filter_data = data;

}

/*END------------------------------------------------------------------------*/