ffi-efl 0.0.1

data/lib/efl/elementary.rb

@@ -0,0 +1,43 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+require 'efl/evas'
+require 'efl/elementary/elementary-ffi'
+#
+module Efl
+    module Elm
+        #
+        class << self
+            def init *args
+                a = args.select { |e| e.is_a? String }
+                return Efl::API.elm_init 0, FFI::MemoryPointer::NULL if a.length==0
+                ptr = FFI::MemoryPointer.new :pointer, a.length
+                a.each_with_index do |s,i|
+                    ptr[i].write_pointer FFI::MemoryPointer.from_string(s)
+                end
+                Efl::API.elm_init a.length, ptr
+            end
+        end
+        #
+        class ElmWin
+            include Efl::Helper
+            @func_prefixes = [ 'elm_win_', 'elm_' ].freeze
+            def initialize parent, title, type=:elm_win_basic
+                @evas_object = Evas::EvasObject.new Efl::API.elm_win_add parent, title, type
+                @ptr = @evas_object.ptr
+                yield self,@evas_object if block_given?
+            end
+            def add e
+                eo = Evas::EvasObject.new Efl::API.send "elm_#{e}_add", @ptr
+                yield eo if block_given?
+                eo
+            end
+            def smart_callback_add event_str, cb, data=FFI::MemoryPointer::NULL
+                Efl::API.evas_object_smart_callback_add @ptr, event_str, cb, data
+            end
+        end
+        #
+    end
+end
+#
+# EOF