neopoly/unschema

module Unschema
  class SchemaIntermediator
    attr_reader :version

    def process(options, &block)
      @version = options[:version] || 0
      @root = Call.new(:root, options)
      @root.instance_eval(&block)
    end

    def calls
      @root.calls
    end

    class Call
      attr_reader :name, :args, :options, :block, :calls

      def initialize(name, *args, &block)
        @name     = name
        @args     = args
        @options  = Hash === args.last ? args.pop : {}
        @calls    = []

        process_block!(block) if block
      end

      def first_arg
        args.first
      end

      def method_missing(name, *args, &block)
        @calls << Call.new(name, *args, &block)
      end

      private

      def process_block!(block)
        @block = self.class.new("t")
        block.call(@block)
      end
    end
  end
end