delve 0.0.7

data/lib/delve/path/path.rb

@@ -0,0 +1,70 @@
+class Path
+
+  @@default_options = { topology: :eight }
+  
+  def initialize(to_x, to_y, free_checker, options = Hash.new)
+    raise 'Cannot initialize path if to_x is nil' if to_x.nil?
+    raise 'Cannot initialize path if to_y is nil' if to_y.nil?
+    raise 'Cannot initialize path if free checker is nil' if free_checker.nil?
+    raise 'Cannot initialize path if free checker does not respond to #free?' unless free_checker.respond_to? :free?
+
+    @to_x = to_x
+    @to_y = to_y
+    @from_x = nil
+    @from_y = nil
+    @free_checker = free_checker
+    @options = @@default_options.merge options
+
+    @dirs = directions(options[:topology])
+  end
+
+  def compute(from_x, from_y)
+  end
+
+  private
+  def get_neighbours(cx, cy)
+    result = Array.new
+    (0..@dirs.length-1).each do |i|
+      dir = @dirs[i]
+      x = cx + dir[0]
+      y = cy + dir[1]
+
+      next unless @free_checker.free? x, y
+      result << [x, y]
+    end
+
+    result
+  end
+
+  def directions(v)
+    dirs = {
+      :four => [
+        [ 0, -1],
+        [ 1,  0],
+        [ 0,  1],
+        [-1,  0]
+      ],
+      :eight => [
+        [ 0, -1],
+        [ 1, -1],
+        [ 1,  0],
+        [ 1,  1],
+        [ 0,  1],
+        [-1,  1],
+        [-1,  0],
+        [-1, -1]
+      ],
+      :six => [
+        [-1, -1],
+        [ 1, -1],
+        [ 2,  0],
+        [ 1,  1],
+        [-1,  1],
+        [-2,  0]
+      ]
+    }
+
+    dirs[v]
+  end
+
+end

data/lib/delve/scheduler/action_scheduler.rb

@@ -0,0 +1,38 @@
+require 'delve/scheduler/scheduler'
+
+class ActionScheduler < Scheduler
+
+  @@default_duration = 1
+
+  def initialize(event_queue)
+    @duration = @@default_duration
+    super event_queue
+  end
+
+  def clear
+    super
+  end
+
+  def remove(item)
+    @duration = @@default_duration if item == @current
+    super item
+  end
+
+  def add(item, repeat, time=@@default_duration)
+    @queue.add item, time
+    super item, repeat
+  end
+
+  def set_duration(time)
+      @duration = time if @current
+  end
+
+  def next
+    if @current and !@repeat.index(@current).nil?
+      @queue.add(@current, @duration || @@default_duration)
+      @duration = @@default_duration
+    end
+    super
+  end
+
+end

data/lib/delve/scheduler/scheduler.rb

@@ -0,0 +1,37 @@
+class Scheduler
+
+  def initialize(event_queue)
+    @queue = event_queue
+    @current = nil
+    @repeat = Array.new
+  end
+
+  def time
+    @queue.time
+  end
+
+  def next
+    @current = @queue.get
+    @current
+  end
+
+  def remove(item)
+    result = @queue.remove item
+
+    index = @repeat.index item
+    @events.delete_at index if index
+
+    result
+  end
+
+  def clear
+    @queue.clear
+    @current = nil
+    @repeat = Array.new
+  end
+
+  def add(item, repeat=false)
+    @repeat << item if repeat
+  end
+
+end

data/lib/delve/scheduler/simple_scheduler.rb

@@ -0,0 +1,21 @@
+require 'delve/scheduler/scheduler'
+
+class SimpleScheduler < Scheduler
+
+  def initialize(event_queue)
+    super event_queue
+  end
+
+  def add(item, repeat)
+    @queue.add item, 0
+    super item, repeat
+  end
+
+  def next
+    if @current and !@repeat.index(@current).nil?
+      @queue.add(@current, 0)
+    end
+    super
+  end
+
+end

data/lib/delve/screen_manager.rb

