RubyGems - rpeg-multimarkdown - Versions diffs - 0.1.1 - Mend

rpeg-multimarkdown 0.1.1

Files changed (214) hide show

data/lib/multimarkdown.rb ADDED Viewed

	@@ -0,0 +1 @@
1	+ require 'peg_multimarkdown'

data/lib/peg_multimarkdown.rb ADDED Viewed

@@ -0,0 +1,74 @@
+require 'peg_multimarkdown.so'
+# Front-end to fletcher penney's peg-multimarkdown implementation of MultiMarkdown
+#
+# A simple processor:
+#   >>> puts MultiMarkdown.new("Hello, World.").to_html
+#   <p>Hello, World.</p>
+#
+# With other stuff:
+#   >>> puts MultiMarkdown.new("_Hello -- World!_", :smart, :filter_html).to_html
+#   <p><em>Hello World!</em></p>
+#
+class PEGMultiMarkdown
+  # Original MultiMarkdown formatted text.
+  attr_reader :text
+  # Set true to have smarty-like quote translation performed.
+  attr_accessor :smart
+  # Set true to have footnotes processed.
+  attr_accessor :notes
+  # Do not output <style> tags included in the source text.
+  attr_accessor :filter_styles
+  # Do not output any raw HTML included in the source text.
+  attr_accessor :filter_html
+  # Process MultiMarkdown inside of raw HTML
+  attr_accessor :process_html
+  # Markdown compatibility mode
+  attr_accessor :compatibility
+  # Included for compatibility with RedCloth's interface.
+  attr_accessor :fold_lines
+  # Create a new MultiMarkdown processor. The +text+ argument is a string
+  # containing MultiMarkdown text. Variable other arguments may be supplied to
+  # set various processing options:
+  #
+  # * <tt>:smart</tt> - Enable SmartyPants processing.
+  # * <tt>:notes</tt> - Enable footnotes.
+  # * <tt>:filter_styles</tt> - Do not output <style> tags included in the
+  #   source text.
+  # * <tt>:filter_html</tt> - Do not output raw HTML included in the
+  #   source text.
+  # * <tt>:process_html</tt> - Process MultiMarkdown code inside HTML tags.
+  # * <tt>:compatibility</tt> - Process MultiMarkdown code in Markdown
+  #   compatibility mode.
+  # * <tt>:fold_lines</tt> - RedCloth compatible line folding (not used).
+  #
+  def initialize(text, *extensions)
+    @text = text
+    @smart = true
+    @notes = true
+    @filter_styles = false
+    @filter_html = false
+    @process_html = false
+    @compatibility = false
+    extensions.each { |e| send("#{e}=", true) }
+    if @compatibility
+      @smart = false
+      @notes = false
+      @process_html = false
+    end
+  end
+  alias to_s text
+end
+MultiMarkdown = PEGMultiMarkdown unless defined? MultiMarkdown

data/test/MultiMarkdownTest/BeamerTests/Beamer-Tables.html ADDED Viewed

