opal 0.5.5 → 0.6.0

data/spec/opal/spec_helper.rb

@@ -6,6 +6,9 @@ require 'mspec'
 require 'mspec/opal/mspec_fixes'
 require 'mspec/opal/runner'
 
+require 'math'
+require 'encoding'
+
 ENV['MSPEC_RUNNER'] = true
 
 module Kernel

data/spec/opal/stdlib/promise/error_spec.rb

@@ -0,0 +1,15 @@
+require 'promise'
+
+describe 'Promise.error' do
+  it 'rejects the promise with the given error' do
+    Promise.error(23).error.should == 23
+  end
+
+  it 'marks the promise as realized' do
+    Promise.error(23).realized?.should be_true
+  end
+
+  it 'marks the promise as rejected' do
+    Promise.error(23).rejected?.should be_true
+  end
+end

data/spec/opal/stdlib/promise/rescue_spec.rb

@@ -0,0 +1,35 @@
+require 'promise'
+
+describe 'Promise#rescue' do
+  it 'calls the block when the promise has already been rejected' do
+    x = 42
+    Promise.error(23).rescue { |v| x = v }
+    x.should == 23
+  end
+
+  it 'calls the block when the promise is rejected' do
+    a = Promise.new
+    x = 42
+
+    a.rescue { |v| x = v }
+    a.reject(23)
+
+    x.should == 23
+  end
+
+  it 'does not call then blocks when the promise is rejected' do
+    x = 42
+    y = 23
+
+    Promise.error(23).then { y = 42 }.rescue { |v| x = v }
+
+    x.should == 23
+    y.should == 23
+  end
+
+  it 'does not call subsequent rescue blocks' do
+    x = 42
+    Promise.error(23).rescue { |v| x = v }.rescue { x = 42 }
+    x.should == 23
+  end
+end

data/spec/opal/stdlib/promise/then_spec.rb

@@ -0,0 +1,54 @@
+require 'promise'
+
+describe 'Promise#then' do
+  it 'calls the block when the promise has already been resolved' do
+    x = 42
+    Promise.value(23).then { |v| x = v }
+    x.should == 23
+  end
+
+  it 'calls the block when the promise is resolved' do
+    a = Promise.new
+    x = 42
+
+    a.then { |v| x = v }
+    a.resolve(23)
+
+    x.should == 23
+  end
+
+  it 'works with multiple chains' do
+    x = 42
+    Promise.value(2).then { |v| v * 2 }.then { |v| v * 4 }.then { |v| x = v }
+    x.should == 16
+  end
+
+  it 'works when a block returns a promise' do
+    a = Promise.new
+    b = Promise.new
+
+    x = 42
+    a.then { b }.then { |v| x = v }
+
+    a.resolve(42)
+    b.resolve(23)
+
+    x.should == 23
+  end
+
+  it 'sends raised exceptions as rejections' do
+    x = nil
+
+    Promise.value(2).then { raise "hue" }.rescue { |v| x = v }
+
+    x.should be_kind_of(RuntimeError)
+  end
+
+  it 'sends raised exceptions inside rescue blocks as next errors' do
+    x = nil
+
+    Promise.value(2).then { raise "hue" }.rescue { raise "omg" }.rescue { |v| x = v }
+
+    x.should be_kind_of(RuntimeError)
+  end
+end

data/spec/opal/stdlib/promise/trace_spec.rb

@@ -0,0 +1,35 @@
+require 'promise'
+
+describe 'Promise#trace' do
+  it 'calls the block with all the previous results' do
+    x = 42
+
+    Promise.value(1).then { 2 }.then { 3 }.trace {|a, b, c|
+      x = a + b + c
+    }
+
+    x.should == 6
+  end
+
+  it 'calls the then after the trace' do
+    x = 42
+
+    Promise.value(1).then { 2 }.then { 3 }.trace {|a, b, c|
+      a + b + c
+    }.then { |v| x = v }
+
+    x.should == 6
+  end
+
+  it 'works after a when' do
+    x = 42
+
+    Promise.value(1).then {
+      Promise.when Promise.value(2), Promise.value(3)
+    }.trace {|a, b|
+      x = a + b[0] + b[1]
+    }
+
+    x.should == 6
+  end
+end

