dialog 0.1.0

data/lib/calendar.rb

@@ -0,0 +1,31 @@
+require 'base'
+
+module Dialog
+
+  # Displays a calendar.
+  #
+  # Corresponds to the --calendar box option. Use the date method to
+  # set the date being displayed.
+  #
+  # Example:
+  #
+  #   steps = Dialog::calendar do |m|
+  #     m.text "Bla bla"
+  #     m.date Date.today
+  #   end
+  #
+  # Box option syntax:
+  #   --calendar <text> <height> <width> <day> <month> <year>
+  class Calendar < Base
+
+    # Sets the default date to display
+    def date(d)
+      if !d.kind_of?(Date)
+        d = ParseDate::parsedate(d)
+      end
+      @options.box_options[3..5] = [d.day, d.month, d.year]
+    end
+
+  end
+
+end

data/lib/checklist.rb

@@ -0,0 +1,33 @@
+require 'base'
+require 'menu'
+
+module Dialog
+
+  # Displays a checklist
+  #
+  # Corresponds to the --checklist box option. Use the choice method to
+  # define list items
+  #
+  # Example:
+  #
+  #   steps = Dialog::checklist do |m|
+  #     m.text "Bla bla"
+  #     m.choice "/dev/hda1", "Backup partition /dev/hda1 using partimage", :on
+  #     m.choice "/dev/hda2", "Backup partition /dev/hda2 using dd", :off
+  #   end
+  #
+  # Box option syntax:
+  #   --checklist <text> <height> <width> <list height> <tag1> <item1> <status1>...
+  #
+  class Checklist < Menu
+
+    # Adds a choice to the checklist
+    def choice(tag, item, status=:on, help=nil)
+      choice = [tag, item, status.to_s]
+      choice << help unless help.nil?
+      @choices << choice
+    end
+
+  end
+
+end

data/lib/dialog.rb

@@ -0,0 +1,17 @@
+require 'calendar'
+require 'checklist'
+require 'form'
+require 'fselect'
+require 'gauge'
+require 'infobox'
+require 'inputbox'
+require 'inputmenu'
+require 'menu'
+require 'msgbox'
+require 'passwordbox'
+require 'radiolist'
+require 'tailbox'
+require 'tailboxbg'
+require 'textbox'
+require 'timebox'
+require 'yesno'

data/lib/form.rb

@@ -0,0 +1,44 @@
+require 'base'
+
+module Dialog
+
+  # Displays a form
+  #
+  # Corresponds to the --form box option. Use the field method to
+  # define form fields
+  #
+  # Example (TODO)
+  #
+  #   steps = Dialog::form do |m|
+  #     m.text "Bla bla"
+  #     m.field "/dev/hda1", "Backup partition /dev/hda1 using partimage", :on
+  #     m.field "/dev/hda2", "Backup partition /dev/hda2 using dd", :off
+  #   end
+  #
+  # Box option syntax:
+  #   --form <text> <height> <width> <form height> <label1> <l_y1> <l_x1> <item1> <i_y1> <i_x1> <flen1> <ilen1>...
+  #
+  class Form < Base
+
+    def initialize(*options)
+      @fields = []
+      super *options
+      @options.box_options[3] ||= 0 # Default form-height
+    end
+
+    # Adds a field to the form
+    def field(label, ly, lx, item, iy, ix, flen=30, ilen=0)
+      @fields << [label, ly, lx, item, iy, ix, flen, ilen]
+    end
+
+    def box_options
+      super + @fields.flatten
+    end
+
+    def form_height(v)
+      @options.box_options[3] = v
+    end
+
+  end
+
+end

data/lib/fselect.rb

@@ -0,0 +1,32 @@
+require 'base'
+
+module Dialog
+
+  # Displays a file selection box.
+  #
+  # Corresponds to the --fselect box option. Use the file method
+  # to set the file to be displayed.
+  #
+  # Example:
+  #
+  #   steps = Dialog::fselect do |m|
+  #     m.text "Select a device!"
+  #     m.file "/dev/null"
+  #   end
+  #
+  # Box option syntax:
+  #   --fselect <filepath> <height> <width>  
+  #
+  class FSelect < Base
+
+    # Sets the default file to display
+    def file(f)
+      @options.box_options[0] = case f
+        when File: f.path
+	else f.to_s
+      end
+    end
+
+  end
+
+end

data/lib/gauge.rb

@@ -0,0 +1,46 @@
+require 'base'
+
+module Dialog
+
+  # Displays a gauge.
+  #
+  # Corresponds to the --gauge box option. Use the complete method
+  # to set the initially completed part of the gauge. TODO How do
+  # we update the gauge??
+  #
+  # Example:
+  #
+  #   steps = Dialog::gauge do |m|
+  #     m.text "Please wait"
+  #     m.complete 30  # 30% complete, 0.3 works as well
+  #   end
+  #
+  # Box option syntax:
+  #   --gauge <text> <height> <width> [<percent>]
+  #
+  class Gauge < Base
+
+    # Sets the value to display
+    def complete(p)
+      @completed = case p
+        when Fixnum: p
+        when Bignum: p
+        when Float: (p*100).to_i
+        else p
+      end
+      @stdin.puts @completed if @stdin 
+    end
+
+    def arguments
+      super << @completed || 0
+    end
+
+    # Make sure wait returns by closing stdin
+    def wait
+      @stdin.close if @stdin
+      super
+    end
+
+  end
+
+end

data/lib/infobox.rb

