dslable 0.0.1

data/lib/generators/product_codes/dsl.rb

@@ -0,0 +1,94 @@
+# encoding: utf-8
+require "generators/generators"
+require "erb"
+require 'active_support/inflector'
+require "dslable_dsl"
+
+module Dslable::Generators::ProductCodes
+  class Dsl
+    DSL_TEMPLATE =<<-EOF
+# encoding: utf-8
+require '<%=gem_name%>_dsl_model'
+
+module <%=gem_name_camel%>
+  class Dsl
+    attr_accessor :<%=gem_name%>
+
+    # String Define
+    [<%=string_fields%>].each do |f|
+      define_method f do |value|
+        eval "@<%=gem_name%>.#\{f.to_s} = '#\{value}'", binding
+      end
+    end
+
+    # Array/Hash Define
+    [<%=array_hash_fields%>].each do |f|
+      define_method f do |value|
+        eval "@<%=gem_name%>.#\{f.to_s} = #\{value}", binding
+      end
+    end
+
+    def initialize
+      @<%=gem_name%> = <%=gem_name_camel%>::DslModel.new
+<%=set_defaults%>
+    end
+  end
+end
+    EOF
+
+    attr_accessor :dsl
+
+    #== initialize dsl
+    #=== Params
+    #- _dsl: input from dsl
+    def initialize(_dsl)
+      raise InvalidDslError.new("dsl not allow nil") if _dsl.nil?
+      @dsl = _dsl
+    end
+
+    def generate
+      dsl_src = adapt_template(@dsl.camelized_gem_name, get_string_fields, get_array_hash_fields, get_set_defaults)
+      generate_dsl_src dsl_src
+    end
+
+    private
+    def get_string_fields
+      fields = []
+      @dsl.fields.each do |field|
+        fields << ":#{field._field_name}" if field._args._klass == String
+      end
+      fields.join(", ")
+    end
+
+    def get_array_hash_fields
+      fields = []
+      @dsl.fields.each do |field|
+        fields << ":#{field._field_name}" unless field._args._klass == String
+      end
+      fields.join(", ")
+    end
+
+    def get_set_defaults
+      set_defaults = []
+      gem_name = @dsl._gem_name
+      @dsl.fields.each_with_index do |field, index|
+        next if field._args._default_value.nil?
+        default_value = field._args._klass == String ? "'#{field._args._default_value}'" : field._args._default_value
+        set_defaults << "      @#{gem_name}.#{field._field_name} = #{default_value}"
+      end
+      set_defaults.join("\n")
+    end
+
+    def adapt_template(gem_name_camel, string_fields, array_hash_fields, set_defaults)
+      gem_name = @dsl._gem_name
+      erb = ERB.new(DSL_TEMPLATE)
+      erb.result(binding)
+    end
+
+    def generate_dsl_src(dsl_src)
+      File.open("./lib/#{@dsl._gem_name}_dsl.rb", "w") {|f|f.puts dsl_src}
+    end
+  end
+
+  class InvalidDslError < StandardError;end
+end

data/lib/generators/product_codes/dsl_model.rb

@@ -0,0 +1,63 @@
+# encoding: utf-8
+require "generators/generators"
+require "erb"
+require 'active_support/inflector'
+require "dslable_dsl"
+
+module Dslable::Generators::ProductCodes
+  class DslModel
+    DSL_MODEL_TEMPLATE =<<-EOF
+# encoding: utf-8
+require 'active_model'
+
+module <%=gem_name_camel%>
+  class DslModel
+    include ActiveModel::Model
+
+<%=fields%>
+  end
+end
+    EOF
+
+    attr_accessor :dsl
+
+    #== initialize dsl model
+    #=== Params
+    #- _dsl: input from dsl
+    def initialize(_dsl)
+      raise InvalidDslError.new("dsl not allow nil") if _dsl.nil?
+      @dsl = _dsl
+    end
+
+    def generate
+      dsl_model_src = adapt_template(@dsl.camelized_gem_name, get_fields)
+      generate_dsl_model_src dsl_model_src
+    end
+
+    private
+    def get_fields
+      fields = []
+      @dsl.fields.each do |field|
+        field_codes = []
+        field_codes << "    # #{field._desc}"
+        field_codes << "    attr_accessor :#{field._field_name}"
+        field_codes << "    validates :#{field._field_name}, :presence => true" if field._args._required
+        field_codes << ""
+        fields << field_codes.join("\n")
+      end
+      fields.join("\n")
+    end
+
+    def adapt_template(gem_name_camel, fields)
+      gem_name = @dsl._gem_name
+      erb = ERB.new(DSL_MODEL_TEMPLATE)
+      erb.result(binding)
+    end
+
+    def generate_dsl_model_src(dsl_model_src)
+      File.open("./lib/#{@dsl._gem_name}_dsl_model.rb", "w") {|f|f.puts dsl_model_src}
+    end
+  end
+
+  class InvalidDslError < StandardError;end
+end

