cura 0.0.1

data/lib/cura/component/listbox.rb

@@ -0,0 +1,152 @@
+if Kernel.respond_to?(:require)
+  require "cura/component/pack"
+  require "cura/key"
+end
+
+module Cura
+  module Component
+    
+    # A component containing a selectable list of components.
+    class Listbox < Pack
+      
+      on_event(:focus) do |event|
+        if event.target == self
+          set_cursor_position
+          cursor.show
+        end
+      end
+      
+      on_event(:unfocus) do |event|
+        cursor.hide if event.target == self
+      end
+      
+      on_event(:key_down) do |event|
+        if event.target == self
+          self.selected_index -= 1 if event.name == :up
+          self.selected_index += 1 if event.name == :down
+        end
+      end
+      
+      on_event(:mouse_button) do |event|
+        if event.target == self && event.down?
+          child = @children.find { |child| child.contains_coordinates?(x: event.x, y: event.y) }
+          
+          self.selected_index = @children.index(child) unless child.nil?
+        end
+      end
+      
+      on_event(:selected) do |event|
+        set_cursor_position if event.target == self && focused?
+      end
+      
+      def initialize(attributes={})
+        @focusable = true
+        @loopable = true
+        @selected_index = 0
+        @objects = []
+        
+        super
+      end
+      
+      # Get the currently selected item's index.
+      # Returns `nil` is nothing is selected.
+      #
+      # @return [nil, Integer]
+      attr_reader :selected_index
+      
+      # Set the currently selected item's index.
+      # Set to `nil` if nothing is selected.
+      #
+      # @param [nil, #to_i] value
+      # @return [nil, Integer]
+      def selected_index=(value)
+        value = value.to_i
+        
+        if @loopable
+          value = count == 0 ? 0 : value % count # Avoids value = value % 0 (divide by zero error)
+        else
+          value = 0 if value <= 0
+          value = count - 1 if value >= count - 1
+        end
+        
+        @selected_index = value
+        
+        application.dispatch_event(:selected, target: self)
+        
+        @selected_index
+      end
+      
+      # Get the child at the selected index.
+      #
+      # @return [Component]
+      def selected_child
+        @children[@selected_index]
+      end
+      
+      # Add a child to this group.
+      #
+      # @param [Component] component
+      # @param [Object] object An arbitrary object to associate with the added child in this listbox.
+      # @return [Component]
+      def add_child(component, object=nil)
+        child = super(component)
+
+        @objects << object
+
+        child
+      end
+      
+      # Remove a child from this listbox's children at the given index.
+      #
+      # @param [#to_i] index
+      # @return [Component]
+      def delete_child_at(index)
+        deleted_child = super
+        
+        @objects.delete_at(index)
+        self.selected_index = @children.length - 1 if @selected_index >= @children.length
+        
+        deleted_child
+      end
+      
+      # Get the associated object with the child at the given index.
+      #
+      # @param [#to_i] index
+      # @return [Object]
+      def object_at(index)
+        @objects[index]
+      end
+      
+      # Get the object associated with the child at the selected index.
+      #
+      # @return [Component]
+      def selected_object
+        @objects[@selected_index]
+      end
+      
+      # Get whether this listbox is loopable or not.
+      #
+      # @return [Boolean]
+      def loopable?
+        @loopable
+      end
+      
+      # Set whether this listbox is loopable or not.
+      #
+      # @param [Object] value
+      # @return [Boolean]
+      def loopable=(value)
+        @loopable = !!value
+      end
+      
+      protected
+      
+      def set_cursor_position
+        cursor.x = @children.empty? ? absolute_x : selected_child.absolute_x
+        cursor.y = @children.empty? ? absolute_y : selected_child.absolute_y
+      end
+      
+    end
+    
+  end
+end

data/lib/cura/component/pack.rb

