cless 0.3.20

data/lib/cless/export.rb

@@ -0,0 +1,92 @@
+module Export
+  Format = {}
+
+  def self.questions(format)
+    Format[format]::Questions rescue nil
+  end
+
+  def self.export(file, format, lines, data, display, opts = {})
+    current_line = nil
+    mod = Format[format] or raise "Unsupported format '#{format}'"
+    line_s = lines.begin
+    line_e = lines.end
+    if !line_s.kind_of?(Integer) || !line_e.kind_of?(Integer) ||
+        line_s > line_e || line_s < 0
+      raise "Invalid line range '#{lines}'"
+    end
+
+    current_line = data.line + 1
+    nb_lines = line_e - line_s + 1
+    data.goto_line(line_s)
+    data.cache_fill(nb_lines)
+    nb_col = data.sizes.size
+
+    col_start = display.col_start
+    hidden = display.col_hidden
+    hidden.map! { |x| x - col_start }   # Make it 0 based
+    col_show = (0...nb_col).to_a - hidden
+    nb_col = col_show.size
+
+    lines = proc  { |b|
+      data.lines(nb_lines) { |l|
+        next if l.kind_of?(IgnoredLine)
+        a = l.values_at(*col_show)
+        b.call(a)
+      }
+    }
+    class << lines
+      def each(&b); self.call(b); end
+    end
+    
+    columns = if display.col_names
+                display.col_headers.values_at(*col_show)
+              else
+                nil
+              end
+    
+    
+    File.open(file, "w") { |fd|
+      mod.export(fd, nb_col, lines, columns, opts)
+      return fd.pos
+    }
+  ensure
+    if current_line
+      data.clear_cache
+      data.goto_line(current_line)
+    end
+  end
+end
+
+module Export::TeX
+  Export::Format["tex"] = self
+  Questions = []
+
+  def self.export(io, nb_col, lines, headers, opts = {})
+    io << "\\begin{tabular}{|" << (["c"] * nb_col).join("|") << "|}\\hline\n"
+    if headers
+      io << headers.join(" & ") 
+      io << "\\tabularnewline\\hline\\hline\n"
+    end
+    lines.each { |a|
+      a.map! { |t| t && t.gsub(/\&/, '\&').gsub(/\\/, "\\textbackslash{}") }
+      io << a.join(" & ") << "\\tabularnewline\\hline\n"
+    }
+    io << "\\end{tabular}\n"
+  end
+end
+
+module Export::CSV
+  Export::Format["csv"] = self
+  Questions = [[ :separator, "Separator", ","]]
+
+  def self.export(io, nb_col, lines, headers, opts = {})
+    sep = opts[:separator] || ','
+    raise "CSV separator must be 1 character" if sep.length != 1
+    require 'csv'
+    
+    CSV::Writer.generate(io, sep) { |csv|
+      csv << headers if headers
+      lines.each { |a| csv << a }
+    }
+  end
+end

data/lib/cless/help.rb

