CSE2410 Fall 2014 Bounce

#include "node.h"

//#include "net.h"

#include "file.h"

#include "process.h"

#include "node_http.h"

#include "node_timer.h"

#include "natives.h" 

#include <stdio.h>

#include <assert.h>

#include <string>

#include <list>

#include <map>

using namespace v8;

using namespace node;

using namespace std;

static int exit_code = 0;

// Extracts a C string from a V8 Utf8Value.

const char*

ToCString(const v8::String::Utf8Value& value)

{

  return *value ? *value : "<string conversion failed>";

}

void

ReportException(v8::TryCatch* try_catch)

{

  v8::HandleScope handle_scope;

  v8::String::Utf8Value exception(try_catch->Exception());

  const char* exception_string = ToCString(exception);

  v8::Handle<v8::Message> message = try_catch->Message();

  if (message.IsEmpty()) {

    // V8 didn't provide any extra information about this error; just

    // print the exception.

    printf("%s\n", exception_string);

  } else {

    message->PrintCurrentStackTrace(stdout);

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

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

    const char* filename_string = ToCString(filename);

    int linenum = message->GetLineNumber();

    printf("%s:%i: %s\n", filename_string, linenum, exception_string);

    // Print line of source code.

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

    const char* sourceline_string = ToCString(sourceline);

    printf("%s\n", sourceline_string);

    // Print wavy underline (GetUnderline is deprecated).

    int start = message->GetStartColumn();

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

      printf(" ");

    }

    int end = message->GetEndColumn();

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

      printf("^");

    }

    printf("\n");

  }

}

// Executes a string within the current v8 context.

Handle<Value>

ExecuteString(v8::Handle<v8::String> source,

              v8::Handle<v8::Value> filename)

{

  HandleScope scope;

  Handle<Script> script = Script::Compile(source, filename);

  if (script.IsEmpty()) {

    return ThrowException(String::New("Error compiling string"));

  }

  Handle<Value> result = script->Run();

  if (result.IsEmpty()) {

    return ThrowException(String::New("Error running string"));

  }

  return scope.Close(result);

}

JS_METHOD(print) 

{

  if (args.Length() < 1) return v8::Undefined();

  HandleScope scope;

  Handle<Value> arg = args[0];

  String::Utf8Value value(arg);

  printf("%s\n", *value);

  fflush(stdout);

  return Undefined();

}

JS_METHOD(cat) 

{

  if (args.Length() < 1) return v8::Undefined();

  HandleScope scope;

  String::Utf8Value filename(args[0]);

  Local<String> error_msg = String::New("File I/O error");

  FILE* file = fopen(*filename, "rb");

  if (file == NULL) {

    // Raise error

    perror("fopen()");

    return ThrowException(error_msg);

  }

  int r = fseek(file, 0, SEEK_END);

  if (r < 0) {

    perror("fseek()");

    return ThrowException(error_msg);

  }

  int size = ftell(file);

  if (size < 0) {

    perror("ftell()");

    return ThrowException(error_msg);

  }

  rewind(file);

  char chars[size+1];

  chars[size] = '\0';

  for (int i = 0; i < size;) {

    int read = fread(&chars[i], 1, size - i, file);

    if(read <= 0) {

      perror("read()");

      return ThrowException(error_msg);

    }

    i += read;

  }

  uint16_t expanded_base[size+1];

  expanded_base[size] = '\0';

  for(int i = 0; i < size; i++) 

    expanded_base[i] = chars[i];

  fclose(file);

  Local<String> contents = String::New(expanded_base, size);

  return scope.Close(contents);

}

JS_METHOD(exec) 

{

  if (args.Length() < 2) 

    return Undefined();

  HandleScope scope;

  Local<String> source = args[0]->ToString();

  Local<String> filename = args[1]->ToString();

  Handle<Value> result = ExecuteString(source, filename);

  return scope.Close(result);

}

static void

OnFatalError (const char* location, const char* message)

{

  fprintf(stderr, "Fatal error. %s %s\n", location, message);

  ev_unloop(node_loop(), EVUNLOOP_ALL);

}

void

node_fatal_exception (TryCatch &try_catch)

{

  ReportException(&try_catch);

  ev_unloop(node_loop(), EVUNLOOP_ALL);

  exit_code = 1;

}

void node_exit (int code)

{

  exit_code = code;

  ev_unloop(node_loop(), EVUNLOOP_ALL);

}

static ev_async thread_pool_watcher;

static void 

thread_pool_cb (EV_P_ ev_async *w, int revents)

{

  int r = eio_poll();

  /* returns 0 if all requests were handled, -1 if not, or the value of EIO_FINISH if != 0 */

  if(r == 0) ev_async_stop(EV_DEFAULT_ w);

}

static void

thread_pool_want_poll (void)

{

  ev_async_send(EV_DEFAULT_ &thread_pool_watcher); 

}

void

node_eio_submit(eio_req *req)

{

  ev_async_start(EV_DEFAULT_ &thread_pool_watcher);

}

int

main (int argc, char *argv[]) 

{

  // start eio thread pool

  ev_async_init(&thread_pool_watcher, thread_pool_cb);

  eio_init(thread_pool_want_poll, NULL);

  V8::SetFlagsFromCommandLine(&argc, argv, true);

  if(argc < 2)  {

    fprintf(stderr, "No script was specified.\n");

    return 1;

  }

  string filename(argv[1]);

  HandleScope handle_scope;

  Persistent<Context> context = Context::New(NULL, ObjectTemplate::New());

  Context::Scope context_scope(context);

  V8::SetFatalErrorHandler(OnFatalError);

  Local<Object> g = Context::GetCurrent()->Global();

  Local<Object> node = Object::New();

  g->Set(String::New("node"), node);

  Local<Object> blocking = Object::New();

  node->Set(String::New("blocking"), blocking);

  JS_SET_METHOD(blocking, "exec", exec);

  JS_SET_METHOD(blocking, "cat", cat);

  JS_SET_METHOD(blocking, "print", print);

  Local<Array> arguments = Array::New(argc);

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

    Local<String> arg = String::New(argv[i]);

    arguments->Set(Integer::New(i), arg);

  }

  g->Set(String::New("ARGV"), arguments);

  // BUILT-IN MODULES

  Init_timer(g);

  //NodeInit_net(g);

  NodeInit_process(g);

  NodeInit_file(g);

  Init_http(g);

  // NATIVE JAVASCRIPT MODULES

  TryCatch try_catch;

  Handle<Value> result = ExecuteString(String::New(native_main), 

                                       String::New("main.js"));

  if (try_catch.HasCaught()) {

    ReportException(&try_catch);

    return 1;

  }

  ev_loop(node_loop(), 0);

  context.Dispose();

  return exit_code;

}