ncumbra 0.1.0 → 0.1.1

data/examples/data/import.sh

@@ -0,0 +1,13 @@
+#!/usr/bin/env bash 
+
+sqlite3 tennis.sqlite <<!
+.mode csv
+.import atp_matches_2018.csv matches 
+!
+
+sqlite3 tennis.sqlite <<!
+DELETE from matches WHERE tourney_id = 'tourney_id';
+!
+sqlite3 tennis.sqlite <<!
+select count(1) from matches;
+!

data/examples/data/schema.txt

@@ -0,0 +1,51 @@
+CREATE TABLE matches(
+  "tourney_id" TEXT,
+  "tourney_name" TEXT,
+  "surface" TEXT,
+  "draw_size" TEXT,
+  "tourney_level" TEXT,
+  "tourney_date" TEXT,
+  "match_num" TEXT,
+  "winner_id" TEXT,
+  "winner_seed" TEXT,
+  "winner_entry" TEXT,
+  "winner_name" TEXT,
+  "winner_hand" TEXT,
+  "winner_ht" TEXT,
+  "winner_ioc" TEXT,
+  "winner_age" TEXT,
+  "winner_rank" TEXT,
+  "winner_rank_points" TEXT,
+  "loser_id" TEXT,
+  "loser_seed" TEXT,
+  "loser_entry" TEXT,
+  "loser_name" TEXT,
+  "loser_hand" TEXT,
+  "loser_ht" TEXT,
+  "loser_ioc" TEXT,
+  "loser_age" TEXT,
+  "loser_rank" TEXT,
+  "loser_rank_points" TEXT,
+  "score" TEXT,
+  "best_of" TEXT,
+  "round" TEXT,
+  "minutes" TEXT,
+  "w_ace" TEXT,
+  "w_df" TEXT,
+  "w_svpt" TEXT,
+  "w_1stIn" TEXT,
+  "w_1stWon" TEXT,
+  "w_2ndWon" TEXT,
+  "w_SvGms" TEXT,
+  "w_bpSaved" TEXT,
+  "w_bpFaced" TEXT,
+  "l_ace" TEXT,
+  "l_df" TEXT,
+  "l_svpt" TEXT,
+  "l_1stIn" TEXT,
+  "l_1stWon" TEXT,
+  "l_2ndWon" TEXT,
+  "l_SvGms" TEXT,
+  "l_bpSaved" TEXT,
+  "l_bpFaced" TEXT
+);

data/examples/ex1.rb

@@ -55,10 +55,12 @@ begin
     form.add_widget w
   }
   form.pack
+  form.repaint
   win.wrefresh
 
   y = x = 1
   while (ch = win.getkey) != 113
+    next if ch == -1
     #y, x = win.getbegyx(win.pointer)
     old_y, old_x = y, x
     case ch

data/examples/ex2.rb

@@ -99,6 +99,7 @@ begin
 
   y = x = 1
   while (ch = win.getkey) != FFI::NCurses::KEY_CTRL_Q
+    next if ch == -1
     begin
       form.handle_key ch
     rescue => e

data/examples/ex5.rb

@@ -72,7 +72,7 @@ begin
     form.add_widget box, lb
     form.add_widget tb
     form.pack
-    form.select_first_field
+    form.repaint
     win.wrefresh
 
     y = x = 1

data/examples/exbox.rb

@@ -45,7 +45,8 @@ begin
   # check with long lines
   catch(:close) do
     form = Form.new win
-    box = Box.new row: 2,col: 2, height: 24, width: 80, title: "A box", justify: :left
+    #box = Box.new row: 2,col: 2, height: 24, width: 80, title: "A box", justify: :left
+    box = Box.new row: 1,col: 2, height: -3, width: 80, title: "A box", justify: :left
     win.printstring(3,1,"Just testing that listbox is correctly positioned")
     #lb = Listbox.new list: alist, row: 4, col: 2, width: 70, height: 18
     lb = Listbox.new list: alist
