parse elc_slider.h, generate elm_slider.rb

5 files changed, 100 insertions, 0 deletions

diff --git a/lib/efl/elementary_all.rb b/lib/efl/elementary_all.rb
index 7ed8a0a..d50c77a 100644
--- a/lib/efl/elementary_all.rb
+++ b/lib/efl/elementary_all.rb
@@ -35,6 +35,7 @@ require 'efl/elm/elm_menu'
 require 'efl/elm/elm_notify'
 require 'efl/elm/elm_panel'
 require 'efl/elm/elm_scroller'
+require 'efl/elm/elm_slider'
 require 'efl/elm/elm_spinner'
 require 'efl/elm/elm_tooltip'
 require 'efl/elm/elm_win'
diff --git a/lib/efl/elm/elm_slider.rb b/lib/efl/elm/elm_slider.rb
new file mode 100644
index 0000000..40e4031
--- /dev/null
+++ b/lib/efl/elm/elm_slider.rb
@@ -0,0 +1,22 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+require 'efl/elm/elm_object'
+require 'efl/native/elm/elm_slider'
+#
+module Efl
+    #
+    module Elm
+        #
+        class ElmSlider < ElmObject
+            #
+            include Helper
+            constructor :elm_slider_add
+            search_prefixes 'elm_slider_'
+            #
+        end
+        #
+    end
+end
+#
+# EOF
diff --git a/lib/efl/native/elm/elm_slider.rb b/lib/efl/native/elm/elm_slider.rb
new file mode 100644
index 0000000..8f23f15
--- /dev/null
+++ b/lib/efl/native/elm/elm_slider.rb
@@ -0,0 +1,71 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+require 'efl/native'
+require 'efl/native/elementary'
+#
+module Efl
+    #
+    module ElmSlider
+        #
+        FCT_PREFIX = 'elm_slider_' unless const_defined? :FCT_PREFIX
+        #
+        def self.method_missing meth, *args, &block
+            sym = Efl::MethodResolver.resolve self, meth, FCT_PREFIX
+            self.send sym, *args, &block
+        end
+        #
+    end
+    #
+    module Native
+        #
+        ffi_lib 'elementary-ver-pre-svn-09.so.0'
+        #
+        # FUNCTIONS
+        fcts = [
+        # EAPI Evas_Object *elm_slider_add(Evas_Object *parent);
+        [ :elm_slider_add, [ :evas_object ], :evas_object ],
+        # EAPI void elm_slider_span_size_set(Evas_Object *obj, Evas_Coord size);
+        [ :elm_slider_span_size_set, [ :evas_object, :int ], :void ],
+        # EAPI Evas_Coord elm_slider_span_size_get(const Evas_Object *obj);
+        [ :elm_slider_span_size_get, [ :evas_object ], :int ],
+        # EAPI void elm_slider_unit_format_set(Evas_Object *obj, const char *format);
+        [ :elm_slider_unit_format_set, [ :evas_object, :string ], :void ],
+        # EAPI const char *elm_slider_unit_format_get(const Evas_Object *obj);
+        [ :elm_slider_unit_format_get, [ :evas_object ], :string ],
+        # EAPI void elm_slider_indicator_format_set(Evas_Object *obj, const char *indicator);
+        [ :elm_slider_indicator_format_set, [ :evas_object, :string ], :void ],
+        # EAPI const char *elm_slider_indicator_format_get(const Evas_Object *obj);
+        [ :elm_slider_indicator_format_get, [ :evas_object ], :string ],
+        # EAPI void elm_slider_indicator_format_function_set(Evas_Object *obj, const char *(*func)(double val), void (*free_func)(const char *str));
+        # FIXME
+        # EAPI void elm_slider_units_format_function_set(Evas_Object *obj, const char *(*func)(double val), void (*free_func)(const char *str));
+        # FIXME
+        # EAPI void elm_slider_horizontal_set(Evas_Object *obj, Eina_Bool horizontal);
+        [ :elm_slider_horizontal_set, [ :evas_object, :bool ], :void ],
+        # EAPI Eina_Bool elm_slider_horizontal_get(const Evas_Object *obj);
+        [ :elm_slider_horizontal_get, [ :evas_object ], :bool ],
+        # EAPI void elm_slider_min_max_set(Evas_Object *obj, double min, double max);
+        [ :elm_slider_min_max_set, [ :evas_object, :double, :double ], :void ],
+        # EAPI void elm_slider_min_max_get(const Evas_Object *obj, double *min, double *max);
+        [ :elm_slider_min_max_get, [ :evas_object, :pointer, :pointer ], :void ],
+        # EAPI void elm_slider_value_set(Evas_Object *obj, double val);
+        [ :elm_slider_value_set, [ :evas_object, :double ], :void ],
+        # EAPI double elm_slider_value_get(const Evas_Object *obj);
+        [ :elm_slider_value_get, [ :evas_object ], :double ],
+        # EAPI void elm_slider_inverted_set(Evas_Object *obj, Eina_Bool inverted);
+        [ :elm_slider_inverted_set, [ :evas_object, :bool ], :void ],
+        # EAPI Eina_Bool elm_slider_inverted_get(const Evas_Object *obj);
+        [ :elm_slider_inverted_get, [ :evas_object ], :bool ],
+        # EAPI void elm_slider_indicator_show_set(Evas_Object *obj, Eina_Bool show);
+        [ :elm_slider_indicator_show_set, [ :evas_object, :bool ], :void ],
+        # EAPI Eina_Bool elm_slider_indicator_show_get(const Evas_Object *obj);
+        [ :elm_slider_indicator_show_get, [ :evas_object ], :bool ],
+        ]
+        #
+        attach_fcts fcts
+        #
+    end
+end
+#
+# EOF
diff --git a/tools/extract-api.sh b/tools/extract-api.sh
index dd7e6a4..39aca5c 100755
--- a/tools/extract-api.sh
+++ b/tools/extract-api.sh
@@ -78,6 +78,7 @@ for header in \
     "${INCLUDE}/elementary-0/elc_fileselector_entry.h" \
     "${INCLUDE}/elementary-0/elc_fileselector_button.h" \
     "${INCLUDE}/elementary-0/elm_spinner.h" \
+    "${INCLUDE}/elementary-0/elm_slider.h" \
     ; do
     #
     if [ ! -e "$header" ]; then
diff --git a/tools/genruby.rb b/tools/genruby.rb
index 65ca14d..2a4a676 100755
--- a/tools/genruby.rb
+++ b/tools/genruby.rb
@@ -510,6 +510,11 @@ libs << {
     :modname=>'ElmSpinner', :prefix=>'elm_spinner', :outfile=>'elm/elm_spinner.rb',
     :requires=>["#{NATIVE}/elementary"], :constants=>[]
 }
+libs << {
+    :lib=>ELM_LIB,:header=>'elm_slider.h',
+    :modname=>'ElmSlider', :prefix=>'elm_slider', :outfile=>'elm/elm_slider.rb',
+    :requires=>["#{NATIVE}/elementary"], :constants=>[]
+}
 #
 Dir.mkdir lib_path unless (File.exists? lib_path)
 #