@@ -0,0 +1,41 @@
+class ScreenManager
+  def initialize
+    @screen_stack = Array.new
+  end
+
+  def empty?
+    @screen_stack.empty?
+  end
+
+  def push_screen(screen)
+    @screen_stack.push screen
+  end
+
+  def pop_screen
+    @screen_stack.pop
+  end
+
+  def update(input)
+    raise 'Cannot handle key when no screens are present' if empty?
+    raise 'Cannot handle key when input is nil' unless input
+    @screen_stack.last.update input
+  end
+
+  def render(display)
+    raise 'Cannot render when no screens are present' if empty?
+    raise 'Cannot render when display is nil' unless display
+
+    bottom = @screen_stack.length - 1
+    screens = @screen_stack.length - 1
+    
+    (0..screens).reverse_each do |i|
+      if !@screen_stack[i].partial?
+        break
+      end
+      bottom = i-1
+    end
+    (bottom..screens).each do |i|
+      @screen_stack[i].render display
+    end
+  end
+end

data/lib/delve/widgets/border.rb

@@ -0,0 +1,44 @@
+class BorderWidget
+  def initialize(x, y, width, height, heading=nil, fg=:white, bg=:black)
+    raise 'Cannot initialize border widget when x is nil' unless x
+    raise 'Cannot initialize border widget when y is nil' unless y
+    raise 'Cannot initailize border widget when width is nil' unless width
+    raise 'Cannot initialize border widget when height is nil' unless height
+    raise 'Cannot initialize border widget when heading is wider than width + 4' if heading and heading.length > width + 4
+
+    @x = x
+    @y = y
+    @width = width
+    @height = height
+    @heading = heading
+    @fg = fg
+    @bg = bg
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    header_text = " #{@heading} "
+    if header_text.length.odd?
+      header_text = "#{header_text} "
+    end
+    center_point = ((@x + @width) / 2).floor
+    half_text = (header_text.length / 2).ceil
+    header_start = center_point - half_text
+    header_end = center_point + half_text
+    
+    (@x..(@x+@width-1)).each do |x|
+      char = (x == @x || x == (@x+@width-1)) ? '+' : '-'
+      if @heading and x > header_start and x <= header_end
+        char = header_text[x-header_start-1]
+      end
+      display.draw x, @y, char, @fg, @bg
+      display.draw x, (@y+@height-1), (x == @x || x == (@x+@width-1)) ? '+' : '-', @fg, @bg
+    end
+
+    ((@y+1)..(@y+@height-2)).each do |y|
+      display.draw @x, y, '|', @fg, @bg
+      display.draw (@x+@width-1), y, '|', @fg, @bg
+    end
+  end
+end

data/lib/delve/widgets/key_value.rb

@@ -0,0 +1,36 @@
+class KeyValueWidget
+  attr_accessor :value
+  
+  def initialize(x, y, label, value)
+    raise 'Cannot initialize key value widget when x is nil' unless x
+    raise 'Cannot initialize key value widget when y is nil' unless y
+    raise 'Cannot initialize key value widget when label is nil' unless label
+    raise 'Cannot initialize key value widget when value is nil' unless value
+
+    @x = x
+    @y = y
+    @label = label
+    @value = value
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    x = @x
+    @label.each_char do |c|
+      display.draw x, @y, c
+      x += 1
+    end
+
+    display.draw x, @y, ':'
+    x += 1
+    display.draw x, @y, ' '
+    x += 1
+
+    @value.each_char do |c|
+      display.draw x, @y, c
+      x += 1
+    end
+  end
+
+end

data/lib/delve/widgets/menu.rb