data/spec/opal/stdlib/promise/value_spec.rb

@@ -0,0 +1,15 @@
+require 'promise'
+
+describe 'Promise.value' do
+  it 'resolves the promise with the given value' do
+    Promise.value(23).value.should == 23
+  end
+
+  it 'marks the promise as realized' do
+    Promise.value(23).realized?.should be_true
+  end
+
+  it 'marks the promise as resolved' do
+    Promise.value(23).resolved?.should be_true
+  end
+end

data/spec/opal/stdlib/promise/when_spec.rb

@@ -0,0 +1,34 @@
+require 'promise'
+
+describe 'Promise.when' do
+  it 'calls the block with all promises results' do
+    a = Promise.new
+    b = Promise.new
+
+    x = 42
+
+    Promise.when(a, b).then {|y, z|
+      x = y + z
+    }
+
+    a.resolve(1)
+    b.resolve(2)
+
+    x.should == 3
+  end
+
+  it 'can be built lazily' do
+    a = Promise.new
+    b = Promise.value(3)
+
+    x = 42
+
+    Promise.when(a).and(b).then {|c, d|
+      x = c + d
+    }
+
+    a.resolve(2)
+
+    x.should == 5
+  end
+end

data/stdlib/base64.rb

@@ -0,0 +1,152 @@
+module Base64
+  %x{
+    var charset = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=',
+        lookup  = {};
+
+    for (var i = 0, length = charset.length; i < length; i++) {
+      lookup[charset.charAt(i)] = i;
+    }
+
+    function from(string) {
+      var buffer = [];
+
+      for (var i = 0, length = string.length; i < length; i++) {
+        var a, b, c, d;
+
+        a = lookup[string.charAt(i)];
+        b = lookup[string.charAt(++i)];
+
+        buffer.push((a << 2) | (b >> 4));
+
+        c = lookup[string.charAt(++i)];
+
+        if (c == 64) {
+          break;
+        }
+
+        buffer.push(((b & 15) << 4) | (c >> 2));
+
+        d = lookup[string.charAt(++i)];
+
+        if (d == 64) {
+          break;
+        }
+
+        buffer.push(((c & 3) << 6) | d);
+      }
+
+      return buffer;
+    }
+
+    function decode(string) {
+      var buffer = from(string),
+          result = [];
+
+      for (var i = 0, length = buffer.length; i < length; i++) {
+        if (buffer[i] < 128) {
+          result.push(String.fromCharCode(buffer[i]));
+        }
+        else if (buffer[i] > 191 && buffer[i] < 224) {
+          var a = (buffer[i] & 31) << 6,
+              b = buffer[++i] & 63;
+
+          result.push(String.fromCharCode(a | b));
+        }
+        else {
+          var a = (buffer[i] & 15) << 12,
+              b = (buffer[++i] & 63) << 6,
+              c = buffer[++i] & 63;
+
+          result.push(String.fromCharCode(a | b | c));
+        }
+      }
+
+      return result.join('');
+    }
+
+    function to(string) {
+      var buffer = [];
+
+      if (/^[\x00-\x7f]*$/.test(string)) {
+        for (var i = 0, length = string.length; i < length; i++) {
+          buffer.push(string.charCodeAt(i));
+        }
+      }
+      else {
+        for (var i = 0, length = string.length; i < length; i++) {
+          var ch = string.charCodeAt(i);
+
+          if (ch < 128) {
+            buffer.push(ch);
+          }
+          else if (ch < 2048) {
+            buffer.push((ch >> 6) | 192);
+            buffer.push((ch & 63) | 128);
+          }
+          else {
+            buffer.push((ch >> 12) | 224);
+            buffer.push(((ch >> 6) & 63) | 128);
+            buffer.push((ch & 63) | 128);
+          }
+        }
+      }
+
+      return buffer;
+    }
+
+    function encode(string) {
+      var buffer = to(string),
+          result = [];
+
+      for (var i = 0, length = buffer.length; i < length; i++) {
+        var a = buffer[i],
+            b = buffer[++i],
+            c = 0,
+            d = a >> 2,
+            e = ((a & 3) << 4) | (b >> 4),
+            f = 0,
+            g = 0;
+
+        if (isNaN(a)) {
+          f = g = 64;
+        }
+        else {
+          c = buffer[++i];
+          f = ((b & 15) << 2) | (c >> 6);
+          g = isNaN(c) ? 64 : c & 63;
+        }
+
+        result.push(charset.charAt(d));
+        result.push(charset.charAt(e));
+        result.push(charset.charAt(f));
+        result.push(charset.charAt(g));
+      }
+
+      return result.join('');
+    }
+  }
+
+  def self.decode64(string)
+    `decode(string.replace(/\r?\n/g, ''))`
+  end
+
+  def self.encode64(string)
+    `encode(string).replace(/(.{60})/g, "$1\n")`
+  end
+
+  def self.strict_decode64(string)
+    `decode(string)`
+  end
+
+  def self.strict_encode64(string)
+    `encode(string)`
+  end
+
+  def self.urlsafe_decode64(string)
+    `decode(string.replace(/\-/g, '+').replace(/_/g, '/'))`
+  end
+
+  def self.urlsafe_encode64(string)
+    `encode(string).replace(/\+/g, '-').replace(/\//g, '_')`
+  end
+end

