libx11 0.0.4 → 0.1.0

data/ext/libx11_ruby/extconf.rb

@@ -1,6 +0,0 @@
-require 'mkmf'
-
-$CFLAGS << ' -Wall -Wextra'
-abort 'Cannot find libx11' unless have_library('X11')
-
-create_makefile('libx11/libx11_ruby')

data/ext/libx11_ruby/libx11_ruby.c

@@ -1,13 +0,0 @@
-#include "libx11_ruby.h"
-
-void
-Init_libx11_ruby(void)
-{
-  rb_mLibX11 = rb_define_module("LibX11");
-
-  Init_libx11_constants();
-  Init_libx11_display();
-  Init_libx11_window();
-  Init_libx11_xerror_event();
-  Init_libx11_xevent();
-}

data/ext/libx11_ruby/libx11_ruby.h

@@ -1,14 +0,0 @@
-#ifndef LIBX11_RUBY_H
-#define LIBX11_RUBY_H 1
-
-#include "ruby.h"
-
-VALUE rb_mLibX11;
-
-void Init_libx11_constants(void);
-void Init_libx11_display(void);
-void Init_libx11_window(void);
-void Init_libx11_xerror_event(void);
-void Init_libx11_xevent(void);
-
-#endif /* LIBX11_RUBY_H */

data/ext/libx11_ruby/window.c

@@ -1,33 +0,0 @@
-#include "libx11_ruby.h"
-#include <X11/Xlib.h>
-
-extern Display* get_display_struct(VALUE);
-
-/*
- * Xlib XCreateSimpleWindow
- */
-static VALUE
-rb_libx11_xcreate_simple_window(VALUE self, VALUE display_obj, VALUE parent_window, VALUE x, VALUE y,
-    VALUE width, VALUE height, VALUE border_width, VALUE border_color, VALUE background_color)
-{
-  Window ret = XCreateSimpleWindow(get_display_struct(display_obj), NUM2ULONG(parent_window), NUM2INT(x), NUM2INT(y),
-      NUM2UINT(width), NUM2UINT(height), FIX2UINT(border_width), NUM2ULONG(border_color), NUM2ULONG(background_color));
-  return ULONG2NUM(ret);
-}
-
-/*
- * Xlib XDestroyWindow
- */
-static VALUE
-rb_libx11_xdestroy_window(VALUE self, VALUE display_obj, VALUE window)
-{
-  int ret = XDestroyWindow(get_display_struct(display_obj), NUM2ULONG(window));
-  return INT2NUM(ret);
-}
-
-void
-Init_libx11_window(void)
-{
-  rb_define_singleton_method(rb_mLibX11, "xcreate_simple_window", rb_libx11_xcreate_simple_window, 9);
-  rb_define_singleton_method(rb_mLibX11, "xdestroy_window", rb_libx11_xdestroy_window, 2);
-}

data/ext/libx11_ruby/xerror_event.c

