scarpe 0.2.1 → 0.3.0

data/lib/scarpe/wv/alert.rb

@@ -1,65 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class WebviewAlert < WebviewWidget
-    def initialize(properties)
-      super
-
-      bind("click") do
-        send_self_event(event_name: "click")
-      end
-    end
-
-    def element
-      onclick = handler_js_code("click")
-
-      HTML.render do |h|
-        h.div(id: html_id, style: overlay_style) do
-          h.div(style: modal_style) do
-            h.div(style: text_style) { @text }
-            h.button(style: button_style, onclick: onclick) { "OK" }
-          end
-        end
-      end
-    end
-
-    private
-
-    def overlay_style
-      {
-        position: "fixed",
-        top: "0",
-        left: "0",
-        width: "100%",
-        height: "100%",
-        overflow: "auto",
-        "z-index": "1",
-        background: "rgba(0,0,0,0.4)",
-        display: "flex",
-        "align-items": "center",
-        "justify-content": "center",
-      }
-    end
-
-    def modal_style
-      {
-        "min-width": "200px",
-        "min-height": "50px",
-        padding: "10px",
-        display: "flex",
-        background: "#fefefe",
-        "flex-direction": "column",
-        "justify-content": "space-between",
-        "border-radius": "9px",
-      }
-    end
-
-    def text_style
-      {}
-    end
-
-    def button_style
-      {}
-    end
-  end
-end

data/lib/scarpe/wv/background.rb

@@ -1,18 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module WebviewBackground
-    def style
-      styles = (super if defined?(super)) || {}
-      return styles unless @background_color
-
-      color = if @background_color.is_a?(Range)
-        "linear-gradient(45deg, #{@background_color.first}, #{@background_color.last})"
-      else
-        @background_color
-      end
-
-      styles.merge(background: color)
-    end
-  end
-end

data/lib/scarpe/wv/border.rb

@@ -1,22 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module WebviewBorder
-    def style
-      styles = (super if defined?(super)) || {}
-      return styles unless @border_color
-
-      border_color = if @border_color.is_a?(Range)
-        { "border-image": "linear-gradient(45deg, #{@border_color.first}, #{@border_color.last}) 1" }
-      else
-        { "border-color": @border_color }
-      end
-
-      styles.merge(
-        "border-style": "solid",
-        "border-width": "#{@options[:strokewidth] || 1}px",
-        "border-radius": "#{@options[:curve] || 0}px",
-      ).merge(border_color)
-    end
-  end
-end

data/lib/scarpe/wv/control_interface_test.rb

