opal 0.3.10 → 0.3.11

data/runtime/fs.js

@@ -1,199 +0,0 @@
-// ..........................................................
-// FILE SYSTEM
-//
-
-/**
-  FileSystem namespace. Overiden in gem and node.js contexts
-*/
-var Fs = Op.fs = {};
-
-/**
- RegExp for splitting filenames into their dirname, basename and ext.
- This currently only supports unix style filenames as this is what is
- used internally when running in the browser.
-*/
-var PATH_RE = /^(.+\/(?!$)|\/)?((?:.+?)?(\.[^.]*)?)$/;
-
-/**
-  Holds the current cwd for the application.
-
-  @type {String}
-*/
-Fs.cwd = '/';
-
-/**
-  Join the given args using the default separator. The returned path
-  is not expanded.
-
-  @param {String} parts
-  @return {String}
-*/
-function fs_join(parts) {
-  parts = [].slice.call(arguments, 0);
-  return parts.join('/');
-}
-
-/**
-  Normalize the given path by removing '..' and '.' parts etc.
-
-  @param {String} path Path to normalize
-  @param {String} base Optional base to normalize with
-  @return {String}
-*/
-function fs_expand_path(path, base) {
-  if (!base) {
-    if (path.charAt(0) !== '/') {
-      base = Fs.cwd;
-    }
-    else {
-      base = '';
-    }
-  }
-
-  path = fs_join(base, path);
-
-  var parts = path.split('/'), result = [], part;
-
-  // initial /
-  if (parts[0] === '') result.push('');
-
-  for (var i = 0, ii = parts.length; i < ii; i++) {
-    part = parts[i];
-
-    if (part == '..') {
-      result.pop();
-    }
-    else if (part == '.' || part == '') {
-
-    }
-    else {
-      result.push(part);
-    }
-  }
-
-  return result.join('/');
-}
-
-/**
-  Return all of the path components except the last one.
-
-  @param {String} path
-  @return {String}
-*/
-var fs_dirname = Fs.dirname = function(path) {
-  var dirname = PATH_RE.exec(path)[1];
-
-  if (!dirname) return '.';
-  else if (dirname === '/') return dirname;
-  else return dirname.substring(0, dirname.length - 1);
-};
-
-/**
-  Returns the file extension of the given `file_name`.
-
-  @param {String} file_name
-  @return {String}
-*/
-Fs.extname = function(file_name) {
-  var extname = PATH_RE.exec(file_name)[3];
-
-  if (!extname || extname === '.') return '';
-  else return extname;
-};
-
-Fs.exist_p = function(path) {
-  return Op.loader.factories[fs_expand_path(path)] ? true : false;
-};
-
-/**
-  Glob
-*/
-Fs.glob = function() {
-  var globs = [].slice.call(arguments);
-
-  var result = [], files = opal.loader.factories;
-
-  for (var i = 0, ii = globs.length; i < ii; i++) {
-    var glob = globs[i];
-
-    var re = fs_glob_to_regexp(glob);
-    // console.log("glob: " + glob);
-    // console.log("re  : " + re);
-
-    for (var file in files) {
-      if (re.exec(file)) {
-        result.push(file);
-      }
-    }
-  }
-
-  return result;
-};
-
-/**
-  Turns a glob string into a regexp
-*/
-function fs_glob_to_regexp(glob) {
-  if (typeof glob !== 'string') {
-    raise(eException, "file_glob_to_regexp: glob must be a string");
-  }
-
-  // make sure absolute
-  glob = fs_expand_path(glob);
-  // console.log("full glob is: " + glob);
-  
-  var parts = glob.split(''), length = parts.length, result = '';
-
-  var opt_group_stack = 0;
-
-  for (var i = 0; i < length; i++) {
-    var cur = parts[i];
-
-    switch (cur) {
-      case '*':
-        if (parts[i + 1] == '*') {
-          result += '.*';
-          i++;
-        }
-        else {
-          result += '[^/]*';
-        }
-        break;
-
-      case '.':
-        result += '\\';
-        result += cur;
-        break;
-
-      case ',':
-        if (opt_group_stack) {
-          result += '|';
-        }
-        else {
-          result += ',';
-        }
-        break;
-
-      case '{':
-        result += '(';
-        opt_group_stack++;
-        break;
-
-      case '}':
-        if (opt_group_stack) {
-          result += ')';
-          opt_group_stack--;
-        }
-        else {
-          result += '}'
-        }
-        break;
-
-      default:
-        result += cur;
-    }
-  }
-
-  return new RegExp('^' + result + '$');
-};
-

