if (!ev_is_active(&gc_timer)) {

ev_timer_start(EV_DEFAULT_UC_ &gc_timer);

ev_unref(EV_DEFAULT_UC);

}

if (ev_is_active(&gc_timer)) {

ev_ref(EV_DEFAULT_UC);

ev_timer_stop(EV_DEFAULT_UC_ &gc_timer);

}

assert(watcher == &gc_idle);

assert(revents == EV_IDLE);

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

if (V8::IdleNotification()) {

ev_idle_stop(EV_A_ watcher);

StopGCTimer();

}

assert(watcher == &gc_check);

assert(revents == EV_CHECK);

tick_times[tick_time_head] = ev_now(EV_DEFAULT_UC);

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");

ev_idle_start(EV_A_ &gc_idle);

HandleScope scope;

need_tick_cb = true;

return Undefined();

// Avoid entering a V8 scope.

if (!need_tick_cb) return;

need_tick_cb = false;

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(watcher == &prepare_tick_watcher);

assert(revents == EV_PREPARE);

Tick();

assert(watcher == &check_tick_watcher);

assert(revents == EV_CHECK);

Tick();

assert(watcher == &eio_poller);

assert(revents == EV_IDLE);

//printf("eio_poller\n");

if (eio_poll() != -1) {

//printf("eio_poller stop\n");

ev_idle_stop(EV_DEFAULT_UC_ watcher);

}

assert(watcher == &eio_want_poll_notifier);

assert(revents == EV_ASYNC);

//printf("want poll notifier\n");

if (eio_poll() == -1) {

//printf("eio_poller start\n");

ev_idle_start(EV_DEFAULT_UC_ &eio_poller);

}

assert(watcher == &eio_done_poll_notifier);

assert(revents == EV_ASYNC);

//printf("done poll notifier\n");

if (eio_poll() != -1) {

//printf("eio_poller stop\n");

ev_idle_stop(EV_DEFAULT_UC_ &eio_poller);

}

// Signal the main thread that we should stop calling eio_poll().

// from the idle watcher.

ev_async_send(EV_DEFAULT_UC_ &eio_done_poll_notifier);

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 (errno_symbol.IsEmpty()) {

syscall_symbol = NODE_PSYMBOL("syscall");

errno_symbol = NODE_PSYMBOL("errno");

errpath_symbol = NODE_PSYMBOL("path");

}

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));

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);

HandleScope scope;

if (!encoding_v->IsString()) return _default;

String::Utf8Value encoding(encoding_v->ToString());

if (strcasecmp(*encoding, "utf8") == 0) {

return UTF8;

} else if (strcasecmp(*encoding, "utf-8") == 0) {

return UTF8;

} else if (strcasecmp(*encoding, "ascii") == 0) {

return ASCII;

} else if (strcasecmp(*encoding, "base64") == 0) {

return BASE64;

} else if (strcasecmp(*encoding, "binary") == 0) {

return BINARY;

} else if (strcasecmp(*encoding, "raw") == 0) {

fprintf(stderr, "'raw' (array of integers) has been removed. "

"Use 'binary'.\n");

return BINARY;

} else if (strcasecmp(*encoding, "raws") == 0) {

fprintf(stderr, "'raws' encoding has been renamed to 'binary'. "

"Please update your code.\n");

return BINARY;

} else {

return _default;

}

HandleScope scope;

if (!len) return scope.Close(String::Empty());

if (encoding == BINARY) {

const unsigned char *cbuf = static_cast<const unsigned char*>(buf);

uint16_t * twobytebuf = new uint16_t[len];

for (size_t i = 0; i < len; i++) {

// XXX is the following line platform independent?

twobytebuf[i] = cbuf[i];

}

Local<String> chunk = String::New(twobytebuf, len);

delete [] twobytebuf; // TODO use ExternalTwoByteString?

return scope.Close(chunk);

}

// utf8 or ascii encoding

Local<String> chunk = String::New((const char*)buf, len);

