a4tools 1.2.7

data/lib/net_shell/prompt.rb

@@ -0,0 +1,335 @@
+require 'curses'
+Curses.init_screen()
+
+class String
+  def shellsplit_partial
+    begin
+      shellsplit
+    rescue ArgumentError
+      begin
+        (self + "\"").shellsplit
+      rescue
+        (self + "'").shellsplit rescue []
+      end
+    end
+  end
+end
+
+module A4Tools
+  class Prompt
+    attr_accessor :tab, :prompt, :keystroke, :history, :history_file, :history_length
+    attr_accessor :autosuggest
+
+    def initialize(params={})
+      @history = []
+      @autosuggest = true
+      reset_line
+
+      @prompt = params[:prompt] || lambda { ">" }
+      @tab = params[:tab] || lambda { |cmdline| [] }
+      self.history_file = File.expand_path(params[:history_file]) || nil
+      @history_length = params[:history_length] || 100
+    end
+
+    def quoted_argument(argument)
+      argument.match(/\s+/) ? "\"#{argument}\"" : argument
+    end
+
+    def prompt=(new_prompt)
+      @prompt = new_prompt
+    end
+
+    def prompt
+      @prompt.call() rescue ">"
+    end
+
+    def show_prompt(force_newline=false)
+      puts if force_newline
+      print prompt
+      STDOUT.flush
+    end
+
+    def history_file=(file)
+      @history_file = file
+      @history = IO.read(file).split("\n") if File.exist?(file)
+    end
+
+    def add_to_history(line)
+      return if(history.last == line or line.match(/^\s*$/))
+      @history.push(line)
+      @history = @history[1 .. @history_length] unless @history_length.nil? or @history.length <= @history_length
+      File.write(@history_file, @history.join("\n")) if @history_file
+    end
+
+    def history_at_offset(offset=nil)
+      offset ||= @offset
+      history = (offset == -1) ? @saved_cmd : @history.reverse[offset]
+      history || ""
+    end
+
+    def show_history(offset)
+      print "\r#{prompt}#{history_at_offset(offset)}"
+    end
+
+    def refresh_prompt
+      @last_prompt = prompt
+    end
+
+    def redraw_line
+      clear_line
+      print "#{@last_prompt}#{@line}#{@suggestion.colorize(:light_black)}"
+      print "\b"*(@suggestion.length-@cursor)
+    end
+
+    def clear_line
+      print "\r"
+      print " "*Curses.cols + "\r"
+    end
+
+    def tab_completion(cmdline)
+      if @last_tab.nil?
+        @last_tab = @tab.call(cmdline)
+      end
+
+      @last_tab
+    end
+
+    def common_denominator(set)
+      return "" if set.empty?
+      denom = set[0].to_s
+      set.each do |item|
+        while(not item.to_s.start_with?(denom)) do
+          denom = denom[0..-2]
+        end
+      end
+
+      denom
+    end
+
+    def read_char
+      STDIN.echo = false
+     
+      input = STDIN.getc.chr
+      if input == "\e" then
+        input << STDIN.read_nonblock(4) rescue nil
+        input << STDIN.read_nonblock(3) rescue nil
+        input << STDIN.read_nonblock(2) rescue nil
+      end
+    ensure
+      STDIN.echo = true
+     
+      return input
+    end
+
+    def add_argument_from_tab(new_arg, add_space = true)
+      if @line.match(/\s$/) then
+        # Last character is a space; we're adding a brand new argument
+        @line += quoted_argument(new_arg)
+      else
+        # We're completing an existing argument
+        last = split_args.last || ""
+        true_last = split_args(false).last || ""
+        last = "\"" + last if last.match(/\s/) or true_last.start_with? "\""
+        @line = @line[0..(-1 - last.length)] + quoted_argument(new_arg)
+      end
+
+      @line += " " if add_space
+    end
+
+    def handle_ctrl_c
+      puts ""
+      reset_line
+    end
+
+    def handle_ctrl_d
+      exit 0 if @line.length == 0
+      print "\a"
+    end
+
+    def handle_backspace
+      print "\a" if @cursor >= @line.length
+      if @cursor == 0 then
+        @line = @line[0 .. -2] || ""
+      else
+        @line = (@line[0 .. @cursor-2] + @line[@cursor .. -1]) || ""
+      end
+    end
+
+    def handle_up_arrow
+      if @autosuggest and not at_suggestion_boundary then
+        @suggestion_offset -= 1
+      else
+        print "\a" if @offset == @history.length - 1
+        @saved_cmd = @line if @offset == -1
+        @offset = [@offset + 1, @history.length - 1].min
+        @line = pad_line(history_at_offset)
+      end
+    end
+
+    def handle_down_arrow
+      if @autosuggest and not at_suggestion_boundary then
+        @suggestion_offset += 1
+      else
+        print "\a" if @offset == -1
+        @offset = [@offset - 1, -1].max
+        @line = pad_line(history_at_offset)
+      end
+    end
+
+    def handle_right_arrow
+      if @cursor >= 0 then
+        return unless @autosuggest
+        opts = tab_completion(@line)
+        if opts.empty?
+          print "\a"
+        else
+          suggestion = opts[@suggestion_offset % opts.length]
+          add_argument_from_tab(suggestion) unless suggestion.nil? or suggestion.empty?
+        end
+      else
+        @cursor += 1
+      end
+    end
+
+    def handle_left_arrow
+      @cursor = [-@line.length, @cursor - 1].max
+    end
+
+    def handle_newline
+      add_to_history(@line)
+      @suggestion = "" # clear the ghost text off the screen
+      redraw_line
+      puts "\r"
+    end
+
+    def handle_tab
+      opts = tab_completion(@line)
+      forced = common_denominator(opts)
+      add_argument_from_tab(forced, opts.length == 1) unless forced.empty?
+
+      print "\a" if opts.length != 1
+      puts "\r\n"+opts.sort.join(", ") if opts.length > 1
+    end
+
+    def handle_character(c)
+      if @cursor == 0 then
+        @line += c
+      else
+        @line = (@line[0 .. @cursor-1] + c + @line[@cursor .. -1]) || ""
+      end
+    end
+
+    def handle_home
+      @cursor = -@line.length
+    end
+
+    def handle_end
+      @cursor = 0
+    end
+
+    def handle_pgdown
+      @offset = -1
+      clear_line
+      @line = history_at_offset
+    end
+
+    def split_args(partial=true)
+      partial ? @line.shellsplit_partial : @line.split(/\s+/)
+    end
+
+    def pad_line(line)
+      line += " " unless line.empty? or line.match(/\s$/)
+      line
+    end
+
+    def at_suggestion_boundary
+      return true if @line.length == 0
+      return true if @line.match(/\s$/)
+      false
+    end
+
+    def suggest(str)
+      str ||= ""
+      @suggestion = str.style(:light_black)
+    end
+
+    def update_autosuggest
+      opts = tab_completion(@line)
+      suggested = opts[@suggestion_offset % opts.length] rescue nil
+      if suggested.nil? or at_suggestion_boundary
+        suggest("")
+        return
+      end
+
+      suggested = suggested[ (split_args.last.length rescue 0) .. -1] unless at_suggestion_boundary
+      suggest(suggested) unless suggested.nil?
+    end
+
+    def scan_line
+      c = nil
+      while c != "\r"
+        redraw_line
+        c = read_char
+
+        start_line = @line
+        case c
+        when "\u0003" # CTRL+C
+          handle_ctrl_c
+        when "\u0004" # CTRL+D
+          handle_ctrl_d
+        when "\177" # backspace
+          handle_backspace
+        when "\e[A" # up arrow
+          handle_up_arrow
+        when "\e[B" # down arrow
+          handle_down_arrow
+        when "\e[C" # right arrow
+          handle_right_arrow
+        when "\e[D" # left arrow
+          handle_left_arrow
+        when "\e[H" # home
+          handle_home
+        when "\e[F" # end
+          handle_end
+        when "\e[6~" # page down
+          handle_pgdown
+        when "\r" # newline
+          handle_newline
+        when "\t" # tab
+          handle_tab
+        else
+          handle_character(c) if c.length == 1 # guard against other weird metacharacters
+        end
+
+        @last_tab = nil if start_line != @line # altering the line invalidated tab complete cache
+        @suggestion_offset = 0 if at_suggestion_boundary
+        @keystroke.call(@line) unless @keystroke.nil?
+        update_autosuggest if @autosuggest
+      end
+
+      @line
+    end
+
+    def reset_line
+      @line = ""
+      @suggestion = ""
+      @suggestion_offset = 0
+      @offset = -1
+      @cursor = 0
+      @last_prompt = prompt
+      @last_tab = nil
+    end
+
+    def read_line
+      reset_line
+      begin
+        system("stty raw -echo")
+        scan_line
+      ensure
+        system("stty -raw echo")
+      end
+
+      @line
+    end
+  end
+end

