lacci 0.2.1 → 0.2.2

data/lib/scarpe/glibui/widget.rb

@@ -1,81 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class GlimmerLibUIWidget < Shoes::Linkable
-    class << self
-      def display_class_for(scarpe_class_name)
-        scarpe_class = Scarpe.const_get(scarpe_class_name)
-        unless scarpe_class.ancestors.include?(Shoes::Linkable)
-          raise "Scarpe GlimmerLibUI can only get display classes for Scarpe linkable widgets, not #{scarpe_class.inspect}!"
-        end
-
-        klass = Scarpe.const_get("GlimmerLibUI" + scarpe_class.name.split("::")[-1])
-        if klass.nil?
-          raise "Couldn't find corresponding Scarpe GlimmerLibUI class for #{scarpe_class.inspect}!"
-        end
-
-        klass
-      end
-    end
-
-    attr_reader :shoes_linkable_id
-    attr_reader :parent
-
-    def initialize(properties)
-      # Call method, which looks up the parent
-      @shoes_linkable_id = properties["shoes_linkable_id"]
-      unless @shoes_linkable_id
-        raise "Could not find property shoes_linkable_id in #{properties.inspect}!"
-      end
-
-      # Set the display properties
-      properties.each do |k, v|
-        next if k == "shoes_linkable_id"
-
-        instance_variable_set("@" + k, v)
-      end
-
-      # The parent field is *almost* simple enough that a typed display property would handle it.
-      bind_shoes_event(event_name: "parent", target: shoes_linkable_id) do |new_parent_id|
-        display_parent = GlimmerLibUIDisplayService.instance.query_display_widget_for(new_parent_id)
-        if @parent != display_parent
-          set_parent(display_parent)
-        end
-      end
-
-      super()
-    end
-
-    def set_parent(new_parent)
-      @parent&.remove_child(self)
-      new_parent&.add_child(self)
-      @parent = new_parent
-    end
-
-    protected
-
-    # Do not call directly, use set_parent
-    def remove_child(child)
-      @children ||= []
-      unless @children.include?(child)
-        puts "remove_child: no such child(#{child.inspect}) for parent(#{parent.inspect})!"
-      end
-      @children.delete(child)
-    end
-
-    # Do not call directly, use set_parent
-    def add_child(child)
-      @children ||= []
-      @children << child
-    end
-
-    public
-
-    # This binds a Scarpe JS callback, handled via a single dispatch point in the document root
-    def bind(event, &block)
-      raise("Widget has no linkable_id! #{inspect}") unless linkable_id
-
-      GlimmerLibUIDisplayService.instance.doc_root.bind("#{linkable_id}-#{event}", &block)
-    end
-  end
-end

data/lib/scarpe/glibui.rb

@@ -1,29 +0,0 @@
-# frozen_string_literal: true
-
-# Scarpe Glimmer LibUI Display Service
-
-require_relative "glibui/widget"
-require_relative "glibui/local_display"
-
-require_relative "glibui/dimensions"
-require_relative "glibui/html"
-
-require_relative "glibui/spacing"
-require_relative "glibui/background"
-require_relative "glibui/border"
-
-require_relative "glibui/app"
-require_relative "glibui/document_root"
-require_relative "glibui/para"
-require_relative "glibui/stack"
-require_relative "glibui/flow"
-require_relative "glibui/button"
-require_relative "glibui/image"
-require_relative "glibui/edit_box"
-require_relative "glibui/edit_line"
-require_relative "glibui/alert"
-
-require_relative "glibui/text_widget"
-require_relative "glibui/link"
-
-Shoes::DisplayService.set_display_service_class(Scarpe::GlimmerLibUIDisplayService)

data/lib/scarpe/libui/alert.rb

@@ -1,9 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class << self
-    def alert(text, title: "Information")
-      UI.msg_box($main_window, title, text)
-    end
-  end
-end

data/lib/scarpe/libui/button.rb

@@ -1,18 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  class << self
-    def button(text)
-      @button = UI.new_button(text)
-
-      UI.button_on_clicked(@button) do
-        puts "herpderpin in the dark"
-        yield
-      end
-
-      # We're appending this to the top level box. (Note, may want to apply to "parent" long term)
-      hbox = $parent_box ? $parent_box : $vbox
-      UI.box_append(hbox, @button, 0)
-    end
-  end
-end

data/lib/scarpe/libui/colors.rb

