glark 1.9.0 → 1.10.0

data/test/glark/input/filter/filter_spec_test.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/app/tc'
+
+module Glark
+  class FilterSpecTestCase < AppTestCase
+    def xxxtest_match_name_match_ext
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  '/proj/org/incava/glark/test/resources/rcfile.txt',
+                  '    1 # comment here',
+                  '    2 highlight: single',
+                  '    4 local-config-files: true',
+                  '    7 ignore-case: true',
+                  '   10 text-color-3: underline magenta',
+                  '/proj/org/incava/glark/test/resources/textfile.txt',
+                  '    2   -rw-r--r--   1 jpace jpace  126084 2010-12-04 15:24 01-TheKnightsTale.txt',
+                  '    7   -rw-r--r--   1 jpace jpace   71054 2010-12-04 15:24 06-TheWifeOfBathsTale.txt',
+                  '   11   -rw-r--r--   1 jpace jpace   65852 2010-12-04 15:24 10-TheMerchantsTale.txt',
+                  '   14   -rw-r--r--   1 jpace jpace   15615 2010-12-04 15:24 13-TheDoctorsTale.txt',
+                  '   21   -rw-r--r--   1 jpace jpace   45326 2010-12-04 15:24 20-TheNunsPriestsTale.txt',
+                 ]
+      run_app_test expected, [ '-r', '--match-name', 'a', '--match-ext', 'rb', 't.*e' ], dirname
+    end
+  end
+end

data/test/glark/input/filter/filter_test.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/tc'
+
+module Glark
+  class BaseNameFilterTest < Glark::TestCase
+    def run_bnf_test expmatch, pattern, fname
+      bnf = BaseNameFilter.new pattern
+      assert_equal expmatch, bnf.match?(Pathname.new fname), "fname: #{fname}"
+    end
+
+    def test_match_string_to_string
+      run_bnf_test true, '.svn', '.svn'
+    end
+
+    def test_no_match_string_with_substring
+      run_bnf_test false, '.svn', '.'
+    end
+  end
+end

data/test/glark/input/name_test.rb

@@ -0,0 +1,75 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/app/tc'
+
+module Glark
+  class NameTestCase < AppTestCase
+    def test_match_single
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  '/proj/org/incava/glark/test/resources/rcfile.txt',
+                  '    1 # comment here',
+                  '    2 highlight: single',
+                  '    4 local-config-files: true',
+                  '    7 ignore-case: true',
+                  '   10 text-color-3: underline magenta',
+                  '/proj/org/incava/glark/test/resources/textfile.txt',
+                  '    2   -rw-r--r--   1 jpace jpace  126084 2010-12-04 15:24 01-TheKnightsTale.txt',
+                  '    7   -rw-r--r--   1 jpace jpace   71054 2010-12-04 15:24 06-TheWifeOfBathsTale.txt',
+                  '   11   -rw-r--r--   1 jpace jpace   65852 2010-12-04 15:24 10-TheMerchantsTale.txt',
+                  '   14   -rw-r--r--   1 jpace jpace   15615 2010-12-04 15:24 13-TheDoctorsTale.txt',
+                  '   21   -rw-r--r--   1 jpace jpace   45326 2010-12-04 15:24 20-TheNunsPriestsTale.txt',
+                 ]
+      run_app_test expected, [ '-r', '--match-name', '^\w+ile.txt$', 't.*e' ], dirname
+    end
+
+    def test_not_single
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/04-TheCooksTale.txt",
+                  "    1 Of many a pilgrim hast thou Christe's curse,",
+                  "    7 Now tell on, gentle Roger, by thy name,",
+                  "/proj/org/incava/glark/test/resources/filelist.txt",
+                  "    2 01-The_Knights_Tale.txt",
+                  "/proj/org/incava/glark/test/resources/rcgrep.txt",
+                  "    1 grep: true",
+                  "/proj/org/incava/glark/test/resources/spaces.txt",
+                  "    2 01 The Knights Tale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--skip-name', '^\w+e.txt$', 'g.*t.*e\b' ], dirname
+    end
+
+    def test_match_multiple
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/filelist.txt",
+                  "    7 06-The_Wife_Of_Baths_Tale.txt",
+                  "/proj/org/incava/glark/test/resources/rcext.txt",
+                  "    1 match-ext: rb",
+                  "    2 match-ext: pl",
+                  "/proj/org/incava/glark/test/resources/rcmatch.txt",
+                  "    1 match-name: \\w+.java",
+                  "    2 match-name: \\w+.rb",
+                  "/proj/org/incava/glark/test/resources/rcpath.txt",
+                  "    2 match-dirpath: src/test/ruby",
+                  "/proj/org/incava/glark/test/resources/spaces.txt",
+                  "    7 06 The Wife Of Baths Tale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--match-name', '^\w+[^e].txt$', '--match-name', 'rcgrep.txt', 't.*h.*e' ], dirname
+    end    
+
+    def test_not_multiple
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/filelist.txt",
+                  "    2 01-The_Knights_Tale.txt",
+                  "/proj/org/incava/glark/test/resources/rcgrep.txt",
+                  "    1 grep: true",
+                  "/proj/org/incava/glark/test/resources/spaces.txt",
+                  "    2 01 The Knights Tale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--skip-name', '^\w+e.txt$', '--skip-name', '04.*', 'g.*t.*e\b' ], dirname
+    end
+  end
+end