@@ -0,0 +1,144 @@
+if Kernel.respond_to?(:require)
+  require "cura/attributes/has_orientation"
+  require "cura/component/group"
+end
+
+module Cura
+  module Component
+    
+    # A component with children which moves and optionally resizes them.
+    # TODO: Expand attribute - See: http://www.pygtk.org/pygtk2tutorial/sec-DetailsOfBoxes.html
+    # TODO: I think the only time it needs to pack_children is right before drawing? Would that get messy?
+    class Pack < Group
+      
+      include Attributes::HasOrientation
+      
+      def initialize(attributes={})
+        @fill = false
+        @spacing = 0
+        
+        # @child_modifiers
+        super
+      end
+      
+      # Set the width dimension of this pack.
+      def width=(value)
+        result = super
+
+        pack_children
+
+        result
+      end
+
+      # Set the height dimension of this pack.
+      def height=(value)
+        result = super
+
+        pack_children
+
+        result
+      end
+
+      # Add a child to this group.
+      #
+      # @param [Component] component
+      # @param [#to_hash, #to_h] options
+      # @option options [#to_i] :expand
+      #   The new child is to be given extra space. The extra space will be divided evenly between all children that use this option.
+      # @option options [#to_i] :fill
+      #   The space given to child by the expand option is actually allocated to child, rather than just padding it.
+      #   This parameter has no effect if expand is set to false.
+      # @return [Component]
+      def add_child(component)
+        child = super
+
+        pack_children
+
+        child
+      end
+
+      # Remove a child from this object's children at the given index.
+      #
+      # @param [#to_i] index
+      # @return [Component]
+      def delete_child_at(index)
+        child = super
+
+        pack_children
+
+        child
+      end
+      
+      # Get whether children will be filled.
+      # If this pack's orientation is set to :vertical, then the children's width will be set to this pack's width.
+      # If this pack's orientation is set to :horizontal, then the children's height will be set to this pack's width.
+      #
+      # @return [Boolean]
+      def fill?
+        @fill
+      end
+      
+      # Set whether children will be filled.
+      # Must be truthy or falsey.
+      #
+      # If set to a truthy value, children will be resized to fit the space available to it.
+      # For example, if orientation is set to :horizontal, then all of the children's width attributes
+      # will be set to this instance's width.
+      #
+      # @param [Object] value
+      # @return [Boolean]
+      def fill=(value)
+        @fill = !!value
+      end
+      
+      # Get the spacing between children.
+      #
+      # @return [Integer]
+      attr_reader :spacing
+      
+      # Set the spacing between children.
+      #
+      # @param [#to_i] value
+      # @return [Integer]
+      def spacing=(value)
+        value = value.to_i
+        value = 0 if value < 0
+        
+        @spacing = value
+      end
+      
+      # Draw this pack.
+      #
+      # @return [Pack]
+      def draw
+        pack_children
+
+        super
+      end
+      
+      protected
+      
+      # Position and resize this pack's children based on it's attributes.
+      def pack_children
+        child_x = 0
+        child_y = 0
+        
+        children.each do |child|
+          if horizontal?
+            child.x = child_x
+            child_x += child.width + child.offsets.width + spacing
+            
+            child.height = height if fill?
+          elsif vertical?
+            child.y = child_y if vertical?
+            child_y += child.height + child.offsets.height + spacing
+            
+            child.width = width if fill?
+          end
+        end
+      end
+      
+    end
+    
+  end
+end

data/lib/cura/component/scrollbar.rb

