shoes-core 4.0.0.pre8 → 4.0.0.pre9

data/lib/shoes/dsl/setup.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+class Shoes
+  class << self
+    # To ease the upgrade path from Shoes 3 we warn users they need to install
+    # and require gems themselves.
+    #
+    # @example
+    #   Shoes.setup do
+    #     gem 'bluecloth =2.0.6'
+    #     gem 'metaid'
+    #   end
+    #
+    # @param block [Proc] The block that describes the gems that are needed
+    # @deprecated
+    def setup(&block)
+      Shoes.logger.warn "The Shoes.setup method is deprecated, you need to install gems yourself.\n" \
+                        "You can do this using the 'gem install' command or bundler and a Gemfile."
+      DeprecatedShoesGemSetup.new.instance_eval(&block)
+    end
+
+    # Load the backend in memory. This does not set any configuration.
+    #
+    # @param name [String|Symbol] The name, such as :swt or :mock
+    # @return The backend
+    def load_backend(name)
+      require "shoes/#{name.to_s.downcase}"
+      Shoes.const_get(name.to_s.capitalize)
+    rescue LoadError => e
+      raise LoadError, "Couldn't load backend Shoes::#{name.capitalize}'. Error: #{e.message}\n#{e.backtrace.join("\n")}"
+    end
+  end
+
+  class DeprecatedShoesGemSetup
+    def gem(name)
+      name, version = name.split
+      install_cmd = 'gem install ' + name
+      install_cmd += " --version \"#{version}\"" if version
+      Shoes.logger.warn "To use the '#{name}' gem, install it with '#{install_cmd}', and put 'require \"#{name}\"' at the top of your Shoes program.\n" \
+                        "Shoes also supports Bundler, so you can provide a 'Gemfile' in your application directory"
+    end
+  end
+end

data/lib/shoes/dsl/style.rb

@@ -0,0 +1,81 @@
+# frozen_string_literal: true
+class Shoes
+  module DSL
+    module Style
+      # Set default style for elements of a particular class, or for all
+      # elements, or return the current defaults for all elements
+      #
+      # @overload style(klass, styles)
+      #   Set default style for elements of a particular class
+      #   @param [Class] klass a Shoes element class
+      #   @param [Hash] styles default styles for elements of klass
+      #   @example
+      #     style Para, :text_size => 42, :stroke => green
+      #
+      # @overload style(styles)
+      # Set default style for all elements
+      #   @param [Hash] styles default style for all elements
+      #   @example
+      #     style :stroke => alicewhite, :fill => black
+      #
+      # @overload style()
+      #   @return [Hash] the default style for all elements
+      def style(klass_or_styles = nil, styles = {})
+        if klass_or_styles.kind_of? Class
+          klass = klass_or_styles
+          @__app__.element_styles[klass] = styles
+        else
+          @__app__.style(klass_or_styles)
+        end
+      end
+
+      # Define app-level setter methods
+      PATTERN_APP_STYLES = [:fill, :stroke].freeze
+      OTHER_APP_STYLES = [:cap, :rotate, :strokewidth, :transform].freeze
+
+      PATTERN_APP_STYLES.each do |style|
+        define_method style do |val|
+          @__app__.style[style] = pattern(val)
+        end
+      end
+
+      OTHER_APP_STYLES.each do |style|
+        define_method style do |val|
+          @__app__.style[style] = val
+        end
+      end
+
+      def translate(left, top)
+        @__app__.style[:translate] = [left, top]
+      end
+
+      def nostroke
+        @__app__.style[:stroke] = nil
+      end
+
+      def nofill
+        @__app__.style[:fill] = nil
+      end
+
+      private
+
+      def style_normalizer
+        @style_normalizer ||= Common::StyleNormalizer.new
+      end
+
+      def pop_style(opts)
+        opts.last.class == Hash ? opts.pop : {}
+      end
+
+      # Default styles for elements of klass
+      def style_for_element(klass, styles = {})
+        @__app__.element_styles.fetch(klass, {}).merge(styles)
+      end
+
+      def normalize_style_for_element(clazz, texts)
+        style = style_normalizer.normalize(pop_style(texts))
+        style_for_element(clazz, style)
+      end
+    end
+  end
+end

