# encoding: utf-8
require 'spec_helper'
require 'generators/product_codes/dsl'
require 'dslable_dsl'
require 'dslable_field'

describe Dslable::Generators::ProductCodes::Dsl do

  context :generate do
    OUTPUT_DSL_TMP_DIR = 'generate_dsl'
    OUTPUT_DSL_CASE1 = <<-EOF
# encoding: utf-8
require 'sample_gem_dsl_model'

module SampleGem
  # Dsl
  class Dsl
    attr_accessor :sample_gem

    # String Define
    [:field1, :field4].each do |f|
      define_method f do |value|
        @sample_gem.send("#\{f}=", value)
      end
    end

    # Array/Hash/Boolean Define
    [:field2, :field3, :field5, :field6].each do |f|
      define_method f do |value|
        @sample_gem.send("#\{f}=", value)
      end
    end

    def initialize
      @sample_gem = SampleGem::DslModel.new
      @sample_gem.field1 = 'default1'
      @sample_gem.field2 = ["default1", "default2"]
      @sample_gem.field3 = {:default_key=>"default_value"}
    end
  end
end
    EOF

    cases = [
      {
        case_no: 1,
        case_title: 'generate',
        gem_name: 'sample_gem',
        fields: [:field1, :field2, :field3, :field4, :field5, :field6],
        fields_descs: %w(field_desc1 field_desc2 field_desc3 field_desc4 field_desc5 field_desc6),
        args: [:args1, :args2, :args3, :args4, :args5, :args6],
        args_klass: [String, Array, Hash, String, Array, Hash],
        args_required: [true, true, true, false, false, false],
        args_default: ['default1', %w(default1 default2), { default_key: 'default_value' }, nil, nil, nil],
        expected_file: './lib/sample_gem_dsl.rb',
        expected_contents: OUTPUT_DSL_CASE1

      },
    ]

    cases.each do |c|
      it "|case_no=#{c[:case_no]}|case_title=#{c[:case_title]}" do
        begin
          case_before c

          # -- given --
          dsl = Dslable::Dsl.new
          gen_dsl = Dslable::Generators::ProductCodes::Dsl.new(setup_dsl(c, dsl))

          # -- when --
          gen_dsl.generate

          # -- then --
          actual = File.open(c[:expected_file]) { |f|f.read }
          expect(actual).to eq(c[:expected_contents])
        ensure
          case_after c

        end
      end

      def case_before(c)
        # implement each case before
        Dir.mkdir(OUTPUT_DSL_TMP_DIR) unless Dir.exist? OUTPUT_DSL_TMP_DIR
        Dir.chdir(OUTPUT_DSL_TMP_DIR)
        Dir.mkdir 'lib'
      end

      def setup_dsl(c, dsl)
        dsl.gem_name c[:gem_name]
        c[:fields].each_with_index do |field, i|
          dsl.field c[:fields][i] do |f|
            f.desc c[:fields_descs][i]
            f.args c[:args][i] do |a|
              a.klass c[:args_klass][i]
              a.required if c[:args_required][i]
              a.default_value c[:args_default][i]
            end
          end
        end
        dsl
      end

      def case_after(c)
        # implement each case after
        Dir.chdir('../')
        FileUtils.rm_rf(OUTPUT_DSL_TMP_DIR) if Dir.exist? OUTPUT_DSL_TMP_DIR
      end
    end
  end

end