libx11 0.0.4 → 0.1.0

data/lib/libx11/version.rb

@@ -1,3 +1,3 @@
 module LibX11
-  VERSION = '0.0.4'
+  VERSION = '0.1.0'
 end

data/lib/libx11/x.rb

@@ -0,0 +1,148 @@
+module LibX11
+  module X
+    #****************************************************************
+    # RESERVED RESOURCE AND CONSTANT DEFINITIONS
+    #****************************************************************
+
+    None            = 0 # universal null resource or null atom
+    ParentRelative  = 1 # background pixmap in CreateWindow and ChangeWindowAttributes
+    CopyFromParent  = 0 # border pixmap in CreateWindow and ChangeWindowAttributes special
+                        # VisualID and special window class passed to CreateWindow
+    PointerWindow   = 0 # destination window in SendEvent
+    InputFocus      = 1 # destination window in SendEvent
+    PointerRoot     = 1 # focus window in SetInputFocus
+    AnyPropertyType = 0 # special Atom, passed to GetProperty
+    AnyKey          = 0 # special Key Code, passed to GrabKey
+    AnyButton       = 0 # special Button Code, passed to GrabButton
+    AllTemporary    = 0 # special Resource ID passed to KillClient
+    CurrentTime     = 0 # special Time
+    NoSymbol        = 0 # special KeySym
+
+    #***************************************************************
+    # EVENT DEFINITIONS
+    #***************************************************************
+
+    # Input Event Masks. Used as event-mask window attribute and as arguments
+    # to Grab requests.  Not to be confused with event names.
+
+    NoEventMask              = 0
+    KeyPressMask             = (1<<0)
+    KeyReleaseMask           = (1<<1)
+    ButtonPressMask          = (1<<2)
+    ButtonReleaseMask        = (1<<3)
+    EnterWindowMask          = (1<<4)
+    LeaveWindowMask          = (1<<5)
+    PointerMotionMask        = (1<<6)
+    PointerMotionHintMask    = (1<<7)
+    Button1MotionMask        = (1<<8)
+    Button2MotionMask        = (1<<9)
+    Button3MotionMask        = (1<<10)
+    Button4MotionMask        = (1<<11)
+    Button5MotionMask        = (1<<12)
+    ButtonMotionMask         = (1<<13)
+    KeymapStateMask          = (1<<14)
+    ExposureMask             = (1<<15)
+    VisibilityChangeMask     = (1<<16)
+    StructureNotifyMask      = (1<<17)
+    ResizeRedirectMask       = (1<<18)
+    SubstructureNotifyMask   = (1<<19)
+    SubstructureRedirectMask = (1<<20)
+    FocusChangeMask          = (1<<21)
+    PropertyChangeMask       = (1<<22)
+    ColormapChangeMask       = (1<<23)
+    OwnerGrabButtonMask      = (1<<24)
+
+    # Event names.  Used in "type" field in XEvent structures.  Not to be
+    # confused with event masks above.  They start from 2 because 0 and 1
+    # are reserved in the protocol for errors and replies.
+
+    KeyPress         = 2
+    KeyRelease       = 3
+    ButtonPress      = 4
+    ButtonRelease    = 5
+    MotionNotify     = 6
+    EnterNotify      = 7
+    LeaveNotify      = 8
+    FocusIn          = 9
+    FocusOut         = 10
+    KeymapNotify     = 11
+    Expose           = 12
+    GraphicsExpose   = 13
+    NoExpose         = 14
+    VisibilityNotify = 15
+    CreateNotify     = 16
+    DestroyNotify    = 17
+    UnmapNotify      = 18
+    MapNotify        = 19
+    MapRequest       = 20
+    ReparentNotify   = 21
+    ConfigureNotify  = 22
+    ConfigureRequest = 23
+    GravityNotify    = 24
+    ResizeRequest    = 25
+    CirculateNotify  = 26
+    CirculateRequest = 27
+    PropertyNotify   = 28
+    SelectionClear   = 29
+    SelectionRequest = 30
+    SelectionNotify  = 31
+    ColormapNotify   = 32
+    ClientMessage    = 33
+    MappingNotify    = 34
+    GenericEvent     = 35
+    LASTEvent        = 36
+
+    # Key masks. Used as modifiers to GrabButton and GrabKey, results of QueryPointer,
+    # state in various key-, mouse-, and button-related events.
+
+    ShiftMask   = (1<<0)
+    LockMask    = (1<<1)
+    ControlMask = (1<<2)
+    Mod1Mask    = (1<<3)
+    Mod2Mask    = (1<<4)
+    Mod3Mask    = (1<<5)
+    Mod4Mask    = (1<<6)
+    Mod5Mask    = (1<<7)
+
+    # button masks.  Used in same manner as Key masks above. Not to be confused
+    # with button names below.
+
+    Button1Mask = (1<<8)
+    Button2Mask = (1<<9)
+    Button3Mask = (1<<10)
+    Button4Mask = (1<<11)
+    Button5Mask = (1<<12)
+    AnyModifier = (1<<15)
+
+    # GrabPointer, GrabButton, GrabKeyboard, GrabKey Modes
+
+    GrabModeSync  = 0
+    GrabModeAsync = 1
+
+    #****************************************************************
+    # ERROR CODES
+    #****************************************************************
+
+    Success           = 0
+    BadRequest        = 1
+    BadValue          = 2
+    BadWindow         = 3
+    BadPixmap         = 4
+    BadAtom           = 5
+    BadCursor         = 6
+    BadFont           = 7
+    BadMatch          = 8
+    BadDrawable       = 9
+    BadAccess         = 10
+    BadAlloc          = 11
+    BadColor          = 12
+    BadGC             = 13
+    BadIDChoice       = 14
+    BadName           = 15
+    BadLength         = 16
+    BadImplementation = 17
+
+    FirstExtensionError = 128
+    LastExtensionError  = 255
+  end
+end