data/test/glark/input/path_test.rb

@@ -0,0 +1,72 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/app/tc'
+
+module Glark
+  class PathTestCase < AppTestCase
+    def test_match_single
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/rcfile.txt",
+                  "    1 # comment here",
+                  "    2 highlight: single",
+                  "    4 local-config-files: true",
+                  "    7 ignore-case: true",
+                  "   10 text-color-3: underline magenta",
+                  "/proj/org/incava/glark/test/resources/textfile.txt",
+                  "    2   -rw-r--r--   1 jpace jpace  126084 2010-12-04 15:24 01-TheKnightsTale.txt",
+                  "    7   -rw-r--r--   1 jpace jpace   71054 2010-12-04 15:24 06-TheWifeOfBathsTale.txt",
+                  "   11   -rw-r--r--   1 jpace jpace   65852 2010-12-04 15:24 10-TheMerchantsTale.txt",
+                  "   14   -rw-r--r--   1 jpace jpace   15615 2010-12-04 15:24 13-TheDoctorsTale.txt",
+                  "   21   -rw-r--r--   1 jpace jpace   45326 2010-12-04 15:24 20-TheNunsPriestsTale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--match-path', 'test/resources/.*ile.txt$', 't.*e' ], dirname
+    end
+
+    def test_not_single
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/filelist.txt",
+                  "    2 01-The_Knights_Tale.txt",
+                  "/proj/org/incava/glark/test/resources/rcgrep.txt",
+                  "    1 grep: true",
+                  "/proj/org/incava/glark/test/resources/spaces.txt",
+                  "    2 01 The Knights Tale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--skip-path', 'test/resources/.*e.txt$', 'g.*t.*e\b' ], dirname
+    end
+
+    def test_match_multiple
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/canterbury/franklin/tale.txt",
+                  "   80 That is betwixt a husband and his wife?",
+                  "/proj/org/incava/glark/test/resources/canterbury/prologue.txt",
+                  "  187 He gave not of the text a pulled hen,",
+                  "  192 This ilke text held he not worth an oyster;",
+                  "  291 Betwixte Middleburg and Orewell",
+                  "/proj/org/incava/glark/test/resources/rcfile.txt",
+                  "   10 text-color-3: underline magenta",
+                 ]
+      run_app_test expected, [ '-r', '--match-path', 'test/resources/.*ile.txt$', '--match-path', 'test/resources/canterbury/.*.txt$', 'xt.*e' ], dirname
+    end
+
+    def test_not_multiple
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/filelist.txt",
+                  "    2 01-The_Knights_Tale.txt",
+                  "   11 10-The_Merchants_Tale.txt",
+                  "   21 20-The_Nuns_Priests_Tale.txt",
+                  "/proj/org/incava/glark/test/resources/rcfile.txt",
+                  "    2 highlight: single",
+                  "/proj/org/incava/glark/test/resources/textfile.txt",
+                  "    2   -rw-r--r--   1 jpace jpace  126084 2010-12-04 15:24 01-TheKnightsTale.txt",
+                  "   11   -rw-r--r--   1 jpace jpace   65852 2010-12-04 15:24 10-TheMerchantsTale.txt",
+                  "   21   -rw-r--r--   1 jpace jpace   45326 2010-12-04 15:24 20-TheNunsPriestsTale.txt",
+                 ]
+      run_app_test expected, [ '-r', '--skip-path', 'test/resources/\d.*e.txt$', '--skip-path', 'test/resources/canterbury/.*.txt$', 't\W*s\w*e' ], dirname
+    end
+  end
+end