@@ -0,0 +1,76 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+	<meta name="latexinput" content="mmd-beamer-header"/>
+	<title>Test  </title>
+	<meta name="latexmode" content="beamer"/>
+	<meta name="theme" content="keynote-gradient"/>
+	<meta name="latexinput" content="mmd-beamer-begin-doc"/>
+	<meta name="latexfooter" content="mmd-beamer-footer"/>
+</head>
+<body>
+<h3 id="tables">Tables</h3>
+<table>
+<col align="left"/>
+<col align="center"/>
+<col align="center"/>
+<thead>
+<tr>
+	<th align="left">Features </th>
+	<th align="center">MultiMarkdown </th>
+	<th align="center">Crayons </th>
+</tr>
+</thead>
+<tbody>
+<tr>
+	<td align="left">Melts in warm places </td>
+	<td align="center">No </td>
+	<td align="center">Yes </td>
+</tr>
+<tr>
+	<td align="left">Mistakes can be easily fixed </td>
+	<td align="center">Yes </td>
+	<td align="center">No </td>
+</tr>
+<tr>
+	<td align="left">Easy to copy documents for friends </td>
+	<td align="center">Yes </td>
+	<td align="center">No </td>
+</tr>
+<tr>
+	<td align="left">Fun at parties </td>
+	<td align="center">No </td>
+	<td align="center">Why not? </td>
+</tr>
+</tbody>
+<tbody>
+<tr>
+	<td align="left">Minimum markup for maximum quality? </td>
+	<td align="center">Yes </td>
+	<td align="center">No </td>
+</tr>
+</tbody>
+</table>
+<h3 id="theoldwaywascomplicated">The old way was complicated</h3>
+<pre><code>&lt;p&gt;In order to create valid
+&lt;a href=&quot;http://en.wikipedia.org/wiki/HTML&quot;&gt;HTML&lt;/a&gt;, you
+need properly coded syntax that can be cumbersome for
+&amp;#8220;non-programmers&amp;#8221; to write. Sometimes, you
+just want to easily make certain words &lt;strong&gt;bold
+&lt;/strong&gt;, and certain words &lt;em&gt;italicized&lt;/em&gt; without
+having to remember the syntax. Additionally, for example,
+creating lists:&lt;/p&gt;
+&lt;ul&gt;
+&lt;li&gt;should be easy&lt;/li&gt;
+&lt;li&gt;should not involve programming&lt;/li&gt;
+&lt;/ul&gt;
+</code></pre>
+</body>
+</html>

data/test/MultiMarkdownTest/BeamerTests/Beamer-Tables.tex ADDED Viewed

@@ -0,0 +1,64 @@
+\input{mmd-beamer-header}
+\def\mytitle{Test}
+\def\latexmode{beamer}
+\def\theme{keynote-gradient}
+\input{mmd-beamer-begin-doc}
+\begin{frame}
+\frametitle{Tables}
+\label{tables}
+\begin{table}[htbp]
+\begin{minipage}{\linewidth}
+\setlength{\tymax}{0.5\linewidth}
+\centering
+\small
+\begin{tabular}{@{}lcc@{}} \toprule
+Features&MultiMarkdown&Crayons\\
+\midrule
+Melts in warm places&No&Yes\\
+Mistakes can be easily fixed&Yes&No\\
+Easy to copy documents for friends&Yes&No\\
+Fun at parties&No&Why not?\\
+\midrule
+Minimum markup for maximum quality?&Yes&No\\
+\bottomrule
+\end{tabular}
+\end{minipage}
+\end{table}
+\end{frame}
+\begin{frame}[fragile]
+\frametitle{The old way was complicated}
+\label{theoldwaywascomplicated}
+\begin{verbatim}
+<p>In order to create valid
+<a href="http://en.wikipedia.org/wiki/HTML">HTML</a>, you
+need properly coded syntax that can be cumbersome for
+&#8220;non-programmers&#8221; to write. Sometimes, you
+just want to easily make certain words <strong>bold
+</strong>, and certain words <em>italicized</em> without
+having to remember the syntax. Additionally, for example,
+creating lists:</p>
+<ul>
+<li>should be easy</li>
+<li>should not involve programming</li>
+</ul>
+\end{verbatim}
+\end{frame}
+\mode<all>
+\input{mmd-beamer-footer}
+\end{document}\mode*

data/test/MultiMarkdownTest/BeamerTests/Beamer-Tables.text ADDED Viewed