data/lib/libx11/xlib.rb

@@ -0,0 +1,42 @@
+module LibX11
+  module Xlib
+    extend FFI::Library
+
+    ffi_lib 'X11'
+
+    typedef :int,   :Bool
+    typedef :uchar, :KeyCode
+    typedef :ulong, :Atom
+    typedef :ulong, :Time
+    typedef :ulong, :XID
+    typedef :XID,   :Colormap
+    typedef :XID,   :Drawable
+    typedef :XID,   :KeySym
+    typedef :XID,   :Window
+
+    require 'libx11/xlib/display'
+    require 'libx11/xlib/xevent'
+
+    callback :XErrorHandler, [Display.ptr, XErrorEvent.ptr], :int
+
+    attach_function :XOpenDisplay,        [:string], Display.ptr
+    attach_function :XCreateSimpleWindow, [Display.ptr, :Window, :int, :int, :uint, :uint, :uint, :ulong, :ulong], :Window
+    attach_function :XLookupKeysym,       [XKeyEvent.ptr, :int], :KeySym
+    attach_function :XDefaultRootWindow,  [Display.ptr], :Window
+    attach_function :XBlackPixel,         [Display.ptr, :int], :ulong
+    attach_function :XWhitePixel,         [Display.ptr, :int], :ulong
+    attach_function :XDisplayString,      [Display.ptr], :string
+    attach_function :XSetErrorHandler,    [:XErrorHandler], :XErrorHandler
+    attach_function :XCloseDisplay,       [Display.ptr], :int
+    attach_function :XConnectionNumber,   [Display.ptr], :int
+    attach_function :XDefaultScreen,      [Display.ptr], :int
+    attach_function :XDestroyWindow,      [Display.ptr, :Window], :int
+    attach_function :XGrabKey,            [Display.ptr, :int, :uint, :Window, :Bool, :int, :int], :int
+    attach_function :XKeysymToKeycode,    [Display.ptr, :KeySym], :KeyCode
+    attach_function :XMapWindow,          [Display.ptr, :Window], :int
+    attach_function :XNextEvent,          [Display.ptr, XEvent.ptr], :int, blocking: true
+    attach_function :XSelectInput,        [Display.ptr, :Window, :long], :int
+    attach_function :XSync,               [Display.ptr, :Bool], :int, blocking: true
+    attach_function :XUngrabKey,          [Display.ptr, :int, :uint, :Window], :int
+  end
+end

data/lib/libx11/xlib/display.rb