data/test/glark/input/range_test.rb

@@ -0,0 +1,82 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/tc'
+require 'glark/input/range'
+
+module Glark
+  class RangeTestCase < Glark::TestCase
+    def test_ctor
+      rg = Glark::Range.new '3', '17'
+      assert_equal '3', rg.from
+      assert_equal '17', rg.to
+    end
+
+    def test_valid_neither    
+      rg = Glark::Range.new
+      assert rg.validate!
+    end
+
+    def test_valid_only_from
+      rg = Glark::Range.new '3'
+      assert rg.validate!
+    end
+
+    def test_valid_only_to
+      rg = Glark::Range.new nil, '17'
+      assert rg.validate!
+    end
+
+    def test_valid_from_number_to_number
+      rg = Glark::Range.new '3', '17'
+      assert rg.validate!
+    end
+
+    def test_valid_from_number_to_pct
+      rg = Glark::Range.new '3', '17%'
+      assert rg.validate!
+    end
+
+    def test_valid_from_pct_to_pct
+      rg = Glark::Range.new '3%', '17%'
+      assert rg.validate!
+    end
+
+    def test_valid_from_pct_to_number
+      rg = Glark::Range.new '3%', '17'
+      assert rg.validate!
+    end
+
+    def test_invalid_from_pct_to_pct
+      rg = Glark::Range.new '13%', '3%'
+      assert_raises(Glark::RangeError) do
+        rg.validate!
+      end
+    end
+
+    def test_invalid_from_number_to_number
+      rg = Glark::Range.new '13', '3'
+      assert_raises(Glark::RangeError) do
+        rg.validate!
+      end
+    end
+
+    def test_eq_from_to
+      x = Glark::Range.new '5', '17'
+      y = Glark::Range.new '5', '17'
+      assert_equal y, x
+    end
+
+    def test_eq_nil_to
+      x = Glark::Range.new nil, '5'
+      y = Glark::Range.new nil, '5'
+      assert_equal y, x
+    end
+
+    def test_eq_from_nil
+      x = Glark::Range.new '5', nil
+      y = Glark::Range.new '5', nil
+      assert_equal y, x
+    end
+  end
+end

data/test/glark/input/size_limit_test.rb