@@ -1,253 +0,0 @@
-# frozen_string_literal: true
-
-# The ControlInterface doesn't, by default, include much of a test framework.
-# But writing a test framework in heredocs in test_helper.rb seems bad.
-# So we write a test framework here, but don't include it by default.
-# A running shoes app won't normally include it, but unit tests will.
-
-require "json"
-
-class Scarpe
-  DEFAULT_ASSERTION_TIMEOUT = 1.0
-
-  class ControlInterface
-    def timed_out?
-      @did_time_out
-    end
-
-    def die_after(time)
-      t_start = Time.now
-      @die_after = [t_start, time]
-
-      wrangler.periodic_code("scarpeTestTimeout") do |*_args|
-        t_delta = (Time.now - t_start).to_f
-        if t_delta > time
-          @did_time_out = true
-          @log.warn("die_after - timed out after #{t_delta.inspect} (threshold: #{time.inspect})")
-          return_results(false, "Timed out!")
-          app.destroy
-        end
-      end
-    end
-
-    # This is returned alongside the actual results automatically
-    def test_metadata
-      data = {}
-      if @die_after
-        t_delta = (Time.now - @die_after[0]).to_f
-        data["die_after"] = {
-          t_start: @die_after[0].to_s,
-          threshold: @die_after[1],
-          passed: t_delta,
-        }
-      end
-      data
-    end
-
-    # This does a final return of results. If it gets called
-    # multiple times, the test fails because that's not okay.
-    def return_results(result_bool, msg, data = {})
-      result_file = ENV["SCARPE_TEST_RESULTS"] || "./scarpe_results.txt"
-
-      result_structs = [result_bool, msg, data.merge(test_metadata)]
-
-      # Multiple different sets of results is bad, even if both are passing.
-      if @results_returned && @results_returned[0..1] != result_structs[0..1]
-        # Just raising here doesn't reliably fail the test.
-        # See: https://github.com/scarpe-team/scarpe/issues/212
-        @log.error("Writing multi-result failure file to #{result_file.inspect}!")
-
-        new_res_data = { first_result: @results_returned, second_result: result_structs }.merge(test_metadata)
-        bad_result = [false, "Returned two sets of results!", new_res_data]
-        File.write(result_file, JSON.pretty_generate(bad_result))
-
-        return
-      end
-
-      @log.debug("Writing results file #{result_file.inspect} to disk!")
-      File.write(result_file, JSON.pretty_generate(result_structs))
-
-      @results_returned = result_structs
-    end
-
-    # Need to be able to query widgets in test code
-
-    def all_wv_widgets
-      known = [doc_root]
-      to_check = [doc_root]
-
-      until to_check.empty?
-        next_layer = to_check.flat_map(&:children)
-        known += next_layer
-        to_check = next_layer
-      end
-
-      # I don't *think* we'll ever have widget trees that merge back together, but just in case we'll de-dup
-      known.uniq
-    end
-
-    # Shoes doesn't name widgets. We aren't guaranteed that the Shoes widgets are even in the same
-    # process, since we have the Relay display service for Webview. So mostly we can look by
-    # display service class.
-    def find_wv_widgets(*specifiers)
-      widgets = all_wv_widgets
-
-      specifiers.each do |spec|
-        if spec.is_a?(Class)
-          widgets.select! { |w| spec === w }
-        else
-          raise "I don't know how to search for widgets by #{spec.inspect}!"
-        end
-      end
-
-      widgets
-    end
-
-    # We want an assertions library, but one that runs inside the spawned
-    # Webview sub-process.
-
-    def return_when_assertions_done
-      assertions_may_exist
-
-      wrangler.periodic_code("scarpeReturnWhenAssertionsDone") do |*_args|
-        if @assertions_pending.empty?
-          success = @assertions_failed.empty?
-          return_results success, "Assertions #{success ? "succeeded" : "failed"}", assertion_data_as_a_struct
-          app.destroy
-        end
-      end
-    end
-
-    def assertions_may_exist
-      @assertions_pending ||= {}
-      @assertions_failed ||= {}
-      @assertions_passed ||= 0
-      @assertion_counter ||= 0
-    end
-
-    def start_assertion(code)
-      assertions_may_exist
-
-      this_assertion = @assertion_counter
-      @assertion_counter += 1
-
-      @assertions_pending[this_assertion] = {
-        id: this_assertion,
-        code: code,
-      }
-
-      this_assertion
-    end
-
-    def pass_assertion(id)
-      @assertions_pending.delete(id)
-      @assertions_passed += 1
-    end
-
-    def fail_assertion(id, fail_message)
-      item = @assertions_pending.delete(id)
-      item[:fail_message] = fail_message
-      @assertions_failed[id] = item
-    end
-
-    def assertions_pending?
-      !@assertions_pending.empty?
-    end
-
-    def assertion_data_as_a_struct
-      {
-        still_pending: @assertions_pending.size,
-        succeeded: @assertions_passed,
-        failed: @assertions_failed.size,
-        failures: @assertions_failed.values.map { |item| [item[:code], item[:failure_reason]] },
-      }
-    end
-
-    # Create a promise to do a JS assertion, normally after other ops have finished.
-    def assert_js(js_code, wait_for: [], timeout: DEFAULT_ASSERTION_TIMEOUT)
-      id = start_assertion(js_code)
-
-      # this isn't a TestPromise, so it doesn't have the additional DSL entries
-      promise = wrangler.eval_js_async(js_code, wait_for: wait_for, timeout: timeout)
-      promise.on_rejected do
-        fail_assertion(id, "JS Eval failed: #{promise.reason.inspect}")
-      end
-      promise.on_fulfilled do
-        ret_val = promise.returned_value
-        if ret_val
-          pass_assertion(id)
-        else
-          fail_assertion(id, "Expected true JS value: #{ret_val.inspect}")
-        end
-      end
-
-      # So we wrap it in a no-op TestPromise, to get the DSL entries.
-      TestPromise.new(iface: self, wait_for: [promise]).to_execute {}
-    end
-
-    def assert(value, msg = nil)
-      id = start_assertion("#{caller[0]}: #{msg || "Value should be true!"}")
-
-      if value
-        pass_assertion(id)
-      else
-        fail_assertion(id, "Expected true Ruby value: #{value.inspect}")
-      end
-    end
-
-    def assert_equal(val1, val2, msg = nil)
-      assert val1 == val2, (msg || "Expected #{val2.inspect} to equal #{val1.inspect}!")
-    end
-
-    # How do we signal an error?
-    def with_js_value(js_code, wait_for: [], timeout: DEFAULT_ASSERTION_TIMEOUT, &block)
-      raise "Must give a block to with_js_value!" unless block
-
-      js_promise = wrangler.eval_js_async(js_code, wait_for: wait_for, timeout: timeout)
-      ruby_promise = TestPromise.new(iface: self, wait_for: [js_promise])
-      ruby_promise.to_execute(&block)
-      ruby_promise
-    end
-
-    def with_js_dom_html(wait_for: [], timeout: DEFAULT_ASSERTION_TIMEOUT, &block)
-      with_js_value("document.getElementById('wrapper-wvroot').innerHTML", wait_for: wait_for, timeout: timeout, &block)
-    end
-
-    def fully_updated(wait_for: [])
-      wrangler.promise_dom_fully_updated
-    end
-  end
-
-  # A Promise but with helper functions
-  class TestPromise < Promise
-    def initialize(iface:, state: nil, wait_for: [], &scheduler)
-      @iface = iface
-      super(state: state, parents: wait_for, &scheduler)
-    end
-
-    def inspect
-      "<#TestPromise::#{object_id} state=#{state.inspect} parents=#{parents.inspect} value=#{returned_value.inspect} reason=#{reason.inspect}>"
-    end
-
-    # This method expects to wait for the parent TestPromise and then run a block of Ruby that returns
-    # another promise. This is useful for wrapping Promises like those from replace() that don't have
-    # the test DSL built in. The block will execute when this outer promise is scheduled -- so we don't do
-    # a replace() too early, for instance. And then the outer promise will fulfill when the inner one does.
-    def then_ruby_promise(wait_for: [], &block)
-      ruby_wrapper_promise = TestPromise.new iface: @iface, wait_for: ([self] + wait_for)
-
-      ruby_wrapper_promise.on_scheduled do
-        inner_ruby_promise = block.call
-        inner_ruby_promise.on_fulfilled { ruby_wrapper_promise.fulfilled!(inner_ruby_promise.returned_value) }
-      end
-    end
-
-    def then_with_js_value(js_code, wait_for: [], timeout: DEFAULT_ASSERTION_TIMEOUT, &block)
-      @iface.with_js_value(js_code, wait_for: (wait_for + [self]), timeout:, &block)
-    end
-
-    def then_with_js_dom_html(wait_for: [], timeout: DEFAULT_ASSERTION_TIMEOUT, &block)
-      @iface.with_js_dom_html(wait_for: (wait_for + [self]), timeout:, &block)
-    end
-  end
-end

