lacci 0.2.1 → 0.2.2

data/lib/scarpe/glibui/app.rb

@@ -1,27 +0,0 @@
-# frozen_string_literal: true
-
-require "glimmer-dsl-libui"
-
-class Scarpe
-  # Scarpe::GlimmerLibUIApp must only be used from the main thread, due to GTK+ limitations.
-  class GlimmerLibUIApp < GlimmerLibUIWidget
-    include Glimmer
-
-    attr_reader :debug
-    attr_writer :shoes_linkable_id
-
-    def initialize(properties)
-      super
-
-      bind_shoes_event(event_name: "run") do
-        code = @document_root.display(properties)
-        puts code
-        # This is for if I want to confirm textual output. But not actually fire up the service.
-        exit if ENV["NO_RUN"]
-        eval code
-      end
-    end
-
-    attr_writer :document_root
-  end
-end

data/lib/scarpe/glibui/background.rb

@@ -1,18 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module GlimmerLibUIBackground
-    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/glibui/border.rb

@@ -1,22 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module GlimmerLibUIBorder
-    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/glibui/button.rb

@@ -1,38 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIButton < GlimmerLibUIWidget
-    def initialize(properties)
-      super
-
-      # Bind to display-side handler for "click"
-      bind("click") do
-        # This will be sent to the bind_self_event in Button
-        send_self_event(event_name: "click")
-      end
-    end
-
-    def element
-      HTML.render do |h|
-        h.button(id: html_id, onclick: handler_js_code("click"), style: style) do
-          @text
-        end
-      end
-    end
-
-    private
-
-    def style
-      styles = {}
-
-      styles[:width] = Dimensions.length(@width) if @width
-      styles[:height] = Dimensions.length(@height) if @height
-
-      styles[:top] = Dimensions.length(@top) if @top
-      styles[:left] = Dimensions.length(@left) if @left
-      styles[:position] = "absolute" if @top || @left
-
-      styles
-    end
-  end
-end

data/lib/scarpe/glibui/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/glibui/document_root.rb

@@ -1,33 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIDocumentRoot < Scarpe::GlimmerLibUIWidget
-    include Scarpe::GlimmerLibUIBackground
-
-    attr_reader :debug
-
-    def initialize(properties)
-      @callbacks = {}
-      super
-    end
-
-    def display(properties = {})
-      <<~GTEXT
-        window("#{properties["title"] || "Scarpe with GlimmerLibUI"}", #{properties["width"] || 640}, #{properties["height"] || 480}) {
-          horizontal_box {
-            #{@children.map(&:display).join}
-          }
-        }.show
-      GTEXT
-    end
-
-    def element(&blck)
-      window(&blck).show
-    end
-
-    # Bind a Scarpe callback name; see Scarpe::Widget for how the naming is set up
-    def bind(name, &block)
-      @callbacks[name] = block
-    end
-  end
-end

data/lib/scarpe/glibui/edit_box.rb

@@ -1,44 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIEditBox < Scarpe::GlimmerLibUIWidget
-    attr_reader :text, :height, :width
-
-    def initialize(properties)
-      super
-
-      # The JS handler sends a "change" event, which we forward to the Shoes widget tree
-      bind("change") do |new_text|
-        send_self_event(new_text, event_name: "change")
-      end
-    end
-
-    def properties_changed(changes)
-      t = changes.delete("text")
-      if t
-        html_element.value = t
-      end
-
-      super
-    end
-
-    def element
-      oninput = handler_js_code("change", "this.value")
-
-      HTML.render do |h|
-        h.textarea(id: html_id, oninput: oninput, style: style) { text }
-      end
-    end
-
-    private
-
-    def style
-      styles = {}
-
-      styles[:height] = Dimensions.length(height)
-      styles[:width] = Dimensions.length(width)
-
-      styles.compact
-    end
-  end
-end

data/lib/scarpe/glibui/edit_line.rb