@@ -0,0 +1,38 @@
+latex input:		mmd-beamer-header
+Title:				Test
+base header level:	3
+latex mode:			beamer
+Theme:				keynote-gradient
+latex input:		mmd-beamer-begin-doc
+latex footer:		mmd-beamer-footer
+# Tables #
+| Features                          | MultiMarkdown |  Crayons |
+----------------------------------- | :-----------: | :------: |
+Melts in warm places                |       No      |    Yes   |
+Mistakes can be easily fixed        |      Yes      |    No    |
+Easy to copy documents for friends  |      Yes      |    No    |
+Fun at parties                      |       No      | Why not? |
+Minimum markup for maximum quality? |      Yes      |    No    |
+# The old way was complicated #
+	<p>In order to create valid
+	<a href="http://en.wikipedia.org/wiki/HTML">HTML</a>, you
+	need properly coded syntax that can be cumbersome for
+	&#8220;non-programmers&#8221; to write. Sometimes, you
+	just want to easily make certain words <strong>bold
+	</strong>, and certain words <em>italicized</em> without
+	having to remember the syntax. Additionally, for example,
+	creating lists:</p>
+	<ul>
+	<li>should be easy</li>
+	<li>should not involve programming</li>
+	</ul>

data/test/MultiMarkdownTest/MarkdownTest.pl ADDED Viewed

@@ -0,0 +1,182 @@
+#!/usr/bin/perl
+#
+# MarkdownTester -- Run tests for Markdown implementations
+#
+# Copyright (c) 2004-2005 John Gruber
+# <http://daringfireball.net/projects/markdown/>
+#
+use strict;
+use warnings;
+use Getopt::Long;
+use Benchmark;
+our $VERSION = '1.0.2';
+# Sat 24 Dec 2005
+my $time_start = new Benchmark;
+my $test_dir = "Tests";
+my $script  = "./Markdown.pl";
+my $use_tidy = 0;
+my ($flag_version);
+my $flags = "";
+my $file_ext = "\.html";
+my $trail = "";
+GetOptions (
+			"script=s"   => \$script,
+			"testdir=s"  => \$test_dir,
+			"tidy"       => \$use_tidy,
+			"version"    => \$flag_version,
+			"flags=s"	 => \$flags,
+			"ext=s"		 => \$file_ext,
+			"trailflags=s" => \$trail,
+			);
+if($flag_version) {
+	my $progname = $0;
+	$progname =~ s{.*/}{};
+	die "$progname version $VERSION\n";
+}
+unless (-d $test_dir) { die "'$test_dir' is not a directory.\n"; }
+unless (-f $script)   { die "$script does not exist.\n"; }
+unless (-x $script)   { die "$script is not executable.\n"; }
+my $tests_passed = 0;
+my $tests_failed = 0;
+TEST:
+foreach my $testfile (glob "$test_dir/*.text") {
+	my $testname = $testfile;
+	$testname =~ s{.*/(.+)\.text$}{$1}i;
+	print "$testname ... ";
+	# Look for a corresponding .html file for each .text file:
+	my $resultfile = $testfile;
+	$resultfile =~ s{\.text$}{$file_ext}i;
+	unless (-f $resultfile) {
+		print "'$resultfile' does not exist.\n\n";
+		next TEST;
+	}
+	# open(TEST, $testfile)     || die("Can't open testfile: $!");
+	open(RESULT, $resultfile) || die("Can't open resultfile: $!");
+	undef $/;
+	# my $t_input = <TEST>;
+	my $t_result = <RESULT>;
+	my $t_output = `'$script' $flags '$testfile' $trail`;
+	# Normalize the output and expected result strings:
+	$t_result =~ s/\s+\z//; # trim trailing whitespace
+	$t_output =~ s/\s+\z//; # trim trailing whitespace
+	if ($use_tidy) {
+		#  Escape the strings, pass them through to CLI tidy tool for tag-level equivalency
+		$t_result =~ s{'}{'\\''}g; # escape ' chars for shell
+		$t_output =~ s{'}{'\\''}g;
+		$t_result = `echo '$t_result' | tidy --show-body-only 1 --quiet 1 --show-warnings 0`;
+		$t_output = `echo '$t_output' | tidy --show-body-only 1 --quiet 1 --show-warnings 0`;
+	}
+	if ($t_output eq $t_result) {
+		print "OK\n";
+		$tests_passed++;
+	}
+	else {
+		print "FAILED\n\n";
+# This part added by JM to print diffs
+        open(OUT, '>tmp1') or die $!;
+        print OUT $t_output or die $!;
+        open(RES, '>tmp2') or die $!;
+        print RES $t_result or die $!;
+        print `diff tmp1 tmp2`;
+        close RES;
+        close OUT;
+        print "\n";
+        `rm tmp?`;
+# End of added part
+		$tests_failed++;
+	}
+}
+print "\n\n";
+print "$tests_passed passed; $tests_failed failed.\n";
+my $time_end = new Benchmark;
+my $time_diff = timediff($time_end, $time_start);
+print "Benchmark: ", timestr($time_diff), "\n";
+__END__
+=pod
+=head1 NAME
+B<MarkdownTest>
+=head1 SYNOPSIS
+B<MarkdownTest.pl> [ B<--options> ]  [ I<file> ... ]
+=head1 DESCRIPTION
+=head1 OPTIONS
+Use "--" to end switch parsing. For example, to open a file named "-z", use:
+	MarkdownTest.pl -- -z
+=over 4
+=item B<--script>
+Specify the path to the Markdown script to test. Defaults to
+"./Markdown.pl". Example:
+	./MarkdownTest.pl --script ./PHP-Markdown/php-markdown
+=item B<--testdir>
+Specify the path to a directory containing test data. Defaults to "Tests".
+=item B<--tidy>
+Flag to turn on using the command line 'tidy' tool to normalize HTML
+output before comparing script output to the expected test result.
+Assumes that the 'tidy' command is available in your PATH. Defaults to
+off.
+=back
+=head1 BUGS
+=head1 VERSION HISTORY
+1.0	Mon 13 Dec 2004-2005
+1.0.1 Mon 19 Sep 2005
+	+	Better handling of case when foo.text exists, but foo.html doesn't.
+		It now prints a message and moves on, rather than dying.
+=head1 COPYRIGHT AND LICENSE
+Copyright (c) 2004-2005 John Gruber
+<http://daringfireball.net/>
+All rights reserved.
+This is free software; you may redistribute it and/or modify it under
+the same terms as Perl itself.
+=cut

