ffi-e17 renamed to ffi-efl

1 files changed, 127 insertions, 0 deletions

diff --git a/lib/efl/evas.rb b/lib/efl/evas.rb
new file mode 100644
index 0000000..e1115c3
--- /dev/null
+++ b/lib/efl/evas.rb
@@ -0,0 +1,127 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+require 'efl/evas/evas-ffi'
+#
+module Efl
+    module Evas
+        #
+        class Evas
+            def initialize; @ptr = Efl::API.evas_new; end
+            def free; Efl::API.evas_free @ptr; @ptr=nil; end
+            def focus_in; Efl::API.evas_focus_in @ptr; end
+            def focus_out; Efl::API.evas_focus_out @ptr; end
+            def focus_state_get; Efl::API.evas_focus_state_get @ptr; end
+            def nochange_push; Efl::API.evas_nochange_push @ptr; end
+            def nochange_pop; Efl::API.evas_nochange_pop @ptr; end
+            def data_attach_set data; Efl::API.evas_data_attach_set @ptr, data; end
+            def data_attach_get; Efl::API.evas_data_attach_get @ptr; end
+            def damage_rectangle_add x, y, w, h; Efl::API.evas_damage_rectangle_add @ptr, x, y, w, h; end
+            def obscured_rectangle_add x, y, w, h; Efl::API.evas_obscured_rectangle_add @ptr, x, y, w, h; end
+            def obscured_clear; Efl::API.evas_obscured_clear @ptr; end
+            def render_updates; Efl::API.evas_render_updates @ptr; end
+#            def rendre_updates_free updates; Efl::API.evas_render_updates_free updates; end
+            def render; Efl::API.evas_render @ptr; end
+            def norender; Efl::API.evas_norender @ptr; end
+            def render_idle_flush; Efl::API.evas_render_idle_flush @ptr; end
+            def render_dump; Efl::API.evas_render_dump @ptr; end
+            #
+            def output_method_set method; Efl::API.evas_output_method_set @ptr, method; end
+            def output_method_get; Efl::API.evas_output_method_get @ptr; end
+            def engine_info_get; Efl::API.evas_engine_info_get @ptr; end
+            def engine_info_set info; Efl::API.evas_engine_info_set @ptr, info; end
+            #
+            def output_size_set w, h; Efl::API.evas_output_size_set @ptr, w, h; end
+            def output_size_get
+                x = FFI::MemoryPointer.new :int
+                y = FFI::MemoryPointer.new :int
+                Efl::API.evas_output_size_get @ptr, x, y
+                [ x.read_int, y.read_int ]
+            end
+            def output_viewport_set x, y, w, h; Efl::API.evas_output_viewport_set @ptr, x, y, w, h; end
+            def output_viewport_get
+                x = FFI::MemoryPointer.new :int
+                y = FFI::MemoryPointer.new :int
+                w = FFI::MemoryPointer.new :int
+                h = FFI::MemoryPointer.new :int
+                Efl::API.evas_output_viewport_get @ptr, x, y, w, h
+                [ x.read_int, y.read_int, w.read_int, h.read_int ]
+            end
+            #
+            def coord_screen_x_to_world x; Efl::API.evas_coord_screen_x_to_world @ptr, x; end
+            def coord_screen_y_to_world y; Efl::API.evas_coord_screen_y_to_world @ptr, y; end
+            def coord_world_x_to_screen x; Efl::API.evas_coord_world_x_to_screen @ptr, x; end
+            def coord_world_y_to_screen y; Efl::API.evas_coord_world_y_to_screen @ptr, y; end
+            #
+            def pointer_output_xy_get
+                x = FFI::MemoryPointer.new :int
+                y = FFI::MemoryPointer.new :int
+                Efl::API.evas_pointer_output_xy_get @ptr, x, y
+                [ x.read_int, y.read_int ]
+            end
+            def pointer_canvas_xy_get
+                x = FFI::MemoryPointer.new :int
+                y = FFI::MemoryPointer.new :int
+                Efl::API.evas_pointer_canvas_xy_get @ptr, x, y
+                [ x.read_int, y.read_int ]
+            end
+            def pointer_button_down_mask_get; Efl::API.evas_pointer_button_down_mask_get @ptr; end
+            def pointer_inside_get; Efl::API.evas_pointer_inside_get @ptr; end
+            #
+        end
+        #
+        class Efl::APIObject
+            def type_get
+                Efl::API.evas_object_type_get @evas
+            end
+            def ref
+                Efl::API.evas_object_type_ref @evas
+            end
+            def unref
+                Efl::API.evas_object_type_unref @evas
+            end
+            def del
+                Efl::API.evas_object_type_del @evas; @evas = nil
+            end
+            def move x, y
+                Efl::API.evas_object_move @evas, x, y
+            end
+            def resize w, h
+                Efl::API.evas_object_resize @evas, w, h
+            end
+            def geometry_get
+                x = FFI::MemoryPointer.new :int
+                y = FFI::MemoryPointer.new :int
+                w = FFI::MemoryPointer.new :int
+                h = FFI::MemoryPointer.new :int
+                Efl::API.evas_object_geometry_get @evas, x, y, w, h
+                [ x.read_int, y.read_int, w.read_int, h.read_int ]
+            end
+            def show
+                Efl::API.evas_object_show @evas
+            end
+            def hide
+                Efl::API.evas_object_hide @evas
+            end
+            def visible?
+                Efl::API.evas_object_visible_get @evas
+            end
+            def color_set r, g, b, a
+                Efl::API.evas_object_color_set @evas, r, g, b, a
+            end
+            def color_get
+                r = FFI::MemoryPointer.new :int
+                g = FFI::MemoryPointer.new :int
+                b = FFI::MemoryPointer.new :int
+                a = FFI::MemoryPointer.new :int
+                Efl::API.evas_object_color_get @evas, r, g, b, a
+                [ r.read_int, g.read_int, b.read_int, a.read_int ]
+            end
+            def evas_get
+                Efl::API.evas_object_evas_get @evas
+            end
+        end
+    end
+end
+#
+# EOF