@@ -55,7 +56,7 @@ begin
     win.printstring(box.row+1,0,"XX")
     win.printstring(box.row+1,lb.col+lb.width,"XX")
     win.printstring(box.row+box.height,1,"This prints below the listbox")
-    brow = box.row+box.height+3
+    brow = box.row+box.height+2
     tb = ToggleButton.new onvalue: "Border", offvalue: "No Border", row: brow, col: 10, value: true
     ab = Button.new text: "Processes" , row: brow, col: 30
     logb = Button.new text: "LogFile" , row: brow, col: 50

data/examples/exm1.rb

@@ -39,7 +39,7 @@ def _alert_fields str
     add Field.new name:"name", default: "Rahul", width: 25, color_pair: CP_CYAN, attr: REVERSE
     add LabeledField.new label:"Age:", name:"age", text:"25", col: 15, color_pair: CP_CYAN, attr: REVERSE
     # unfortunately this exceeds since width only takes field into account not label
-    add LabeledField.new label:"Address:", name:"address", width:50 , col: 15, color_pair: CP_CYAN, attr: REVERSE
+    add LabeledField.new label:"Address:", name:"address", width:50 , maxlen: 70, col: 15, color_pair: CP_CYAN, attr: REVERSE
   end
   mb.run
 end
@@ -92,7 +92,6 @@ begin
   b4.command do
     ret = confirm "Do you wish to go?"
     message_label.text = "You selected #{ret}"
-    #message_label.touch
   end
   form.add_widget message_label, b1, b2, b3, b4
   form.pack

data/examples/extab2.rb