data/lib/scarpe/wv/dimensions.rb

@@ -1,22 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class Dimensions
-    class << self
-      def length(value)
-        case value
-        when Integer
-          if value < 0
-            "calc(100% - #{value.abs}px)"
-          else
-            "#{value}px"
-          end
-        when Float
-          "#{value * 100}%"
-        else
-          value
-        end
-      end
-    end
-  end
-end

data/lib/scarpe/wv/fill.rb

@@ -1,30 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class WebviewFill < WebviewWidget
-    def initialize(properties)
-      super(properties)
-    end
-
-    def element
-      width = @parent.get_style[:width]
-      height = @parent.get_style[:height]
-
-      HTML.render do |h|
-        h.div(id: html_id, style: style(width, height)) do
-          @text
-        end
-      end
-    end
-
-    private
-
-    def style(width, height)
-      styles = {}
-      styles[:width] = width
-      styles[:height] = height
-      styles[:background] = @color if @color
-      styles
-    end
-  end
-end

data/lib/scarpe/wv/html.rb

@@ -1,107 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class HTML
-    CONTENT_TAGS = [:div, :p, :button, :ul, :li, :textarea, :a, :strong, :em, :code, :u, :line, :span, :svg].freeze
-    VOID_TAGS = [:input, :img, :polygon, :path].freeze
-    TAGS = (CONTENT_TAGS + VOID_TAGS).freeze
-
-    class << self
-      def render(&block)
-        new(&block).value
-      end
-    end
-
-    def initialize(&block)
-      @buffer = ""
-      block.call(self)
-    end
-
-    def value
-      @buffer
-    end
-
-    def respond_to_missing?(name, include_all = false)
-      TAGS.include?(name) || super(name, include_all)
-    end
-
-    def p(*args, &block)
-      method_missing(:p, *args, &block)
-    end
-
-    def option(**attrs, &block)
-      tag(:option, **attrs, &block)
-    end
-
-    def tag(name, **attrs, &block)
-      if VOID_TAGS.include?(name)
-        raise ArgumentError, "void tag #{name} cannot have content" if block_given?
-
-        @buffer += "<#{name}#{render_attributes(attrs)} />"
-      else
-        @buffer += "<#{name}#{render_attributes(attrs)}>"
-
-        if block_given?
-          result = block.call(self)
-        else
-          result = attrs[:content]
-          @buffer += result if result.is_a?(String)
-        end
-        @buffer += result if result.is_a?(String)
-
-        @buffer += "</#{name}>"
-      end
-
-      nil
-    end
-
-    def select(**attrs, &block)
-      tag(:select, **attrs, &block)
-    end
-
-    def method_missing(name, *args, &block)
-      raise NoMethodError, "no method #{name} for #{self.class.name}" unless TAGS.include?(name)
-
-      if VOID_TAGS.include?(name)
-        raise ArgumentError, "void tag #{name} cannot have content" if block_given?
-
-        @buffer += "<#{name}#{render_attributes(*args)} />"
-      else
-        @buffer += "<#{name}#{render_attributes(*args)}>"
-
-        if block_given?
-          result = block.call(self)
-        else
-          result = args.first
-          @buffer += result if result.is_a?(String)
-        end
-        @buffer += result if result.is_a?(String)
-
-        @buffer += "</#{name}>"
-      end
-
-      nil
-    end
-
-    private
-
-    def render_attributes(attributes = {})
-      return "" if attributes.empty?
-
-      attributes[:style] = render_style(attributes[:style]) if attributes[:style]
-      attributes.compact!
-
-      return if attributes.empty?
-
-      result = attributes.map { |k, v| "#{k}=\"#{v}\"" }.join(" ")
-      " #{result}"
-    end
-
-    def render_style(style)
-      return style unless style.is_a?(Hash)
-      return if style.empty?
-
-      style.map { |k, v| "#{k}:#{v}" }.join(";")
-    end
-  end
-end

