[NEW] start adding Bazaar support : parser and basic infrastructure.

Michael

Author: obnoxxx

lib/scm.rb

@@ -15,6 +15,7 @@ module Scm
 require 'lib/scm/adapters/svn_adapter'
 require 'lib/scm/adapters/git_adapter'
 require 'lib/scm/adapters/hg_adapter'
+require 'lib/scm/adapters/bzr_adapter'
 require 'lib/scm/adapters/factory'
 
 require 'lib/scm/parsers/parser'
@@ -25,6 +26,7 @@ module Scm
 require 'lib/scm/parsers/git_styled_parser'
 require 'lib/scm/parsers/hg_parser'
 require 'lib/scm/parsers/hg_styled_parser'
+require 'lib/scm/parsers/bzr_parser'
 
 require 'lib/scm/parsers/array_writer'
 require 'lib/scm/parsers/xml_writer'

lib/scm/adapters/bzr_adapter.rb

@@ -0,0 +1,7 @@
+module Scm::Adapters
+	class BzrAdapter < AbstractAdapter
+		def english_name
+			"Bazaar"
+		end
+	end
+end

lib/scm/parsers/bzr_parser.rb

@@ -0,0 +1,60 @@
+module Scm::Parsers
+	# This parser can process the default bzr logs, with or without the --verbose flag.
+	class BzrParser < Parser
+		def self.scm
+			'bzr'
+		end
+
+		def self.internal_parse(buffer, opts)
+			e = nil
+			state = :data
+			action = ''
+
+			buffer.each_line do |l|
+				next_state = state
+
+				case l
+				when /^-+$/
+					# a new commit begins
+					yield e if e && block_given?
+					e = Scm::Commit.new
+					e.diffs = []
+					next_state = :data
+				when /^revno:\s+(\d+)$/
+					e.token = $1
+					next_state = :data
+				when /^committer:\s+(.+?)(\s+<(.+)>)?$/
+					e.committer_name = $1
+					e.committer_email = $3
+					next_state = :data
+				when /^timestamp:\s+(.+)/
+					e.committer_date = Time.parse($1)
+					next_state = :data
+				when /^added:$/
+					next_state = :collect_files
+					action = 'A'
+				when /^modified:$/
+					next_state = :collect_files
+					action = 'M'
+				when /^removed:$/
+					next_state = :collect_files
+					action = 'D'
+				when /^message:$/
+					next_state = :collect_message
+					e.message ||= ''
+				when /^  (.*)$/
+					if state == :collect_files and $1.length > 0
+						e.diffs << Scm::Diff.new(:action => action, :path => $1)
+					elsif state == :collect_message
+						e.message << $1
+						e.message << "\n"
+					end
+				end
+
+				state = next_state
+			end
+			yield e if e && block_given?
+		end
+
+	end
+end