return scope.Close(chunk);

HandleScope scope;

if (val->IsArray()) {

fprintf(stderr, "'raw' encoding (array of integers) has been removed. "

"Use 'binary'.\n");

assert(0);

return -1;

}

Local<String> str = val->ToString();

if (encoding == UTF8) return str->Utf8Length();

return str->Length();

size_t buflen,

v8::Handle<v8::Value> val,

enum encoding encoding) {

HandleScope scope;

// XXX

// A lot of improvement can be made here. See:

// http://code.google.com/p/v8/issues/detail?id=270

// http://groups.google.com/group/v8-dev/browse_thread/thread/dba28a81d9215291/ece2b50a3b4022c

// http://groups.google.com/group/v8-users/browse_thread/thread/1f83b0ba1f0a611

if (val->IsArray()) {

fprintf(stderr, "'raw' encoding (array of integers) has been removed. "

"Use 'binary'.\n");

assert(0);

return -1;

}

Local<String> str = val->ToString();

if (encoding == UTF8) {

str->WriteUtf8(buf, buflen, NULL, String::HINT_MANY_WRITES_EXPECTED);

return buflen;

}

if (encoding == ASCII) {

str->WriteAscii(buf, 0, buflen, String::HINT_MANY_WRITES_EXPECTED);

return buflen;

}

// THIS IS AWFUL!!! FIXME

assert(encoding == BINARY);

uint16_t * twobytebuf = new uint16_t[buflen];

str->Write(twobytebuf, 0, buflen, String::HINT_MANY_WRITES_EXPECTED);

for (size_t i = 0; i < buflen; i++) {

unsigned char *b = reinterpret_cast<unsigned char*>(&twobytebuf[i]);

assert(b[1] == 0);

buf[i] = b[0];

}

delete [] twobytebuf;

return buflen;

Handle<Message> message = try_catch.Message();

node::Stdio::DisableRawMode(STDIN_FILENO);

fprintf(stderr, "\n");

if (show_line && !message.IsEmpty()) {

// Print (filename):(line number): (message).

String::Utf8Value filename(message->GetScriptResourceName());

const char* filename_string = ToCString(filename);

int linenum = message->GetLineNumber();

fprintf(stderr, "%s:%i\n", filename_string, linenum);

// Print line of source code.

String::Utf8Value sourceline(message->GetSourceLine());

const char* sourceline_string = ToCString(sourceline);

// HACK HACK HACK

//

// FIXME

//

// Because of how CommonJS modules work, all scripts are wrapped with a

// "function (function (exports, __filename, ...) {"

// to provide script local variables.

//

// When reporting errors on the first line of a script, this wrapper

// function is leaked to the user. This HACK is to remove it. The length

// of the wrapper is 62. That wrapper is defined in src/node.js

//

// If that wrapper is ever changed, then this number also has to be

// updated. Or - someone could clean this up so that the two peices

// don't need to be changed.

//

// Even better would be to get support into V8 for wrappers that

// shouldn't be reported to users.

int offset = linenum == 1 ? 62 : 0;

fprintf(stderr, "%s\n", sourceline_string + offset);

// Print wavy underline (GetUnderline is deprecated).

int start = message->GetStartColumn();

for (int i = offset; i < start; i++) {

fprintf(stderr, " ");

}

int end = message->GetEndColumn();

for (int i = start; i < end; i++) {

fprintf(stderr, "^");

}

fprintf(stderr, "\n");

}

String::Utf8Value trace(try_catch.StackTrace());

if (trace.length() > 0) {

fprintf(stderr, "%s\n", *trace);

} else {

// this really only happens for RangeErrors, since they're the only

// kind that won't have all this info in the trace.

Local<Value> er = try_catch.Exception();

String::Utf8Value msg(!er->IsObject() ? er->ToString()

: er->ToObject()->Get(String::New("message"))->ToString());

fprintf(stderr, "%s\n", *msg);

}

fflush(stderr);

HandleScope scope;