@@ -1,43 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIEditLine < GlimmerLibUIWidget
-    attr_reader :text, :width
-
-    def initialize(properties)
-      super
-
-      # The JS handler sends a "change" event, which we forward to the Shoes widget tree
-      bind("change") do |new_text|
-        send_self_event(new_text, event_name: "change")
-      end
-    end
-
-    def properties_changed(changes)
-      t = changes.delete("text")
-      if t
-        html_element.value = t
-      end
-
-      super
-    end
-
-    def element
-      oninput = handler_js_code("change", "this.value")
-
-      HTML.render do |h|
-        h.input(id: html_id, oninput: oninput, value: @text, style: style)
-      end
-    end
-
-    private
-
-    def style
-      styles = {}
-
-      styles[:width] = Dimensions.length(@width) if @width
-
-      styles
-    end
-  end
-end

data/lib/scarpe/glibui/flow.rb

@@ -1,33 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIFlow < Scarpe::GlimmerLibUIWidget
-    include Scarpe::GlimmerLibUIBackground
-    include Scarpe::GlimmerLibUIBorder
-
-    def initialize(properties)
-      super
-    end
-
-    def display(properties = {})
-      <<~GTEXT
-        horizontal_box {
-          #{@children.map(&:display).join}
-        }.show
-      GTEXT
-    end
-
-    # Marker from webview
-    # def style
-    #   styles = super
-
-    #   styles[:display] = "flex"
-    #   styles["flex-direction"] = "row"
-    #   styles["flex-wrap"] = "wrap"
-    #   styles[:width] = Dimensions.length(@width) if @width
-    #   styles[:height] = Dimensions.length(@height) if @height
-
-    #   styles
-    # end
-  end
-end

data/lib/scarpe/glibui/html.rb

@@ -1,77 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class HTML
-    # CONTENT_TAGS = [:div, :p, :button, :ul, :li, :textarea, :a, :strong, :em, :code, :u].freeze
-    # VOID_TAGS = [:input, :img].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 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/glibui/image.rb

@@ -1,36 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIImage < GlimmerLibUIWidget
-    def initialize(properties)
-      super
-    end
-
-    def element
-      if @click
-        HTML.render do |h|
-          h.a(id: html_id, href: @click) { h.img(id: html_id, src: @url, style:) }
-        end
-      else
-        HTML.render do |h|
-          h.img(id: html_id, src: @url, style:)
-        end
-      end
-    end
-
-    private
-
-    def style
-      styles = {}
-
-      styles[:width] = Dimensions.length(@width) if @width
-      styles[:height] = Dimensions.length(@height) if @height
-
-      styles[:top] = Dimensions.length(@top) if @top
-      styles[:left] = Dimensions.length(@left) if @left
-      styles[:position] = "absolute" if @top || @left
-
-      styles
-    end
-  end
-end

data/lib/scarpe/glibui/link.rb

@@ -1,29 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUILink < GlimmerLibUIWidget
-    def initialize(properties)
-      super
-
-      bind("click") do
-        send_self_event(event_name: "click")
-      end
-    end
-
-    def element
-      HTML.render do |h|
-        h.a(**attributes) do
-          @text
-        end
-      end
-    end
-
-    def attributes
-      {
-        id: html_id,
-        href: @click,
-        onclick: (handler_js_code("click") if @has_block),
-      }.compact
-    end
-  end
-end

data/lib/scarpe/glibui/local_display.rb