data/lib/scarpe/wv/shape_helper.rb

@@ -1,44 +0,0 @@
-# frozen_string_literal: true
-
-module ShapeHelper
-  def path_commands
-    $path_commands ||= []
-  end
-
-  def move_to(x, y)
-    validate_coordinates(x, y)
-    path_commands << "M #{x} #{y}"
-  end
-
-  def line_to(x, y)
-    validate_coordinates(x, y)
-    path_commands << "L #{x} #{y}"
-  end
-
-  def shape_path
-    path_commands_str = path_commands.join(" ")
-    path_commands_str
-  end
-
-  def colors
-    $colors ||= []
-  end
-
-  def fill(color)
-    $current_color = color
-  end
-
-  def color_for_fill
-    $current_color || "black"
-  end
-
-  private
-
-  def validate_coordinates(x, y)
-    raise ArgumentError, "Invalid coordinates: x=#{x}, y=#{y}" unless valid_coordinate?(x) && valid_coordinate?(y)
-  end
-
-  def valid_coordinate?(coordinate)
-    coordinate.is_a?(Numeric)
-  end
-end

data/lib/scarpe/wv/spacing.rb

@@ -1,41 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module WebviewSpacing
-    SPACING_DIRECTIONS = [:left, :right, :top, :bottom]
-
-    def style
-      styles = (super if defined?(super)) || {}
-
-      extract_spacing_styles_for(:margin, styles, @margin)
-      extract_spacing_styles_for(:padding, styles, @padding)
-
-      styles
-    end
-
-    def extract_spacing_styles_for(attribute, styles, values)
-      values ||= spacing_values_from_options(attribute)
-
-      case values
-      when Hash
-        values.each do |direction, value|
-          styles["#{attribute}-#{direction}"] = Dimensions.length(value)
-        end
-      when Array
-        SPACING_DIRECTIONS.zip(values).to_h.compact.each do |direction, value|
-          styles["#{attribute}-#{direction}"] = Dimensions.length(value)
-        end
-      else
-        styles[attribute] = Dimensions.length(values)
-      end
-
-      styles.compact!
-    end
-
-    def spacing_values_from_options(attribute)
-      SPACING_DIRECTIONS.map do |direction|
-        @options.delete("#{attribute}_#{direction}".to_sym)
-      end
-    end
-  end
-end

data/lib/scarpe/wv/text_widget.rb

@@ -1,30 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class WebviewTextWidget < Scarpe::WebviewWidget
-  end
-
-  class << self
-    def default_wv_text_widget_with(element)
-      webview_class_name = "Webview#{element.capitalize}"
-      webview_widget_class = Class.new(Scarpe::WebviewTextWidget) do
-        def initialize(properties)
-          class_name = self.class.name.split("::")[-1]
-          @html_tag = class_name.delete_prefix("Webview").downcase
-          super
-        end
-
-        def element
-          HTML.render do |h|
-            h.send(@html_tag) { @content.to_s }
-          end
-        end
-      end
-      Scarpe.const_set webview_class_name, webview_widget_class
-    end
-  end
-end
-
-Scarpe.default_wv_text_widget_with(:code)
-Scarpe.default_wv_text_widget_with(:em)
-Scarpe.default_wv_text_widget_with(:strong)