oats 0.0.1

data/lib/oats/commandline_options.rb

@@ -0,0 +1,128 @@
+require 'optparse' # http://www.ruby-doc.org/stdlib/libdoc/optparse/rdoc/index.html
+
+module Oats
+
+  module CommandlineOptions
+
+    @@OPTIONS = nil
+    def CommandlineOptions.options(argv = nil)
+
+      # This should be set only once, coming from unit test or command-line
+      $oats_execution['input_args'] = $oats_unit_test ? $oats_unit_test['input_args'] : ARGV.dup
+
+      argv ||= $oats_execution['input_args'].dup
+      argv_save = argv.dup
+
+      begin
+
+        # Hold all of the options parsed from the command-line by OptionParser.
+        options = {}
+        optparse = OptionParser.new do|opts|
+          opts.banner = "Usage: oats.rb [options] test1 test2 ..."
+          opts.separator "Options:"
+          opts.on( '--tests t1,t2,t3', Array,
+            'Test files for OATS execution.' ) do |t|
+            options['execution:test_files'] = t
+          end
+          opts.on( '-b', '--browser_type TYPE', ['firefox', 'iexplore','chrome'],
+            'Select test execution browser type (firefox, iexplore, chrome)' ) do |t|
+            options['selenium:browser_type'] = t
+          end
+          opts.on( '-e', '--environments env1,env2,env3', Array,
+            'Environment list for OATS execution.' ) do |t|
+            options['execution:environments'] = t
+          end
+          opts.on( '-t', '--test_dir DIR_TESTS',
+            'Test directory to override environment variable OATS_TESTS.' ) do |t|
+            options['_:dir_tests'] = t
+          end
+          opts.on( '-i', '--ini INI_YAML_FILE',
+            'The oats-user.yml to use.' ) do |t|
+            options['_:ini_file'] = t
+          end
+          opts.on( '-p', '--port PORT', Integer,
+            'Port number for the Oats Agent.' ) do |t|
+            options['execution:occ:agent_port'] = t if t
+          end
+          opts.on( '-n', '--nickname NICKNAME',
+            'Nickname to display on OCC for the Oats Agent.' ) do |t|
+            options['execution:occ:agent_nickname'] = t if t
+          end
+          opts.on( '-o', '--options key11.key12.key13:val1,key21.key22:val2,...', Array,
+            'Options to override values specified in oats.yml as well as other commandline options.' ) do |t|
+            options['_:options'] = t
+          end
+          opts.on( '-j', '--json JSON',
+            'The json hash to merge with oats data.' ) do |t|
+            options['_:json'] = t
+          end
+          opts.on( '-q', '--quiet',
+            'Do not echo anything to the console while running.' ) do |t|
+            options['_:quiet'] = true
+          end
+
+          opts.on( '-a', '--agent',
+            'Invokes background agent handling.' ) do |t|
+            options['_:agent'] = true
+          end
+          opts.on( '-u', '--oats_user OATS_USER',
+            'Sets OATS_USER for agent, in conjunction with -a.' ) do |t|
+            options['_:oats_user'] = t
+          end
+          opts.on( '-k', '--kill_agent',
+            'Kill the agent.' ) do |t|
+            options['_:kill_agent, in conjunction with -a'] = true
+          end
+
+
+          # Development options
+          opts.on( '-g', '--gemfile GEMFILE',
+            'Gemfile path to be included.' ) do |t|
+            options['_:gemfile'] = t
+          end
+          opts.on( '-d' , '--d_options unit_test_dir1,unit_test_dir2', Array,
+            'NetBeans passes these d options to TestUnit.' ) do |t|
+            options['_:d_options'] = t
+          end
+          #        opts.on( '-s', '--show_result_ide TYPE', [ '0', '1', '2'],
+          #          'Select the trigger level to show TestRunner results (0, 1, 2) for (On failure, Never, Always)' ) do |t|
+          #          options['execution:ide:show_result'] = t.to_f
+          #        end
+          #        opts.on( '--log_level_console LEVEL',["DEBUG", "INFO", "WARN", "ERROR", "FATAL"],
+          #          'Select logging level ("DEBUG", "INFO", "WARN", "ERROR", "FATAL")' ) do |t|
+          #          options['execution:log_level_console'] = t
+          #        end
+          #        opts.on( '-t', '--tail_logs_ip [HOSTIP]',
+          #          'Tail the application logs for errors. Just input YES for the host IP executing OATS.' ) do |t|
+          #          t = true unless t
+          #          options['execution:tail_logs_ip'] = t
+          #        end
+          #        opts.on( '-r', '--restrict t1,t2,t3,...', Array,
+          #          'Restrict test list execution to the listed tests. NOT FULLY IMPLEMENTED YET.' ) do |t|
+          #          options['execution:restrict_tests'] = t
+          #        end
+          #        opts.on( '-c', '--command COMMAND_STRING',
+          #          'Command issued by the client.' ) do |t|
+          #          options['_:command'] = t
+          #        end
+          opts.on_tail( '-h', '--help', 'Display this screen' ) { $stderr.puts opts; exit }
+        end
+
+        optparse.parse!(argv)
+        if argv and ! argv.empty?
+          options['execution:test_files'] ||= []
+          options['execution:test_files'] += argv
+        end
+
+      rescue Exception => e
+        raise unless e.class.to_s =~ /^OptionParser::/
+        $stderr.puts e.message
+        $stderr.puts "Please type 'oats -h' for valid options."
+        exit 1
+      end
+      options['_:args'] = argv_save
+      @@OPTIONS = options
+    end
+
+  end
+end