@@ -0,0 +1,51 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/app/tc'
+
+module Glark
+  class SizeLimitTestCase < AppTestCase
+    def test_limit_300
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/add.rb",
+                  "    4 class Adder",
+                  "    5   def initialize x, y",
+                  "/proj/org/incava/glark/test/resources/expressions.txt",
+                  "    2 TheM.*Tale",
+                  "/proj/org/incava/glark/test/resources/greet.rb",
+                  "    7 class Greet",
+                  "    8   def initialize name",
+                  "    9     puts \"hello, \" + name",
+                  "/proj/org/incava/glark/test/resources/rcfile.txt",
+                  "    2 highlight: single",
+                  "    4 local-config-files: true",
+                  "    6 line-number-color: bold red",
+                  "   10 text-color-3: underline magenta",
+                  "/proj/org/incava/glark/test/resources/zfile.txt",
+                  "    6 zonulae",
+                  "   13 zoogloeae",
+                  "   14 zoogloeal",
+                  "   15 zoogloeas",
+                 ]
+      run_app_test expected, [ '-r', '--size-limit', '300', 'l.*e' ], dirname
+    end
+
+    def test_limit_100
+      dirname = '/proj/org/incava/glark/test/resources'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/rcext.txt",
+                  "    1 match-ext: rb",
+                  "    2 match-ext: pl",
+                  "/proj/org/incava/glark/test/resources/rcgrep.txt",
+                  "    1 grep: true",
+                  "/proj/org/incava/glark/test/resources/rcmatch.txt",
+                  "    1 match-name: \\w+.java",
+                  "    2 match-name: \\w+.rb",
+                  "/proj/org/incava/glark/test/resources/rcpath.txt",
+                  "    2 match-dirpath: src/test/ruby",
+                 ]
+      run_app_test expected, [ '-r', '--size-limit', '100', 't.*e' ], dirname
+    end
+  end
+end

data/test/glark/input/split_as_path_test.rb

@@ -0,0 +1,28 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'glark/app/tc'
+
+module Glark
+  class SplitAsPathTestCase < AppTestCase
+    def test_default
+      path = '/proj/org/incava/glark/test/resources:/var/this/doesnt/exist'
+      expected = [
+                  "/proj/org/incava/glark/test/resources/canterbury/franklin/tale.txt",
+                  "  706 Why should I more examples hereof sayn?",
+                  "/proj/org/incava/glark/test/resources/canterbury/prologue.txt",
+                  "  604 That were of law expert and curious:",
+                  "/proj/org/incava/glark/test/resources/rcfile.txt",
+                  "   10 text-color-3: underline magenta",
+                 ]
+      run_app_test expected, [ '-r', 'x.*er\w' ], path
+    end
+
+    def test_no_split
+      path = '/proj/org/incava/glark/test/resources:/var/this/doesnt/exist'
+      expected = [
+                 ]
+      run_app_test expected, [ '-r', '--no-split-as-path', 't.*e\w' ], path
+    end
+  end
+end

data/test/glark/match_test.rb

