module Minjs
  module ECMA262
    class EnvRecord
      attr_reader :binding
      attr_reader :options

      def initialize(options = {})
        @binding = {}
        @options = {}
      end

      def create_mutable_binding(n, d, options = {})
        if n.kind_of? IdentifierName
          n = n.val
        end
        @binding[n] = {:value => nil}
      end

      def set_mutable_binding(n, v, s, options = {})
        if n.kind_of? IdentifierName
          n = n.val
        end
        @binding[n][:value] = v
        @binding[n].merge!(options)
      end
    end

    class DeclarativeEnvRecord < EnvRecord
    end

    class ObjectEnvRecord < EnvRecord
    end

    class ExObject
      def initialize(options = {})
        @attr = options[:attr] || {}
        @prop = options[:prop] || {}
      end
    end

    class LexEnv
      attr_reader :record
      attr_reader :outer
      attr_reader :type

      def initialize(options = {})
        @outer = options[:outer]
        if options[:type] == :object
          @record = ObjectEnvRecord.new
        else #if options[:type] == :declarative
          @record = DeclarativeEnvRecord.new
        end
      end

      def new_declarative_env(outer = nil)
        e = LexEnv.new(outer: (outer || self), type: :declarative)
      end

      def new_object_env(object, outer = nil)#TODO
        raise 'TODO'
        e = LexEnv.new(outer: (outer || self), type: :object)
        object.val.each do |k, v|
          if k.id_name?
            e.create_mutable_binding(k)
            e.set_mutable_binding(k, v)
          end
        end
      end

      def debug
        STDERR.puts @record.binding.keys.join(", ")
      end
    end

    class Context
      attr_accessor :lex_env
      attr_accessor :var_env
      attr_accessor :this_binding

      def initialize(options = {})
        @var_env = LexEnv.new(options)
        @lex_env = LexEnv.new(options)
        #TODO
        @this_binding = ExObject.new(
          {
            attr: {
              writable: true,
              enumerable: false,
              configurable: true
            }
          }
        )
      end

      def debug
        @var_env.debug
      end

    end
  end
end