data/lib/oats/diff.rb

@@ -0,0 +1,278 @@
+class Diff
+
+  def Diff.lcs(a, b)
+    astart = 0
+    bstart = 0
+    afinish = a.length-1
+    bfinish = b.length-1
+    mvector = []
+    
+    # First we prune off any common elements at the beginning
+    while (astart <= afinish && bstart <= afinish && a[astart] == b[bstart])
+      mvector[astart] = bstart
+      astart += 1
+      bstart += 1
+    end
+    
+    # now the end
+    while (astart <= afinish && bstart <= bfinish && a[afinish] == b[bfinish])
+      mvector[afinish] = bfinish
+      afinish -= 1
+      bfinish -= 1
+    end
+
+    bmatches = b.reverse_hash(bstart..bfinish)
+    thresh = []
+    links = []
+    
+    (astart..afinish).each { |aindex|
+      aelem = a[aindex]
+      next unless bmatches.has_key? aelem
+      k = nil
+      bmatches[aelem].reverse.each { |bindex|
+	if k && (thresh[k] > bindex) && (thresh[k-1] < bindex)
+	  thresh[k] = bindex
+	else
+	  k = thresh.replacenextlarger(bindex, k)
+	end
+	links[k] = [ (k==0) ? nil : links[k-1], aindex, bindex ] if k
+      }
+    }
+
+    if !thresh.empty?
+      link = links[thresh.length-1]
+      while link
+	mvector[link[1]] = link[2]
+	link = link[0]
+      end
+    end
+
+    return mvector
+  end
+
+  def makediff(a, b)
+    mvector = Diff.lcs(a, b)
+    ai = bi = 0
+    while ai < mvector.length
+      bline = mvector[ai]
+      if bline
+	while bi < bline
+	  discardb(bi, b[bi])
+	  bi += 1
+	end
+	match(ai, bi)
+	bi += 1
+      else
+	discarda(ai, a[ai])
+      end
+      ai += 1
+    end
+    while ai < a.length
+      discarda(ai, a[ai])
+      ai += 1
+    end
+    while bi < b.length
+      discardb(bi, b[bi])
+      bi += 1
+    end
+    match(ai, bi)
+    1
+  end
+
+  def compactdiffs
+    diffs = []
+    @diffs.each { |df|
+      i = 0
+      curdiff = []
+      while i < df.length
+	whot = df[i][0]
+	s = @isstring ? df[i][2].chr : [df[i][2]]
+	p = df[i][1]
+	last = df[i][1]
+	i += 1
+	while df[i] && df[i][0] == whot && df[i][1] == last+1
+	  s << df[i][2]
+	  last  = df[i][1]
+	  i += 1
+	end
+	curdiff.push [whot, p, s]
+      end
+      diffs.push curdiff
+    }
+    return diffs
+  end
+
+  attr_reader :diffs, :difftype
+
+  def initialize(diffs_or_a, b = nil, isstring = nil)
+    if b.nil?
+      @diffs = diffs_or_a
+      @isstring = isstring
+    else
+      @diffs = []
+      @curdiffs = []
+      makediff(diffs_or_a, b)
+      @difftype = diffs_or_a.class
+    end
+  end
+  
+  def match(ai, bi)
+    @diffs.push @curdiffs unless @curdiffs.empty?
+    @curdiffs = []
+  end
+
+  def discarda(i, elem)
+    @curdiffs.push ['-', i, elem]
+  end
+
+  def discardb(i, elem)
+    @curdiffs.push ['+', i, elem]
+  end
+
+  def compact
+    return Diff.new(compactdiffs)
+  end
+
+  def compact!
+    @diffs = compactdiffs
+  end
+
+  def inspect
+    @diffs.inspect
+  end
+
+end
+
+module Diffable
+  def diff(b)
+    Diff.new(self, b)
+  end
+
+  # Create a hash that maps elements of the array to arrays of indices
+  # where the elements are found.
+
+  def reverse_hash(range = (0...self.length))
+    revmap = {}
+    range.each { |i|
+      elem = self[i]
+      if revmap.has_key? elem
+	revmap[elem].push i
+      else
+	revmap[elem] = [i]
+      end
+    }
+    return revmap
+  end
+
+  def replacenextlarger(value, high = nil)
+    high ||= self.length
+    if self.empty? || value > self[-1]
+      push value
+      return high
+    end
+    # binary search for replacement point
+    low = 0
+    while low < high
+      index = (high+low)/2
+      found = self[index]
+      return nil if value == found
+      if value > found
+	low = index + 1
+      else
+	high = index
+      end
+    end
+
+    self[low] = value
+    # $stderr << "replace #{value} : 0/#{low}/#{init_high} (#{steps} steps) (#{init_high-low} off )\n"
+    # $stderr.puts self.inspect
+    #gets
+    #p length - low
+    return low
+  end
+
+  def patch(diff)
+    newary = nil
+    if diff.difftype == String
+      newary = diff.difftype.new('')
+    else
+      newary = diff.difftype.new
+    end
+    ai = 0
+    bi = 0
+    diff.diffs.each { |d|
+      d.each { |mod|
+	case mod[0]
+	when '-'
+	  while ai < mod[1]
+	    newary << self[ai]
+	    ai += 1
+	    bi += 1
+	  end
+	  ai += 1
+	when '+'
+	  while bi < mod[1]
+	    newary << self[ai]
+	    ai += 1
+	    bi += 1
+	  end
+	  newary << mod[2]
+	  bi += 1
+	else
+	  raise "Unknown diff action"
+	end
+      }
+    }
+    while ai < self.length
+      newary << self[ai]
+      ai += 1
+      bi += 1
+    end
+    return newary
+  end
+end
+
+class Array
+  include Diffable
+end
+
+class String
+  include Diffable
+end
+
+=begin
+= Diff
+(({diff.rb})) - computes the differences between two arrays or
+strings. Copyright (C) 2001 Lars Christensen
+
+== Synopsis
+
+    diff = Diff.new(a, b)
+    b = a.patch(diff)
+
+== Class Diff
+=== Class Methods
+--- Diff.new(a, b)
+--- a.diff(b)
+      Creates a Diff object which represent the differences between
+      ((|a|)) and ((|b|)). ((|a|)) and ((|b|)) can be either be arrays
+      of any objects, strings, or object of any class that include
+      module ((|Diffable|))
+
+== Module Diffable
+The module ((|Diffable|)) is intended to be included in any class for
+which differences are to be computed. Diffable is included into String
+and Array when (({diff.rb})) is (({require}))'d.
+
+Classes including Diffable should implement (({[]})) to get element at
+integer indices, (({<<})) to append elements to the object and
+(({ClassName#new})) should accept 0 arguments to create a new empty
+object.
+
+=== Instance Methods
+--- Diffable#patch(diff)
+      Applies the differences from ((|diff|)) to the object ((|obj|))
+      and return the result. ((|obj|)) is not changed. ((|obj|)) and
+      can be either an array or a string, but must match the object
+      from which the ((|diff|)) was created.
+=end