@@ -0,0 +1,192 @@
+#!/usr/bin/ruby -w
+# -*- ruby -*-
+
+require 'rubygems'
+require 'riel'
+require 'glark/match/factory'
+require 'glark/tc'
+require 'stringio'
+
+module Glark
+  class MatchTestCase < Glark::TestCase
+    def run_test expected, fname, exprargs
+      opts = AppOptions.new
+      
+      # Egads, Ruby is fun. Converting a maybe-array into a definite one:
+      args = [ exprargs ].flatten
+
+      opts.run args + [ fname ]
+
+      sio = StringIO.new
+      opts.output_options.out = sio
+
+      files = opts.fileset
+      glark = Runner.new opts, files
+      
+      result = sio.string
+      assert_equal expected.collect { |line| "#{line}\n" }.join(''), result
+    end
+
+    def run_abc_test expected, exprargs
+      fname = '/proj/org/incava/glark/test/resources/abcfile.txt'
+      run_test expected, fname, exprargs
+    end
+
+    def test_plain_old_match_first_line
+      expected = [
+                  "    1 ABC"
+                 ]
+      
+      run_abc_test expected, 'A'
+    end
+
+    def test_plain_old_match_middle_line
+      expected = [
+                  "    4 JKL"
+                 ]
+
+      run_abc_test expected, 'K'
+    end
+
+    def test_regexp_or
+      expected = [
+                  "    4 JKL",
+                  "    5 MNO"
+                 ]    
+
+      run_abc_test expected, '(K)|(N)'
+    end
+
+    def run_z_test expected, exprargs
+      fname = '/proj/org/incava/glark/test/resources/zfile.txt'
+      run_test expected, fname, exprargs
+    end
+
+    def test_multicolor_alt_regexp_one_match
+      patterns = %w{ nul }
+
+      expected = [
+                  "    6 zonulae"
+                 ]
+
+      exprargs = patterns.collect { |x| "(#{x})" }.join('|')
+      
+      run_z_test expected, exprargs
+    end
+
+    def test_multicolor_alt_regexp_3_patterns
+      patterns = %w{ oo ae z }
+
+      expected = [
+                  "    1 zaffres",
+                  "    2 zoaea",
+                  "    3 zoaea's",
+                  "    4 zoea",
+                  "    5 zoeas",
+                  "    6 zonulae",
+                  "    7 zooea",
+                  "    8 zooeae",
+                  "    9 zooeal",
+                  "   10 zooeas",
+                  "   11 zooecia",
+                  "   12 zooecium",
+                  "   13 zoogloeae",
+                  "   14 zoogloeal",
+                  "   15 zoogloeas",
+                  "   16 zygaenid",
+                 ]
+
+      exprargs = patterns.collect { |x| "(#{x})" }.join('|')
+      
+      run_z_test expected, exprargs
+    end
+
+    def test_multicolor_or_expression_3_patterns
+      patterns = %w{ oo ae z }
+
+      expected = [
+                  "    1 zaffres",
+                  "    2 zoaea",
+                  "    3 zoaea's",
+                  "    4 zoea",
+                  "    5 zoeas",
+                  "    6 zonulae",
+                  "    7 zooea",
+                  "    8 zooeae",
+                  "    9 zooeal",
+                  "   10 zooeas",
+                  "   11 zooecia",
+                  "   12 zooecium",
+                  "   13 zoogloeae",
+                  "   14 zoogloeal",
+                  "   15 zoogloeas",
+                  "   16 zygaenid",
+                 ]
+
+      exprargs = patterns[0 ... -1].collect { '--or' } + patterns
+      
+      run_z_test expected, exprargs
+    end
+
+    def test_and_expression_2_lines_apart
+      Log.level = Log::DEBUG
+      
+      # 'ea', 'ec' within 2 lines of each other:
+      expected = [
+                  "    9 zooeal",
+                  "   10 zooeas",
+                  "   11 zooecia",
+                  "   12 zooecium",
+                  "   13 zoogloeae",
+                  "   14 zoogloeal"
+                 ]
+      
+      patterns = %w{ ea ec }
+      
+      exprargs = [ "--and", "2" ] + patterns
+
+      run_z_test expected, exprargs
+    end
+
+    def test_and_expression_3_lines_apart
+      expected = [
+                  "    3 zoaea's",
+                  "    4 zoea",
+                  "    5 zoeas",
+                  "    6 zonulae"
+                 ]
+
+      patterns = %w{ aea ula }
+      
+      exprargs = [ "--and", "3" ] + patterns
+
+      run_z_test expected, exprargs
+    end
+
+    def test_and_expression_entire_file
+      expected = [
+                  "    1 zaffres",
+                  "    2 zoaea",
+                  "    3 zoaea's",
+                  "    4 zoea",
+                  "    5 zoeas",
+                  "    6 zonulae",
+                  "    7 zooea",
+                  "    8 zooeae",
+                  "    9 zooeal",
+                  "   10 zooeas",
+                  "   11 zooecia",
+                  "   12 zooecium",
+                  "   13 zoogloeae",
+                  "   14 zoogloeal",
+                  "   15 zoogloeas",
+                  "   16 zygaenid",
+                 ]
+
+      patterns = %w{ aff yga }    
+      exprargs = [ "--and", "-1" ] + patterns
+
+      run_z_test expected, exprargs
+    end
+  end
+end