@@ -1,157 +0,0 @@
-# frozen_string_literal: true
-
-COLORS = {
-  aliceblue: [240, 248, 255],
-  antiquewhite: [250, 235, 215],
-  aqua: [0, 255, 255],
-  aquamarine: [127, 255, 212],
-  azure: [240, 255, 255],
-  beige: [245, 245, 220],
-  bisque: [255, 228, 196],
-  black: [0, 0, 0],
-  blanchedalmond: [255, 235, 205],
-  blue: [0, 0, 255],
-  blueviolet: [138, 43, 226],
-  brown: [165, 42, 42],
-  burlywood: [222, 184, 135],
-  cadetblue: [95, 158, 160],
-  chartreuse: [127, 255, 0],
-  chocolate: [210, 105, 30],
-  coral: [255, 127, 80],
-  cornflowerblue: [100, 149, 237],
-  cornsilk: [255, 248, 220],
-  crimson: [220, 20, 60],
-  cyan: [0, 255, 255],
-  darkblue: [0, 0, 139],
-  darkcyan: [0, 139, 139],
-  darkgoldenrod: [184, 134, 11],
-  darkgray: [169, 169, 169],
-  darkgreen: [0, 100, 0],
-  darkkhaki: [189, 183, 107],
-  darkmagenta: [139, 0, 139],
-  darkolivegreen: [85, 107, 47],
-  darkorange: [255, 140, 0],
-  darkorchid: [153, 50, 204],
-  darkred: [139, 0, 0],
-  darksalmon: [233, 150, 122],
-  darkseagreen: [143, 188, 143],
-  darkslateblue: [72, 61, 139],
-  darkslategray: [47, 79, 79],
-  darkturquoise: [0, 206, 209],
-  darkviolet: [148, 0, 211],
-  deeppink: [255, 20, 147],
-  deepskyblue: [0, 191, 255],
-  dimgray: [105, 105, 105],
-  dodgerblue: [30, 144, 255],
-  firebrick: [178, 34, 34],
-  floralwhite: [255, 250, 240],
-  forestgreen: [34, 139, 34],
-  fuchsia: [255, 0, 255],
-  gainsboro: [220, 220, 220],
-  ghostwhite: [248, 248, 255],
-  gold: [255, 215, 0],
-  goldenrod: [218, 165, 32],
-  green: [0, 128, 0],
-  greenyellow: [173, 255, 47],
-  honeydew: [240, 255, 240],
-  hotpink: [255, 105, 180],
-  indianred: [205, 92, 92],
-  indigo: [75, 0, 130],
-  ivory: [255, 255, 240],
-  khaki: [240, 230, 140],
-  lavender: [230, 230, 250],
-  lavenderblush: [255, 240, 245],
-  lawngreen: [124, 252, 0],
-  lemonchiffon: [255, 250, 205],
-  lightblue: [173, 216, 230],
-  lightcoral: [240, 128, 128],
-  lightcyan: [224, 255, 255],
-  lightgoldenrodyellow: [250, 250, 210],
-  lightgreen: [144, 238, 144],
-  lightgrey: [211, 211, 211],
-  lightpink: [255, 182, 193],
-  lightsalmon: [255, 160, 122],
-  lightseagreen: [32, 178, 170],
-  lightskyblue: [135, 206, 250],
-  lightslategray: [119, 136, 153],
-  lightsteelblue: [176, 196, 222],
-  lightyellow: [255, 255, 224],
-  lime: [0, 255, 0],
-  limegreen: [50, 205, 50],
-  linen: [250, 240, 230],
-  magenta: [255, 0, 255],
-  maroon: [128, 0, 0],
-  mediumaquamarine: [102, 205, 170],
-  mediumblue: [0, 0, 205],
-  mediumorchid: [186, 85, 211],
-  mediumpurple: [147, 112, 219],
-  mediumseagreen: [60, 179, 113],
-  mediumslateblue: [123, 104, 238],
-  mediumspringgreen: [0, 250, 154],
-  mediumturquoise: [72, 209, 204],
-  mediumvioletred: [199, 21, 133],
-  midnightblue: [25, 25, 112],
-  mintcream: [245, 255, 250],
-  mistyrose: [255, 228, 225],
-  moccasin: [255, 228, 181],
-  navajowhite: [255, 222, 173],
-  navy: [0, 0, 128],
-  oldlace: [253, 245, 230],
-  olive: [128, 128, 0],
-  olivedrab: [107, 142, 35],
-  orange: [255, 165, 0],
-  orangered: [255, 69, 0],
-  orchid: [218, 112, 214],
-  palegoldenrod: [238, 232, 170],
-  palegreen: [152, 251, 152],
-  paleturquoise: [175, 238, 238],
-  palevioletred: [219, 112, 147],
-  papayawhip: [255, 239, 213],
-  peachpuff: [255, 218, 185],
-  peru: [205, 133, 63],
-  pink: [255, 192, 203],
-  plum: [221, 160, 221],
-  powderblue: [176, 224, 230],
-  purple: [128, 0, 128],
-  red: [255, 0, 0],
-  rosybrown: [188, 143, 143],
-  royalblue: [65, 105, 225],
-  saddlebrown: [139, 69, 19],
-  salmon: [250, 128, 114],
-  sandybrown: [244, 164, 96],
-  seagreen: [46, 139, 87],
-  seashell: [255, 245, 238],
-  sienna: [160, 82, 45],
-  silver: [192, 192, 192],
-  skyblue: [135, 206, 235],
-  slateblue: [106, 90, 205],
-  slategray: [112, 128, 144],
-  snow: [255, 250, 250],
-  springgreen: [0, 255, 127],
-  steelblue: [70, 130, 180],
-  tan: [210, 180, 140],
-  teal: [0, 128, 128],
-  thistle: [216, 191, 216],
-  tomato: [255, 99, 71],
-  turquoise: [64, 224, 208],
-  violet: [238, 130, 238],
-  wheat: [245, 222, 179],
-  white: [255, 255, 255],
-  whitesmoke: [245, 245, 245],
-  yellow: [255, 255, 0],
-  yellowgreen: [154, 205, 50],
-}
-
-COLORS.each do |color, rgb|
-  define_method(color) do |alpha = 1.0|
-    rgb + [alpha]
-  end
-end
-
-def gray(darkness = 128, alpha = 1.0)
-  [darkness, darkness, darkness, alpha]
-end
-
-def rgb(r, g, b, a = 1.0)
-  [r, g, b, a]
-end

