bluecloth 2.0.6.pre120-x86-mswin32

data/spec/lib/constants.rb

@@ -0,0 +1,5 @@
+#!/usr/bin/ruby
+
+module BlueCloth::TestConstants
+
+end

data/spec/lib/helpers.rb

@@ -0,0 +1,137 @@
+#!/usr/bin/ruby
+# encoding: utf-8
+
+require 'spec'
+require 'bluecloth'
+
+
+module BlueCloth::SpecHelpers
+
+	###############
+	module_function
+	###############
+
+end
+
+
+# Override the badly-formatted output of the RSpec HTML formatter
+require 'spec/runner/formatter/html_formatter'
+
+class Spec::Runner::Formatter::HtmlFormatter
+	def example_failed( example, counter, failure )
+		failure_style = failure.pending_fixed? ? 'pending_fixed' : 'failed'
+		
+		unless @header_red
+			@output.puts "    <script type=\"text/javascript\">makeRed('rspec-header');</script>"
+			@header_red = true
+		end
+		
+		unless @example_group_red
+			css_class = 'example_group_%d' % [current_example_group_number||0]
+			@output.puts "    <script type=\"text/javascript\">makeRed('#{css_class}');</script>"
+			@example_group_red = true
+		end
+		
+		move_progress()
+		
+		@output.puts "    <dd class=\"spec #{failure_style}\">",
+		             "      <span class=\"failed_spec_name\">#{h(example.description)}</span>",
+		             "      <div class=\"failure\" id=\"failure_#{counter}\">"
+		if failure.exception
+			backtrace = format_backtrace( failure.exception.backtrace )
+			message = failure.exception.message
+			
+			@output.puts "        <div class=\"message\"><code>#{h message}</code></div>",
+			             "        <div class=\"backtrace\"><pre>#{backtrace}</pre></div>"
+		end
+
+		if extra = extra_failure_content( failure )
+			@output.puts( extra )
+		end
+		
+		@output.puts "      </div>",
+		             "    </dd>"
+		@output.flush
+	end
+
+
+	alias_method :default_global_styles, :global_styles
+	
+	def global_styles
+		css = default_global_styles()
+		css << %Q{
+			/* Stuff added by #{__FILE__} */
+
+			/* Overrides */
+			#rspec-header {
+				-webkit-box-shadow: #333 0 2px 5px;
+				margin-bottom: 1em;
+			}
+
+			.example_group dt {
+				-webkit-box-shadow: #333 0 2px 3px;
+			}
+
+			/* Style for log output */
+			dd.log-message {
+				background: #eee;
+				padding: 0 2em;
+				margin: 0.2em 1em;
+				border-bottom: 1px dotted #999;
+				border-top: 1px dotted #999;
+				text-indent: -1em;
+			}
+
+			/* Parts of the message */
+			dd.log-message .log-time {
+				font-weight: bold;
+			}
+			dd.log-message .log-time:after {
+				content: ": ";
+			}
+			dd.log-message .log-level {
+				font-variant: small-caps;
+				border: 1px solid #ccc;
+				padding: 1px 2px;
+			}
+			dd.log-message .log-name {
+				font-size: 1.2em;
+				color: #1e51b2;
+			}
+			dd.log-message .log-name:before { content: "«"; }
+			dd.log-message .log-name:after { content:  "»"; }
+
+			dd.log-message .log-message-text {
+				padding-left: 4px;
+				font-family: Monaco, "Andale Mono", "Vera Sans Mono", mono;
+			}
+
+
+			/* Distinguish levels */
+			dd.log-message.debug { color: #666; }
+			dd.log-message.info {}
+
+			dd.log-message.warn,
+			dd.log-message.error {
+				background: #ff9;
+			}
+			dd.log-message.error .log-level,
+			dd.log-message.error .log-message-text {
+				color: #900;
+			}
+			dd.log-message.fatal {
+				background: #900;
+				color: white;
+				font-weight: bold;
+				border: 0;
+			}
+			dd.log-message.fatal .log-name {
+				color:  white;
+			}
+		}
+		
+		return css
+	end
+end
+
+

data/spec/lib/matchers.rb

