#include "rr.h"
#include "v8_handle.h"
#include "v8_context.h"
#include "v8_message.h"
#include "v8_template.h"
#include "v8_external.h"

using namespace v8;

namespace {

  VALUE ContextClass;

  Persistent<Context>& unwrap(VALUE value) {
    return rr_v8_handle<Context>(value);
  }

  VALUE New(int argc, VALUE *argv, VALUE self) {
    HandleScope handles;
    VALUE global_template; VALUE global_object;
    rb_scan_args(argc,argv, "02", &global_template, &global_object);
    Handle<ObjectTemplate> v8_global_template(NIL_P(global_template) ? Handle<ObjectTemplate>() : rr_v8_handle<ObjectTemplate>(global_template));
    Handle<Value> v8_global_object(NIL_P(global_object) ? Handle<Value>() : rr_v8_handle<Value>(global_object));
    Persistent<Context> cxt(Context::New(0, v8_global_template, v8_global_object));
    VALUE ref = rr_v8_handle_new(self, cxt);
    cxt.Dispose();
    return ref;
  }

  VALUE InContext(VALUE self) {
    return Context::InContext() ? Qtrue : Qfalse;  
  }

  VALUE GetEntered(VALUE self) {
    HandleScope handles;
    if (Context::InContext()) {
      Local<Context> current = Context::GetEntered();
      return rr_v8_handle_new(self, current);    
    } else {
      return Qnil;
    }
  }

  VALUE Global(VALUE self) {
    HandleScope handles;
    return rr_v82rb(unwrap(self)->Global());
  }  

  VALUE Enter(VALUE self) {
    HandleScope handles;
    unwrap(self)->Enter();
    return self;
  }

  VALUE Exit(VALUE self) {
    HandleScope handles;
    unwrap(self)->Exit();
    return self;
  }

  VALUE IsEntered(VALUE self) {
    HandleScope handles;
    if (Context::InContext()) {
      return rr_v82rb(unwrap(self) == Context::GetEntered());
    } else {
      return Qfalse;
    }
  }
  VALUE GetData(VALUE self) {
    HandleScope scope;
    return rr_v82rb(unwrap(self)->GetData());
  }
  VALUE SetData(VALUE self, VALUE data) {
    HandleScope scope;
    unwrap(self)->SetData(rr_rb2v8(data)->ToString());
    return Qnil;
  }
}

void rr_init_context() {
  ContextClass = rr_define_class("Context", rr_v8_handle_class());
  rr_define_singleton_method(ContextClass, "New", New, -1);
  rr_define_singleton_method(ContextClass, "InContext", InContext, 0);
  rr_define_singleton_method(ContextClass, "GetEntered", GetEntered, 0);
  rr_define_method(ContextClass, "Global", Global, 0);
  rr_define_method(ContextClass, "Enter", Enter, 0);
  rr_define_method(ContextClass, "Exit", Exit, 0);
  rr_define_method(ContextClass, "IsEntered", IsEntered, 0);
  rr_define_method(ContextClass, "GetData", GetData, 0);
  rr_define_method(ContextClass, "SetData", SetData, 1);
}