data/lib/scarpe/libui/core.rb

@@ -1,66 +0,0 @@
-# frozen_string_literal: true
-
-def method_missing(method, *args, **kwargs, &block)
-  if Scarpe::SIZES.keys.include?(method)
-    kwargs[:size] = Scarpe::SIZES[method]
-    Scarpe.para(*args, **kwargs, &block)
-  else
-    case method.to_s
-    when "alert"
-      Scarpe.alert(*args, **kwargs, &block)
-    when "button"
-      Scarpe.button(*args, **kwargs, &block)
-    when "stack"
-      Scarpe.stack(*args, **kwargs, &block)
-    when "flow"
-      Scarpe.flow(*args, **kwargs, &block)
-    else
-      super
-    end
-  end
-end
-
-def respond_to_missing?(method_name, include_private = false)
-  [
-    "alert",
-    "button",
-    "stack",
-  ].include?(method_name.to_s) || super
-end
-
-def para(*args, **kwargs)
-  Scarpe.para(*args, **kwargs)
-end
-
-class Scarpe
-  class << self
-    def app(title: "Scarpe app", height: 400, width: 400)
-      setup(title, height, width)
-      yield
-      closing_stuff
-    end
-
-    def setup(title, height, width)
-      UI.init
-
-      $main_window = UI.new_window(title, height, width, 1)
-      $vbox = UI.new_vertical_box
-      UI.window_set_child($main_window, $vbox)
-    end
-
-    def closing_stuff
-      UI.window_on_closing($main_window) do
-        puts "Bye Bye"
-        UI.control_destroy($main_window)
-        UI.quit
-        0
-      end
-
-      UI.control_show($main_window)
-
-      # Add main box to main window, close everything out
-      UI.main
-      UI.quit
-    end
-  end
-end

data/lib/scarpe/libui/flow.rb

@@ -1,16 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  # STARTING SINGLY, APPENDING TO TOP LEVEL BOX. later will do nested
-  class << self
-    # Width means nothing right now, but we'll get there
-    def flow(width: 1.0)
-      vertbox = UI.new_vertical_box
-      old_parent = $parent_box ? $parent_box : $vbox
-      $parent_box = vertbox
-      yield
-      UI.box_append(old_parent, vertbox, 1)
-      $parent_box = nil
-    end
-  end
-end

data/lib/scarpe/libui/libui.rb