data/test/MultiMarkdownTest/MemoirTests/Automatic Labels.html ADDED Viewed

@@ -0,0 +1,42 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+	<meta name="latexinput" content="mmd-article-header"/>
+	<title>MultiMarkdown Autoreference Test</title>
+	<meta name="latexmode" content="memoir"/>
+	<meta name="latexinput" content="mmd-article-begin-doc"/>
+	<meta name="latexfooter" content="mmd-memoir-footer"/>
+</head>
+<body>
+<h2 id="muststartwithalpha">109&amp;^*&amp;#^() Must Start With Alpha</h2>
+<h2 id="stripoutcharacters">Strip out &amp;^% characters ^&amp;*^</h2>
+<h2 id="specialcrossreferencecases">Special Cross Reference Cases</h2>
+<h3 id="cross-references:specialcharacters">1 Cross-References: Special Characters!@#$%^&amp;*()&lt;&gt;</h3>
+<p>And now, link to <a href="#cross-references:specialcharacters">1 Cross-References: Special Characters!@#$%^&amp;*()&lt;&gt;</a></p>
+<h2 id="setext1">Setext 1</h2>
+<h3 id="setext2">Setext 2</h3>
+<h2 id="atx1">Atx 1</h2>
+<p>Link to <a href="#setext1">Setext 1</a>.</p>
+<p>And <a href="#setext2">Setext 2</a>.</p>
+<p>And <a href="#atx1">Atx 1</a>.</p>
+<p>And [Atx 2] should fail.</p>
+<h2 id="label">Manual Header</h2>
+<h2 id="label2">Manual Header 2</h2>
+<h3 id="label3">Manual Header 3</h3>
+</body>
+</html>