if (!uv_is_active((uv_handle_t*) &gc_timer)) {

uv_timer_start(&gc_timer, node::CheckStatus, 5000, 5000);

}

if (uv_is_active((uv_handle_t*) &gc_timer)) {

uv_timer_stop(&gc_timer);

}

assert((uv_idle_t*) watcher == &gc_idle);

if (V8::IdleNotification()) {

uv_idle_stop(&gc_idle);

StopGCTimer();

}

assert(watcher == &gc_check);

tick_times[tick_time_head] = uv_now(uv_default_loop());

tick_time_head = (tick_time_head + 1) % RPM_SAMPLES;

StartGCTimer();

for (int i = 0; i < (int)(GC_WAIT_TIME/FAST_TICK); i++) {

double d = TICK_TIME(i+1) - TICK_TIME(i+2);

//printf("d = %f\n", d);

// If in the last 5 ticks the difference between

// ticks was less than 0.7 seconds, then continue.

if (d < FAST_TICK) {

//printf("---\n");

return;

}

}

// Otherwise start the gc!

//fprintf(stderr, "start idle 2\n");

uv_idle_start(&gc_idle, node::Idle);

// Avoid entering a V8 scope.

if (!need_tick_cb) return;

need_tick_cb = false;

if (uv_is_active((uv_handle_t*) &tick_spinner)) {

uv_idle_stop(&tick_spinner);

uv_unref(uv_default_loop());

}

HandleScope scope;

if (tick_callback_sym.IsEmpty()) {

// Lazily set the symbol

tick_callback_sym =

Persistent<String>::New(String::NewSymbol("_tickCallback"));

}

Local<Value> cb_v = process->Get(tick_callback_sym);

if (!cb_v->IsFunction()) return;

Local<Function> cb = Local<Function>::Cast(cb_v);

TryCatch try_catch;

cb->Call(process, 0, NULL);

if (try_catch.HasCaught()) {

FatalException(try_catch);

}

assert((uv_idle_t*) handle == &tick_spinner);

assert(status == 0);

Tick();

HandleScope scope;

need_tick_cb = true;

// TODO: this tick_spinner shouldn't be necessary. An ev_prepare should be

// sufficent, the problem is only in the case of the very last "tick" -

// there is nothing left to do in the event loop and libev will exit. The

// ev_prepare callback isn't called before exiting. Thus we start this

// tick_spinner to keep the event loop alive long enough to handle it.

if (!uv_is_active((uv_handle_t*) &tick_spinner)) {

uv_idle_start(&tick_spinner, Spin);

uv_ref(uv_default_loop());

}

return Undefined();

assert(handle == &prepare_tick_watcher);

assert(status == 0);

Tick();

assert(handle == &check_tick_watcher);

assert(status == 0);

Tick();

const char *syscall,

const char *msg,