@@ -0,0 +1,184 @@
+if Kernel.respond_to?(:require)
+  require "cura/attributes/has_orientation"
+  require "cura/component/group"
+  require "cura/component/button"
+end
+
+module Cura
+  module Component
+    
+    # A component for scrolling.
+    # TODO: Option to have buttons or not
+    class Scrollbar < Group
+      
+      include Attributes::HasOrientation
+      
+      def initialize(attributes={})
+        @value = 0
+        @min = 0
+        @max = 100
+        @orientation = :vertical
+        @buttons = {}
+        
+        @buttons[:decrement] = Button.new(width: 1, height: 1) { parent.decrement }
+        @buttons[:increment] = Button.new(width: 1, height: 1) { parent.increment }
+        @handle = Component.new(width: 1, height: 1)
+        
+        super
+        
+        setup_value
+        setup_buttons
+        setup_handle
+        
+        set_button_labels_based_on_orientation
+        set_button_coordinates_based_on_orientation
+        set_percentage
+        set_handle_position
+      end
+      
+      # Get the buttons for this scrollbar.
+      attr_reader :buttons
+      
+      # Get the value of this scrollbar.
+      attr_reader :value
+      
+      # Set the value of this scrollbar.
+      def value=(value)
+        raise ArgumentError, "value must respond to :to_i" unless value.respond_to?(:to_i)
+        
+        value = max if value > max
+        value = min if value < min
+        
+        @value = value.to_i
+        
+        set_percentage
+        set_handle_position
+      end
+      
+      # Get the percentage of this scrollbar.
+      attr_reader :percent
+      
+      # Set the width of this scrollbar.
+      def width=(value)
+        super
+        
+        # @width = 2 if @width == 0 # TODO: Depends on if buttons are shown or not AND orientation
+        
+        set_button_coordinates_based_on_orientation
+      end
+      
+      # Set the height of this scrollbar.
+      def height=(value)
+        super
+        
+        # @height = 2 if @height == 0 # TODO: Depends on if buttons are shown or not AND orientation
+        
+        set_button_coordinates_based_on_orientation
+      end
+      
+      # Get the minimum value of this scrollbar.
+      attr_reader :min
+      
+      # Set the minimum value of this scrollbar.
+      def min=(value)
+        raise ArgumentError, "min must respond to :to_i" unless value.respond_to?(:to_i)
+        
+        @min = value.to_i
+      end
+      
+      # Get the maximum value of this scrollbar.
+      attr_reader :max
+      
+      # Set the maximum value of this scrollbar.
+      def max=(value)
+        raise ArgumentError, "max must respond to :to_i" unless value.respond_to?(:to_i)
+        
+        @max = value.to_i
+      end
+      
+      # Set the orientation of this scrollbar.
+      def orientation=(value)
+        super
+        
+        set_button_labels_based_on_orientation
+      end
+      
+      # Increment the value of this scrollbar by the given number.
+      def increment(value=1)
+        raise ArgumentError, "value must respond to :to_i" unless value.respond_to?(:to_i)
+        
+        self.value += value.to_i
+      end
+      
+      # Decrement the value of this scrollbar by the given number.
+      def decrement(value=1)
+        raise ArgumentError, "value must respond to :to_i" unless value.respond_to?(:to_i)
+        
+        self.value -= value.to_i
+      end
+      
+      protected
+      
+      def setup_value
+        @value = min if value < min
+        @value = max if value > max
+      end
+      
+      def setup_buttons
+        @buttons.each do |_, button|
+          button.foreground = foreground
+          button.background = background
+          
+          add(button)
+        end
+      end
+      
+      def setup_handle
+        @handle.foreground = background
+        @handle.background = foreground
+        
+        add(@handle)
+      end
+      
+      def set_button_labels_based_on_orientation
+        if vertical?
+          @buttons[:decrement].text = "˄"
+          @buttons[:increment].text = "˅"
+        elsif horizontal?
+          @buttons[:decrement].text = "˂"
+          @buttons[:increment].text = "˃"
+        end
+      end
+      
+      def set_button_coordinates_based_on_orientation
+        if vertical?
+          @buttons[:increment].x = 0
+          @buttons[:increment].y = height - 1
+        elsif horizontal?
+          @buttons[:increment].x = width - 1
+          @buttons[:increment].y = 0
+        end
+      end
+      
+      def set_percentage
+        @percent = ((value.to_f - min.to_f) / (max.to_f - min.to_f) * 100.0).to_i
+      end
+      
+      def set_handle_position
+        # TODO: Only +/- padding when buttons are shown
+        dimension = (vertical? ? height : width) - 3
+        position = (dimension.to_f * percent.to_f / 100.0).to_i + 1
+        
+        if vertical?
+          @handle.x = 0
+          @handle.y = position
+        elsif horizontal?
+          @handle.x = position
+          @handle.y = 0
+        end
+      end
+      
+    end
+    
+  end
+end