data/lib/shoes/dsl/text.rb

@@ -0,0 +1,50 @@
+# frozen_string_literal: true
+class Shoes
+  module DSL
+    module Text
+      %w(banner title subtitle tagline caption para inscription).each do |method|
+        define_method method do |*texts|
+          styles = pop_style(texts)
+          klass = Shoes.const_get(method.capitalize)
+          create klass, texts, styles
+        end
+      end
+
+      TEXT_STYLES = {
+        code: { font: "Lucida Console" },
+        del: { strikethrough: true },
+        em: { emphasis: true },
+        ins: { underline: true },
+        sub: { rise: -10, size_modifier: 0.8 },
+        sup: { rise: 10, size_modifier: 0.8 },
+        strong: { weight: true },
+      }.freeze
+
+      TEXT_STYLES.keys.each do |method|
+        define_method method do |*texts|
+          styles = style_normalizer.normalize(pop_style(texts))
+          styles = TEXT_STYLES[method].merge(styles)
+          Shoes::Span.new texts, styles
+        end
+      end
+
+      def fg(*texts, color)
+        Shoes::Span.new texts,  stroke: pattern(color)
+      end
+
+      def bg(*texts, color)
+        Shoes::Span.new texts,  fill: pattern(color)
+      end
+
+      def link(*texts, &blk)
+        opts = normalize_style_for_element(Shoes::Link, texts)
+        Shoes::Link.new @__app__, texts, opts, blk
+      end
+
+      def span(*texts)
+        opts = normalize_style_for_element(Shoes::Span, texts)
+        Shoes::Span.new texts, opts
+      end
+    end
+  end
+end

data/lib/shoes/file_not_found_error.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   class FileNotFoundError < StandardError
   end

data/lib/shoes/font.rb

@@ -1,8 +1,9 @@
+# frozen_string_literal: true
 class Shoes
   FONT_DIR = DIR + "/fonts/"
 
   module Font
-    FONT_TYPES = "{ttf,ttc,otf,fnt,fon,bdf,pcf,snf,mmm,pfb,pfm}".freeze
+    FONT_TYPES = "{ttf,ttc,otf,fnt,fon,bdf,pcf,snf,mmm,pfb,pfm}"
     @loaded_fonts = {}
 
     class << self

data/lib/shoes/gradient.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   class Gradient
     include Common::Inspect

data/lib/shoes/image.rb

@@ -1,6 +1,6 @@
+# frozen_string_literal: true
 class Shoes
-  class Image
-    include Common::UIElement
+  class Image < Common::UIElement
     include Common::Clickable
     include Common::Hover
 

data/lib/shoes/image_pattern.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   class ImagePattern
     include Common::Inspect

data/lib/shoes/input_box.rb

@@ -1,6 +1,6 @@
+# frozen_string_literal: true
 class Shoes
-  class InputBox
-    include Common::UIElement
+  class InputBox < Common::UIElement
     include Common::Changeable
     include Common::State
 
@@ -33,6 +33,15 @@ class Shoes
     def caret_to(index)
       @gui.caret_to(index)
     end
+
+    def readonly?
+      state.to_s == "readonly"
+    end
+
+    def update_from_state
+      super
+      @gui.readonly = readonly?
+    end
   end
 
   class EditBox < InputBox

data/lib/shoes/internal_app.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   # This is the representation of the app that is used internally by Shoes
   # objects. It is *NOT* the app object that a user interacts with in a
@@ -9,6 +10,7 @@ class Shoes
   class InternalApp
     include Common::Clickable
     include Common::Style
+    include Common::SafelyEvaluate
     include DimensionsDelegations
 
     extend Forwardable
@@ -34,7 +36,9 @@ class Shoes
 
       self.current_slot = create_top_slot
       execution_blk = create_execution_block(blk)
+
       eval_block execution_blk
+      eval_block start_block if start_block
 
       setup_global_keypresses
       register_console_keypress
