glimmer-dsl-opal 0.0.6 → 0.2.0

data/VERSION

@@ -1 +1 @@
-0.0.6
+0.2.0

data/lib/glimmer-dsl-opal.rb

@@ -1,10 +1,45 @@
 require 'opal'
-require 'opal-parser'
-require 'glimmer'
 
-GLIMMER_DSL_OPAL_ROOT = File.expand_path('../..', __FILE__)
-GLIMMER_DSL_OPAL_LIB = File.join(GLIMMER_DSL_OPAL_ROOT, 'lib')
+if RUBY_PLATFORM == 'opal'
+  GLIMMER_DSL_OPAL_ROOT = File.expand_path('../..', __FILE__)
+  GLIMMER_DSL_OPAL_LIB = File.join(GLIMMER_DSL_OPAL_ROOT, 'lib')
+  GLIMMER_DSL_OPAL_MISSING = File.join(GLIMMER_DSL_OPAL_ROOT, 'lib', 'glimmer-dsl-opal', 'missing')
+   
+  $LOAD_PATH.unshift(GLIMMER_DSL_OPAL_LIB)
+  $LOAD_PATH.unshift(GLIMMER_DSL_OPAL_MISSING) # missing Ruby classes/methods
+  
+  require 'native' # move this to opal-async
+  require 'opal-async'
+  require 'async/ext'
+  require 'glimmer-dsl-opal/vendor/jquery'
+  require 'opal-jquery'
+  require 'glimmer'
+  require 'facets/hash/symbolize_keys'  
+  require 'glimmer-dsl-opal/ext/exception'
 
-$LOAD_PATH.unshift(GLIMMER_DSL_OPAL_LIB)
-
-require 'glimmer/dsl/opal/dsl' 
+  # Spiking async logging
+#   logger = Glimmer::Config.logger
+#   original_add_method = logger.class.instance_method(:add)
+#   logger.define_singleton_method("__original_add", original_add_method)
+#   logger.singleton_class.send(:define_method, :add) do |*args|
+#     Async::Timeout.new 10000 do
+#       __original_add(*args)
+#     end
+#   end  
+      
+  require 'glimmer/dsl/opal/dsl'
+  require 'glimmer/data_binding/ext/observable_model'
+   
+  require 'glimmer-dsl-xml'
+  require 'glimmer-dsl-css'
+  Element.alias_native :replace_with, :replaceWith
+  
+#   Glimmer::Config.loop_max_count = 20
+  
+  Glimmer::Config.excluded_keyword_checkers << lambda do |method_symbol, *args|
+    method = method_symbol.to_s
+    result = false
+    result ||= method == '<<'
+  end
+  
+end

data/lib/glimmer-dsl-opal/ext/exception.rb

@@ -0,0 +1,5 @@
+class Exception
+  def full_message
+    backtrace.join("\n")
+  end
+end

data/lib/glimmer-dsl-opal/missing/net/http.rb

@@ -0,0 +1,17 @@
+# Missing Net module class methods TODO implement
+
+require_relative '../uri'
+
+module Net
+  # TODO Implement HTTP with jQuery for use in Glimmer DSL for Opal
+  # Note: ignore Protocol superclass for now
+  class HTTP
+    def post_form(uri, params)
+#       pd uri.scheme
+#       pd uri.host
+#       pd uri.path
+#       pd uri.query
+#       pd params
+    end
+  end
+end

data/lib/glimmer-dsl-opal/missing/uri.rb

@@ -0,0 +1,26 @@
+# Missing URI module class features
+
+module URI
+  class HTTP
+    REGEX = /([^:]+):\/\/([^\/])\/([^?]*)\??(.*)/
+    
+    def initialize(url)
+      @url = url
+      uri_match = url.match(REGEX)
+      @scheme = uri_match[1]
+      @host = uri_match[2]
+      @path = uri_match[3]
+      @query = uri_match[4]
+      # TODO fragment
+    end
+    
+    def to_s
+      url
+    end
+  end
+end
+module Kernel
+  def URI(url)
+    URI::HTTP.new(url)
+  end
+end

data/lib/{samples → glimmer-dsl-opal/samples}/elaborate/contact_manager.rb

@@ -81,9 +81,8 @@ class ContactManager
               @contact_manager_presenter.toggle_sort(:email)
             }
           }
-          items bind(@contact_manager_presenter, :results),
-          column_properties(:first_name, :last_name, :email)
-          on_mouse_down { |event|
+          items bind(@contact_manager_presenter, :results), column_properties(:first_name, :last_name, :email)
+          on_mouse_up { |event|
             table_proxy.edit_table_item(event.table_item, event.column_index)
           }
         }

data/lib/{samples → glimmer-dsl-opal/samples}/elaborate/contact_manager/contact_repository.rb

@@ -1,3 +1,24 @@
+# Copyright (c) 2007-2020 Andy Maleh
+# 
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+# 
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
 require_relative "contact"
 
 class ContactManager
@@ -103,105 +124,8 @@ class ContactManager
       Jason
       Emma
       Olivia