@@ -1,104 +0,0 @@
-#include "libx11_ruby.h"
-#include <X11/Xlib.h>
-
-extern VALUE rb_cDisplay;
-VALUE rb_cXErrorEvent;
-
-extern rb_data_type_t display_type;
-
-static size_t
-xerror_event_dsize(const void *arg)
-{
-  const XErrorEvent *event = arg;
-  return sizeof(event);
-}
-
-const rb_data_type_t xerror_event_type = {
-  .wrap_struct_name = "libx11_xerror_event",
-  .function = {
-    .dmark = NULL,
-    .dfree = NULL,
-    .dsize = xerror_event_dsize,
-    .reserved = { NULL, NULL },
-  },
-  .parent = NULL,
-  .data = NULL,
-  .flags = RUBY_TYPED_FREE_IMMEDIATELY,
-};
-
-static VALUE error_handler_proc = Qnil;
-
-static int
-error_handler_func(Display *display, XErrorEvent *event)
-{
-  if (NIL_P(error_handler_proc)) {
-    return 1;
-  } else {
-    VALUE args = rb_ary_new();
-    rb_ary_push(args, TypedData_Wrap_Struct(rb_cDisplay, &display_type, display));
-    rb_ary_push(args, TypedData_Wrap_Struct(rb_cXErrorEvent, &xerror_event_type, event));
-    rb_proc_call(error_handler_proc, args);
-    return 0;
-  }
-}
-
-/*
- * Xlib XSetErrorHandler
- */
-static VALUE
-rb_libx11_xset_error_handler(int argc, VALUE *argv, VALUE self)
-{
-  rb_check_arity(argc, 0, 0);
-  rb_scan_args(argc, argv, "00&", &error_handler_proc);
-
-  XSetErrorHandler(error_handler_func);
-  return Qnil;
-}
-
-static VALUE
-rb_xerror_event_error_code(VALUE self)
-{
-  XErrorEvent *event;
-  TypedData_Get_Struct(self, XErrorEvent, &xerror_event_type, event);
-  return INT2FIX(event->error_code);
-}
-
-static VALUE
-rb_xerror_event_type(VALUE self)
-{
-  XErrorEvent *event;
-  TypedData_Get_Struct(self, XErrorEvent, &xerror_event_type, event);
-  return INT2FIX(event->type);
-}
-
-void
-Init_libx11_xerror_event(void)
-{
-  rb_define_singleton_method(rb_mLibX11, "xset_error_handler", rb_libx11_xset_error_handler, -1);
-
-  rb_cXErrorEvent = rb_define_class_under(rb_mLibX11, "XErrorEvent", rb_cData);
-  rb_define_method(rb_cXErrorEvent, "error_code", rb_xerror_event_error_code, 0);
-  rb_define_method(rb_cXErrorEvent, "type", rb_xerror_event_type, 0);
-
-  // error codes
-  rb_define_const(rb_cXErrorEvent, "SUCCESS", INT2FIX(Success));
-  rb_define_const(rb_cXErrorEvent, "BAD_REQUEST", INT2FIX(BadRequest));
-  rb_define_const(rb_cXErrorEvent, "BAD_VALUE", INT2FIX(BadValue));
-  rb_define_const(rb_cXErrorEvent, "BAD_WINDOW", INT2FIX(BadWindow));
-  rb_define_const(rb_cXErrorEvent, "BAD_PIXMAP", INT2FIX(BadPixmap));
-  rb_define_const(rb_cXErrorEvent, "BAD_ATOM", INT2FIX(BadAtom));
-  rb_define_const(rb_cXErrorEvent, "BAD_CURSOR", INT2FIX(BadCursor));
-  rb_define_const(rb_cXErrorEvent, "BAD_FONT", INT2FIX(BadFont));
-  rb_define_const(rb_cXErrorEvent, "BAD_MATCH", INT2FIX(BadMatch));
-  rb_define_const(rb_cXErrorEvent, "BAD_DRAWABLE", INT2FIX(BadDrawable));
-  rb_define_const(rb_cXErrorEvent, "BAD_ACCESS", INT2FIX(BadAccess));
-  rb_define_const(rb_cXErrorEvent, "BAD_ALLOC", INT2FIX(BadAlloc));
-  rb_define_const(rb_cXErrorEvent, "BAD_COLOR", INT2FIX(BadColor));
-  rb_define_const(rb_cXErrorEvent, "BAD_GC", INT2FIX(BadGC));
-  rb_define_const(rb_cXErrorEvent, "BAD_ID_CHOICE", INT2FIX(BadIDChoice));
-  rb_define_const(rb_cXErrorEvent, "BAD_NAME", INT2FIX(BadName));
-  rb_define_const(rb_cXErrorEvent, "BAD_LENGTH", INT2FIX(BadLength));
-  rb_define_const(rb_cXErrorEvent, "BAD_IMPLEMENTATION", INT2FIX(BadImplementation));
-  rb_define_const(rb_cXErrorEvent, "FIRST_EXTENSION_ERROR", INT2FIX(FirstExtensionError));
-  rb_define_const(rb_cXErrorEvent, "LAST_EXTENSION_ERROR", INT2FIX(LastExtensionError));
-}

