opal-browser 0.2.0.beta1 → 0.3.2

data/opal/browser/blob.rb

@@ -0,0 +1,94 @@
+module Browser
+
+class Blob
+  include NativeCachedWrapper
+
+  # Create a new blob from anything that Blob API supports
+  def self.create(from, options={})
+    new(`new Blob(#{Native.convert(from)}, #{options.to_n})`)
+  end
+
+  # @!attribute [r] size
+  # @return [Integer] blob size in bytes
+  def size
+    `#@native.size`
+  end
+
+  # @!attribute [r] type
+  # @return [String] blob mime type
+  def type
+    `#@native.type`
+  end
+
+  # Convert a blob to a UTF-8 encoded string.
+  #
+  # If block is given it will be called with a parameter once we receive
+  # the text. Otherwise return a {Promise} which will resolve once we
+  # receive it.
+  def text(&block)
+    promise = nil
+    unless block_given?
+      promise = Promise.new
+      block = proc { |i| promise.resolve(i) }
+    end
+    `#@native.text().then(#{block.to_n})`
+    promise
+  end
+
+  # {Buffer} view into the blob
+  #
+  # If block is given it will be called with a parameter once we receive
+  # the buffer. Otherwise return a {Promise} which will resolve once we
+  # receive it.
+  def buffer
+    promise = nil
+    unless block_given?
+      promise = Promise.new
+      block = proc { |i| promise.resolve(i) }
+    end
+    resblock = proc { |i| block.call(Buffer.new(i)) }
+    `#@native.arrayBuffer().then(#{resblock.to_n})`
+    promise
+  end
+
+  # Create a new blob by slicing this blob
+  def slice(start, finish=nil)
+    Blob.new(`#@native.slice(#{start}, #{finish})`)
+  end
+
+  # Convert a blob to an URL that can be used to reference this blob in DOM
+  # eg. display some multimedia
+  def to_url(window=$window)
+    `#{window.to_n}.URL.createObjectURL(#@native)`
+  end
+
+  # Rename a blob and return a {File} with a new name.
+  #
+  # @return [File] a renamed blob
+  def rename(new_filename)
+    File.create([self], new_filename, type: type, 
+                                      lastModified: respond_to?(:last_modified) ? 
+                                                      last_modified : Time.now)
+  end
+end
+
+class File < Blob
+  # Create a new file from anything that File API supports
+  def self.create(from, name, options={})
+    new(`new File(#{Native.convert(from)}, #{name}, #{options.to_n})`)
+  end
+
+  # @!attribute [r] last_modified
+  # @return [Time] last modified date of this file
+  def last_modified
+    Time.at(`#@native.lastModified`/1000.0)
+  end
+
+  # @!attribute [r] name
+  # @return [String] filename 
+  def name
+    `#@native.name`
+  end
+end
+
+end

data/opal/browser/canvas/data.rb

@@ -1,13 +1,3 @@
-#--
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#                    Version 2, December 2004
-#
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-#
-#  0. You just DO WHAT THE FUCK YOU WANT TO.
-#++
-
 module Browser; class Canvas
 
 class Data
@@ -27,7 +17,7 @@ class Data
     data
   end
 
-  include Native
+  include Native::Wrapper
 
   attr_reader :x, :y, :width, :height
 

data/opal/browser/canvas/gradient.rb

@@ -1,17 +1,7 @@
-#--
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#                    Version 2, December 2004
-#
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-#
-#  0. You just DO WHAT THE FUCK YOU WANT TO.
-#++
-
 module Browser; class Canvas
 
 class Gradient
-  include Native
+  include Native::Wrapper
 
   attr_reader :context
 

data/opal/browser/canvas/style.rb

@@ -1,17 +1,7 @@
-#--
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#                    Version 2, December 2004
-#
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-#
-#  0. You just DO WHAT THE FUCK YOU WANT TO.
-#++
-
 module Browser; class Canvas
 
 class StyleObject
-  include Native
+  include Native::Wrapper
 
   attr_reader :context
 
@@ -66,10 +56,12 @@ class Style < StyleObject
 
     def smooth!
       `#@native.mozImageSmoothingEnabled = #{@smooth = true}`
+      `#@native.imageSmoothingEnabled = #{@smooth = true}`
     end
 
     def no_smooth!
       `#@native.mozImageSmoothingEnabled = #{@smooth = false}`
+      `#@native.imageSmoothingEnabled = #{@smooth = false}`
     end
   end
 

