greenpepper-ruby 0.0.1

data/lib/greenpepper/grammar/array.treetop

@@ -0,0 +1,51 @@
+grammar ArrayGrammar
+    rule root
+        space '['? string ']'? space {
+            def text
+                array = Array.new
+                string.text(array)
+            end
+        }
+        /
+        string
+    end
+    
+    rule string
+        value ',' value2:(string)? {
+            def text(array)
+                value.text(array)
+                value2.text(array)
+            end
+        }
+        /
+        value
+    end
+    
+    rule value
+        space texte:('\'' txt '\'' / '"' txt '"') space { 
+            def text(array)
+                array << texte.text_value if !texte.text_value.empty?
+                array
+            end
+        }
+        /
+        space texte:txt_without_commas space {
+            def text(array)
+                array << texte.text_value if !texte.text_value.empty?
+                array
+            end
+        }
+    end
+    
+    rule txt_without_commas
+        [^\[|\]|'\'|'"'|',']*
+    end
+    
+    rule txt
+        [^\[\]'\''"']*
+    end
+    
+    rule space
+        [\s]*
+    end
+end

data/lib/greenpepper/grammar/arrayparser.rb

@@ -0,0 +1,14 @@
+=begin
+authors: Edouard Murat
+date: March 28, 2009
+=end
+require 'rubygems'
+require 'treetop'
+require 'greenpepper/grammar/array'
+
+module ArrayGrammarModule
+  @parser = ArrayGrammarParser.new
+  def ArrayGrammarModule.parse(s)
+     array = @parser.parse(s).text
+  end
+end

data/lib/greenpepper/greenpepperconfig.rb

@@ -0,0 +1,19 @@
+module GreenPepper
+class GreenPepperConfig
+  include Singleton
+  #GreenPepperTask
+  attr_accessor :spec_dir, :result_dir, :greenpepper_path
+
+  #RedPepperTask
+  attr_accessor :server, :path
+
+  def self.configure
+    yield GreenPepperConfig.instance
+  end
+
+  def self.maybe_set(instance, symbol, config)
+    value = config.instance_variable_get(symbol)
+    instance.instance_variable_set symbol, value if value
+  end
+end
+end

data/lib/greenpepper/greenpeppertask.rb

@@ -0,0 +1,60 @@
+#!/usr/bin/env ruby
+=begin
+author: Simon Mathieu (simon.math@gmail.com)
+date: November 8, 2009
+=end
+
+require 'rake'
+require 'rake/tasklib'
+require 'greenpepper/greenpepperconfig'
+
+module GreenPepper
+class GreenPepperTask < Rake::TaskLib
+  attr_accessor :spec_dir, :spec_name, :result_dir, :greenpepper_path
+
+  def initialize(name)
+    @name = name
+
+    @spec_dir = 'greenpepper/specifications'
+    @spec_name = '**/*.html'
+    @result_dir = 'greenpepper/results'
+    @greenpepper_path = nil
+
+    yield self if block_given?
+    load_config
+    define
+  end
+
+  private
+  def define
+    task @name do
+      begin
+        core_path = 'greenpepper/core'
+        core_path = File.join @greenpepper_path, core_path if @greenpepper_path
+        require core_path 
+      rescue Exception => e
+        raise "Could not find GreenPepper core (greenpepper/core.rb)." +
+          " Please specify GreenPepper path in GreenPepperTask variable" +
+          " 'greenpepper_path'."
+      end
+      core = GreenPepper::GreenPepperCore.new
+      pattern = File.join @spec_dir, @spec_name
+      files = Dir.glob pattern
+      files.each{ |file|
+        # TODO Support sub folders in result
+        output = File.join @result_dir, File.basename(file)
+        args = [file, output]
+        puts "Specification: #{output}"
+        core.run args
+      }
+    end
+  end
+
+  def load_config
+    config = GreenPepperConfig.instance
+    GreenPepperConfig.maybe_set self, "@spec_dir", config
+    GreenPepperConfig.maybe_set self, "@result_dir", config
+    GreenPepperConfig.maybe_set self, "@greenpepper_path", config
+  end
+end
+end

data/lib/greenpepper/logger.rb

@@ -0,0 +1,45 @@
+=begin
+author: Simon Mathieu (simon.math@gmail.com)
+date: March 30, 2009 
+=end
+module GreenPepper
+
+#Very very simple logger.
+class Logger
+  def initialize(output)
+    @output = output
+
+    log_file = get_log_path
+
+    @output_file = File.open(log_file, 'a')
+  end
+
+  def get_log_path
+     if /win32/ === RUBY_PLATFORM
+      "C:/temp/greenpepperruby.log" 
+    else
+      "/tmp/greenpepperruby.log" 
+    end
+  end
+
+  #Prints to the output
+  def error(message)
+    @output.puts message
+  end
+
+  #Print to log file
+  def log(message)
+    @output_file.puts message if @output_file
+  end
+
+  def log_error(message)
+    error message
+    log message
+  end
+
+  #Close the log file
+  def close
+    @output_file.close
+  end
+end
+end

data/lib/greenpepper/parser/freetextparser.rb

@@ -0,0 +1,96 @@
+=begin
+author: Simon Mathieu (simon.math@gmail.com)
+date: October 3, 2009
+=end
+
+module GreenPepper
+
+require 'rubygems'
+require 'libxml'
+require 'greenpepper/parser/scenario'
+require 'greenpepper/executionunit'
+require 'greenpepper/context/htmlcontext'
+
+class FreeTextParser
+
+  def extract_content(document, filename = 'UNKNOWN')
+      doc = load_doc document, filename
+      extract_scenarios_from_html(doc)
+  end
+
+  def replace_scenarios(document, html_results)
+    doc = load_doc document
+    pres = find_free_text_pre doc
+    if pres.size != html_results.size
+      raise GreenPepperError.new("Mismatch in result size.") 
+    end
+
+    pres.each_with_index{ |pre, index|
+      new = (LibXML::XML::Parser.string(
+        "<div>#{html_results[index]}</div>",
+        :encoding => LibXML::XML::Encoding::UTF_8,
+        :options => LibXML::XML::HTMLParser::Options::NOBLANKS).parse).root.copy(true)
+      replace_node pre, new
+    }
+
+    doc.root.to_s
+  end
+
+  private
+  def load_doc(document, filename = 'UNKNOWN')
+    begin
+      doc = (LibXML::XML::HTMLParser.string document,
+            :encoding => LibXML::XML::Encoding::UTF_8,
+            :options => LibXML::XML::HTMLParser::Options::NOBLANKS).parse
+    rescue LibXML::XML::Error => exception
+      message = "An error occured while using LibXML : " +
+        "Invalid element at #{filename}:#{exception.line}"
+      raise GreenPepperLibXmlError.new(message)
+    end
+    doc
+  end
+
+  def replace_node(old, new)
+    if old.prev?
+      prev = old.prev
+      prev.next = new
+    elsif old.parent.first
+      # Make new the first child of the parent
+      old.parent.first.prev = new
+    else
+      old.parent << new
+    end
+    old.remove!
+  end
+
+  def extract_scenarios_from_html(doc)
+    execution_units = []
+    pres = find_free_text_pre doc
+    pres.each{ |pre_element|
+      scenario_regex = /Scenario\s?:\s*(.*)$/
+      lines = pre_element.content.strip.split("\n").collect{|line| line.strip}
+
+      raise GreenPepperNoScenarioInTag.new unless scenario_regex === lines[0]
+
+      scenario = Scenario.new lines[0].match(scenario_regex).to_a[1]
+      scenario.add_lines lines[1..-1]
+      
+      context = ExampleContext.new pre_element.line_num
+      
+      unit = ExecutionUnit.new scenario, context
+      execution_units << unit
+    }
+
+    execution_units
+  end
+
+  def find_free_text_pre(doc)
+    pres = []
+    doc.find("//pre").each{ |pre_element|
+      pre_classes = pre_element["class"].split(" ")
+      pres << pre_element if pre_classes.index("greenpepper-freetext")
+    }
+    pres
+  end
+end
+end

data/lib/greenpepper/parser/htmlparser.rb

@@ -0,0 +1,70 @@
+require 'rubygems'
+require 'libxml'
+require 'greenpepper/context/htmlcontext'
+require 'greenpepper/parser/table'
+require 'greenpepper/exception/greenpepperexception'
+require 'greenpepper/executionunit'
+
+module GreenPepper
+
+class HtmlParser
+
+  attr_reader :html_string
+
+  def parse_file(filename)
+    file_content = ""
+    File.open(filename, "r") { |f| file_content = f.read }
+    extract_content file_content, filename
+  end
+
+  def extract_content(text, filename = "UNKNOWN")
+    begin
+      # TODO Remove this in favor of proper character encoding
+      # support. This is a hack to address a bug where the Confluence server
+      # would return non ascii characters.
+      text.gsub! /[\x80-\xff]/, ""
+
+      doc = (LibXML::XML::HTMLParser.string text).parse
+      ex_units = extract_tables(doc)
+    rescue LibXML::XML::Error => exception
+      message = "An error occured while using LibXML : " +
+        "Invalid element at #{filename}:#{exception.line}"
+      raise GreenPepperLibXmlError.new(message)
+    end
+
+    ex_units
+  end
+
+  def extract_tables(doc)
+    execution_units = []
+
+    table_parser = HtmlTableParser.new
+    
+    doc.find("//table").each_with_index{ |table_element, table_index|
+      table = table_parser.parse(table_element)
+      context = HtmlContext.new table_element.line_num, table_index
+
+      ex_unit = ExecutionUnit.new table, context
+
+      execution_units << ex_unit
+    }
+    execution_units
+  end
+end
+
+class HtmlTableParser
+  def parse(table_element)
+    table = Table.new
+    table_element.find('.//tr').each{ |row|
+      cells = Array.new
+      row.find('td | th').each { |cell| 
+        content = cell.content
+        content = "" if content == "\302\240" #Clear "&nbsp;"
+        cells.push content.strip
+      }
+      table.push_row cells
+    }
+    table 
+  end
+end
+end #module GreenPepper

data/lib/greenpepper/parser/scenario.rb

@@ -0,0 +1,25 @@
+=begin
+Author: Simon Mathieu (simon.math@gmail.com)
+        Pascal Ouellet (pas.ouellet@gmail.com)
+Date: October 5, 2009
+=end
+
+module GreenPepper
+
+class Scenario
+  attr_reader :fixture_name, :lines
+  def initialize(fixture_name)
+    @lines = []
+    @fixture_name = fixture_name
+  end
+
+  def add_line(line)
+    @lines << line
+  end
+
+  def add_lines(lines)
+    @lines = @lines + lines
+  end
+end
+
+end

data/lib/greenpepper/parser/table.rb

@@ -0,0 +1,37 @@
+=begin
+author: Pascal Ouellet (pas.ouellet@gmail.com)
+date: March 6, 2009
+=end
+module GreenPepper
+
+class Table
+  def initialize
+    @table = Array.new
+  end
+
+  def [](row)
+    @table[row]
+  end
+
+  def push_row(row)
+    @table.push row.clone
+  end
+
+  def merge_with(to_merge)
+    @table = @table + to_merge.table
+    self
+  end
+
+  def ==(rho)
+    return false unless rho.is_a? Table
+    @table == rho.table
+  end
+  
+  def each_row
+    @table.each{|row| yield row }
+  end
+
+  protected
+  attr_reader :table
+end
+end #module GreenPepper

data/lib/greenpepper/parser/wikiparser.rb

@@ -0,0 +1,26 @@
+=begin
+Author: Simon Mathieu (simon.math@gmail.com)
+Date: April 12, 2009 
+=end
+
+require 'greenpepper/parser/table'
+require 'greenpepper/parser/htmlparser'
+require 'rubygems'
+require 'redcloth'
+require 'libxml'
+
+module GreenPepper
+
+class WikiTableParser
+  def parse(wiki_table_string)
+    s = wiki_table_string.split("\n")
+    s = s.collect{|x| x.strip}
+    s = s.join("\n")
+    html = RedCloth.new(s).to_html
+    doc = (LibXML::XML::HTMLParser.string html).parse.root
+    html_parser = HtmlTableParser.new
+    html_parser.parse doc 
+  end
+end
+
+end