class ExecJS::RubyRhinoRuntime::Context

def call(properties, *args)
  unbox @rhino_context.eval(properties).call(*args)
rescue ::Rhino::JSError => e
  if e.message == "syntax error"
    raise RuntimeError, e.message
  else
    raise ProgramError, e.message
  end
end

def eval(source, options = {})
  source = encode(source)
  if /\S/ =~ source
    unbox @rhino_context.eval("(#{source})")
  end
rescue ::Rhino::JSError => e
  if e.message =~ /^syntax error/
    raise RuntimeError, e.message
  else
    raise ProgramError, e.message
  end
end

def exec(source, options = {})
  source = encode(source)
  if /\S/ =~ source
    eval "(function(){#{source}})()", options
  end
end

def fix_memory_limit!(context)
  if context.respond_to?(:optimization_level=)
    context.optimization_level = -1
  else
    context.instance_eval { @native.setOptimizationLevel(-1) }
  end
end

def initialize(runtime, source = "")
  source = encode(source)
  @rhino_context = ::Rhino::Context.new
  fix_memory_limit! @rhino_context
  @rhino_context.eval(source)
end

def unbox(value)
  case value = ::Rhino::to_ruby(value)
  when Java::OrgMozillaJavascript::NativeFunction
    nil
  when Java::OrgMozillaJavascript::NativeObject
    value.inject({}) do |vs, (k, v)|
      case v
      when Java::OrgMozillaJavascript::NativeFunction, ::Rhino::JS::Function
        nil
      else
        vs[k] = unbox(v)
      end
      vs
    end
  when Array
    value.map { |v| unbox(v) }
  else
    value
  end
end