@@ -51,7 +55,8 @@ class Shoes
                 :mouse_motion, :owner, :element_styles, :resize_callbacks
     attr_accessor :elements, :current_slot, :opts, :blk, :mouse_button,
                   :mouse_pos, :mouse_hover_controls, :resizable, :app_title,
-                  :width, :height, :start_as_fullscreen, :location
+                  :width, :height, :start_as_fullscreen, :location,
+                  :start_block
 
     def_delegators :@app, :eval_with_additional_context
 
@@ -95,7 +100,7 @@ class Shoes
 
     delegated_to_gui = %w(
       fullscreen= fullscreen quit scroll_top= scroll_top
-      clipboard clipboard= gutter
+      clipboard clipboard= gutter focus open?
     )
 
     def_delegators :gui, *delegated_to_gui
@@ -136,6 +141,14 @@ class Shoes
       @resize_callbacks << blk
     end
 
+    def trigger_resize_callbacks
+      @resize_callbacks.each do |callback|
+        safely_evaluate do
+          callback.call
+        end
+      end
+    end
+
     def inspect_details
       "\"#{@app_title}\" #{@dimensions.inspect}"
     end
@@ -209,7 +222,7 @@ class Shoes
 
     def register_console_keypress
       self.class.add_global_keypress(:"alt_/") do
-        Logger.setup
+        Shoes.console.show
       end
     end
 

data/lib/shoes/key_event.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   class KeyEvent
     def initialize(app, &blk)

data/lib/shoes/line.rb

@@ -1,9 +1,8 @@
+# frozen_string_literal: true
 require 'matrix'
 
 class Shoes
-  class Line
-    include Common::ArtElement
-
+  class Line < Common::ArtElement
     attr_reader :point_a, :point_b
 
     style_with :angle, :art_styles, :dimensions, :x2, :y2

data/lib/shoes/link.rb

@@ -1,7 +1,9 @@
+# frozen_string_literal: true
 class Shoes
   class Link < Span
     include Common::Fill
     include Common::Hover
+    include Common::SafelyEvaluate
     include Common::Stroke
     include Common::Style
 

data/lib/shoes/list_box.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   class ProxyArray < SimpleDelegator
     attr_accessor :gui
@@ -24,13 +25,12 @@ class Shoes
     end
   end
 
-  class ListBox
-    include Common::UIElement
+  class ListBox < Common::UIElement
     include Common::Changeable
     include Common::State
 
     style_with :change, :choose, :common_styles, :dimensions, :items, :state, :text
-    STYLES = { width: 200, height: 20, items: [""] }.freeze
+    STYLES = { width: 200, height: 29, items: [""] }.freeze
 
     def handle_block(blk)
       change(&blk) if blk

data/lib/shoes/logger_collection.rb

@@ -0,0 +1,38 @@
+# frozen_string_literal: true
+
+class Shoes
+  class LoggerCollection
+    def initialize
+      @loggers = []
+    end
+
+    def <<(logger)
+      @loggers << logger
+      self
+    end
+
+    def debug(message)
+      forward(:debug, message)
+    end
+
+    def info(message)
+      forward(:info, message)
+    end
+
+    def warn(message)
+      forward(:warn, message)
+    end
+
+    def error(message)
+      forward(:error, message)
+    end
+
+    private
+
+    def forward(meth, message)
+      @loggers.each do |logger|
+        logger.public_send(meth, message)
+      end
+    end
+  end
+end

data/lib/shoes/mock.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 require 'shoes/mock/common_methods'
 require 'shoes/mock/clickable'
 

data/lib/shoes/mock/animation.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Animation

data/lib/shoes/mock/app.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class App

data/lib/shoes/mock/arc.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Arc

data/lib/shoes/mock/arrow.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Arrow

data/lib/shoes/mock/background.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Background

data/lib/shoes/mock/border.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Border

data/lib/shoes/mock/button.rb

@@ -1,3 +1,4 @@
+# frozen_string_literal: true
 class Shoes
   module Mock
     class Button