data/stdlib/date.rb

@@ -1,35 +1,59 @@
-native_date = `Date`
-
 class Date
-  def self.wrap(native)
-    instance = allocate
-    `#{instance}._date = #{native}`
-    instance
-  end
+  class << self
+    alias civil new
 
-  def self.parse(string)
-    wrap `native_date.parse(string)`
-  end
+    def wrap(native)
+      instance = allocate
+      `#{instance}.date = #{native}`
+      instance
+    end
 
-  def self.today
-    %x{
-      var date = #{new};
-      date._date = new native_date();
-      return date;
-    }
+    def parse(string)
+      match = `/^(\d*)-(\d*)-(\d*)/.exec(string)`
+      wrap `new Date(parseInt(match[1]), parseInt(match[2]) - 1, parseInt(match[3]))`
+    end
+
+    def today
+      wrap `new Date()`
+    end
   end
 
   def initialize(year = undefined, month = undefined, day = undefined)
-    `#{self}._date = new native_date(year, month - 1, day)`
+    @date = `new Date(year, month - 1, day)`
   end
 
   def -(date)
-    `Math.round((#{self}._date - #{date}._date) / (1000 * 60 * 60 * 24))`
+    %x{
+      if (date._isNumber) {
+        var result = #{clone};
+        result.date.setDate(#@date.getDate() - date);
+        return result;
+      }
+      else if (date.date) {
+        return Math.round((#@date - #{date}.date) / (1000 * 60 * 60 * 24));
+      }
+      else {
+        #{raise TypeError};
+      }
+    }
+  end
+
+  def +(date)
+    %x{
+      if (date._isNumber) {
+        var result = #{clone};
+        result.date.setDate(#@date.getDate() + date);
+        return result;
+      }
+      else {
+        #{raise TypeError};
+      }
+    }
   end
 
   def <(other)
     %x{
-      var a = #{self}._date, b = #{other}._date;
+      var a = #@date, b = #{other}.date;
       a.setHours(0, 0, 0, 0);
       b.setHours(0, 0, 0, 0);
       return a < b;
@@ -38,7 +62,7 @@ class Date
 
   def <=(other)
     %x{
-      var a = #{self}._date, b = #{other}._date;
+      var a = #@date, b = #{other}.date;
       a.setHours(0, 0, 0, 0);
       b.setHours(0, 0, 0, 0);
       return a <= b;
@@ -47,7 +71,7 @@ class Date
 
   def >(other)
     %x{
-      var a = #{self}._date, b = #{other}._date;
+      var a = #@date, b = #{other}.date;
       a.setHours(0, 0, 0, 0);
       b.setHours(0, 0, 0, 0);
       return a > b;
@@ -56,7 +80,7 @@ class Date
 
   def >=(other)
     %x{
-      var a = #{self}._date, b = #{other}._date;
+      var a = #@date, b = #{other}.date;
       a.setHours(0, 0, 0, 0);
       b.setHours(0, 0, 0, 0);
       return a >= b;
@@ -65,73 +89,82 @@ class Date
 
   def ==(other)
     %x{
-      var a = #{self}._date, b = #{other}._date;
-      a.setHours(0, 0, 0, 0);
-      b.setHours(0, 0, 0, 0);
+      var a = #@date, b = other.date;
       return (a.getFullYear() === b.getFullYear() && a.getMonth() === b.getMonth() && a.getDate() === b.getDate());
     }
   end
 
+  alias eql? ==
+
   def clone
-    Date.wrap(`new native_date(#{self}._date.getTime())`)
+    Date.wrap(`new Date(#@date.getTime())`)
   end
 
   def day
-    `#{self}._date.getDate()`
+    `#@date.getDate()`
   end
 
   def month
-    `#{self}._date.getMonth() + 1`
+    `#@date.getMonth() + 1`
   end
 
   def next
     res = self.clone
-    `res._date.setDate(#{self}._date.getDate() + 1)`
+    `res.date.setDate(#@date.getDate() + 1)`
     res
   end
 
   def next_month
-    res = self.clone
-    `res._date.add({months: 1})`
-    res
+    %x{
+      var result = #{clone}, date = result.date, cur = date.getDate();
+      date.setDate(1);
+      date.setMonth(date.getMonth() + 1);
+      date.setDate(Math.min(cur, days_in_month(date.getFullYear(), date.getMonth())));
+      return result;
+    }
   end
 
   def prev
     res = self.clone
-    `res._date.setDate(#{self}._date.getDate() - 1)`
+    `res.date.setDate(#@date.getDate() - 1)`
     res
   end
 
   def prev_month
-    res = self.clone
-    `res._date.add({months: -1})`
-    res
+    %x{
+      var result = #{clone}, date = result.date, cur = date.getDate();
+      date.setDate(1);
+      date.setMonth(date.getMonth() - 1);
+      date.setDate(Math.min(cur, days_in_month(date.getFullYear(), date.getMonth())));
+      return result;
+    }
   end
 
   def strftime(format = '')
-    `#{self}._date.$strftime(#{format})`
+    `#@date.$strftime(#{format})`
   end
 
   def to_s
     %x{
-      var date = #{self}._date;
-      return date.getFullYear() + '-' + (date.getMonth() + 1) + '-' + date.getDate();
+      var d = #@date, year = d.getFullYear(), month = d.getMonth() + 1, day = d.getDate();
+      if (month < 10) { month = '0' + month; }
+      if (day < 10) { day = '0' + day; }
+      return year + '-' + month + '-' + day;
     }
   end
 
-  def to_json
-    to_s.to_json
-  end
-
-  def as_json
-    to_s
-  end
-
   def wday
-    `#{self}._date.getDay()`
+    `#@date.getDay()`
   end
 
   def year
-    `#{self}._date.getFullYear()`
+    `#@date.getFullYear()`
   end
+
+  %x{
+    function days_in_month(year, month) {
+      var leap = ((year % 4 === 0 && year % 100 !== 0) || year % 400 === 0);
+      return [31, (leap ? 29 : 28), 31, 30, 31, 30, 31, 31, 30, 31, 30, 31][month]
+    }
+  }
 end