@@ -1,62 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIDisplayService
-    class << self
-      attr_accessor :instance
-    end
-
-    attr_reader :app
-    attr_reader :doc_root
-
-    def initialize
-      if GlimmerLibUIDisplayService.instance
-        raise "ERROR! This is meant to be a singleton!"
-      end
-
-      GlimmerLibUIDisplayService.instance = self
-
-      @display_widget_for = {}
-    end
-
-    def create_display_widget_for(widget_class_name, widget_id, properties)
-      if widget_class_name == "App"
-        unless @doc_root
-          raise "GlimmerLibUIDocumentRoot is supposed to be created before GlimmerLibUIApp!"
-        end
-
-        display_app = Scarpe::GlimmerLibUIApp.new(properties)
-        display_app.document_root = @doc_root
-        @app = display_app
-
-        set_widget_pairing(widget_id, display_app)
-
-        return display_app
-      end
-
-      # Create a corresponding display widget
-      display_class = Scarpe::GlimmerLibUIWidget.display_class_for(widget_class_name)
-      display_widget = display_class.new(properties)
-      set_widget_pairing(widget_id, display_widget)
-
-      if widget_class_name == "DocumentRoot"
-        @doc_root = display_widget
-      end
-
-      display_widget
-    end
-
-    def set_widget_pairing(id, display_widget)
-      @display_widget_for[id] = display_widget
-    end
-
-    def query_display_widget_for(id, nil_ok: false)
-      display_widget = @display_widget_for[id]
-      unless display_widget || nil_ok
-        raise "Could not find display widget for linkable ID #{id.inspect}!"
-      end
-
-      display_widget
-    end
-  end
-end

data/lib/scarpe/glibui/para.rb

@@ -1,84 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIPara < GlimmerLibUIWidget
-    SIZES = {
-      inscription: 10,
-      ins: 10,
-      para: 12,
-      caption: 14,
-      tagline: 18,
-      subtitle: 26,
-      title: 34,
-      banner: 48,
-    }.freeze
-    private_constant :SIZES
-
-    def initialize(properties)
-      @properties = properties
-      super
-    end
-
-    def properties_changed(changes)
-      items = changes.delete("text_items")
-      if items
-        # we might need this to extend para in new prs?
-        return
-      end
-
-      super
-    end
-
-    def display
-      <<~GLIMMER_CODE
-        area {
-          text {
-            string "#{@properties["text_items"].join(", ")}"
-          }
-        }
-      GLIMMER_CODE
-    end
-
-    def items_to_display_children(items)
-      return [] if items.nil?
-
-      items.map do |item|
-        if item.is_a?(String)
-          item
-        else
-          GlimmerLibUIDisplayService.instance.query_display_widget_for(item)
-        end
-      end
-    end
-
-    private
-
-    # hangon for future para prs
-    def child_markup
-      items_to_display_children(@text_items).map do |child|
-        if child.respond_to?(:to_html)
-          child.to_html
-        else
-          child
-        end
-      end.join
-    end
-
-    def options
-      @html_attributes.merge(id: html_id, style: style)
-    end
-
-    def style
-      {
-        "color" => @stroke,
-        "font-size" => font_size,
-      }.compact
-    end
-
-    def font_size
-      font_size = @size.is_a?(Symbol) ? SIZES[@size] : @size
-
-      Dimensions.length(font_size)
-    end
-  end
-end

data/lib/scarpe/glibui/spacing.rb

@@ -1,41 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  module GlimmerLibUISpacing
-    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/glibui/stack.rb

@@ -1,33 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIStack < Scarpe::GlimmerLibUIWidget
-    include Scarpe::GlimmerLibUIBackground
-    include Scarpe::GlimmerLibUIBorder
-    include Scarpe::GlimmerLibUISpacing
-
-    def initialize(properties)
-      super
-    end
-
-    def display(properties = {})
-      <<~GTEXT
-        vertical_box {
-          #{@children.map(&:display).join}
-        }.show
-      GTEXT
-    end
-    # Marker from webview
-    # def style
-    #   styles = super
-
-    #   styles[:display] = "flex"
-    #   styles["flex-direction"] = "column"
-    #   styles[:width] = Dimensions.length(@width) if @width
-    #   styles[:height] = Dimensions.length(@height) if @height
-    #   styles["overflow"] = "auto" if @scroll
-
-    #   styles
-    # end
-  end
-end

data/lib/scarpe/glibui/text_widget.rb

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