-      Ava
-      Isabella
-      Sophia
-      Charlotte
-      Mia
-      Amelia
-      Harper
-      Evelyn
-      Abigail
-      Emily
-      Elizabeth
-      Mila
-      Ella
-      Avery
-      Sofia
-      Camila
-      Aria
-      Scarlett
-      Victoria
-      Madison
-      Luna
-      Grace
-      Chloe
-      Penelope
-      Layla
-      Riley
-      Zoey
-      Nora
-      Lily
-      Eleanor
-      Hannah
-      Lillian
-      Addison
-      Aubrey
-      Ellie
-      Stella
-      Natalie
-      Zoe
-      Leah
-      Hazel
-      Violet
-      Aurora
-      Savannah
-      Audrey
-      Brooklyn
-      Bella
-      Claire
-      Skylar
-      Lucy
-      Paisley
-      Everly
-      Anna
-      Caroline
-      Nova
-      Genesis
-      Emilia
-      Kennedy
-      Samantha
-      Maya
-      Willow
-      Kinsley
-      Naomi
-      Aaliyah
-      Elena
-      Sarah
-      Ariana
-      Allison
-      Gabriella
-      Alice
-      Madelyn
-      Cora
-      Ruby
-      Eva
-      Serenity
-      Autumn
-      Adeline
-      Hailey
-      Gianna
-      Valentina
-      Isla
-      Eliana
-      Quinn
-      Nevaeh
-      Ivy
-      Sadie
-      Piper
-      Lydia
-      Alexa
-      Josephine
-      Emery
-      Julia
-      Delilah
-      Arianna
-      Vivian
-      Kaylee
-      Sophie
-      Brielle
-      Madeline
     ]
+    
     NAMES_LAST = %w[
       Smith
       Johnson
@@ -214,8 +138,9 @@ class ContactManager
       Anderson
       Taylor
     ]
+    
     def initialize(contacts = nil)
-      @contacts = contacts || 1000.times.map do |n|
+      @contacts = contacts || 100.times.map do |n|
         random_first_name_index = (rand*NAMES_FIRST.size).to_i
         random_last_name_index = (rand*NAMES_LAST.size).to_i
         first_name = NAMES_FIRST[random_first_name_index]

data/lib/{samples → glimmer-dsl-opal/samples}/elaborate/login.rb

@@ -1,4 +1,3 @@
-require "java"
 require "observer"
 
 #Presents login screen data

data/lib/{samples → glimmer-dsl-opal/samples}/elaborate/tic_tac_toe.rb

@@ -37,11 +37,11 @@ class TicTacToe
     display_game_over_message("Draw!")
   end
 
-  def display_game_over_message(message)
-    message_box = MessageBox.new(@shell.swt_widget)
-    message_box.setText("Game Over")
-    message_box.setMessage(message)
-    message_box.open
+  def display_game_over_message(message_text)
+    message_box(@shell) {
+      text 'Game Over'
+      message message_text
+    }.open
     @tic_tac_toe_board.reset
   end
 

data/lib/glimmer-dsl-opal/samples/hello/hello_combo.rb

@@ -0,0 +1,63 @@
+# Copyright (c) 2020 Andy Maleh
+# 
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+# 
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+class Person
+  attr_accessor :country, :country_options
+
+  def initialize
+    self.country_options = ['', 'Canada', 'US', 'Mexico']
+    reset_country
+  end
+
+  def reset_country
+    self.country = 'Canada'
+  end
+end
+
+class HelloCombo
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    shell {
+      row_layout(:vertical) {
+        pack false
+      }        
+      
+      text 'Hello, Combo!'      
+      
+      combo(:read_only) {
+        selection bind(person, :country)
+      }
+      
+      button {
+        text 'Reset Selection'
+        
+        on_widget_selected do
+          person.reset_country
+        end
+      }
+    }.open
+  end
+end
+
+HelloCombo.new.launch

data/lib/{samples → glimmer-dsl-opal/samples}/hello/hello_computed.rb

@@ -1,19 +1,19 @@
-require_relative "hello_computed/contact"
+require_relative 'hello_computed/contact'
 
 class HelloComputed
   include Glimmer
 
   def initialize
     @contact = Contact.new(
-      first_name: "Barry",
-      last_name: "McKibbin",
+      first_name: 'Barry',
+      last_name: 'McKibbin',
       year_of_birth: 1985
     )
   end
 
   def launch
     shell {
-      text "Hello Computed"
+      text 'Hello, Computed!'
       composite {
         grid_layout {
           num_columns 2
@@ -21,44 +21,44 @@ class HelloComputed
           horizontal_spacing 20
           vertical_spacing 10
         }
-        label {text "First &Name: "}
+        label {text 'First &Name: '}
         text {
           text bind(@contact, :first_name)
           layout_data {
-            horizontalAlignment :fill
-            grabExcessHorizontalSpace true
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
           }
         }
-        label {text "&Last Name: "}
+        label {text '&Last Name: '}
         text {
           text bind(@contact, :last_name)
           layout_data {
-            horizontalAlignment :fill
-            grabExcessHorizontalSpace true
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
           }
         }
-        label {text "&Year of Birth: "}
+        label {text '&Year of Birth: '}
         text {
           text bind(@contact, :year_of_birth)
           layout_data {
-            horizontalAlignment :fill
-            grabExcessHorizontalSpace true
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
           }
         }
-        label {text "Name: "}
+        label {text 'Name: '}
         label {
           text bind(@contact, :name, computed_by: [:first_name, :last_name])
           layout_data {
-            horizontalAlignment :fill
-            grabExcessHorizontalSpace true
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
           }
         }
-        label {text "Age: "}
+        label {text 'Age: '}
         label {
           text bind(@contact, :age, on_write: :to_i, computed_by: [:year_of_birth])
           layout_data {
-            horizontalAlignment :fill
-            grabExcessHorizontalSpace true
+            horizontal_alignment :fill
+            grab_excess_horizontal_space true
           }
         }
       }