extjsml 0.0.2

data/lib/extjsml/parser.rb

@@ -0,0 +1,35 @@
+require "yaml"
+YAML::ENGINE.yamler = 'psych'
+class ExtParser
+
+  def self.parse(text)
+    begin
+      matcher = /^(\w+)(?:(?:#([\w\-]+))?(?:\.([\w\-]+))?)?(?:(?:@\{(.*)\}))*$/
+      res = matcher.match text 
+      xtype = res[1] 
+      id = res[2]
+      classes = res[3].sub("_"," ") unless res[3].nil?
+      options = {}
+      options.merge! :id => id unless id.nil?
+      options.merge! :cls => classes unless classes.nil?
+
+      config = res[4]
+
+      if not config.nil? and config.strip != ""
+        config = config.strip!.gsub(/\)\s+:/, ")$$:").split("$$")
+        config.map! do |c|
+          c.gsub!(/\(/,": ")
+          c.gsub!(/\)/," ")
+        end
+        config = YAML.load(config * "\n")
+        options.merge! config
+      end
+    rescue Exception => e
+      puts "error near #{text}: #{e.message}"
+      abort()
+    end
+    # TODO validate xtype
+    [ xtype, options ]
+  end
+
+end

data/lib/extmodules/form_field.rb

@@ -0,0 +1,32 @@
+module FormField
+  def self.included(base)
+    base.class_eval do
+      alias_method :mod_field, :prepare_config
+
+      define_method :prepare_config do
+        mod_field rescue "skip"
+        unless @config[:id].nil?
+          @default_config.merge! :submitValue => true
+          @default_config.merge! :name => conv_id_to_name
+
+          if @xtype == 'textfield'
+            @default_config.merge! :emptyText => conv_id_to_label.capitalize
+          end
+
+          if base.to_s.match /Checkbox$|Radio$|Radiogroup$/
+            @default_config.merge! :boxLabel => conv_id_to_label.capitalize
+          end
+          # if base.to_s.match /Combo$/
+            # user hidden name for combobox
+            #@default_config.merge! :name => nil #, :hiddenName => conv_id_to_name
+          # end
+          unless base.to_s.match /Checkbox$|Radio$/
+            @default_config.merge! :fieldLabel => conv_id_to_label.capitalize
+          #   label_width = @default_config[:fieldLabel].size * ExtUtil.FontWidthRatio + 15
+          #   @default_config.merge! :labelWidth => label_width
+          end
+        end
+      end
+    end
+  end
+end

data/lib/extmodules/magic.rb

@@ -0,0 +1,196 @@
+module Magic
+  module Column
+    def self.included(base)
+      base.class_eval do
+        define_method :id_to_title do 
+          return if @config[:id].nil? 
+          @config[:id].split("-").map(&:capitalize) * " "
+        end
+
+        alias_method :mod_column, :prepare_config
+
+        define_method :prepare_config do
+          mod_column rescue "skip"
+          @default_config.merge! :header => id_to_title, :dataIndex => conv_id_to_name unless @config[:id].nil?
+          @default_config.merge! :sortable => true
+        end
+      
+      end
+    end
+  end
+
+  module Title
+    def self.included(base)
+      base.class_eval do
+        define_method :id_to_title do 
+          return if @config[:id].nil? 
+          @config[:id].split("-").map(&:capitalize) * " "
+        end
+
+        alias_method :mod_title, :prepare_config
+
+        define_method :prepare_config do
+          mod_title rescue "skip"
+          @default_config.merge! :title => id_to_title unless @config[:id].nil?
+        end
+
+      end
+    end
+  end
+
+  module Store
+    def self.included(base)
+      base.class_eval do
+
+        define_method :cls_to_store do 
+          return if @config[:cls].nil? 
+          first_cls = @config[:cls].split(" ").first.to_storeid
+        end
+
+        alias_method :mod_store, :prepare_config
+
+        define_method :prepare_config do
+          mod_store rescue "skip"
+          @default_config.merge! :store => cls_to_store unless @config[:cls].nil?
+        end
+
+      end
+    end
+  end
+
+  module Text
+    def self.included(base)
+      base.class_eval do
+
+        alias_method :mod_text, :prepare_config
+
+        define_method :prepare_config do
+          mod_text rescue "skip"
+          @default_config.merge! :text => conv_id_to_label.capitalize unless @config[:id].nil?
+        end
+
+      end
+    end
+  end
+
+  module InputValue
+    def self.included(base)
+      base.class_eval do
+
+        alias_method :mod_input_value, :prepare_config
+
+        define_method :prepare_config do
+          mod_input_value rescue "skip"
+          @default_config.merge! :inputValue => conv_id_to_name unless @config[:id].nil?
+        end
+
+      end
+    end
+  end
+
+  module EmptyText
+    def self.included(base)
+      base.class_eval do
+
+        alias_method :mod_empty_text, :prepare_config
+
+        define_method :prepare_config do
+          mod_empty_text rescue "skip"
+          text = @config[:fieldLabel] || @default_config[:fieldLabel]
+          @default_config.merge! :emptyText => "Select #{text}" unless text.nil?
+        end
+
+      end
+    end
+  end
+
+  module Listener
+    def self.included(base)
+      base.class_eval do
+
+        alias_method :mod_listener, :prepare_config
+
+        define_method :prepare_config do
+          mod_listener rescue "skip"
+          call = @config[:call]
+          if call.is_a? Array
+            if call.first.is_a? Array 
+              call.each do |c|
+                call_on = call[0]
+                call_fn = call[1]
+              end
+            else
+              call_on = call[0]
+              call_fn = call[1]
+            end
+          else
+            call = []
+            { 
+              :call_on => @default_config[:call_on],
+              :call_fn => @config[:call]
+            }
+            call << [@default_config[:call_on], @config[:call]]
+          end
+
+          @default_config.merge! :emptyText => "Select #{text}" unless text.nil?
+        end
+
+      end
+    end
+  end
+
+  module IconClass
+    # depend icon framework
+    def self.included(base)
+      base.class_eval do
+
+        alias_method :mod_icon_class, :prepare_config
+
+        define_method :prepare_config do
+          mod_icon_class rescue "skip"
+          unless @default_config[:text].nil?
+            t = @default_config[:text] 
+            if t =~ /add|create|new/i
+              icon_cls = "icon-add"
+            elsif t =~ /update|edit/i
+              icon_cls = "icon-application_form_edit"
+            elsif t =~ /delete/i
+              icon_cls = "icon-bullet_cross"
+            elsif t =~ /search/i
+              icon_cls = "icon-magnifier" 
+            elsif t =~ /save/i
+              icon_cls = "icon-table_save" 
+            elsif t =~ /select/i
+              icon_cls = "icon-bullet_tick" 
+            end 
+          end
+          @default_config.merge! :iconCls => icon_cls unless icon_cls.nil?
+        end
+      end
+    end
+
+  end
+
+  module Toolbar
+    def self.included(base)
+      base.class_eval do
+
+        before_to_extjs :arrage_toolbar
+
+        define_method :arrage_toolbar do |at_deep|
+          if @childs.last.xtype == "toolbar"
+            @config.merge! :fbar => @childs.last.to_extjs(at_deep + 1)
+            @childs.pop
+          end
+
+          if @childs.first.xtype == "toolbar"
+            @config.merge! :tbar => @childs.first.to_extjs(at_deep + 1)
+            @childs.slice!(0)
+          end 
+        end
+      end
+    end
+
+  end
+
+end

data/lib/extplugins/currency.rb

@@ -0,0 +1,25 @@
+# depend on extjs currenct plugin 
+
+class ExtCurrency < ExtNode
+  include FormField
+
+  @@ALIAS_CONFIG = {
+    :text => :fieldLabel
+  }
+
+  def initialize(config, parent)
+    @default_config = {
+      :width => 150,
+      :cls => "number",
+      :plugins => [{ ptype: "currency" }, { ptype: "multiple_validations"}],
+      :currencyConfig => {}
+    }
+
+    if config[:decimalPrecision]
+      @default_config[:currencyConfig].merge!({ :decimalPrecision => config[:decimalPrecision] })
+      config.delete :decimalPrecision
+    end
+
+    super "textfield", config, parent 
+  end
+end

data/lib/extplugins/currencycolumn.rb

@@ -0,0 +1,18 @@
+class ExtCurrencycolumn < ExtNode
+  include Magic::Column
+  @@ALIAS_CONFIG = {
+    :text => :header,
+    :name => :dataIndex
+  }
+  def initialize(config, parent)
+    @default_config = {
+      :format => "0,000.00",
+      :align => "right",
+      :editor => {
+        :xtype => "textfield",
+        :plugins => [{:ptype => "currency"}] 
+      }  
+    }
+    super "numbercolumn", config, parent
+  end
+end

data/lib/extplugins/numeric.rb

@@ -0,0 +1,32 @@
+# depend on extjs currency plugin 
+
+class ExtNumeric < ExtNode
+  include FormField
+
+  @@ALIAS_CONFIG = {
+    :text => :fieldLabel
+  }
+
+  def initialize(config, parent)
+    @default_config = {
+      :width => 150,
+      :cls => "number",
+      :plugins => [{ ptype: "currency" }], # depend the plugins
+      :currencyConfig => {
+        :currencySymbol => "" 
+      }
+    }
+
+    # maually merge nested config
+    unless config[:currencyConfig].nil?
+      @default_config[:currencyConfig].merge! config[:currencyConfig] 
+      config.delete :currencyConfig
+    end
+
+    unless config[:decimalPrecision].nil?
+      @default_config[:currencyConfig].merge!({ :decimalPrecision => config[:decimalPrecision]})
+    end
+
+    super "textfield", config, parent 
+  end
+end

data/lib/extplugins/pricefield.rb

@@ -0,0 +1,36 @@
+# depend on extjs currenct pluginclass Ext < ExtNode
+
+class ExtPricefield < ExtNode
+  include FormField
+
+  @@ALIAS_CONFIG = {
+    :text => :fieldLabel
+  }
+
+  def initialize(config, parent)
+    @default_config = {
+      :labelAlign => "right",
+      :cls => "number",
+      # :plugins => [{ xclass: "Ext.plugin.Price" }, { ptype: "multiple_validations"}],
+      :plugins => [{ xclass: "Ext.plugin.Price" } ],
+      :priceConfig => {}
+    }
+
+    if config[:decimalPrecision]
+      @default_config[:priceConfig].merge!({ :decimalPrecision => config[:decimalPrecision] })
+      config.delete :decimalPrecision
+    end
+
+    if config[:currencySymbol]
+      @default_config[:priceConfig].merge!({ :currencySymbol => config[:currencySymbol] })
+      config.delete :currencySymbol
+    end
+
+    if config[:allowNegative]
+      @default_config[:priceConfig].merge!({ :allowNegative => config[:allowNegative] })
+      config.delete :allowNegative
+    end
+
+    super "textfield", config, parent 
+  end
+end

data/lib/extuxs/uxaccount.rb

@@ -0,0 +1,8 @@
+class ExtUxaccount < ExtNode
+  	include FormField
+    def initialize(config, parent)
+      # TODO
+      @default_config = {}
+      super 'uxaccount', config, parent
+    end
+end

data/lib/extuxs/uxbroker.rb

@@ -0,0 +1,7 @@
+class ExtUxbroker < ExtNode
+	include FormField
+  def initialize( config, parent)
+    @default_config = {}
+    super "uxbroker", config, parent 
+  end
+end

data/lib/extuxs/uxchq.rb

@@ -0,0 +1,8 @@
+class ExtUxchq < ExtNode
+	include FormField
+    def initialize(config, parent)
+      # TODO
+      @default_config = {}
+      super 'uxchq', config, parent
+    end
+end

data/lib/extuxs/uxreceiverinfo.rb

@@ -0,0 +1,8 @@
+class ExtUxreceiverinfo < ExtNode
+  include FormField
+
+  def initialize(config, parent)
+    @default_config = {}
+    super 'uxreceiverinfo', config, parent 
+  end
+end

data/lib/extuxs/uxsettlement.rb

@@ -0,0 +1,8 @@
+class ExtUxsettlement < ExtNode
+  	include FormField
+    def initialize(config, parent)
+      # TODO
+      @default_config = {}
+      super 'uxsettlement', config, parent
+    end
+end

data/lib/test/test_parser.rb

@@ -0,0 +1,97 @@
+# encoding utf-8
+
+require_relative "../parser"
+require "test/unit"
+
+class ExtParserTest < Test::Unit::TestCase
+  def test_parse_xtype
+    text = "panel"   
+    res = ExtParser.parse(text)
+    assert_equal [ "panel", {} ], res
+  end
+  
+  def test_parse_key_consist_id
+    idtext = "panel#id"
+    res_idtext = ExtParser.parse(idtext)
+    assert_equal ["panel", { :id => "id"} ], res_idtext
+  end
+
+  def test_parse_key_consist_classname
+    classtext = "panel.class"  
+    res_classtext = ExtParser.parse(classtext)
+    assert_equal ["panel", { :cls => "class"} ], res_classtext
+  end
+
+  def test_parse_key_consist_multiclass
+    muticlass = "panel.class1-x_class2"
+    res = ExtParser.parse(muticlass)
+    assert_equal ["panel", { :cls => "class1-x class2"} ], res
+  end
+
+  def test_parse_key_consist_mix_class_and_id
+    mixtext = "panel#id.class"
+    res = ExtParser.parse(mixtext)
+    assert_equal ["panel", { :id => "id", :cls => "class"} ], res
+  end
+
+  def test_parse_key_consist_dash
+    text = "panel#form-wrapper"
+    res = ExtParser.parse text 
+    assert_equal ["panel", { :id => "form-wrapper" }], res
+  end
+
+  def test_parse_only_one_inline_config
+    text = "panel@{ :title(test) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test"} ], res
+  end
+
+  def test_parse_only_multiword_value_inline_config
+    text = "panel@{ :title(test test) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test test"} ], res
+  end
+
+  def test_parse_only_underscored_word_value_inline_config
+    text = "panel@{ :title(test_test) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test_test"} ], res
+  end
+  
+  def test_parse_only_multiple_underscored_word_value_inline_config
+    text = "panel@{ :title(test_test) :value(id) :number(123) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test_test", value: "id", number: 123} ], res
+  end
+
+  def test_parse_inline_config_with_integer_value
+    text = "panel@{ :title(test) :number(123) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test", :number => 123} ], res
+  end
+
+#  def test_parse_inline_with_thai_language
+#    text = "panel@{ :title(test) :thai(กขค) }" 
+#    res = ExtParser.parse text
+#    assert_equal [ "panel", {title: "test", :thai => "กขค" } ], res
+#  end
+  
+  def test_parse_more_inline_config_attributes
+    text = "panel@{ :title(test) :text(aaa) }" 
+    res = ExtParser.parse text
+    assert_equal [ "panel", {title: "test", text: "aaa"} ], res
+  end
+
+  def test_parse_id_and_inline_config
+    text = "panel#some-id@{ :config(config) }"
+    res = ExtParser.parse text
+    assert_equal [ "panel", {:id => "some-id", :config => "config"}], res
+  end
+
+  def test_parse_id_class_and_inline_config
+    text = "panel#some-id.some-class@{ :config(config) }"
+    res = ExtParser.parse text
+    assert_equal [ "panel", {:id => "some-id", :cls => "some-class", :config => "config"}], res
+  end
+
+end