@@ -0,0 +1,97 @@
+module Help
+  CONTENT = <<EOF
+          CLESS HELP
+        Press q to quit
+
+ Key binding
+ ===========
+
+ Key binding is mostly compatible with the original less.
+
+ ARROW_DOWN, ENTER, ^N, ^E, j     scroll down one line
+ SPACE BAR, PAGE_DOWN, ^V, ^F, f  scroll down one page
+ ARROW_UP, ^Y, ^P, ^K, y, k       scroll up one line
+ PAGE_UP, ^B, b                   scroll up one page
+ ARROW_RIGHT, ESC-)               scroll right one column
+ ARROW_LEFT, ESC-(                scroll left one column
+ d                                scroll down half screen
+ u                                scroll up half screen
+ HOME, g, <                       go to top of file
+ END, G, >                        go to end of file
+ +                                increase column spacing
+ -                                decrease column spacing
+ c                                show/hide the column numbers
+ l                                show/hide the line numbers (1 based)
+ L                                show byte offset instead of line number
+ h                                hide column (space separated list)
+ H                                show column (space separated list)
+ ` (back-tick)                    change first column index
+ o                                toggle highlighting of alternate lines
+ O                                toggle highlighting of alternate columns 
+ m                                shift line highlighting start
+ M                                shift column highlighting start
+ F                                go to. 10  -> absolute line number
+                                         10o -> absolute offset
+                                         10% -> percentage in file
+ p                                go to percentage.
+ v                                format columns.
+ i                                ignore lines. Lines or regexp
+ I                                remove ignore lines patterns
+ /                                forward search
+ ?                                backward search
+ n                                repeat previous search
+ N                                repeat previous search, reversed direction
+ s                                save content to file
+ E                                export content to some format (tex, csv)
+ S                                change split regexp
+ t                                toggle column names
+ ^                                use a line from file for column headers
+ |                                change column separator character
+ [                                shift content of a column to the left
+ ]                                shift content of a column to the right
+ {                                shift content of a column to the start
+ }                                shift content of a column to the end
+ (                                reduce width of a column
+ )                                increase width of a column
+ \\                               change column padding string
+ r, R, ^R, ^L                     refresh display
+ :                                command menu
+ q                                quit
+
+ Notes on Searching
+ ==================
+
+ The search patterns are Perl compatible regular expressions. It is ill
+ advised to use patterns that match white spaces as the spaces are
+ ignored when displayed. I.e., a match MUST be contained within a
+ column to be properly displayed. If a match span accross columns,
+ strange behavior may occure.  To force a match to be the entire column
+ width, use the word boundary anchor: \\b. E.g., to match the line with
+ a column having only 0 (instead of any column which contains a 0), use
+ the following pattern: \\b0\\b.
+ 
+ Note also that the match might be in a hidden column. In any case, if
+ the line numbers are displayed, a line having a match will have its
+ line number in reverse video.
+
+ Environment variable
+ ====================
+
+ If set, the environment variable CLESS gives switches to be added to the
+ switches found on the command line. For example, to always display the line
+ numbers and columns:
+    CLESS="--lines --column"
+EOF
+
+
+  OPTIONS = "--no-column --no-line --no-offset --no-line-highlight " +
+    "--no-column-highlight --no-column-names --no-parse-header " +
+    "--ignore '/^\s/'"
+
+  def self.display
+    io = open("|#{$0} #{OPTIONS}", "w")
+    io.write(CONTENT)
+    io.close
+    Process.wait rescue nil
+  end
+end

data/lib/cless/optionsdb.rb

@@ -0,0 +1,29 @@
+class OptionsDB
+  def initialize(*files)
+    @names = {}
+    @regexps = {}
+    files.each { |f| parse_file(f) }
+  end
+
+  def parse_file(name)
+    File.open(File.expand_path(name)) do |fd|
+      fd.each_line do |l|
+        a = l.split_with_quotes
+        n = a.shift
+        r = a.shift
+        @names[n] = a
+        @regexps[Regexp.new(r)] = a
+      end
+    end
+    true
+  end
+
+  def match(fname)
+    @regexps.each do |regexp, v|
+      return v if fname =~ regexp
+    end
+    nil
+  end
+
+  def [](name); name.nil? ? nil : @names[name]; end
+end

data/lib/cless/version.rb

@@ -0,0 +1 @@
+Version = [0, 3, 20]

metadata

@@ -0,0 +1,70 @@
+--- !ruby/object:Gem::Specification
+name: cless
+version: !ruby/object:Gem::Version
+  version: 0.3.20
+platform: ruby
+authors:
+- Guillaume Marçais
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2018-05-09 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: ncursesw
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.4'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.4'
+description: cless displays column oriented files.
+email:
+- gmarcais@cs.cmu.edu
+executables:
+- cless
+extensions: []
+extra_rdoc_files: []
+files:
+- LICENSE
+- Readme.md
+- bin/cless
+- lib/cless/assert.rb
+- lib/cless/cless.rb
+- lib/cless/data.rb
+- lib/cless/display.rb
+- lib/cless/export.rb
+- lib/cless/help.rb
+- lib/cless/optionsdb.rb
+- lib/cless/version.rb
+homepage: https://github.com/gmarcais/cless
+licenses:
+- GPL-3.0
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.7.6
+signing_key: 
+specification_version: 4
+summary: A column oriented less
+test_files: []