canis 0.0.8 → 0.0.10

data/examples/testbuttons.rb

@@ -13,20 +13,20 @@ require 'canis'
 require 'canis/core/include/appmethods.rb'
 def help_text
       <<-eos
-               BUTTONS  HELP 
+               BUTTONS  HELP
 
       This is some help text for testbuttons.
       To select any button press the SPACEBAR, although ENTER will also work.
       You may also press the mnemonic or hotkey on the label..
 
-      The toggle button toggles the kind of dialog for the Cancel button. Modern look 
+      The toggle button toggles the kind of dialog for the Cancel button. Modern look
       and feel refers to a popup with buttons. This is like the links editor.
 
       Classic look and feel refers to a line at the bottom of the screen, with a y/n prompt.
       THis is like a lot of older apps, i think Pine and maybe vim.
 
 
-      Alt-c/F10 -   Exit application 
+      Alt-c/F10 -   Exit application
 
 
 
@@ -42,7 +42,7 @@ if $0 == __FILE__
   # Initialize curses
     Canis::start_ncurses  # this is initializing colors via ColorMap.setup
     path = File.join(ENV["LOGDIR"] || "./" ,"canis14.log")
-    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT)
     $log = Logger.new(path)
     $log.level = Logger::DEBUG
 
@@ -50,8 +50,8 @@ if $0 == __FILE__
     @lookfeel = :dialog # or :classic
 
     @window = Canis::Window.root_window
-    # Initialize few color pairs 
-    # Create the window to be associated with the form 
+    # Initialize few color pairs
+    # Create the window to be associated with the form
     # Un post form and free the memory
 
     catch(:close) do
@@ -67,7 +67,7 @@ if $0 == __FILE__
 
       _mess = "Message Comes Here"
       message_label = Canis::Label.new @form, {text: _mess,
-        :name=>"message_label",:row => Ncurses.LINES-1, :col => 1, :width => 60,  
+        :name=>"message_label",:row => Ncurses.LINES-1, :col => 1, :width => 60,
         :height => 2, :color => :cyan}
 
       $results = Variable.new
@@ -108,7 +108,7 @@ if $0 == __FILE__
         mnemonic('T')
         #underline 0
       togglebutton.command do
-        if togglebutton.value 
+        if togglebutton.value
           message_label.text "Modern look and feel for dialogs"
         else
           message_label.text "Classic look and feel for dialogs"
@@ -119,20 +119,20 @@ if $0 == __FILE__
       @form.bind(:LEAVE) { |f|  f.label && f.label.bgcolor = 'black'   if f.respond_to? :label}
 
       row += 1