data/lib/generators/rspec/spec_template.rb

@@ -0,0 +1,21 @@
+# encoding: utf-8
+require "generators/generators"
+
+module Dslable::Generators::RSpec
+  # Dslable::Generators::RSpec RSpec Template Generator(only execute 'rspec --init')
+  class SpecTemplate
+    attr_accessor :dsl
+
+    #== initialize generate rspec template
+    #=== Params
+    #- _dsl: input from dsl
+    def initialize(_dsl)
+      @dsl = _dsl
+    end
+
+    #== generate rspec template
+    def generate
+      `rspec --init`
+    end
+  end
+end

data/lib/generators/rspec/specs.rb

@@ -0,0 +1,27 @@
+# encoding: utf-8
+require "generators/generators"
+
+module Dslable::Generators::RSpec
+  # Dslable::Generators::RSpec Specs Generator specs
+  class Specs
+    attr_accessor :dsl
+
+    #== initialize generate specs
+    #=== Params
+    #- _dsl: input from dsl
+    def initialize(_dsl)
+      @dsl = _dsl
+    end
+
+    #== generate specs
+    def generate
+      generate_core
+    end
+
+    def generate_core
+      core_class_name = "#{@dsl.camelized_gem_name}::Core"
+      core_class_file_name = "#{@dsl._gem_name}_core"
+      `piccolo e #{core_class_name} #{core_class_file_name} init execute`
+    end
+  end
+end

data/lib/generators/settings/gemfile.rb

@@ -0,0 +1,33 @@
+# encoding: utf-8
+require "generators/generators"
+require "dslable_dsl"
+
+module Dslable::Generators::Settings
+  class Gemfile
+    GEMFILE_TEMPLATE =<<-EOF
+source 'https://rubygems.org'
+
+gemspec
+gem "rspec", "~> 2.14.1"
+gem "thor", "~> 0.18.1"
+gem "simplecov", "~> 0.8.2"
+gem "activesupport", "~> 4.0.1"
+gem "activemodel", "~> 4.0.2"
+    EOF
+
+    attr_accessor :dsl
+
+    #== initialize dsl model
+    #=== Params
+    #- _dsl: input from dsl
+    def initialize(_dsl)
+      raise InvalidDslError.new("dsl not allow nil") if _dsl.nil?
+      @dsl = _dsl
+    end
+
+    def generate
+      File.open("./Gemfile", "w") {|f|f.puts GEMFILE_TEMPLATE}
+    end
+  end
+  class InvalidDslError < StandardError;end
+end

data/spec/dslable_args_spec.rb