@@ -0,0 +1,84 @@
+class MenuWidget
+  def initialize(x, y, items, foreground=:white, background=:black, highlight=:red)
+    raise 'Cannot initialize menu widget when x is nil' unless x
+    raise 'Cannot initialize menu widget when y is nil' unless y
+    raise 'Cannot initialize menu widget when items is nil' unless items
+    raise 'Cannot initialize menu widget when items is empty' if items.empty?
+
+    @x = x
+    @y = y
+    @items = items
+    @selected_index = 0
+    @fg = foreground
+    @bg = background
+    @highlight = highlight
+  end
+
+  def selected_item
+    key = @items.keys[@selected_index]
+    @items[key]
+  end
+
+  def next
+    @selected_index += 1
+    if @selected_index >= @items.keys.length
+      @selected_index = 0
+    end
+  end
+
+  def previous
+    @selected_index -= 1
+    if @selected_index < 0
+      @selected_index = @items.keys.length - 1
+    end
+  end
+
+  def select(key)
+    return false if !@items.keys.include? key
+    @selected_index = @items.keys.index key
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    items = 0
+    @items.keys.each do |key|
+      chars = 0
+      y = determine_y display
+      @items[key].each_char do |c|
+        fg = @selected_index == items ? @bg : @fg
+        bg = @selected_index == items ? @fg : @bg
+        x = determine_x display
+        text_color = (c == key || c == key.upcase) ? @highlight : fg
+        display.draw(x + chars, y + items, c, text_color, bg)
+        chars += 1
+      end
+      items += 1
+    end
+  end
+
+  private
+  def determine_x display
+    if @x == :center
+      return (display.width / 2.0).ceil - (longest_line / 2.0).floor
+    end
+    @x
+  end
+
+  def determine_y display
+    if @y == :center
+      return ((display.height / 2.0).ceil) - (@items.keys.length / 2.0).floor
+    end
+    @y
+  end
+
+  def longest_line
+    value = -1
+    @items.keys.each do |key|
+      if value < @items[key].length
+        value = @items[key].length
+      end
+    end
+    return value
+  end
+end

data/lib/delve/widgets/multi_line.rb

@@ -0,0 +1,51 @@
+class MultiLineWidget
+  def initialize(x, y, lines)
+    raise 'Cannot initialize text widget when x is nil' unless x
+    raise 'Cannot initialize text widget when y is nil' unless y
+    raise 'Cannot initialize text widget when lines is nil' unless lines
+
+    @x = x
+    @y = y
+    @lines = lines
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    y = determine_y(display) 
+    @lines.each do |line|
+      x = determine_x(display)
+      line.each_char do |c|
+        display.draw x, y, c
+        x += 1
+      end
+      y += 1
+    end
+  end
+
+  private
+  def determine_x display
+    if @x == :center
+      return (display.width / 2.0).ceil - (longest_line / 2.0).floor
+    end 
+    @x
+  end
+
+  def determine_y display
+    if @y == :center
+      return ((display.height / 2.0).ceil) - (@lines.length / 2.0).floor
+    end
+    @y
+  end
+
+  def longest_line
+    value = -1
+    @lines.each do |line|
+      if value < line.length
+        value = line.length
+      end
+    end
+    return value
+  end
+
+end

data/lib/delve/widgets/progress.rb

@@ -0,0 +1,37 @@
+class ProgressWidget
+  attr_accessor :current, :max
+  
+  def initialize(x, y, width, current, max, fg, bg)
+    raise 'Cannot initialize progress widget when x is nil' unless x
+    raise 'Cannot initialize progress widget when y is nil' unless y
+    raise 'Cannot initialize progress widget when width is nil' unless width 
+    raise 'Cannot initialize progress widget when current value is nil' unless current
+    raise 'Cannot initialize progress widget when max value is nil' unless max
+    raise 'Cannot initialize progress widget when foreground color is nil' unless fg
+    raise 'Cannot initialize progress widget when background color is nil' unless bg
+
+    @x = x
+    @y = y
+    @width = width
+    @current = current
+    @max = max
+    @fg = fg
+    @bg = bg
+  end
+
+  def draw(display)
+    raise 'Cannot draw text when display is nil' unless display
+
+    percent = 1.0 * @current / @max
+    to_fill = (percent * @width).ceil
+
+    x = @x
+    (0..@width-1).each do |i|
+      color = i < to_fill ? @fg : @bg
+      display.draw x, @y, ' ', color, color
+      x += 1
+    end
+
+  end
+
+end