data/opal/browser/canvas/text.rb

@@ -1,17 +1,7 @@
-#--
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#                    Version 2, December 2004
-#
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-#
-#  0. You just DO WHAT THE FUCK YOU WANT TO.
-#++
-
 module Browser; class Canvas
 
 class Text
-  include Native
+  include Native::Wrapper
 
   attr_reader :context
 

data/opal/browser/canvas.rb

@@ -1,15 +1,3 @@
-#--
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#                    Version 2, December 2004
-#
-#            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
-#   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
-#
-#  0. You just DO WHAT THE FUCK YOU WANT TO.
-#++
-
-require 'promise'
-
 require 'browser/canvas/style'
 require 'browser/canvas/text'
 require 'browser/canvas/data'
@@ -18,7 +6,7 @@ require 'browser/canvas/gradient'
 module Browser
 
 class Canvas
-  include Native
+  include Native::Wrapper
 
   attr_reader :element, :style, :text
 
@@ -69,6 +57,14 @@ class Canvas
     @element[:height].to_i
   end
 
+  def width=(new_width)
+    @element[:width] = new_width.to_i
+  end
+
+  def height=(new_height)
+    @element[:height] = new_height.to_i
+  end
+
   def append_to(parent)
     @element.append_to(parent)
   end
@@ -322,6 +318,14 @@ class Canvas
   def to_data(type = undefined)
     `#{@element.to_n}.toDataUrl(type)`
   end
+
+  def to_dom(*)
+    @element
+  end
+
+  def on(*args, &block); @element.on(*args, &block); end
+  def one(*args, &block); @element.one(*args, &block); end
+  def off(*args, &block); @element.off(*args, &block); end
 end
 
 Browser::DOM::Builder.for Canvas do |b, item|

data/opal/browser/console.rb

@@ -1,10 +1,12 @@
+warn "`console' has been moved to Opal's stdlib, please `require 'console'` instead." if RUBY_ENGINE_VERSION.to_f >= 0.9
+
 module Browser
 
 # Manipulate the browser console.
 #
 # @see https://developer.mozilla.org/en-US/docs/Web/API/console
 class Console
-  include Native
+  include Browser::NativeCachedWrapper
 
   # Clear the console.
   def clear

data/opal/browser/cookies.rb

@@ -1,14 +1,28 @@
-require 'stringio'
-
 module Browser
 
 # Allows manipulation of browser cookies.
 #
 # @see https://developer.mozilla.org/en-US/docs/Web/API/document.cookie
+#
+# Usage:
+#
+#   cookies = $document.cookies
+#   cookies["my-cookie"] = "monster"
+#   cookies.delete("my-cookie")
+#
+# By default, cookies are stored JSON-encoded. You can supply a `raw:` option
+# whenever you need to access/write the cookies in a raw way, eg.
+#
+#   cookies["my-other-cookie", raw: true] = 123
+#
+# You can also set this option while referencing $document.cookies, eg.
+#
+#   cookies = $document.cookies(raw: true)
+#   cookies["my-other-cookie"] = 123
 class Cookies
   # Default cookie options.
   DEFAULT = {
-    expires: Time.now + 1.day,
+    expires: Time.now + 60 * 60 * 24,
     secure:  false
   }
 
@@ -19,66 +33,83 @@ class Cookies
   # Create a new {Cookies} wrapper.
   #
   # @param document [native] the native document object
-  def initialize(document)
+  # @param options [Hash] the default cookie options
+  def initialize(document, options = {})
     @document = document
-    @options  = DEFAULT.dup
+    @options  = DEFAULT.merge(options)
   end
 
   # Access the cookie with the given name.
   #
   # @param name [String] the name of the cookie
+  # @param options [Hash] the options for the cookie
+  #
+  # @option options [Boolean] :raw     get a raw cookie value, don't encode it with JSON
   #
   # @return [Object]