@@ -0,0 +1,21 @@
+require 'base'
+
+module Dialog
+
+  # Displays an infobox.
+  #
+  # Corresponds to the --infobox box option.
+  #
+  # Example:
+  #
+  #   steps = Dialog::infobox do |b|
+  #     b.text "Bla bla"
+  #   end
+  #
+  # Box option syntax:
+  #   --infobox <text> <height> <width>
+  #
+  class Infobox < Base
+  end
+
+end

data/lib/inputbox.rb

@@ -0,0 +1,26 @@
+require 'base'
+
+module Dialog
+
+  # Displays an inputbox.
+  #
+  # Example:
+  #
+  #   steps = Dialog::inputbox do |b|
+  #     b.text "Bla bla"
+  #     b.value "Initial input"
+  #   end
+  #
+  # Box option syntax:
+  #  --inputbox <text> <height> <width> [<init>]
+  #
+  class Inputbox < Base
+
+    # Sets the intial value for the input box
+    def value(s)
+      @options.box_options[3] = s
+    end
+
+  end
+
+end

data/lib/inputmenu.rb

@@ -0,0 +1,22 @@
+require 'base'
+require 'menu'
+
+module Dialog
+
+  # Displays an inputmenu.
+  #
+  # Example:
+  #
+  #   Inputmenu.new do |b|
+  #     b.text "Bla bla"
+  #     m.choice "/dev/hda1", "Backup partition /dev/hda1 using partimage"
+  #     m.choice "/dev/hda2", "Backup partition /dev/hda2 using dd" 
+  #   end
+  #
+  # Box option syntax:
+  #  --inputmenu <text> <height> <width> <menu height> <tag1> <item1>...
+  #
+  class Inputmenu < Menu
+  end
+
+end

data/lib/menu.rb

@@ -0,0 +1,46 @@
+require 'base'
+
+module Dialog
+
+  # Displays a menu.
+  #
+  # Corresponds to the --menu box option. Use the choice method to
+  # create menu items.
+  #
+  # Example:
+  #
+  #   steps = Dialog::menu do |m|
+  #     m.text "Bla bla"
+  #     m.choice "/dev/hda1", "Backup partition /dev/hda1 using partimage"
+  #     m.choice "/dev/hda2", "Backup partition /dev/hda2 using dd" 
+  #   end
+  #
+  # Box option syntax:
+  #   --menu <text> <height> <width> <menu height> <tag1> <item1>...
+  #
+  class Menu < Base
+
+    def initialize(*options)
+      @choices = []
+      super *options
+      @options.box_options[3] ||= 0 # Default menu-height 
+    end
+
+    # Adds a choice to the menu
+    def choice(tag, item, help=nil)
+      choice = [tag, item]
+      choice << help unless help.nil?
+      @choices << choice
+    end
+
+    def box_options
+      super + @choices.flatten
+    end
+
+    def menu_height(v)
+     @options.box_options[3] = v 
+    end
+
+  end
+
+end

data/lib/msgbox.rb

@@ -0,0 +1,19 @@
+require 'base'
+
+module Dialog
+
+  # Displays a msgbox.
+  #
+  # Example:
+  #
+  #   steps = Msgbox.new do |b|
+  #     b.text "Bla bla"
+  #   end
+  #
+  # Box option syntax:
+  #   --msgbox <text> <height> <width>
+  #
+  class Msgbox < Base
+  end
+
+end

data/lib/passwordbox.rb

@@ -0,0 +1,20 @@
+require 'base'
+
+module Dialog
+
+  # Displays a passwordbox.
+  #
+  # Example:
+  #
+  #   Passwordbox.new do |b|
+  #     b.text "Speak friend and enter"
+  #     b.value "Mellon"
+  #   end
+  #
+  # Box option syntax:
+  #  --passwordbox  <text> <height> <width> [<init>]
+  #
+  class Passwordbox < Inputbox
+  end
+
+end

data/lib/radiolist.rb

@@ -0,0 +1,28 @@
+require 'base'
+require 'checklist'
+
+module Dialog
+
+  # Displays a radiolist
+  #
+  # Example:
+  #
+  #   Radiolist.new do |m|
+  #     m.text "Bla bla"
+  #     m.choice "/dev/hda1", "Backup partition /dev/hda1 using partimage", :on
+  #     m.choice "/dev/hda2", "Backup partition /dev/hda2 using dd"
+  #   end
+  #
+  # Box option syntax:
+  #   --radiolist <text> <height> <width> <list height> <tag1> <item1> <status1>...
+  #
+  class Radiolist < Checklist
+
+    # Adds a choice to the list
+    def choice(tag, item, status=:off, help=nil)
+      super
+    end
+
+  end
+
+end

data/lib/tailbox.rb

@@ -0,0 +1,20 @@
+require 'base'
+require 'textbox'
+
+module Dialog
+
+  # Displays a tailbox.
+  #
+  # Example:
+  #
+  #   Tailbox.new do |b|
+  #     b.text "Bla bla"
+  #   end
+  #
+  # Box option syntax:
+  #  --tailbox <file> <height> <width>
+  #
+  class Tailbox < Textbox
+  end
+
+end

data/lib/tailboxbg.rb

@@ -0,0 +1,21 @@
+require 'base'
+require 'textbox'
+
+module Dialog
+
+  # Displays a tailbox in the background.
+  #
+  # Example:
+  #
+  #   Tailboxbg.new do |b|
+  #     b.text "Bla bla"
+  #     b.file "/var/log/messages"
+  #   end
+  #
+  # Box option syntax:
+  #  --tailboxbg <file> <height> <width>
+  #
+  class Tailboxbg < Textbox
+  end
+
+end