data/runtime/init.js

@@ -1,556 +0,0 @@
-
-/**
-  Sets the constant value `val` on the given `klass` as `id`.
-
-  @param {RClass} klass
-  @param {String} id
-  @param {Object} val
-  @return {Object} returns the set value
-*/
-function rb_const_set(klass, id, val) {
-  klass.$c[id] = val;
-  return val;
-}
-
-/**
-  Lookup a constant named `id` on the `klass`. This will throw an error if
-  the constant cannot be found.
-
-  @param {RClass} klass
-  @param {String} id
-*/
-function rb_const_get(klass, id) {
-  if (klass.$c[id]) {
-    return (klass.$c[id]);
-  }
-
-  var parent = klass.$parent;
-
-  while (parent) {
-    if (parent.$c[id] !== undefined) {
-      return parent.$c[id];
-    }
-
-    parent = parent.$parent;
-  }
-
-  rb_raise(rb_eNameError, 'uninitialized constant ' + id);
-};
-
-Rt.const_get = rb_const_get;
-
-/**
-  Returns true or false depending whether a constant named `id` is defined
-  on the receiver `klass`.
-
-  @param {RClass} klass
-  @param {String} id
-  @return {true, false}
-*/
-function rb_const_defined(klass, id) {
-  if (klass.$c[id]) {
-    return true;
-  }
-
-  return false;
-};
-
-/**
-  This table holds all the global variables accessible from ruby.
-
-  Entries are mapped by their global id => an object that contains the
-  given keys:
-
-    - name
-    - value
-    - getter
-    - setter
-*/
-var rb_global_tbl = {};
-
-/**
-  Defines a hooked/global variable.
-
-  @param {String} name The global name (e.g. '$:')
-  @param {Function} getter The getter function to return the variable
-  @param {Function} setter The setter function used for setting the var
-  @return {null}
-*/
-function rb_define_hooked_variable(name, getter, setter) {
-  var entry = {
-    "name": name,
-    "value": Qnil,
-    "getter": getter,
-    "setter": setter
-  };
-
-  rb_global_tbl[name] = entry;
-};
-
-/**
-  A default read only getter for a global variable. This will simply throw a
-  name error with the given id. This can be used for variables that should
-  not be altered.
-*/
-function rb_gvar_readonly_setter(id, value) {
-  rb_raise(rb_eNameError, id + " is a read-only variable");
-};
-
-/**
-  Retrieve a global variable. This will use the assigned getter.
-*/
-function rb_gvar_get(id) {
-  var entry = rb_global_tbl[id];
-  if (!entry) { return Qnil; }
-  return entry.getter(id);
-};
-
-/**
-  Set a global. If not already set, then we assign basic getters and setters.
-*/
-function rb_gvar_set(id, value) {
-  var entry = rb_global_tbl[id];
-  if (entry)  { return entry.setter(id, value); }
-
-  rb_define_hooked_variable(id,
-
-    function(id) {
-      return rb_global_tbl[id].value;
-    },
-
-    function(id, value) {
-      return (rb_global_tbl[id].value = value);
-    }
-  );
-
-  return rb_gvar_set(id, value);
-};
-
-/**
-  Every object has a unique id. This count is used as the next id for the
-  next created object. Therefore, first ruby object has id 0, next has 1 etc.
-*/
-var rb_hash_yield = 0;
-
-/**
-  Yield the next object id, updating the count, and returning it.
-*/
-function rb_yield_hash() {
-  return rb_hash_yield++;
-};
-
-var rb_cHash;
-
-/**
-  Returns a new hash with values passed from the runtime.
-*/
-Rt.H = function() {
-  var hash = new rb_cHash.$a(), k, v, args = Array.prototype.slice.call(arguments);
-  var keys = hash.k = [];
-  var assocs = hash.a = {};
-  hash.d = Qnil;
-
-  for (var i = 0, ii = args.length; i < ii; i++) {
-    k = args[i];
-    v = args[i + 1];
-    i++;
-    keys.push(k);
-    assocs[k.$h()] = v;
-  }
-
-  return hash;
-};
-
-var rb_alias_method = Rt.alias_method = function(klass, new_name, old_name) {
-  var body = klass.$a.prototype['m$' + old_name];
-
-  if (!body) {
-    rb_raise(rb_eNameError, "undefined method `" + old_name + "' for class `" + klass.__classid__ + "'");
-  }
-
-  rb_define_raw_method(klass, 'm$' + new_name, body);
-  return Qnil;
-};
-
-/**
-  This does the main work, but does not call runtime methods like
-  singleton_method_added etc. define_method does that.
-
-*/
-function rb_define_raw_method(klass, name, body) {
-
-  klass.$a.prototype[name] = body;
-  klass.$m[name] = body;
-
-  var included_in = klass.$included_in, includee;
-
-  if (included_in) {
-    for (var i = 0, ii = included_in.length; i < ii; i++) {
-      includee = included_in[i];
-
-      rb_define_raw_method(includee, name, body);
-    }
-  }
-
-  // This class is toll free bridged, so add method to native
-  // prototype as well
-  if (klass.$bridge_prototype) {
-    klass.$bridge_prototype[name] = body;
-  }
-
-  // If we are dealing with Object, then we need to donate to
-  // all of our bridged prototypes as well.
-  if (klass === rb_cObject) {
-    var bridged = rb_bridged_classes;
-
-    for (var i = 0, ii = bridged.length; i < ii; i++) {
-      // do not overwrite bridged methods' implementation
-      if (!bridged[i][name]) {
-        bridged[i][name] = body;
-      }
-    }
-  }
-};
-
-function rb_define_alias(base, new_name, old_name) {
-  rb_define_method(base, new_name, base.$m_tbl[old_name]);
-  return Qnil;
-};
-
-/**
-  Raise the exception class with the given string message.
-*/
-function rb_raise(exc, str) {
-  if (str === undefined) {
-    str = exc;
-    exc = rb_eException;
-  }
-
-  var exception = exc.m$new(str);
-  rb_raise_exc(exception);
-};
-
-Rt.raise = rb_raise;
-
-/**
-  Raise an exception instance (DO NOT pass strings to this)
-*/
-function rb_raise_exc(exc) {
-  throw exc;
-};
-
-var rb_cString;
-
-
-/**
-  Exception classes. Some of these are used by runtime so they are here for
-  convenience.
-*/
-var rb_eException,       rb_eStandardError,   rb_eLocalJumpError,  rb_eNameError,
-    rb_eNoMethodError,   rb_eArgError,        rb_eScriptError,     rb_eLoadError,
-    rb_eRuntimeError,    rb_eTypeError,       rb_eIndexError,      rb_eKeyError,
-    rb_eRangeError;
-
-var rb_eExceptionInstance;
-
-/**
-  Standard jump exceptions to save re-creating them everytime they are needed
-*/
-var rb_eReturnInstance,
-    rb_eBreakInstance,
-    rb_eNextInstance;
-
-/**
-  Ruby break statement with the given value. When no break value is needed, nil
-  should be passed here. An undefined/null value is not valid and will cause an
-  internal error.
-
-  @param {RubyObject} value The break value.
-*/
-Rt.B = function(value) {
-  rb_eBreakInstance.$value = value;
-  rb_raise_exc(eBreakInstance);
-};
-
-/**
-  Ruby return, with the given value. The func is the reference function which
-  represents the method that this statement must return from.
-*/
-Rt.R = function(value, func) {
-  rb_eReturnInstance.$value = value;
-  rb_eReturnInstance.$func = func;
-  throw rb_eReturnInstance;
-};
-
-/**
-  Get global by id
-*/
-Rt.gg = function(id) {
-  return rb_gvar_get(id);
-};
-
-/**
-  Set global by id
-*/
-Rt.gs = function(id, value) {
-  return rb_gvar_set(id, value);
-};
-
-function rb_regexp_match_getter(id) {
-  var matched = Rt.X;
-
-  if (matched) {
-    if (matched.$md) {
-      return matched.$md;
-    } else {
-      var res = new rb_cMatch.o$a();
-      res.$data = matched;
-      matched.$md = res;
-      return res;
-    }
-  } else {
-    return Qnil;
-  }
-}
-
-var rb_cIO, rb_stdin, rb_stdout, rb_stderr;
-
-function rb_stdio_getter(id) {
-  switch (id) {
-    case "$stdout":
-      return rb_stdout;
-    case "$stdin":
-      return rb_stdin;
-    case "$stderr":
-      return rb_stderr;
-    default:
-      rb_raise(rb_eRuntimeError, "stdout_setter being used for bad variable");
-  }
-};
-
-function rb_stdio_setter(id, value) {
-  rb_raise(rb_eException, "stdio_setter cannot currently set stdio variables");
-
-  switch (id) {
-    case "$stdout":
-      return rb_stdout = value;
-    case "$stdin":
-      return rb_stdin = value;
-    case "$stderr":
-      return rb_stderr = value;
-    default:
-      rb_raise(rb_eRuntimeError, "stdout_setter being used for bad variable: " + id);
-  }
-};
-
-var rb_cProc;
-
-/**
-  Block passing - holds current block for runtime
-
-  f: function
-  p: proc
-  y: yield error
-*/
-var rb_block = Rt.P = {
-  f: null,
-  p: null,
-  y: function() {
-    rb_raise(rb_eLocalJumpError, "no block given");
-  }
-};
-
-rb_block.y.$self = rb_block.y;
-
-/**
-  Turns the given proc/function into a lambda. This is useful for the
-  Proc#lambda method, but also for blocks that are turned into
-  methods, in Module#define_method, for example. Lambdas and methods
-  from blocks are the same thing. Lambdas basically wrap the passed
-  block function and perform stricter arg checking to make sure the
-  right number of args are passed. Procs are liberal in their arg
-  checking, and simply turned ommited args into nil. Lambdas and
-  methods MUST check args and throw an error if the wrong number are
-  given. Also, lambdas/methods must catch return statements as lambdas
-  capture returns.
-
-  FIXME: wrap must detect if we are the receiver of a block, and fix
-  the block to send it to the proc.
-
-  FIXME: need to be strict on checking proc arity
-
-  FIXME: need to catch return statements which may be thrown.
-
-  @param {Function} proc The proc/function to lambdafy.
-  @return {Function} Wrapped lambda function.
-*/
-function rb_make_lambda(proc) {
-  if (proc.$lambda) return proc;
-
-  var wrap = function() {
-    var args = Array.prototype.slice.call(arguments, 0);
-    return proc.apply(null, args);
-  };
-
-  wrap.$lambda = true;
-  wrap.o$s = proc.o$s;
-
-  return proc;
-};
-
-var rb_cRange;
-
-/**
-  Returns a new ruby range. G for ranGe.
-*/
-Rt.G = function(beg, end, exc) {
-  var range = rb_obj_alloc(cRange);
-  range.beg = beg;
-  range.end = end;
-  range.exc = exc;
-  return range;
-};
-
-/**
-  Print to console - this is overriden upon init so that it will print to
-  stdout
-*/
-var puts = function(str) {
-  console.log(str);
-};
-
-/**
-  Main init method. This is called once this file has fully loaded. It setups
-  all the core objects and classes and required runtime features.
-*/
-function init() {
-  var metaclass;
-
-  // The *instances* of core objects..
-  rb_boot_Object = rb_boot_defclass('Object');
-  rb_boot_Module = rb_boot_defclass('Module', rb_boot_Object);
-  rb_boot_Class  = rb_boot_defclass('Class', rb_boot_Module);
-
-  // The *classes* of core objects..
-  rb_cObject = rb_boot_makemeta('Object', rb_boot_Object, rb_boot_Class);
-  rb_cModule = rb_boot_makemeta('Module', rb_boot_Module, rb_cObject.constructor);
-  rb_cClass  = rb_boot_makemeta('Class', rb_boot_Class, rb_cModule.constructor);
-
-  rb_boot_defmetameta(rb_cObject, rb_cClass);
-  rb_boot_defmetameta(rb_cModule, rb_cClass);
-  rb_boot_defmetameta(rb_cClass, rb_cClass);
-
-  // fix superclasses..
-  rb_cObject.$s = null;
-  rb_cModule.$s = rb_cObject;
-  rb_cClass.$s  = rb_cModule;
-
-  rb_const_set(rb_cObject, 'Object', rb_cObject);
-  rb_const_set(rb_cObject, 'Module', rb_cModule);
-  rb_const_set(rb_cObject, 'Class', rb_cClass);
-
-  rb_mKernel      = rb_define_module('Kernel');
-
-  rb_top_self     = new rb_cObject.$a();
-  Rt.top          = rb_top_self;
-
-  rb_cNilClass = rb_define_class('NilClass', rb_cObject);
-  Rt.Qnil = Qnil = new rb_cNilClass.$a();
-  Qnil.toString = function() {
-    return "nil";
-  };
-
-  rb_cBoolean = rb_bridge_class(Boolean.prototype, T_OBJECT, 'Boolean', rb_cObject);
-
-  rb_cArray = rb_bridge_class(Array.prototype, T_OBJECT | T_ARRAY, 'Array', rb_cObject);
-  // array instances all get standard properties for subclasses to work
-  var ary_proto = Array.prototype, ary_inst = rb_cArray.$a.prototype;
-  ary_inst.$f      = T_ARRAY | T_OBJECT;
-  ary_inst.push    = ary_proto.push;
-  ary_inst.pop     = ary_proto.pop;
-  ary_inst.slice   = ary_proto.slice;
-  ary_inst.splice  = ary_proto.splice;
-  ary_inst.concat  = ary_proto.concat;
-  ary_inst.shift   = ary_proto.shift;
-  ary_inst.unshift = ary_proto.unshift;
-  ary_inst.length  = 0;
-
-  rb_cHash = rb_define_class('Hash', rb_cObject);
-
-  rb_cNumeric = rb_bridge_class(Number.prototype,
-    T_OBJECT | T_NUMBER, 'Numeric', rb_cObject);
-
-  rb_cString = rb_bridge_class(String.prototype,
-    T_OBJECT | T_STRING, 'String', rb_cObject);
-
-  rb_cProc = rb_bridge_class(Function.prototype,
-    T_OBJECT | T_PROC, 'Proc', rb_cObject);
-
-  rb_cRange = rb_define_class('Range', rb_cObject);
-
-  rb_cRegexp = rb_bridge_class(RegExp.prototype,
-    T_OBJECT, 'Regexp', rb_cObject);
-
-  rb_cMatch = rb_define_class('MatchData', rb_cObject);
-  rb_define_hooked_variable('$~', rb_regexp_match_getter, rb_gvar_readonly_setter);
-
-  rb_eException = rb_bridge_class(Error.prototype,
-    T_OBJECT, 'Exception', rb_cObject);
-
-  rb_eStandardError = rb_define_class("StandardError", rb_eException);
-  rb_eRuntimeError = rb_define_class("RuntimeError", rb_eException);
-  rb_eLocalJumpError = rb_define_class("LocalJumpError", rb_eStandardError);
-  rb_eTypeError = rb_define_class("TypeError", rb_eStandardError);
-
-  rb_eNameError = rb_define_class("NameError", rb_eStandardError);
-  rb_eNoMethodError = rb_define_class('NoMethodError', rb_eNameError);
-  rb_eArgError = rb_define_class('ArgumentError', rb_eStandardError);
-
-  rb_eScriptError = rb_define_class('ScriptError', rb_eException);
-  rb_eLoadError = rb_define_class('LoadError', rb_eScriptError);
-
-  rb_eIndexError = rb_define_class("IndexError", rb_eStandardError);
-  rb_eKeyError = rb_define_class("KeyError", rb_eIndexError);
-  rb_eRangeError = rb_define_class("RangeError", rb_eStandardError);
-
-  rb_eBreakInstance = new Error('unexpected break');
-  rb_eBreakInstance.$k = rb_eLocalJumpError;
-  rb_block.b = rb_eBreakInstance;
-
-  rb_eReturnInstance = new Error('unexpected return');
-  rb_eReturnInstance.$k = rb_eLocalJumpError;
-
-  rb_eNextInstance = new Error('unexpected next');
-  rb_eNextInstance.$k = rb_eLocalJumpError;
-
-  rb_cIO = rb_define_class('IO', rb_cObject);
-  rb_stdin = new rb_cIO.$a();
-  rb_stdout = new rb_cIO.$a();
-  rb_stderr = new rb_cIO.$a();
-
-  rb_const_set(rb_cObject, 'STDIN', rb_stdin);
-  rb_const_set(rb_cObject, 'STDOUT', rb_stdout);
-  rb_const_set(rb_cObject, 'STDERR', rb_stderr);
-
-  rb_define_hooked_variable('$stdin', rb_stdio_getter, rb_stdio_setter);
-  rb_define_hooked_variable('$stdout', rb_stdio_getter, rb_stdio_setter);
-  rb_define_hooked_variable('$stderr', rb_stdio_getter, rb_stdio_setter);
-
-  rb_define_hooked_variable('$:', rb_load_path_getter, rb_gvar_readonly_setter);
-  rb_define_hooked_variable('$LOAD_PATH', rb_load_path_getter, rb_gvar_readonly_setter);
-
-  Op.loader = new Loader(Op);
-  Op.cache = {};
-
-  rb_const_set(rb_cObject, 'RUBY_ENGINE', PLATFORM_ENGINE);
-  rb_const_set(rb_cObject, 'RUBY_PLATFORM', PLATFORM_PLATFORM);
-  rb_const_set(rb_cObject, 'RUBY_VERSION', PLATFORM_VERSION);
-  rb_const_set(rb_cObject, 'ARGV', PLATFORM_ARGV);
-
-  Op.run(core_lib);
-
-  puts = function(str) {
-    rb_stdout.m$puts(str);
-  };
-};
-