data/lib/object_builder/definitions/app_info_for_script.rb

@@ -0,0 +1,83 @@
+require 'jebediah'
+
+description "Populated from git and version info"
+generate do
+  version = get_version.split(".")
+  commits = get_commits
+
+  {
+    __class:"com.acres4.common.info.AppInfo",
+    appName:"netshell",
+    product:"Mercury",
+
+    major: version[0].to_i,
+    minor: version[1].to_i,
+    revision: version[2].to_i,
+    sourceRevision: commits.first[:sha1],
+    buildId: commits.first[:jeb],
+    supportingRevisions: (commits.map do |commit|
+      {
+        repository: commit[:repository],
+        revision: commit[:sha1],
+        alias: commit[:jeb],
+        timestamp: commit[:timestamp],
+        author: commit[:author],
+        commitNotes: commit[:notes],
+        branches: commit[:branches]
+      }
+    end),
+
+    sha1sum:nil,
+    currentTalkVersion:"mike",
+  }
+end
+
+###
+
+def repo_info(directory, repository=nil)
+  begin
+    info = {}
+    info[:repository] = repository || File.basename(directory)
+    info[:sha1] = `cd "#{directory}"; git log --format="%H" -n1`.chomp
+    info[:jeb] = Jebediah.new.process(info[:sha1])[:result].join(" ")
+    info[:timestamp] = `cd "#{directory}"; git log --format="%at" -n1`.chomp.to_i
+    info[:author] = `cd "#{directory}"; git log --format="%an" -n1`.chomp
+    info[:notes] = `cd "#{directory}"; git log --format="%s" -n1`.chomp
+
+    info[:branches] = (`cd "#{directory}"; git branch --contains #{info[:sha1]}`.split("\n").map do |line|
+      line.length > 0 ? line.gsub(/^[\s*]*/, "").gsub(/\s*$/, "") : nil
+    end).compact
+    return info
+  rescue
+    return nil
+  end
+end
+
+def fake_repo_info
+  {
+    repository: "a4tools",
+    sha1:"67021ff1f82c941454a6d2bffa7a2ffde0a6320a",
+    jeb:"exquisitely eased cougar",
+    timestamp:1399271669,
+    author:"Jonas Acres",
+    notes:"Progress commit",
+    branches:["master"]
+  }
+end
+
+def get_a4tools
+  repo_info(File.dirname(__FILE__), "a4tools")
+end
+
+def get_talk
+  repo_info(File.join(File.dirname(__FILE__), "../../../../talk"), "talk")
+end
+
+def get_commits
+  #list = [ get_a4tools, get_talk ].compact
+  list = [ fake_repo_info ] if list.nil? or list.empty?
+end
+
+def get_version
+  VERSION
+end