@@ -0,0 +1,52 @@
+module LibX11
+  module Xlib
+    class Display < FFI::Struct
+      layout(
+        :ext_data,            :pointer,
+        :private1,            :pointer,
+        :fd,                  :int,
+        :private2,            :int,
+        :proto_major_version, :int,
+        :proto_minor_version, :int,
+        :vendor,              :string,
+        :private3,            :XID,
+        :private4,            :XID,
+        :private5,            :XID,
+        :private6,            :int,
+        :resource_alloc,      :pointer,
+        :byte_order,          :int,
+        :bitmap_unit,         :int,
+        :bitmap_pad,          :int,
+        :bitmap_bit_order,    :int,
+        :nformats,            :int,
+        :pixmap_format,       :pointer,
+        :private8,            :int,
+        :release,             :int,
+        :private9,            :pointer,
+        :private10,           :pointer,
+        :qlen,                :int,
+        :last_request_read,   :ulong,
+        :request,             :ulong,
+        :private11,           :pointer,
+        :private12,           :pointer,
+        :private13,           :pointer,
+        :private14,           :pointer,
+        :max_request_size,    :uint,
+        :db,                  :pointer,
+        :private15,           :pointer,
+        :display_name,        :string,
+        :default_screen,      :int,
+        :nscreens,            :int,
+        :screens,             :pointer,
+        :motion_buffer,       :ulong,
+        :private16,           :ulong,
+        :min_keycode,         :int,
+        :max_keycode,         :int,
+        :private17,           :pointer,
+        :private18,           :pointer,
+        :private19,           :int,
+        :xdefaults,           :string,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xany_event.rb

@@ -0,0 +1,13 @@
+module LibX11
+  module Xlib
+    class XAnyEvent < FFI::Struct
+      layout(
+        :type,       :int,
+        :serial,     :ulong,
+        :send_event, :Bool,
+        :display,    Display.ptr,
+        :window,     :Window,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xbutton_event.rb

@@ -0,0 +1,23 @@
+module LibX11
+  module Xlib
+    class XButtonEvent < FFI::Struct
+      layout(
+        :type,        :int,
+        :serial,      :ulong,
+        :send_event,  :Bool,
+        :display,     Display.ptr,
+        :window,      :Window,
+        :root,        :Window,
+        :subwindow,   :Window,
+        :time,        :Time,
+        :x,           :int,
+        :y,           :int,
+        :x_root,      :int,
+        :y_root,      :int,
+        :state,       :uint,
+        :button,      :uint,
+        :same_screen, :Bool,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xcirculate_event.rb

@@ -0,0 +1,15 @@
+module LibX11
+  module Xlib
+    class XCirculateEvent < FFI::Struct
+      layout(
+        :type,       :int,
+        :serial,     :ulong,
+        :send_event, :Bool,
+        :display,    Display.ptr,
+        :event,      :Window,
+        :window,     :Window,
+        :place,      :int,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xcirculate_request_event.rb

@@ -0,0 +1,15 @@
+module LibX11
+  module Xlib
+    class XCirculateRequestEvent < FFI::Struct
+      layout(
+        :type,       :int,
+        :serial,     :ulong,
+        :send_event, :Bool,
+        :display,    Display.ptr,
+        :event,      :Window,
+        :window,     :Window,
+        :place,      :int,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xclient_message_event.rb

@@ -0,0 +1,24 @@
+module LibX11
+  module Xlib
+    class XClientMessageEvent < FFI::Struct
+      class Data < FFI::Union
+        layout(
+          :b, [:char, 20],
+          :s, [:short, 10],
+          :l, [:long, 5],
+        )
+      end
+
+      layout(
+        :type,         :int,
+        :serial,       :ulong,
+        :send_event,   :Bool,
+        :display,      :pointer,
+        :window,       :Window,
+        :message_type, :Atom,
+        :format,       :int,
+        :data,         Data,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xcolormap_event.rb

@@ -0,0 +1,16 @@
+module LibX11
+  module Xlib
+    class XColormapEvent < FFI::Struct
+      layout(
+        :type,       :int,
+        :serial,     :ulong,
+        :send_event, :Bool,
+        :display,    Display.ptr,
+        :window,     :Window,
+        :colormap,   :Colormap,
+        :new,        :Bool,
+        :state,      :int,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xconfigure_event.rb

@@ -0,0 +1,21 @@
+module LibX11
+  module Xlib
+    class XConfigureEvent < FFI::Struct
+      layout(
+        :type,              :int,
+        :serial,            :ulong,
+        :send_event,        :Bool,
+        :display,           Display.ptr,
+        :event,             :Window,
+        :window,            :Window,
+        :x,                 :int,
+        :y,                 :int,
+        :width,             :int,
+        :height,            :int,
+        :border_width,      :int,
+        :above,             :Window,
+        :override_redirect, :Bool,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xconfigure_request_event.rb

@@ -0,0 +1,22 @@
+module LibX11
+  module Xlib
+    class XConfigureRequestEvent < FFI::Struct
+      layout(
+        :type,         :int,
+        :serial,       :ulong,
+        :send_event,   :Bool,
+        :display,      Display.ptr,
+        :event,        :Window,
+        :window,       :Window,
+        :x,            :int,
+        :y,            :int,
+        :width,        :int,
+        :height,       :int,
+        :border_width, :int,
+        :above,        :Window,
+        :detail,       :int,
+        :value_mask,   :ulong,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xcreate_window_event.rb

@@ -0,0 +1,20 @@
+module LibX11
+  module Xlib
+    class XCreateWindowEvent < FFI::Struct
+      layout(
+        :type,              :int,
+        :serial,            :ulong,
+        :send_event,        :Bool,
+        :display,           Display.ptr,
+        :parent,            :Window,
+        :window,            :Window,
+        :x,                 :int,
+        :y,                 :int,
+        :width,             :int,
+        :height,            :int,
+        :border_width,      :int,
+        :override_redirect, :Bool,
+      )
+    end
+  end
+end

data/lib/libx11/xlib/xcrossing_event.rb

@@ -0,0 +1,25 @@
+module LibX11
+  module Xlib
+    class XCrossingEvent < FFI::Struct
+      layout(
+        :type,        :int,
+        :serial,      :ulong,
+        :send_event,  :Bool,
+        :display,     Display.ptr,
+        :window,      :Window,
+        :root,        :Window,
+        :subwindow,   :Window,
+        :time,        :Time,
+        :x,           :int,
+        :y,           :int,
+        :x_root,      :int,
+        :y_root,      :int,
+        :mode,        :int,
+        :detail,      :int,
+        :same_screen, :Bool,
+        :focus,       :Bool,
+        :state,       :uint
+      )
+    end
+  end
+end