@@ -0,0 +1,170 @@
+#!/usr/bin/env ruby
+# ----------------------------------------------------------------------------- #
+#         File: extab2.rb
+#  Description: 
+#       Author: j kepler  http://github.com/mare-imbrium/canis/
+#         Date: 2018-05-06 - 11:20
+#      License: MIT
+#  Last update: 2018-05-22 23:05
+# ----------------------------------------------------------------------------- #
+#  extab2.rb  Copyright (C) 2018 j kepler
+require 'umbra'
+require 'umbra/label'
+require 'umbra/tabular'
+require 'umbra/listbox'
+require 'umbra/textbox'
+require 'umbra/box'
+require 'umbra/table'
+
+def startup
+  require 'date'
+
+  $log = create_logger "v.log"
+  #$log.level = Logger::DEBUG
+  today = Date.today
+  $log.info "Started demo table on #{today}"
+end
+def statusline win, str, col = 0
+  win.printstring( FFI::NCurses.LINES-1, col, str, 5)
+end
+begin
+  include Umbra
+  init_curses
+  startup
+  win = Window.new
+  statusline(win, " "*(win.width-0), 0)
+  statusline(win, "Press C-q to quit #{win.height}:#{win.width}", 20)
+  title = Label.new( :text => "Demo of Table", :row => 0, :col => 0 , :width => FFI::NCurses.COLS-1, 
+                    :justify => :center, :color_pair => 0)
+
+  form = Form.new win
+  form.add_widget title
+
+  box = Box.new row: 2, col: 0, width: 15, height: 7
+=begin
+  t = Tabular.new(['a', 'b'], [1, 2], [3, 4], [5,6])
+  lb = Listbox.new list: t.render
+=end
+  #table = Table.new(['a', 'b'], [1, 2], [3, 4], [5,6])
+  table = Table.new(columns: ['a', 'b'], data: [[1, 2], [3, 4], [5,6]])
+  box.fill table
+  box1 = Box.new row: box.row + box.height + 0, col: box.col, width: box.width, height: 7
+  table1 = Table.new columns: ['a', 'b']
+  table1 << [8, 6]
+  table1 << [1, 2]
+  table1 << [3, 4]
+  table1 << [4, 6]
+  table1 << [2, 6]
+  table1.y = '| '
+  table1.x = '+-'
+  #lb1 = Listbox.new list: t.render
+  #table1.render
+  box1.fill table1
+
+  #file = File.expand_path("examples/tasks.csv", __FILE__)
+  file = File.expand_path("examples/tasks.csv")
+    lines = File.open(file,'r').readlines
+    heads = %w[ id sta type prio title ]
+    t = Table.new do |t|
+      t.headings = heads
+      t.y = ' '
+      lines.each { |e| t.add_row e.chomp.split '|'   }
+    end
+    t.tabular.use_separator = false
+    # testing out coloring different rows in different colors depending on status
+    def t.color_of_row index, state
+      arr = super
+      if index == 0                  ## header
+        arr = @header_color_pair || [ CP_MAGENTA, REVERSE ]
+      elsif data[index-1][1] == "clo"
+        arr = [ CP_BLUE, NORMAL ]
+      elsif self.data[index-1][1] == "ope"
+        arr = [ CP_YELLOW, BOLD ]
+      end
+      arr
+    end
+    #t.column_width 4, 15            ## checking truncate of long data
+
+    #t.render
+    box2 = Box.new title: "tasks.csv", row: box.row , col: box.col + box.width+1, width: FFI::NCurses.COLS-box.width-1, height: FFI::NCurses.LINES-1-box.row
+  #lb2 = Listbox.new list: t
+
+    table2 = t
+    #box2.fill table2
+
+  r = `ls -l`
+  res = r.split("\n")
+
+  table3 = Table.new do
+    self.headings = 'User',  'Size', 'Mon', 'Date', 'Time', 'File'
+    self.header_color_pair = [ CP_CYAN, REVERSE ]
+    res.each { |e|
+      cols = e.split
+      next if cols.count < 6
+      cols = cols[3..-1]
+      cols = cols[0..5] if cols.count > 6
+      add_row cols
+    }
+    column_width 1, 10
+    #column_width 5, 10   ## testing truncate
+    column_align 1, :right
+    column_align 3, :right
+  end
+
+  # testing out coloring different columns in different color
+  ## NOTE that as we scroll the colors will change for a column
+  ##   We don't know which columns have come in since scrolling will cut off some columns.
+  ##   We need to access pcol to find out which the starting column is, so which know which columns
+  ##   we actually have.
+  def table3.print_row(win, row, col, str, index, state)
+    f = str.split('|')
+    attrib = NORMAL
+    attrib = BOLD if index == 0
+    attrib = REVERSE if state == :HIGHLIGHTED
+    f.each_with_index {|c, ix|
+      win.printstring(row, col, c, ix+1, attrib)
+      col += c.length+1
+    }
+
+  end
+  #table3.render
+  #t.y = '| '
+  #t.x = '+-'
+  #tb = Textbox.new list: t.render
+  box2.add table2, table3
+
+  form.add_widget box, table
+  form.add_widget box1, table1
+  form.add_widget box2, table2, table3
+
+
+  form.pack
+  form.repaint
+  win.wrefresh
+
+  y = x = 1
+  main_loop(form) do |ch|
+    statusline(win, "Pressed #{ch} on     ", 70)
+    form.handle_key ch
+    win.wrefresh
+  end
+=begin
+  while (ch = win.getkey) != FFI::NCurses::KEY_CTRL_Q
+    next if ch == -1
+    form.handle_key ch
+    #statusline(win, "Pressed #{ch} on     ", 70)
+    win.wrefresh
+  end
+=end
+
+rescue Object => e
+  @window.destroy if @window
+  FFI::NCurses.endwin
+  puts e
+  puts e.backtrace.join("\n")
+ensure
+  @window.destroy if @window
+  $log.close if $log
+  FFI::NCurses.endwin
+  puts 
+end

data/examples/extab3.rb