@@ -1,45 +0,0 @@
-# spike
-
-# frozen_string_literal: true
-
-require "libui"
-require "debug"
-
-# Breakup
-require_relative "colors"
-require_relative "stack"
-require_relative "flow"
-require_relative "alert"
-require_relative "button"
-require_relative "para"
-require_relative "core"
-
-UI = LibUI
-
-Shoes = Scarpe
-
-Shoes.app(title: "Hello world!", height: 1000, width: 1000) do
-  title "Hello world!"
-  para "This is a paragraph", size: 10
-  flow do
-    stack do
-      inscription "Check out this paragraph",
-        stroke: red,
-        weight: "ultralight",
-        fill: yellow
-      banner "I'm just a fish though",
-        underline: "single",
-        italic: true,
-        weight: "bold",
-        stroke: darkred,
-        fill: aquamarine
-    end
-  end
-  stack do
-    flow do
-      button("Flimflam") do
-        alert "You clicked the button"
-      end
-    end
-  end
-end

data/lib/scarpe/libui/notepad.md

@@ -1,26 +0,0 @@
-```ruby
-class Object
-  def parent_caller
-    caller[0].match(/`(.*)'/)[1]
-  end
-  def all_callers
-    caller.map{|x| x.match(/`(.*)'/)[1] if self.respond_to? x.match(/`(.*)'/)[1].to_sym}.compact
-  end
-
-  def caller_key
-    caller[0].hash
-  end
-end
-all_callers
-class Hi
-  def fish
-    yield
-  end
-  def flop
-    fish do
-      all_callers
-    end
-  end
-end
-Hi.new.flop
-```

data/lib/scarpe/libui/para.rb

@@ -1,154 +0,0 @@
-# frozen_string_literal: true
-
-class Scarpe
-  SIZES = {
-    inscription: 10,
-    ins: 10,
-    para: 12,
-    caption: 14,
-    tagline: 18,
-    subtitle: 26,
-    title: 34,
-    banner: 48,
-  }.freeze
-  class << self
-    # Sure we can showcase the defaults here so folks can avoid the insanity.
-    def para(text, size: 12.0, stroke: black, weight: nil, fill: nil, underline: nil, italic: nil)
-      Para.new(
-        text,
-        size: size,
-        stroke: stroke,
-        weight: weight,
-        fill: fill,
-        underline: underline,
-        italic: italic,
-      )
-    end
-  end
-
-  class Para
-    def initialize(text, size:, stroke:, weight:, fill:, underline:, italic:)
-      # old flow for label
-      # UI.box_append($vbox, UI.new_label(text), 0)
-      @handler = UI::FFI::AreaHandler.malloc
-      @handler.to_ptr.free = Fiddle::RUBY_FREE
-      @area = UI.new_area(@handler)
-
-      str = ""
-      @attr_str = UI.new_attributed_string(str)
-
-      font_weight = case weight
-      when "ultralight"
-        UI::TextWeightUltraLight
-      when "light"
-        UI::TextWeightLight
-      when "book"
-        UI::TextWeightBook
-      when "strong"
-        UI::TextWeightBold
-      when "bold"
-        UI::TextWeightBold
-      when "ultrabold"
-        UI::TextWeightUltraBold
-      else
-        nil
-      end
-      stroke2 = stroke.dup
-      attr_builder = []
-      attr_builder << UI.new_weight_attribute(font_weight) if font_weight
-      attr_builder << UI.new_size_attribute(size) if size
-      attr_builder << UI.new_color_attribute(
-        stroke[0].to_f / 255.0, stroke[1].to_f / 255.0, stroke[2].to_f / 255.0, stroke[3].to_f || 1.0
-      ) if stroke
-      attr_builder << UI.new_background_attribute(
-        fill[0].to_f / 255.0, fill[1].to_f / 255.0, fill[2].to_f / 255.0, fill[3].to_f || 1.0
-      ) if fill
-      attr_builder << UI.new_underline_attribute(UI::UnderlineSingle) if underline == "single"
-      attr_builder << UI.new_underline_attribute(UI::UnderlineDouble) if underline == "double"
-      # NOTE- this is a boolean, not a string. and not part of core scarpe api. we set this internally.
-      attr_builder << UI.new_italic_attribute(UI::TextItalicNormal) if italic == true
-      attr_builder << UI.new_italic_attribute(UI::TextItalicItalic) if italic == "double"
-      attr_builder << UI.new_underline_color_attribute(
-        UI::UnderlineColorCustom,
-        stroke2[0].to_f / 255.0,
-        stroke2[1].to_f / 255.0,
-        stroke2[2].to_f / 255.0,
-        stroke2[3].to_f || 1.0,
-      ) if underline == "single" && stroke
-      # # UI.new_stretch_attribute(UI::TextStretchCondensed),stretch not implemented
-      append_with_attribute(
-        text,
-        *attr_builder,
-      )
-      attach_text
-    end
-
-    private
-
-    def draw_text
-      Fiddle::Closure::BlockCaller.new(0, [1, 1, 1]) do |_, _, adp|
-        area_draw_params = UI::FFI::AreaDrawParams.new(adp)
-        default_font = UI::FFI::FontDescriptor.malloc
-        default_font.to_ptr.free = Fiddle::RUBY_FREE
-        default_font.Family = "Georgia"
-        default_font.Size = 13
-        # default_font.Weight = 500
-        default_font.Italic = 0
-        default_font.Stretch = 4
-        params = UI::FFI::DrawTextLayoutParams.malloc
-        params.to_ptr.free = Fiddle::RUBY_FREE
-
-        # UI.font_button_font(font_button, default_font)
-        params.String = @attr_str
-        params.DefaultFont = default_font
-        params.Width = area_draw_params.AreaWidth
-        params.Align = 0
-        text_layout = UI.draw_new_text_layout(params)
-        UI.draw_text(area_draw_params.Context, text_layout, 0, 0)
-        UI.draw_free_text_layout(text_layout)
-      end
-    end
-
-    def attach_text
-      @handler.Draw = draw_text
-
-      # Assigning to local variables
-      # This is intended to protect Fiddle::Closure from garbage collection.
-      do_nothing = Fiddle::Closure::BlockCaller.new(0, [0]) {}
-      key_event  = Fiddle::Closure::BlockCaller.new(1, [0]) { 0 }
-      @handler.MouseEvent   = do_nothing
-      @handler.MouseCrossed = do_nothing
-      @handler.DragBroken   = do_nothing
-      @handler.KeyEvent     = key_event
-
-      # do i shove it in vbox or para_box?
-      # @para_box = UI.new_vertical_box
-      # UI.box_set_padded(@para_box, 1)
-      # debugger
-      hbox = $parent_box ? $parent_box : $vbox
-      UI.box_append(hbox, @area, 1)
-
-      # I have absolutely no idea what is going on with boxes so need to look into this next
-      # probably with stacks and flows
-      # UI.window_set_margined($main_window, 1)
-      # if $parent_box
-      # UI.window_set_child($main_window, hbox)
-      # else
-      #   UI.window_set_child($main_window, $vbox)
-      # end
-    end
-
-    def append_with_attribute(what, *args)
-      start_pos = UI.attributed_string_len(@attr_str)
-      end_pos = start_pos + what.length
-      UI.attributed_string_append_unattributed(@attr_str, what)
-      args.each do |attr|
-        # puts "*" * 80
-        # puts "attr: #{attr}"
-        # puts "*" * 80
-        # sleep 1
-        UI.attributed_string_set_attribute(@attr_str, attr, start_pos, end_pos)
-      end
-    end
-  end
-end

data/lib/scarpe/libui/stack.rb

@@ -1,34 +0,0 @@
-# frozen_string_literal: true
-
-class Object
-  def parent_caller
-    caller[0].match(/`(.*)'/)[1]
-  end
-
-  def all_callers
-    caller.map { |x| x.match(/`(.*)'/)[1] if self.respond_to? x.match(/`(.*)'/)[1].to_sym }.compact
-  end
-
-  def caller_key
-    caller[0].hash
-  end
-end
-
-def global_stack
-  @global_stack ||= {}
-end
-
-class Scarpe
-  # STARTING SINGLY, APPENDING TO TOP LEVEL BOX. later will do nested
-  class << self
-    # Width means nothing right now, but we'll get there
-    def stack(width: 1.0)
-      hbox = UI.new_horizontal_box
-      old_parent = $parent_box ? $parent_box : $vbox
-      $parent_box = hbox
-      yield
-      UI.box_append(old_parent, hbox, 1)
-      $parent_box = nil
-    end
-  end
-end

data/lib/scarpe/line.rb

@@ -1,25 +0,0 @@
-# frozen_string_literal: true
-
-require_relative "wv/shape_helper"
-
-class Scarpe
-  class Line < Shoes::Widget
-    include ShapeHelper
-
-    display_properties :left, :top, :x2, :y2, :color
-
-    def initialize(left, top, x2, y2)
-      validate_coordinates(x2, y2)
-      @left = left
-      @top = top
-      @x2 = x2
-      @y2 = y2
-      @color = color_for_fill
-
-      # validate_coordinates(x2, y2)
-
-      super()
-      create_display_widget
-    end
-  end
-end