const char *path) {

Local<Value> e;

Local<String> estring = String::NewSymbol(errno_string(errorno));

if (!msg[0]) {

msg = strerror(errorno);

}

Local<String> message = String::NewSymbol(msg);

Local<String> cons1 = String::Concat(estring, String::NewSymbol(", "));

Local<String> cons2 = String::Concat(cons1, message);

if (syscall_symbol.IsEmpty()) {

syscall_symbol = NODE_PSYMBOL("syscall");

errno_symbol = NODE_PSYMBOL("errno");

errpath_symbol = NODE_PSYMBOL("path");

code_symbol = NODE_PSYMBOL("code");

}

if (path) {

Local<String> cons3 = String::Concat(cons2, String::NewSymbol(" '"));

Local<String> cons4 = String::Concat(cons3, String::New(path));

Local<String> cons5 = String::Concat(cons4, String::NewSymbol("'"));

e = Exception::Error(cons5);

} else {

e = Exception::Error(cons2);

}

Local<Object> obj = e->ToObject();

obj->Set(errno_symbol, Integer::New(errorno));

obj->Set(code_symbol, estring);

if (path) obj->Set(errpath_symbol, String::New(path));

if (syscall) obj->Set(syscall_symbol, String::NewSymbol(syscall));

return e;

int r;

const char *msg;

if ((msg = uv_dlerror(lib)) == NULL) {

r = snprintf(error_msg, size, "%s", "Unable to load shared library ");

} else {

r = snprintf(error_msg, size, "%s", msg);

uv_dlerror_free(lib, msg);

}

// return bool if the error message be written correctly

return (0 < r && r < size);

const char *syscall,

const char *msg,

const char *path) {

if (syscall_symbol.IsEmpty()) {

syscall_symbol = NODE_PSYMBOL("syscall");

errno_symbol = NODE_PSYMBOL("errno");

errpath_symbol = NODE_PSYMBOL("path");

code_symbol = NODE_PSYMBOL("code");

}

if (!msg || !msg[0])

msg = get_uv_errno_message(errorno);

Local<String> estring = String::NewSymbol(get_uv_errno_string(errorno));

Local<String> message = String::NewSymbol(msg);

Local<String> cons1 = String::Concat(estring, String::NewSymbol(", "));

Local<String> cons2 = String::Concat(cons1, message);

Local<Value> e;

Local<String> path_str;

if (path) {

#ifdef _WIN32

if (strncmp(path, "\\\\?\\UNC\\", 8) == 0) {

path_str = String::Concat(String::New("\\\\"), String::New(path + 8));

} else if (strncmp(path, "\\\\?\\", 4) == 0) {

path_str = String::New(path + 4);

} else {

path_str = String::New(path);

}

#else

path_str = String::New(path);

#endif

Local<String> cons3 = String::Concat(cons2, String::NewSymbol(" '"));

Local<String> cons4 = String::Concat(cons3, path_str);

Local<String> cons5 = String::Concat(cons4, String::NewSymbol("'"));

e = Exception::Error(cons5);

} else {

e = Exception::Error(cons2);

}

Local<Object> obj = e->ToObject();

// TODO errno should probably go

obj->Set(errno_symbol, Integer::New(errorno));

obj->Set(code_symbol, estring);

if (path) obj->Set(errpath_symbol, path_str);

if (syscall) obj->Set(syscall_symbol, String::NewSymbol(syscall));

return e;

const char* syscall,

const char* msg,

const char* path) {

Local<Value> e;

if (!msg || !msg[0]) {

msg = winapi_strerror(errorno);

}

Local<String> message = String::NewSymbol(msg);

if (syscall_symbol.IsEmpty()) {

syscall_symbol = NODE_PSYMBOL("syscall");

errno_symbol = NODE_PSYMBOL("errno");

errpath_symbol = NODE_PSYMBOL("path");

code_symbol = NODE_PSYMBOL("code");

}

if (path) {

Local<String> cons1 = String::Concat(message, String::NewSymbol(" '"));

Local<String> cons2 = String::Concat(cons1, String::New(path));

Local<String> cons3 = String::Concat(cons2, String::NewSymbol("'"));

e = Exception::Error(cons3);

} else {

e = Exception::Error(message);

}

Local<Object> obj = e->ToObject();

obj->Set(errno_symbol, Integer::New(errorno));

if (path) obj->Set(errpath_symbol, String::New(path));

if (syscall) obj->Set(syscall_symbol, String::NewSymbol(syscall));

return e;

const Arguments& args) {

HandleScope scope;

const int argc = args.Length();

Local<Value>* argv = new Local<Value>[argc];

for (int i = 0; i < argc; ++i) {

argv[i] = args[i];

}

Local<Object> instance = t->GetFunction()->NewInstance(argc, argv);

delete[] argv;

return scope.Close(instance);

const char* method,

int argc,

Handle<Value> argv[]) {

HandleScope scope;

Local<Value> callback_v = object->Get(String::New(method));

if (!callback_v->IsFunction()) {

fprintf(stderr, "method = %s", method);

}

assert(callback_v->IsFunction());

Local<Function> callback = Local<Function>::Cast(callback_v);

// TODO Hook for long stack traces to be made here.

TryCatch try_catch;

callback->Call(object, argc, argv);

if (try_catch.HasCaught()) {

FatalException(try_catch);

}

HandleScope scope;