data/ext/libx11_ruby/xevent.c

@@ -1,134 +0,0 @@
-#include "libx11_ruby.h"
-#include <X11/Xlib.h>
-
-VALUE rb_cXEvent, rb_cXKeyEvent;
-
-extern Display* get_display_struct(VALUE);
-
-static void
-xevent_dfree(void *arg)
-{
-  XEvent *event = arg;
-  free(event);
-}
-
-static size_t
-xevent_dsize(const void *arg)
-{
-  const XEvent *event = arg;
-  return sizeof(event);
-}
-
-const rb_data_type_t xevent_type = {
-  .wrap_struct_name = "libx11_xevent",
-  .function = {
-    .dmark = NULL,
-    .dfree = xevent_dfree,
-    .dsize = xevent_dsize,
-    .reserved = { NULL, NULL },
-  },
-  .parent = NULL,
-  .data = NULL,
-  .flags = RUBY_TYPED_FREE_IMMEDIATELY,
-};
-
-/*
- * Xlib XNextEvent
- */
-static VALUE
-rb_libx11_xnext_event(VALUE self, VALUE obj)
-{
-  XEvent *event = (XEvent *)malloc(sizeof(XEvent));
-  XNextEvent(get_display_struct(obj), event);
-  switch (event->type) {
-    case KeyPress:
-      return TypedData_Wrap_Struct(rb_cXKeyEvent, &xevent_type, event);
-    default:
-      return TypedData_Wrap_Struct(rb_cXEvent, &xevent_type, event);
-  }
-}
-
-static VALUE
-rb_xevent_type(VALUE self)
-{
-  XEvent *event;
-
-  TypedData_Get_Struct(self, XEvent, &xevent_type, event);
-  return INT2NUM(event->type);
-}
-
-static VALUE
-rb_xkey_event_state(VALUE self)
-{
-  XEvent *event;
-
-  TypedData_Get_Struct(self, XEvent, &xevent_type, event);
-  return UINT2NUM(event->xkey.state);
-}
-
-/*
- * KeySym XLookupKeysym(
- *   XKeyEvent* key_event,
- *   int        index
- * );
- */
-static VALUE
-rb_libx11_xlookup_keysym(VALUE self, VALUE event_obj, VALUE index)
-{
-  XEvent *event;
-  unsigned long keysym;
-
-  TypedData_Get_Struct(event_obj, XEvent, &xevent_type, event);
-  keysym = XLookupKeysym(&event->xkey, NUM2INT(index));
-  return ULONG2NUM(keysym);
-}
-
-void
-Init_libx11_xevent(void)
-{
-  rb_define_singleton_method(rb_mLibX11, "xnext_event", rb_libx11_xnext_event, 1);
-  rb_define_singleton_method(rb_mLibX11, "xlookup_keysym", rb_libx11_xlookup_keysym, 2);
-
-  rb_cXEvent = rb_define_class_under(rb_mLibX11, "XEvent", rb_cData);
-  rb_define_method(rb_cXEvent, "type", rb_xevent_type, 0);
-
-  rb_cXKeyEvent = rb_define_class_under(rb_mLibX11, "XKeyEvent", rb_cXEvent);
-  rb_define_method(rb_cXKeyEvent, "state", rb_xkey_event_state, 0);
-
-  // event
-  rb_define_const(rb_cXEvent, "KEY_PRESS", INT2FIX(KeyPress));
-  rb_define_const(rb_cXEvent, "KEY_RELEASE", INT2FIX(KeyRelease));
-  rb_define_const(rb_cXEvent, "BUTTON_PRESS", INT2FIX(ButtonPress));
-  rb_define_const(rb_cXEvent, "BUTTON_RELEASE", INT2FIX(ButtonRelease));
-  rb_define_const(rb_cXEvent, "MOTION_NOTIFY", INT2FIX(MotionNotify));
-  rb_define_const(rb_cXEvent, "ENTER_NOTIFY", INT2FIX(EnterNotify));
-  rb_define_const(rb_cXEvent, "LEAVE_NOTIFY", INT2FIX(LeaveNotify));
-  rb_define_const(rb_cXEvent, "FOCUS_IN", INT2FIX(FocusIn));
-  rb_define_const(rb_cXEvent, "FOCUS_OUT", INT2FIX(FocusOut));
-  rb_define_const(rb_cXEvent, "KEYMAP_NOTIFY", INT2FIX(KeymapNotify));
-  rb_define_const(rb_cXEvent, "EXPOSE", INT2FIX(Expose));
-  rb_define_const(rb_cXEvent, "GRAPHICS_EXPOSE", INT2FIX(GraphicsExpose));
-  rb_define_const(rb_cXEvent, "NO_EXPOSE", INT2FIX(NoExpose));
-  rb_define_const(rb_cXEvent, "VISIBILITY_NOTIFY", INT2FIX(VisibilityNotify));
-  rb_define_const(rb_cXEvent, "CREATE_NOTIFY", INT2FIX(CreateNotify));
-  rb_define_const(rb_cXEvent, "DESTROY_NOTIFY", INT2FIX(DestroyNotify));
-  rb_define_const(rb_cXEvent, "UNMAP_NOTIFY", INT2FIX(UnmapNotify));
-  rb_define_const(rb_cXEvent, "MAP_NOTIFY", INT2FIX(MapNotify));
-  rb_define_const(rb_cXEvent, "MAP_REQUEST", INT2FIX(MapRequest));
-  rb_define_const(rb_cXEvent, "REPARENT_NOTIFY", INT2FIX(ReparentNotify));
-  rb_define_const(rb_cXEvent, "CONFIGURE_NOTIFY", INT2FIX(ConfigureNotify));
-  rb_define_const(rb_cXEvent, "CONFIGURE_REQUEST", INT2FIX(ConfigureRequest));
-  rb_define_const(rb_cXEvent, "GRAVITY_NOTIFY", INT2FIX(GravityNotify));
-  rb_define_const(rb_cXEvent, "RESIZE_REQUEST", INT2FIX(ResizeRequest));
-  rb_define_const(rb_cXEvent, "CIRCULATE_NOTIFY", INT2FIX(CirculateNotify));
-  rb_define_const(rb_cXEvent, "CIRCULATE_REQUEST", INT2FIX(CirculateRequest));
-  rb_define_const(rb_cXEvent, "PROPERTY_NOTIFY", INT2FIX(PropertyNotify));
-  rb_define_const(rb_cXEvent, "SELECTION_CLEAR", INT2FIX(SelectionClear));
-  rb_define_const(rb_cXEvent, "SELECTION_REQUEST", INT2FIX(SelectionRequest));
-  rb_define_const(rb_cXEvent, "SELKECTION_NOTIFY", INT2FIX(SelectionNotify));
-  rb_define_const(rb_cXEvent, "COLORMAP_NOTIFY", INT2FIX(ColormapNotify));
-  rb_define_const(rb_cXEvent, "CLIENT_MESSAGE", INT2FIX(ClientMessage));
-  rb_define_const(rb_cXEvent, "MAPPING_NOTIFY", INT2FIX(MappingNotify));
-  rb_define_const(rb_cXEvent, "GENERIC_EVENT", INT2FIX(GenericEvent));
-  rb_define_const(rb_cXEvent, "LAST_EVENT", INT2FIX(LASTEvent));
-}