-      colorlabel = Label.new @form, {'text' => "Select a color:", "row" => row, "col" => col, 
+      colorlabel = Label.new @form, {'text' => "Select a color:", "row" => row, "col" => col,
         "color"=>"cyan", "mnemonic" => 'S'}
       #$radio = Variable.new
       #$radio.update_command(colorlabel) {|tv, label|  label.color tv.value; }
 #
-      #$radio.update_command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget; 
+      #$radio.update_command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget;
         #e.bgcolor tv.value };  }
 
       # whenever updated set colorlabel and messagelabel to bold
-      $results.update_command(colorlabel,checkbutton) {|tv, label, cb| 
+      $results.update_command(colorlabel,checkbutton) {|tv, label, cb|
         attrs =  cb.value ? 'bold' : 'normal'; label.attr(attrs); message_label.attr(attrs)}
 
 
-      checkbutton1.command do 
+      checkbutton1.command do
         attrs =  checkbutton1.value ? 'reverse' : 'normal'; colorlabel.attr(attrs); message_label.attr(attrs)
       end
       row += 1
@@ -178,17 +178,17 @@ if $0 == __FILE__
       end
       #$radio.update_command(colorlabel) {|tv, label|  label.color tv.value; }
 #
-      #$radio.update_command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget; 
+      #$radio.update_command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget;
         #e.bgcolor tv.value };  }
       colorlabel.label_for radio1
 
       group = ButtonGroup.new
-      [radio1, radio2, radio11, radio22].each { |r| 
+      [radio1, radio2, radio11, radio22].each { |r|
         group.add r
       }
       group.command(colorlabel) {|tv, label|  label.color tv.value; }
 #
-      group.command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget; 
+      group.command() {|tv|  @form.widgets.each { |e| next unless e.is_a? Widget;
         e.bgcolor tv.value };  }
 
       # instead of using frozen, I will use a PropertyVeto
@@ -202,7 +202,7 @@ if $0 == __FILE__
             raise PropertyVetoException.new("Cannot change this!", e)
         end
       }
-      [radio1, radio2, radio11, radio22].each { |r| 
+      [radio1, radio2, radio11, radio22].each { |r|
         r.bind(:PROPERTY_CHANGE) do |e| veto.call(e, r.text) end
       }
 
@@ -223,7 +223,7 @@ if $0 == __FILE__
         #highlight_foreground "blue"
         mnemonic 'O'
       end
-      ok_button.command() { |eve| 
+      ok_button.command() { |eve|
         alert("Hope you enjoyed this demo - Press the Cancel button to quit", {'title' => "Hello", :bgcolor => :blue , :color => :white})
       }
 
@@ -238,15 +238,15 @@ if $0 == __FILE__
         #highlight_background "white"
         #highlight_foreground "blue"
         #surround_chars ['{ ',' }']  ## change the surround chars
-      cancel_button.command { |aeve| 
+      cancel_button.command { |aeve|
         #if @lookfeel == :dialog
         if togglebutton.value == true
-          ret = confirm("Do your really want to quit?") 
+          ret = confirm("Do your really want to quit?")
         else
-          ret = rb_confirm("Do your really want to quit?") 
+          ret = rb_confirm("Do your really want to quit?")
         end
-        if ret 
-          throw(:close); 
+        if ret
+          throw(:close);
         else
           message_label.text = "Quit aborted"
         end
@@ -263,9 +263,9 @@ if $0 == __FILE__
         begin
           @form.handle_key(ch)
 
-        rescue FieldValidationException => fve 
+        rescue FieldValidationException => fve
           alert fve.to_s
-          
+
           f = @form.get_current_field
           # lets restore the value
           if f.respond_to? :restore_original_value

data/examples/testcombo.rb

@@ -4,7 +4,7 @@ require 'canis/core/widgets/rcombo'
 require 'canis/core/include/appmethods.rb'
 def help_text
       <<-eos
-# COMBO  HELP 
+# COMBO  HELP
 
 This is some help text for |Combos|
 
@@ -30,13 +30,13 @@ if $0 == __FILE__
   # Initialize curses
     Canis::start_ncurses  # this is initializing colors via ColorMap.setup
     path = File.join(ENV["LOGDIR"] || "./" ,"canis14.log")
-    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT)
     $log = Logger.new(path)
     $log.level = Logger::DEBUG
 
     @window = Canis::Window.root_window
-    # Initialize few color pairs 
-    # Create the window to be associated with the form 
+    # Initialize few color pairs
+    # Create the window to be associated with the form
     # Un post form and free the memory
 
     catch(:close) do
@@ -49,7 +49,7 @@ if $0 == __FILE__
 
 
 
-        cb = ComboBox.new @form, :row => 7, :col => 2, :width => 20, 
+        cb = ComboBox.new @form, :row => 7, :col => 2, :width => 20,
           :list => %w[xterm xterm-color xterm-256color screen vt100 vt102],
           :arrow_key_policy => :popup,
           :label => "Declare terminal as: "

data/examples/testdb.rb

@@ -48,9 +48,9 @@ def _edit h, row, title
   bw = get_color $datacolor, :black, :white
   mb = MessageBox.new config do
     txt = nil
-    h.each_with_index { |f, i| 
+    h.each_with_index { |f, i|
       txt = row[i] || ""
-      add LabeledField.new :label => "%*s:" % [_w, f], :text => txt.chomp, :name => i.to_s, 
+      add LabeledField.new :label => "%*s:" % [_w, f], :text => txt.chomp, :name => i.to_s,
         :bgcolor => :cyan,
         :width => 50,
         :label_color_pair => bw
@@ -59,7 +59,7 @@ def _edit h, row, title
   end
   index = mb.run
   return nil if index != 0
-  h.each_with_index { |e, i| 
+  h.each_with_index { |e, i|
     f = mb.widget(i.to_s)
     row[i] = f.text
   }
@@ -69,7 +69,7 @@ begin
   # Initialize curses
   Canis::start_ncurses  # this is initializing colors via ColorMap.setup
   path = File.join(ENV["LOGDIR"] || "./" ,"canis14.log")
-  logfilename   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+  logfilename   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT)
   $log = Logger.new(logfilename)
   $log.level = Logger::DEBUG
 
@@ -84,7 +84,7 @@ begin
     @window = Canis::Window.root_window
     @form = Form.new @window
 
-    #header = app_header "0.0.1", :text_center => "Movie Database", :text_right =>"" , :name => "header" , :color => :white, :bgcolor => lineback , :attr => :bold 
+    #header = app_header "0.0.1", :text_center => "Movie Database", :text_right =>"" , :name => "header" , :color => :white, :bgcolor => lineback , :attr => :bold
 
 
 
@@ -146,7 +146,7 @@ begin
     tv.bind_key(?i) { insert_row(tv) }
     tv.bind_key(?D) { tv.delete_at tv.current_index }
     @form.bind_key(?\M-c, "Filter") {
-      tv = @form.by_name["tv"]; 
+      tv = @form.by_name["tv"];
       str = get_string "Enter name of director:"
       if str && str.length > 0
       m = tv.matching_indices do |ix, fields|

data/examples/testfields.rb

@@ -3,7 +3,7 @@ require 'canis'
 require 'canis/core/include/appmethods.rb'
 def help_text
       <<-eos
-# FIELD  HELP 
+# FIELD  HELP
 
 This is some help text for |Fields|
 
@@ -16,8 +16,8 @@ Use Alt (meta) with the highlighted character to jump to that field.
 <Alt-m> goes to line, <Alt-p> to password.
 
 Notice how the field label (for first 3 fields) becomes red when focused (as in Pine/Alpine). This uses
-the event `:ENTER` and `:LEAVE` and +set_label+. The other fields use `LabeledField+. In the first 3, the 
-labels row and col have not been specified, so are calculated. In the last 3, label's lcol and lrow are 
+the event `:ENTER` and `:LEAVE` and +set_label+. The other fields use `LabeledField+. In the first 3, the
+labels row and col have not been specified, so are calculated. In the last 3, label's lcol and lrow are
 specified for custom placement.
 
 
@@ -49,15 +49,15 @@ if $0 == __FILE__
   # Initialize curses
     Canis::start_ncurses  # this is initializing colors via ColorMap.setup
     path = File.join(ENV["LOGDIR"] || "./" ,"canis14.log")
-    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT)
     $log = Logger.new(path)
     $log.level = Logger::DEBUG
 
     @lookfeel = :classic # :dialog # or :classic
 
     @window = Canis::Window.root_window
-    # Initialize few color pairs 
-    # Create the window to be associated with the form 
+    # Initialize few color pairs
+    # Create the window to be associated with the form
     # Un post form and free the memory
 
     catch(:close) do
@@ -70,11 +70,11 @@ if $0 == __FILE__
       mnemonics = %w[ n l r p]
       %w[ name line regex password].each_with_index do |w,i|
         field = Field.new @form do
-          name w 
-          row  r 
-          col  fc 
+          name w
+          row  r
+          col  fc
           width  30
-          #text "abcd " 
+          #text "abcd "
           set_label Label.new @form, {:text => w, :color=> :cyan, :mnemonic => mnemonics[i]}
         end
         r += 1
@@ -87,7 +87,7 @@ if $0 == __FILE__
 
       @form.by_name["name"].text( "Not focusable").
         focusable(false)
-      
+
       @form.by_name["regex"].valid_regex(/^[A-Z][a-z]*/).
         text( "SYNOP").
         width(10).
@@ -102,10 +102,10 @@ if $0 == __FILE__
     r += 3
     l1 = Label.new @form, :name => "LabeledField", :attr => 'bold', :text => "Profile", :row => r, :col => fc
     r += 1
-    f1 = LabeledField.new @form,  :name => "name1", :maxlen => 20, :width => 20, :bgcolor => :white, 
+    f1 = LabeledField.new @form,  :name => "name1", :maxlen => 20, :width => 20, :bgcolor => :white,
       :color => :black, :text => "abc", :label => '    Name: ', :row => r, :col => fc
     r += 1
-    f2 = LabeledField.new @form, :name => "email", :width => 20, :bgcolor => :white, 
+    f2 = LabeledField.new @form, :name => "email", :width => 20, :bgcolor => :white,
       :color => :blue, :text => "me@google.com", :label => '   Email: ', :row => r, :col => fc
     r += 3
     f3 = LabeledField.new @form
@@ -129,7 +129,7 @@ if $0 == __FILE__
           bgcolor(:white).color(:black).
           row(r+i).col(fc).lcol(01)
       end
-      @form.bind_key(FFI::NCurses::KEY_F3,'view log') { 
+      @form.bind_key(FFI::NCurses::KEY_F3,'view log') {
         require 'canis/core/util/viewer'
         Canis::Viewer.view(path || "canis14.log", :close_key => KEY_ENTER, :title => "<Enter> to close")
       }
@@ -162,10 +162,10 @@ if $0 == __FILE__
         begin
           @form.handle_key(ch)
 
-        rescue FieldValidationException => fve 
+        rescue FieldValidationException => fve
           #alert fve.to_s
           textdialog fve
-          
+
           f = @form.get_current_field
           # lets restore the value
           if f.respond_to? :restore_original_value

data/examples/testflowlayout.rb

@@ -1,6 +1,6 @@
 # ----------------------------------------------------------------------------- #
 #         File: testflowlayout.rb
-#  Description: 
+#  Description:
 #       Author: j kepler  http://github.com/mare-imbrium/canis/
 #         Date: 2014-05-09 - 20:24
 #      License: MIT
@@ -21,7 +21,7 @@ if __FILE__ == $PROGRAM_NAME
     lb2 = Listbox.new @form, :list => `gem list --local`.split("\n") , :name => "mylist2"
 =begin
 
-    alist = %w[ ruby perl python java jruby macruby rubinius rails rack sinatra pylons django cakephp grails] 
+    alist = %w[ ruby perl python java jruby macruby rubinius rails rack sinatra pylons django cakephp grails]
     str = "Hello, people of Earth.\nI am HAL, a textbox.\nUse arrow keys, j/k/h/l/gg/G/C-a/C-e/C-n/C-p\n"
     str << alist.join("\n")
     tv = TextPad.new @form, :name => "text", :text => str.split("\n")
@@ -40,4 +40,4 @@ if __FILE__ == $PROGRAM_NAME
 
     st = status_line :row => -1
   end # app
-end # if 
+end # if

data/examples/testkeypress.rb

@@ -1,5 +1,5 @@
 # demo to test keypresses
-# press any key and see the value that ncurses or our routines catch. 
+# press any key and see the value that ncurses or our routines catch.
 # Press alt and control combinations and Function keys
 # Ideally each key should return only one value. Sometimes, some TERM setting
 # or terminal emulator may not give correct values or may give different values
@@ -37,7 +37,7 @@ if $0 == __FILE__
       # please use a hash to pass these values, avoid this old style
       # i want to move away from it as it comlpicates code
         texta = TextPad.new @form do
-          name   "mytext" 
+          name   "mytext"
           row  r
           col  c
           width w
@@ -49,7 +49,7 @@ if $0 == __FILE__
           title_attrib (Ncurses::A_BOLD)
         end
       help = "q to quit. escdelay is #{nd}. Check keys. F1..10, C-a..z, Alt a-zA-Z0-9, C-left,rt, Sh-F5..10 .: #{$0}"
-      help1 = "Press in quick succession: 1) M-[, w     and (2)  M-[, M-w.        (3)  M-Sh-O, w."  
+      help1 = "Press in quick succession: 1) M-[, w     and (2)  M-[, M-w.        (3)  M-Sh-O, w."
       Canis::Label.new @form, {'text' => help, "row" => r+h+1, "col" => 2, "color" => "yellow"}
       Canis::Label.new @form, {'text' => help1, "row" => r+h+2, "col" => 2, "color" => "green"}
       texta.text = ["Press any key, Function, control, alt etc to see ","if it works.",
@@ -59,8 +59,8 @@ if $0 == __FILE__
       @window.wrefresh
       Ncurses::Panel.update_panels
       while((ch = @window.getchar()) != 999 )
-        str = keycode_tos ch if ch.is_a? Fixnum
-        #str1 = @window.key_tos ch if ch.is_a? Fixnum
+        str = keycode_tos ch if ch.is_a? Integer
+        #str1 = @window.key_tos ch if ch.is_a? Integer
         str1 = $key_chr
         $log.debug  "#{ch} got (#{str} $key_chr:#{str1})"
         texta << "#{ch} got (#{str}) #{str1}"

data/examples/testlistbox.rb

@@ -1,20 +1,20 @@
 # NOTE: If the listbox is empty, that could mean that you have not generated
 #  ri documentation for this version of ruby. You can do so by doing:
-#    rvm docs generate-ri 
-#    or 
+#    rvm docs generate-ri
+#    or
 #    rvm docs generate
 #  (This assumes you are using rvm)
 #
-# WARNING : IF THIS PROGRAM HANGS check the ri command 
+# WARNING : IF THIS PROGRAM HANGS check the ri command
 # Maybe your version of ri has different options and is going interactive.
 # ruby 1.9.3's ri requires a -l option or else if becomes interactive.
 # this program tests out a listbox
-# This is written in the old style where we start and end ncurses and initiate a 
+# This is written in the old style where we start and end ncurses and initiate a
 # getch loop. It gives more control.
 # The new style is to use App which does the ncurses setup and teardown, as well
 # as manages keys. It also takes care of logger and includes major stuff.
 # NOTE : this is the new listbox (based on Textpad version, the original
-#  version has been moved to deprecated. 2014-04-08 - 18:32 
+#  version has been moved to deprecated. 2014-04-08 - 18:32
 require 'logger'
 require 'canis'
 require 'canis/core/widgets/listbox'
@@ -39,14 +39,14 @@ end
 Press <ENTER> on a class name on the first list, to view `ri` information
 for it on the right.
 
-Tab to right box, navigate to a method name, and press <ENTER> on a method 
+Tab to right box, navigate to a method name, and press <ENTER> on a method
 name, to see its details in a popup screen.
 Press */* <slash> in any box to search. e.g "/String" will take you to the
 first occurrence of "String". <n> will take you to the next match.
 
 To go quickly to the first Class starting with 'S', type <f> followed by <S>.
 Then press <n> to go to next match.
-    
+
 =========================================================================
 ## Vim Edit Keys
 
@@ -64,7 +64,7 @@ These are not of use here, but are demonstrative of list capabilities.
 ## Buffers
 
 Ordinary a [[textpad]] contains only one buffer. However, the one on the right
-is extended for multiple buffers. Pressing <ENTER> on the left on several 
+is extended for multiple buffers. Pressing <ENTER> on the left on several
 rows opens multiple buffers on the right. Use <M-n> (Alt-N) and <M-p> to navigate.
 ALternatively, <:> maps to a menu, so :n and :p may also be used.
 <BACKSPACE> will also go to previous buffer, like a browser.
@@ -81,15 +81,15 @@ if $0 == __FILE__
   # Initialize curses
     Canis::start_ncurses  # this is initializing colors via ColorMap.setup
     path = File.join(ENV["LOGDIR"] || "./" ,"canis14.log")
-    logfilename   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+    logfilename   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT)
     $log = Logger.new(logfilename)
     $log.level = Logger::DEBUG
 
     @window = Canis::Window.root_window
     $log.debug "  WINDOW #{FFI::NCurses.LINES} "
     $catch_alt_digits = true; # emacs like alt-1..9 numeric arguments
-    # Initialize few color pairs 
-    # Create the window to be associated with the form 
+    # Initialize few color pairs
+    # Create the window to be associated with the form
     # Un post form and free the memory
 
     catch(:close) do
@@ -103,14 +103,14 @@ if $0 == __FILE__
       r = 1; fc = 1;
 
       # this is the old style of using a label at the screen bottom, you can use the status_line
-      
+
       v = "F10 quits. F1 Help.  Try j k gg G o O C dd f<char> w yy p P / . Press ENTER on Class or Method"
-      var = Canis::Label.new @form, {'text' => v, "row" => FFI::NCurses.LINES-2, 
+      var = Canis::Label.new @form, {'text' => v, "row" => FFI::NCurses.LINES-2,
         "col" => fc, "width" => 100}
 
       h = FFI::NCurses.LINES-3
       file = "./data/ports.txt"
-      #mylist = File.open(file,'r').readlines 
+      #mylist = File.open(file,'r').readlines
       mylist = `ri -l `.split("\n")
       w = 25
       #0.upto(100) { |v| mylist << "#{v} scrollable data" }
@@ -131,8 +131,8 @@ if $0 == __FILE__
       listb.vieditable_init_listbox
       include Io
       listb.bind_key(?r, 'get file'){ get_file("Get a file:") }
-      listb.bind(:PRESS) { 
-        w = @form.by_name["tv"]; 
+      listb.bind(:PRESS) {
+        w = @form.by_name["tv"];
         #lines = `ri -f bs #{listb.current_value}`.split("\n")
         #lines = `ri -f ansi #{listb.current_value} 2>&1`.gsub('','').split("\n")
         lines = get_data listb.current_value
@@ -144,7 +144,7 @@ if $0 == __FILE__
 
       tv = Canis::TextPad.new @form, :row => r, :col => w+1, :height => h, :width => FFI::NCurses.COLS-w-1,
       :name => "tv", :title => "Press Enter on method"
-      tv.set_content ["Press Enter on list to view ri information in this area.", 
+      tv.set_content ["Press Enter on list to view ri information in this area.",
         "Press ENTER on method name to see details"]
       require 'canis/core/include/multibuffer'
       tv.extend(Canis::MultiBuffers)
@@ -157,7 +157,7 @@ if $0 == __FILE__
         w = ev.word_under_cursor.strip
         # check that user did not hit enter on empty area
         if w != ""
-          #_text = `ri -f bs #{tv.title}.#{w} 2>&1` 
+          #_text = `ri -f bs #{tv.title}.#{w} 2>&1`
           #_text = _text.split("\n")
           _text = get_data "#{tv.title}.#{w}"
           if _text && _text.size != 0