module Declarative
  class Definitions < ::Hash
    class Definition
      def initialize(name, options={}, &block)
        @options = options.dup
        @options[:name] = name.to_s
      end

      def [](name)
        @options[name]
      end

      def merge!(hash) # TODO: this should return a new Definition instance.
        @options.merge!(hash)
        self
      end

      def merge(hash) # TODO: should be called #copy.
        DeepDup.(@options).merge(hash)
      end
    end


    def initialize(definition_class)
      @definition_class = definition_class
      super()
    end

    def each(&block) # TODO : test me!
      values.each(&block)
    end

    # #add is high-level behavior for Definitions#[]=.
    # reserved options:
    #   :_features
    #   :_defaults
    #   :_base
    #   :_nested_builder
    def add(name, options={}, &block)
      options = options[:_defaults].(name, options) if options[:_defaults] # FIXME: pipeline?
      base    = options[:_base]

      if options.delete(:inherit) and parent_property = get(name)
        base    = parent_property[:nested]
        options = parent_property.merge(options) # TODO: Definition#merge
      end

      if options[:_nested_builder]
        options[:nested] = build_nested(
          options.merge(
            _base: base,
            _name: name,
            _block: block,
          )
        )
      end

      # clean up, we don't want that stored in the Definition instance.
      [:_defaults, :_base, :_nested_builder, :_features].each { |key| options.delete(key) }

      self[name.to_s] = @definition_class.new(name, options)
    end

    def get(name)
      self[name.to_s]
    end

  private
    # Run builder to create nested schema (or twin, or representer, or whatever).
    def build_nested(options)
      options[:_nested_builder].(options)
    end
  end
end