data/lib/object_builder/definitions/connection_request.rb

@@ -0,0 +1,28 @@
+description "ConnectionRequest based on default AppInfo and DeviceInfo"
+cache false
+generate do
+  {
+    __class:"com.acres4.common.info.ConnectionRequest",
+    appInfo: ObjectBuilder[:app_info_for_script].value,
+    deviceInfo: ObjectBuilder[:device_info_for_system].value,
+  }
+end
+
+###
+
+def device_type
+  "Ruby #{RUBY_VERSION}"
+end
+
+def serial_number
+  return $config[:serial] unless $config.nil? or $config[:serial].nil?
+  "1234"
+end
+
+def hostname
+  `hostname`.chomp
+end
+
+def os_name
+  `uname`.chomp
+end

data/lib/object_builder/definitions/device_info_for_system.rb

@@ -0,0 +1,37 @@
+description "Populated from local configuration and host info"
+cache false
+
+generate do
+  {
+    __class:"com.acres4.common.info.DeviceInfo",
+    identifier:0,
+    serialNumber:serial_number,
+    deviceType:"ruby_script",
+    deviceName:hostname,
+    osName:os_name,
+    osVersion:os_version
+  }
+end
+
+###
+
+def device_type
+  "Ruby"
+end
+
+def serial_number
+  return $config[:serial] unless $config.nil? or $config[:serial].nil?
+  "1234"
+end
+
+def hostname
+  `hostname`.chomp
+end
+
+def os_name
+  `uname`.chomp
+end
+
+def os_version
+  RUBY_VERSION
+end