@@ -0,0 +1,306 @@
+#!/usr/bin/env ruby
+# ----------------------------------------------------------------------------- #
+#         File: extab3.rb
+#  Description: Example of using a Table with an sqlite3 resultset.
+#       Author: j kepler  http://github.com/mare-imbrium/umbra/
+#         Date: 2018-05-11
+#      License: MIT
+#  Last update: 2018-05-23 08:34
+# ----------------------------------------------------------------------------- #
+#  extab3.rb  Copyright (C) 2018 j kepler
+require 'umbra'
+require 'umbra/label'
+require 'umbra/tabular'
+require 'umbra/box'
+require 'umbra/table'
+require 'sqlite3'
+
+def startup
+  require 'logger'
+  require 'date'
+
+    path = File.join(ENV["LOGDIR"] || "./" ,"v.log")
+    file   = File.open(path, File::WRONLY|File::TRUNC|File::CREAT) 
+    $log = Logger.new(path)
+    $log.level = Logger::DEBUG
+    today = Date.today
+    $log.info "Started demo table #{$0} on #{today}"
+    $log.info "RETURN is #{curses::KEY_RETURN} "
+    $log.info "ENTER is #{curses::KEY_ENTER} "
+    path = File.dirname(__FILE__)
+    $log.info "PATH: #{path}"
+    FFI::NCurses.init_pair(10,  FFI::NCurses::BLACK,   FFI::NCurses::GREEN) # statusline
+    @file = "#{path}/data/tennis.sqlite"
+    @db = SQLite3::Database.new(@file)
+    @tablename = "matches"
+    $ncurses_timeout = -1
+end
+def ORIGstatusline win, str, col = 0
+  win.printstring( FFI::NCurses.LINES-1, col, str, 10)
+end
+def oldstatusline win, str, column = 1
+  # LINES-2 prints on second last line so that box can be seen
+  win.printstring( FFI::NCurses.LINES-1, 0, " "*(win.width), 6, REVERSE)
+  # printing fields in two alternating colors so easier to see
+  str.split("|").each_with_index {|s,ix|
+    _color = 6
+    _color = 5 if ix%2==0
+    win.printstring( FFI::NCurses.LINES-1, column, s, _color, REVERSE)
+    column += s.length+1
+  }
+end
+def statusline win, str, column = 1
+  @status.text = str
+end   # }}}
+def fetch_data db, sql # {{{
+  $log.debug "SQL: #{sql} "
+  columns, *rows = db.execute2(sql)
+  content = rows
+  return nil if content.nil? or content[0].nil?
+  datatypes = content[0].types #if @datatypes.nil?
+  return content, columns, datatypes
+end # }}}
+def view_details(table)
+  id = table.current_id
+
+  res = %x{ sqlite3 #{@file} -line "select * from #{@tablename} where rowid = '#{id}'"}
+  if res and !res.empty?
+    res = res.split("\n")
+    view res
+  else
+    alert("No row for #{id} in #{@tablename}")
+  end
+end
+def get_full_row_as_hash(table)
+  id = table.current_id
+  data, columns, datatypes = fetch_data(@db, "select * from #{@tablename} where rowid = '#{id}'")
+  hash = columns.zip(data.first).to_h
+  #$log.debug "  HASH == #{hash}"
+  return hash
+end
+def filter_popup lb # {{{
+  ## present user with a popup allowing him to select range of rating title, range of year, status etc
+  ##  for querying.
+  #rowdata = fetch_data(@db, "select title, actors, director, imdbrating, language, genre , metascore, imdbvotes from #{@tablename} WHERE rowid = #{id}")
+  data = []
+  _columns = ["tourney_name", "winner_name", "loser_name", "surface", "Year >", "Year <", "round", "level", "best_of"]
+  _columns.each {|c| data << "" }
+  _datatypes = ["text","text","text","char(10)","char(4)","char(4)","char(5)", "char(1)", "char(1)"]
+  ret, array = generic_edit "Filter", _columns, data, _datatypes
+  if ret == 0
+    # okay pressed
+    ## query database on values entered TODO
+    _filter_table(lb, _columns, array)
+  end
+end # }}}
+def _filter_table(lb, columns, fields)
+  cols = []
+  bind_vars = []
+  sql = "#{@query}"
+  fields.each_with_index { |f, ix|
+    next if f.text == ""
+    c = columns[ix].downcase
+    if c == "round"
+      cols << " round = ? "
+      bind_vars << "#{f.text}"
+    elsif c == "year >"
+      cols << " tourney_date >= ?  "
+      bind_vars << "#{f.text}"
+    elsif c == "year <"
+      cols << " tourney_date <= ? "
+      bind_vars << "#{f.text}"
+    elsif c == "level"
+      cols << " tourney_level = ? "
+      bind_vars << "#{f.text}"
+    elsif c == "best_of"
+      cols << " best_of =  ? "
+      bind_vars << "#{f.text}"
+    else
+      cols << columns[ix] + " LIKE ? "
+      bind_vars << "%#{f.text}%"
+    end
+  }
+  if !cols.empty?
+    sql +=  " WHERE " + cols.join(" AND ")
+  end
+  $log.debug "  SQL: #{sql} "
+  $log.debug "  ibv:  #{bind_vars.join ', '} "
+  alist = @db.execute( sql, bind_vars)
+  if alist #and !alist.empty?
+    #lb.list = alist   ## results in error, FIXME
+    lb.data = alist
+  else
+    #alert "No rows returned. Check your query"
+  end
+end
+## generic edit messagebox
+## @param array of column labels
+## @param array of data to edit, or blank
+## @param array of sqlite3 datatypes (real int text char(9) date)
+## @return offset of button pressed and array of LabeledFields
+##         0 = ok, 1 = cancel.
+##         Use element.text() to get edited value of each element of array
+def generic_edit _title, _columns, data, _datatypes
+  require 'umbra/messagebox'
+  require 'umbra/labeledfield'
+  
+  array = []       # array of labeledfield we will create, and return
+  mb = MessageBox.new title: _title, width: 80 do
+    data.each_with_index do |r, ix|
+      dt = _datatypes[ix]
+      _w, _ml = calc_width_from_datatype( dt )
+      $log.debug "  MESSAGE_BOX::: #{_columns[ix]} ==> #{_datatypes[ix]} "
+
+      x =  LabeledField.new label: _columns[ix], name: _columns[ix], text: r, col: 20, width: _w, maxlen: _ml, color_pair: CP_CYAN, attr: REVERSE
+
+      $log.debug "  MESSAGE_BOX::: after create #{_columns[ix]} ==> #{_datatypes[ix]} "
+      array << x
+      add x
+      $log.debug "  MESSAGE_BOX::: after add #{_columns[ix]} ==> #{_datatypes[ix]} "
+    end
+  end
+  ret = mb.run
+  return ret, array
+end
+## Given an sqlite3 datatype, returns width and maximum length.
+## Used in messageboxes.
+def calc_width_from_datatype dt
+  if dt == "text"
+    _w = 50
+    _ml = 100
+  elsif dt == "date"
+    _w = 12
+    _ml = 20
+  elsif dt == "real"
+    _w = 10
+    _ml = 10
+  elsif dt == "int"
+    _w = 8
+    _ml = 8
+  elsif dt.index("char")
+    a = dt.match(/(\d+)/)
+    _w = a.captures().first.to_i
+    _ml = _w
+  else
+    _w = _ml = 30
+  end
+  return _w, _ml
+end
+begin
+  include Umbra
+  init_curses
+  startup
+  win = Window.new
+  # by making this is label with -1 as row, it will recalc and redraw when window height is changed.
+  @status = Label .new( text: "Press C-q to quit", row: -1, col: 0, width: -1 )
+  def @status.print_label(win, row, col, format, value, _color, _attr)
+    column = col
+    win.printstring( row, 0, " "*(win.width), 6, REVERSE)
+    value.split("|").each_with_index {|s,ix|
+      _color = 6
+      _color = 5 if ix%2==0
+      win.printstring( row, column, s, _color, REVERSE)
+      column += s.length+1
+    }
+  end
+  #statusline(win, " "*(win.width-0), 0)
+  #statusline(win, "Press C-q to quit #{win.height}:#{win.width}", 20)
+  #title = Label.new( :text => "Tennis Query", :row => 0, :col => 0 , :width => FFI::NCurses.COLS-1, 
+  title = Label.new( :text => "Tennis Query", :row => 0, :col => 0 , :width => -1, 
+                    :justify => :center, :color_pair => 0, :attr => REVERSE)
+
+  #win.title "Tennis Query", 3, REVERSE
+  form = Form.new win
+  form.add_widget title, @status
+
+  ## -1 here suggests that this widget should extend till the end, less one.
+  ##   This is not absolute, it is relative to row or col.
+  box = Box.new row: 1, col: 0, width: -1, height: -2
+  #box = Box.new row: 1, col: 0, width: -1, height: FFI::NCurses.LINES-2
+  #form.position_below(box, label)
+  #box.below(title)
+  #box.expand_right(0).expand_down(-1)
+  #box.expand_down(-1)
+  @query = "SELECT rowid, tourney_id, tourney_name, tourney_date, winner_name, loser_name, score, round FROM matches "
+  @order_by = "ORDER BY tourney_date, tourney_name, match_num"
+  data, columns, datatypes = fetch_data(@db, "#{@query} #{@order_by}")
+
+  table = Table.new(columns: columns, data: data) do |tt|
+    tt.column_hidden(0, true)
+    tt.column_hidden(1, true)
+    tt.column_width(6, 24)
+  end
+  #table.column_hide(0)
+  #table.column_hide(1)
+  #table.column_width(6, 24)
+  box.title = "#{table.row_count} rows"
+  box.fill table
+  tabular = table.tabular
+  # this is one way of hiding a column if we don't want to use the hide option.
+  # But we have to supply formatstring, and take care of separator and headings too.
+  #def tabular.convert_value_to_text row, format_string, index
+    #"%-5.5s |%-10.10s |%-12.12s |%-12.12s |%-27.27s |%-27.27s |%-24.24s |%-5.5s" % row
+    #"%-12.12s |%-12.12s |%-27.27s |%-27.27s |%-24.24s |%-5.5s" % row[2..-1]
+  #end
+    #def table._format_value line, index, state
+    #end
+    def table.color_of_data_row index, state, data_index
+      arr = _format_color index, state
+      if index == 0                  ## header
+        arr = @header_color_pair || [ CP_MAGENTA, REVERSE ]
+      elsif data[data_index][-1] == "SF"
+        arr = [ CP_WHITE, BOLD | arr[1] ]
+      elsif data[data_index][-1] == "F"
+        arr = [ CP_YELLOW, BOLD  | arr[1]]
+      end
+      
+      arr
+    end
+    table.bind_event(:CHANGED) { |obj| box.title = "#{obj.row_count} rows";  }
+    table.bind_event(:PRESS) { |obj| alert( " Pressed on #{obj.current_index} :: #{obj.curpos} ") }
+    table.command do |ix|
+      #rowid = table.current_id
+      data = table.current_row_as_array
+      if data
+        #t_id = data[1]
+        #t_name = data[2]
+        hash = table.current_row_as_hash
+        score = hash['score']
+        h1 = get_full_row_as_hash(table)
+        surface = h1['surface']
+        draw = h1['draw_size']
+        level = h1['tourney_level']
+        #statusline(win, "#{rowid} | #{t_id} | #{t_name}          ")
+        statusline(win, data[0..4].join("| ") + " | #{score} | #{surface} | #{draw} | #{level} " )
+      end
+    end
+    table.bind_key( 'v', 'view details') { view_details(table) }
+    table.bind_key( ?\C-s, 'filter popup') { filter_popup(table) }
+
+
+  form.add_widget box, table
+
+
+  form.pack
+  form.repaint
+  form.select_first_field
+  win.wrefresh
+
+  y = x = 1
+  while (ch = win.getkey) != FFI::NCurses::KEY_CTRL_Q
+    next if ch == -1
+    form.handle_key ch
+    #statusline(win, "Pressed #{ch} on     ", 70)
+    win.wrefresh
+  end
+
+rescue Object => e
+  @window.destroy if @window
+  FFI::NCurses.endwin
+  puts e
+  puts e.backtrace.join("\n")
+ensure
+  @window.destroy if @window
+  FFI::NCurses.endwin
+  puts 
+end