@@ -0,0 +1,235 @@
+#!/usr/bin/env ruby
+
+require 'bluecloth'
+require 'diff/lcs'
+require 'diff/lcs/callbacks'
+require 'spec/lib/constants'
+require 'rbconfig'
+
+
+### Fixturing functions
+module BlueCloth::Matchers
+
+	### Matcher for comparing output of a BlueCloth-generated HTML fragment against a known-good
+	### string.
+	class TransformMatcher
+
+		### Create a new matcher for the given +html+
+		def initialize( html )
+			@html = html
+		end
+
+		### Strip tab indentation from the expected HTML output.
+		def without_indentation
+			if indent = @html[/\A\t+/]
+				indent.gsub!( /\A\n/m, '' )
+				@html.gsub!( /^#{indent}/m, '' )
+			end
+
+			return self
+		end
+
+
+		### Returns true if the HTML generated by the given +bluecloth+ object matches the 
+		### expected HTML, comparing only the salient document structures.
+		def matches?( bluecloth )
+			@bluecloth = bluecloth
+			@output_html = bluecloth.to_html.gsub( /\n\n\n/, "\n\n" )
+			return @output_html.strip == @html.strip
+		end
+
+		### Build a failure message for the matching case.
+		def failure_message
+			if self.should_output_html?
+				patch = self.make_html_patch( @html, @output_html )
+				return %{
+					<p>Expected the generated html:<br />
+					   <pre><code>#@output_html</code></pre>
+					to be the same as:<br />
+					   <pre><code>#@html</code></pre>
+					</p>
+					<p>Diffs:</p>
+					#{patch}
+				}
+			else
+				patch = self.make_patch( @html, @output_html )
+				return ("Expected the generated html:\n\n  %p\n\nto be the same as:\n\n" +
+					"  %p\n\nDiffs:\n\n%s") % [ @output_html, @html, patch ]
+			end
+		end
+
+		### Build a failure message for the non-matching case.
+		def negative_failure_message
+			return "Expected the generated html:\n\n  %p\n\nnot to be the same as:\n\n  %p\n\n" %
+				[ @output_html, @html ]
+		end
+
+
+		### Returns true if it appears HTML output should be used instead of plain-text. This
+		### will be true if running from TextMate or if the HTML_LOGGING environment variable
+		### is set.
+		def should_output_html?
+			return false
+			# return ENV['HTML_LOGGING'] ||
+			# 	(ENV['TM_FILENAME'] && ENV['TM_FILENAME'] =~ /_spec\.rb/)
+		end
+
+
+		### Compute a patch between the given +expected+ output and the +actual+ output
+		### and return it as a string.
+		def make_patch( expected, actual )
+			diffs = Diff::LCS.sdiff( expected.split("\n"), actual.split("\n"),
+				Diff::LCS::ContextDiffCallbacks )
+
+			maxcol = diffs.flatten.
+				collect {|d| [d.old_element.to_s.length, d.new_element.to_s.length ] }.
+				flatten.max || 0
+			maxcol += 4
+
+			patch = "              %#{maxcol}s | %s\n" % [ "Expected", "Actual" ]
+			patch << diffs.collect do |changeset|
+				changeset.collect do |change|
+					"%s [%03d, %03d]: %#{maxcol}s | %-#{maxcol}s" % [
+						change.action,
+						change.old_position,
+						change.new_position,
+						change.old_element.inspect,
+						change.new_element.inspect,
+					]
+				end.join("\n")
+			end.join("\n---\n")
+		end
+
+		### Compute a patch similar to #make_patch, but output HTML instead of plain text.
+		def make_html_patch( expected, actual )
+			diffs = Diff::LCS.sdiff( expected.split("\n"), actual.split("\n"),
+				Diff::LCS::ContextDiffCallbacks )
+
+			patch = %{
+				<table>
+					<caption>Diffs</caption>
+					<thead>
+						<tr><th>Op</th><th>Pos</th><th>Expected</th><th>Actual</th></tr>
+					</thead>
+					<tbody>
+				}
+			patch << diffs.collect do |changeset|
+				changeset.collect do |change|
+					"<tr><td>%s</td><td>[%03d, %03d]</td><td>%s</td><td>%s</td></tr>" % [
+						change.action,
+						change.old_position,
+						change.new_position,
+						change.old_element.inspect,
+						change.new_element.inspect,
+					]
+				end.join("\n")
+			end.join( "</tbody><tbody>" )
+			patch << %{</tbody></table>\n}
+		end
+
+	end
+
+	### Variant of the regular TransformMatcher that normalizes the two strings using the 'tidy'
+	### library before comparing.
+	class TidyTransformMatcher < TransformMatcher
+
+		TIDY_OPTIONS = {}
+		@tidy = nil
+
+		### Fetch the class-global Tidy object, creating it if necessary
+		def self::tidy_object
+			unless @tidy
+				require 'tidy'
+				soext = Config::CONFIG['LIBRUBY_ALIASES'].sub( /.*\./, '' )
+				Tidy.path = "libtidy.#{soext}"
+				@tidy = Tidy.new( TIDY_OPTIONS )
+			end
+
+			return @tidy
+		end
+
+
+		### Set the matcher's expected output to a tidied version of the input +html+.
+		def initialize( html )
+			@html = self.class.tidy_object.clean( html )
+		end
+
+
+		### Returns true if the HTML generated by the given +bluecloth+ object matches the 
+		### expected HTML after normalizing them both with 'tidy'.
+		def matches?( bluecloth )
+			@bluecloth = bluecloth
+			@output_html = self.class.tidy_object.clean( bluecloth.to_html )
+			return @output_html == @html
+		end
+
+	end
+
+
+	class TransformRegexpMatcher
+
+		### Create a new matcher for the given +regexp+
+		def initialize( regexp )
+			@regexp = regexp
+		end
+
+		### Returns true if the regexp associated with this matcher matches the output generated
+		### by the specified +bluecloth+ object.
+		def matches?( bluecloth )
+			@bluecloth = bluecloth
+			@output_html = bluecloth.to_html
+			return @output_html =~ @regexp
+		end
+
+		### Build a failure message for the matching case.
+		def failure_message
+			return "Expected the generated html:\n\n   %pto match the regexp:\n\n%p\n\n" %
+				[ @output_html, @regexp ]
+		end
+
+
+		### Build a failure message for the negative matching case.
+		def negative_failure_message
+			return "Expected the generated html:\n\n   %pnot to match the regexp:\n\n%p\n\n" %
+				[ @output_html, @regexp ]
+		end
+	end
+
+
+	### Create a new BlueCloth object out of the given +string+ and +options+ and
+	### return it.
+	def the_markdown( string, *options )
+		return BlueCloth.new( string, *options )
+	end
+
+
+	### Strip indentation from the given +string+, create a new BlueCloth object 
+	### out of the result and any +options+, and return it.
+	def the_indented_markdown( string, *options )
+		if indent = string[/\A\t+/]
+			indent.gsub!( /\A\n/m, '' )
+			$stderr.puts "Source indent is: %p" % [ indent ] if $DEBUG
+			string.gsub!( /^#{indent}/m, '' )
+		end
+
+		return BlueCloth.new( string, *options )
+	end
+
+
+	### Generate a matcher that expects to equal the given +html+.
+	def be_transformed_into( html )
+		return BlueCloth::Matchers::TransformMatcher.new( html )
+	end
+
+	### Generate a matcher that expects to match a normalized version of the specified +html+.
+	def be_transformed_into_normalized_html( html )
+		return BlueCloth::Matchers::TidyTransformMatcher.new( html )
+	end
+
+	### Generate a matcher that expects to match the given +regexp+.
+	def be_transformed_into_html_matching( regexp )
+		return BlueCloth::Matchers::TransformMatcher.new( regexp )
+	end
+
+end # module BlueCloth::Matchers
+

data/spec/markdowntest_spec.rb

@@ -0,0 +1,79 @@
+#!/usr/bin/env ruby
+
+BEGIN {
+	require 'pathname'
+	basedir = Pathname.new( __FILE__ ).dirname.parent
+
+	libdir = basedir + 'lib'
+	extdir = basedir + 'ext'
+
+	$LOAD_PATH.unshift( libdir ) unless $LOAD_PATH.include?( libdir )
+	$LOAD_PATH.unshift( extdir ) unless $LOAD_PATH.include?( extdir )
+}
+
+require 'spec'
+require 'bluecloth'
+
+require 'spec/lib/helpers'
+require 'spec/lib/constants'
+require 'spec/lib/matchers'
+
+require 'rbconfig'
+require 'dl'
+
+
+#####################################################################
+###	C O N T E X T S
+#####################################################################
+
+describe BlueCloth, "-- MarkdownTest 1.0.3: " do
+	include BlueCloth::TestConstants,
+	        BlueCloth::Matchers
+
+	before( :all ) do
+		soext = Config::CONFIG['LIBRUBY_ALIASES'].sub( /.*\./, '' )
+		@dlname = "libtidy.#{soext}"
+
+		begin
+			DL.dlopen( @dlname )
+		rescue RuntimeError => err
+			@have_libtidy = false
+			@tidy_error = err.message
+		rescue DL::DLError => err
+			@have_libtidy = false
+			@tidy_error = err.message
+		else
+			@have_libtidy = true
+			@tidy_error = nil
+		end
+
+		begin
+			require 'tidy'
+		rescue LoadError, NameError => err
+			@have_libtidy = false
+			@tidy_error = err.message
+		end
+
+	end
+
+	before( :each ) do
+		pending( "These tests require the tidy library: #@tidy_error" ) unless @have_libtidy
+	end
+
+
+	markdowntest_dir = Pathname.new( __FILE__ ).dirname + 'data/markdowntest'
+	pattern = markdowntest_dir + '*.text'
+	Pathname.glob( pattern.to_s ).each do |textfile|
+		resultfile = Pathname.new( textfile.to_s.sub(/\.text/, '.html') )
+
+		it textfile.basename( '.text' ) do
+			markdown = textfile.read
+			expected = resultfile.read
+			options = { :smartypants => false }
+
+			the_markdown( markdown, options ).should be_transformed_into_normalized_html( expected )
+		end
+	end
+
+end
+