@@ -0,0 +1,262 @@
+# encoding: utf-8
+require "spec_helper"
+require "dslable_args"
+
+describe Dslable::Args do
+  context :desc do
+    cases = [
+      {
+        case_no: 1,
+        case_title: "valid description",
+        input: "this is descripotion",
+        expected: "this is descripotion"
+      },
+      {
+        case_no: 2,
+        case_title: "empty description",
+        input: "",
+        expected: ""
+      },
+      {
+        case_no: 3,
+        case_title: "nil description",
+        input: nil,
+        expected: ""
+      },
+    ]
+
+    cases.each do |c|
+      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
+        begin
+          case_before c
+
+          # -- given --
+          dslable_args = Dslable::Args.new
+
+          # -- when --
+          dslable_args.desc c[:input]
+
+          # -- then --
+          actual = dslable_args._desc
+          expect(actual).to eq(c[:expected])
+        ensure
+          case_after c
+        end
+      end
+
+      def case_before(c)
+        # implement each case before
+      end
+
+      def case_after(c)
+        # implement each case after
+      end
+    end
+  end
+
+  context :args_name do
+    cases = [
+      {
+        case_no: 1,
+        case_title: "valid dsl_args name",
+        input: "abcdefghijklmnopqrstuvwxyz01234567891_",
+        expected: "abcdefghijklmnopqrstuvwxyz01234567891_"
+      },
+      {
+        case_no: 2,
+        case_title: "empty dsl_args name",
+        input: "",
+        expect_error: true
+      },
+      {
+        case_no: 3,
+        case_title: "nil dsl_args name",
+        input: nil,
+        expect_error: true
+      },
+      {
+        case_no: 4,
+        case_title: "invalid dsl_args name contain space",
+        input: "method name",
+        expect_error: true
+      },
+    ]
+
+    cases.each do |c|
+      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
+        begin
+          case_before c
+
+          # -- given --
+          dslable_args = Dslable::Args.new
+
+          # -- when --
+          if c[:expect_error]
+            lambda {dslable_args.args_name c[:input]}.should raise_error(Dslable::InvalidArgsError)
+            next
+          end
+          dslable_args.args_name c[:input]
+          actual = dslable_args._args_name
+
+          # -- then --
+          expect(actual).to eq(c[:expected])
+        ensure
+          case_after c
+        end
+      end
+
+      def case_before(c)
+        # implement each case before
+      end
+
+      def case_after(c)
+        # implement each case after
+      end
+    end
+  end
+
+  context :klass do
+    cases = [
+      {
+        case_no: 1,
+        case_title: "valid klass String",
+        input: String,
+        expected: String
+      },
+      {
+        case_no: 2,
+        case_title: "valid klass Array",
+        input: Array,
+        expected: Array
+      },
+      {
+        case_no: 3,
+        case_title: "valid klass Hash",
+        input: Hash,
+        expected: Hash
+      },
+      {
+        case_no: 4,
+        case_title: "invalid klass Hash",
+        input: Fixnum,
+        expect_error: true
+      },
+      {
+        case_no: 5,
+        case_title: "nil klass",
+        input: nil,
+        expect_error: true
+      },
+    ]
+
+    cases.each do |c|
+      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
+        begin
+          case_before c
+
+          # -- given --
+          dslable_args = Dslable::Args.new
+
+          # -- when --
+          if c[:expect_error]
+            lambda {dslable_args.klass c[:input]}.should raise_error(Dslable::InvalidArgsError)
+            next
+          end
+          dslable_args.klass c[:input]
+          actual = dslable_args._klass
+
+          # -- then --
+          expect(actual).to eq(c[:expected])
+        ensure
+          case_after c
+        end
+      end
+
+      def case_before(c)
+        # implement each case before
+      end
+
+      def case_after(c)
+        # implement each case after
+      end
+    end
+  end
+
+  context :required do
+    cases = [
+      {
+        case_no: 1,
+        case_title: "valid required",
+        expected: true
+      },
+    ]
+
+    cases.each do |c|
+      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
+        begin
+          case_before c
+
+          # -- given --
+          dslable_args = Dslable::Args.new
+
+          # -- when --
+          dslable_args.required
+          actual = dslable_args._required
+
+          # -- then --
+          expect(actual).to eq(c[:expected])
+        ensure
+          case_after c
+        end
+      end
+
+      def case_before(c)
+        # implement each case before
+      end
+
+      def case_after(c)
+        # implement each case after
+      end
+    end
+  end
+
+  context :default_value do
+    cases = [
+      {
+        case_no: 1,
+        case_title: "valid default",
+        input: "valid default",
+        expected: "valid default"
+      },
+    ]
+
+    cases.each do |c|
+      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
+        begin
+          case_before c
+
+          # -- given --
+          dslable_args = Dslable::Args.new
+
+          # -- when --
+          dslable_args.default_value c[:input]
+          actual = dslable_args._default_value
+
+          # -- then --
+          expect(actual).to eq(c[:expected])
+        ensure
+          case_after c
+        end
+      end
+
+      def case_before(c)
+        # implement each case before
+      end
+
+      def case_after(c)
+        # implement each case after
+      end
+    end
+  end
+
+end