-  def [](name)
-    matches = `#@document.cookie`.scan(/#{Regexp.escape(name.encode_uri_component)}=([^;]*)/)
+  def [](name, options = {})
+    options = @options.merge(options)
+
+    matches = `#@document.cookie`.scan(/#{Regexp.escape(FormData.encode(name))}=([^;]*)/)
 
     return if matches.empty?
 
-    result = matches.map {|cookie|
-      JSON.parse(cookie.match(/^.*?=(.*)$/)[1].decode_uri_component)
-    }
+    result = matches.flatten.map do |value|
+      if options[:raw]
+        FormData.decode(value)
+      else
+        JSON.parse(FormData.decode(value))
+      end
+    end
 
     result.length == 1 ? result.first : result
   end
 
   # Set a cookie.
   #
-  # Options
-  # -------
-  # + **max_age** - the max age of the cookie in seconds
-  # + **expires** - the expire date as {Time}
-  # + **path** - the path where the cookie is valid on
-  # + **domain** - the domain where the cookie is valid on
-  # + **secure** - whether the cookie is secure or not
-  #
   # @param name [String] the name of the cookie
   # @param value [Object] the data to set
   # @param options [Hash] the options for the cookie
-  def []=(name, value, options = {})
-    `#@document.cookie = #{encode name, value.is_a?(String) ? value : JSON.dump(value), @options.merge(options)}`
+  #
+  # @option options [Boolean] :raw     don't encode a value with JSON
+  # @option options [Integer] :max_age the max age of the cookie in seconds
+  # @option options [Time]    :expires the expire date
+  # @option options [String]  :path    the path the cookie is valid on
+  # @option options [String]  :domain  the domain the cookie is valid on
+  # @option options [Boolean] :secure  whether the cookie is secure or not
+  def []=(name, options = {}, value)
+    options = @options.merge(options)
+    if options[:raw]
+      string = value.to_s
+    else
+      string = JSON.dump(value)
+    end
+    encoded_value = encode(name, string, options)
+    `#@document.cookie = #{encoded_value}`
   end
 
   # Delete a cookie.
   #
   # @param name [String] the name of the cookie
-  def delete(name)
+  def delete(name, _options = {})
     `#@document.cookie = #{encode name, '', expires: Time.now}`
   end
 
   # @!attribute [r] keys
   # @return [Array<String>] all the cookie names
-  def keys
-    Array(`#@document.cookie.split(/; /)`).map {|cookie|
+  def keys(_options = {})
+    Array(`#@document.cookie.split(/; /)`).map do |cookie|
       cookie.split(/\s*=\s*/).first
-    }
+    end
   end
 
   # @!attribute [r] values
   # @return [Array] all the cookie values
-  def values
-    keys.map {|key|
-      self[key]
-    }
+  def values(options = {})
+    options = @options.merge(options)
+    keys.map do |key|
+      self[key, options]
+    end
   end
 
   # Enumerate the cookies.
@@ -86,13 +117,18 @@ class Cookies
   # @yieldparam key [String] the name of the cookie
   # @yieldparam value [String] the value of the cookie
   #
+  # @param options [Hash] the options for the cookie
+  #
+  # @option options [Boolean] :raw     don't encode a value with JSON
+  #
   # @return [self]
-  def each(&block)
-    return enum_for :each unless block
+  def each(options = {}, &block)
+    return enum_for :each, options unless block
+    options = @options.merge(options)
 
-    keys.each {|key|
-      yield key, self[key]
-    }
+    keys.each do |key|
+      yield key, self[key, options]
+    end
 
     self
   end
@@ -100,35 +136,35 @@ class Cookies
   # Delete all the cookies
   #
   # @return [self]
-  def clear
-    keys.each {|key|
+  def clear(_options = {})
+    keys.each do |key|
       delete key
-    }
+    end
 
     self
   end
 
 protected
   def encode(key, value, options = {})
-    io = StringIO.new
+    io = []
 
-    io << key.encode_uri_component << ?= << value.encode_uri_component << '; '
+    io << FormData.encode(key) << ?= << FormData.encode(value) << '; '
 
     io << 'max-age=' << options[:max_age] << '; '        if options[:max_age]
-    io << 'expires=' << options[:expires].to_utc << '; ' if options[:expires]
+    io << 'expires=' << options[:expires].utc << '; '    if options[:expires]
     io << 'path='    << options[:path] << '; '           if options[:path]
     io << 'domain='  << options[:domain] << '; '         if options[:domain]
     io << 'secure'                                       if options[:secure]
 
-    io.string
+    io.join
   end
 end
 
 class DOM::Document < DOM::Element
   # @!attribute [r] cookies
   # @return [Cookies] the cookies for the document
-  def cookies
-    Cookies.new(@native) if defined?(`#@native.cookie`)
+  def cookies(options = {})
+    Cookies.new(@native, options) if defined?(`#@native.cookie`)
   end
 end
 

data/opal/browser/crypto.rb

@@ -0,0 +1,79 @@
+module Browser
+
+# Implements (parts of) the web crypto interface
+#
+# https://developer.mozilla.org/en-US/docs/Web/API/Web_Crypto_API
+class Crypto
+  include NativeCachedWrapper
+
+  class Digest
+    def initialize(buf)
+      @buffer = Buffer.new(buf)
+    end
+
+    attr_reader :buffer
+
+    # Convert a digest to a hexadecimal string
+    def to_hex
+      buffer.to_a.map { |i| "%02x" % i }.join
+    end
+
+    # Convert a digest to a binary string
+    def to_s
+      buffer.to_a.map { |i| "%c" % i }.join
+    end
+
+    # Convert a digest to a Base64-encoded string
+    #
+    # You will need to `require "base64"`
+    def to_b64
+      Base64.strict_encode64(to_s)
+    end
+
+    # Convert a digest to a urlsafe Base64-encoded string
+    #
+    # You will need to `require "base64"`
+    def to_u64(padding: false)
+      Base64.urlsafe_encode64(to_s, padding: padding)
+    end
+  end
+
+  # Compute a cryptographic digest of data (a Buffer). If block is given,
+  # it will call a block, otherwise it will return a Promise that will
+  # return once a digest is computed.
+  #
+  # Allowed values for algo: SHA-1, SHA-256 (default), SHA-368, SHA-512.
+  #
+  # The block/promise will be given an argument of type {Digest} which can
+  # be used to format a digest.
+  #
+  # Example:
+  # ```
+  # Browser::Blob.new(['test']).buffer.then { |b|
+  #   $window.crypto.digest(b)
+  # }.then { |d|
+  #   puts d.to_hex
+  # }
+  # ```
+  def digest data, algo = 'SHA-256', &block
+    promise = nil
+    unless block_given?
+      promise = Promise.new
+      block = proc { |i| promise.resolve(i) }
+    end
+    resblock = proc { |i| block.call(Digest.new(i)) }
+
+    `#@native.subtle.digest(algo, #{Native.convert(data)}).then(#{resblock.to_n})`
+    promise
+  end
+end
+
+class Window
+  # @!attribute [r] crypto
+  # @return [Crypto] the crypto interface of this window
+  def crypto
+    @crypto ||= Crypto.new(`#@native.crypto`)
+  end
+end
+
+end

data/opal/browser/css/declaration.rb

@@ -1,7 +1,7 @@
 module Browser; module CSS
 
 class Declaration
-  include Native
+  include Browser::NativeCachedWrapper
   include Enumerable
 
   def rule

data/opal/browser/css/rule.rb

@@ -1,7 +1,7 @@
 module Browser; module CSS
 
 class Rule
-  include Native
+  include Browser::NativeCachedWrapper
 
   STYLE_RULE               = 1
   CHARSET_RULE             = 2

data/opal/browser/css/style_sheet.rb

@@ -1,10 +1,10 @@
 module Browser; module CSS
 
 class StyleSheet
-  include Native
+  include Browser::NativeCachedWrapper
 
   def initialize(what)
-    if what.is_a? DOM::Element
+    if DOM::Element === what
       super(`#{what.to_n}.sheet`)
     else
       super(what)

data/opal/browser/css.rb

@@ -4,19 +4,35 @@ require 'browser/css/rule'
 require 'browser/css/rule/style'
 
 module Kernel
-  # Create a <style> element from a string or a block using the
-  # {Browser::CSS::Builder} DSL.
+  # @overload CSS(document = $document, &block)
   #
-  # @param text [String] the CSS text
-  # @return [Browser::DOM::Element] the create <style> element
-  def CSS(text = nil, &block)
-    style = $document.create_element(:style)
+  #   Create a `<style>` element from a {Paggio::CSS} DSL.
+  #
+  #   @param document [Browser::DOM::Document] the document instance
+  #     we intend to use
+  #
+  #   @return [Browser::DOM::Element] the created `<style>` element
+  #
+  # @overload CSS(string, document = $document)
+  #
+  #   Create a `<style>` element from a string.
+  #
+  #   @param document [Browser::DOM::Document] the document instance
+  #     we intend to use
+  #
+  #   @return [Browser::DOM::Element] the created `<style>` element
+  def CSS(*args, &block)
+    document = if args.length > 1 || block_given?
+      args.pop
+    end || $document
+
+    style = document.create_element(:style)
     style[:type] = 'text/css'
 
     if block
       style.inner_text = Paggio.css(&block)
     else
-      style.inner_text = text
+      style.inner_text = args.join("")
     end
 
     style