skwp-superredcloth 1.160

data/ext/superredcloth_scan/superredcloth_scan.rl

@@ -0,0 +1,130 @@
+/*
+ * superredcloth_scan.rl
+ *
+ * $Author: why $
+ * $Date$
+ *
+ * Copyright (C) 2007 why the lucky stiff
+ */
+#define superredcloth_scan_c
+
+#include <ruby.h>
+#include "superredcloth.h"
+
+VALUE super_ParseError, super_RedCloth;
+
+%%{
+
+  machine superredcloth_scan;
+  include superredcloth_common "superredcloth_common.rl";
+
+  action notextile { rb_str_append(html, rb_funcall(super_RedCloth, rb_intern("ignore"), 1, regs)); }
+
+  # blocks
+  notextile_start = "<notextile>" ;
+  notextile_end = "</notextile>" ;
+  btype = ( "p" | "h1" | "h2" | "h3" | "h4" | "h5" | "h6" | "bq" ) >A %{ STORE(type) } ;
+  block_start = ( btype A C :> dotspace ) ;
+  block_end = ( CRLF{2} | EOF );
+  ftype = ( "fn" >A %{ STORE(type) } digit+ >A %{ STORE(id) } ) ;
+  footnote_start = ( ftype A C :> dotspace ) ;
+  ul = "*" %{nest++; list_type = "ul";};
+  ol = "#" %{nest++; list_type = "ol";};
+  list_start  = ( ( ul | ol )+ N A C :> " " ) >{nest = 0;} ;
+
+  # tables
+  para = ( default+ ) -- CRLF ;
+  btext = para ( CRLF{2} )? ;
+  tddef = ( S A C :> dotspace ) ;
+  td = ( tddef? btext >A %T :> "|" >{PASS(table, text, td);} ) >X ;
+  trdef = ( A C :> dotspace ) ;
+  tr = ( trdef? "|" %{INLINE(table, tr_open);} td+ ) >X %{INLINE(table, tr_close);} ;
+  trows = ( tr (CRLF >X tr)* ) ;
+  tdef = ( "table" >X A C :> dotspace CRLF ) ;
+  table = ( tdef? trows >{INLINE(table, table_open);} ) >{ reg = NULL; } ;
+
+  notextile := |*
+    notextile_end   { DONE(block); fgoto main; };
+    default => cat;
+  *|;
+
+  block := |*
+    block_end       { ADD_BLOCK(); fgoto main; };
+    default => cat;
+  *|;
+
+  footnote := |*
+    block_end       { ADD_BLOCK(); fgoto main; };
+    default => cat;
+  *|;
+
+  list := |*
+    CRLF list_start { ADD_BLOCK(); LIST_ITEM(); };
+    block_end       { ADD_BLOCK(); nest = 0; LIST_ITEM(); fgoto main; };
+    default => cat;
+  *|;
+
+  main := |*
+    notextile_start { ASET(type, notextile); fgoto notextile; };
+    block_start     { fgoto block; };
+    footnote_start  { fgoto footnote; };
+    list_start      { list_layout = rb_ary_new(); LIST_ITEM(); fgoto list; };
+    table           { INLINE(table, table_close); DONE(table); };
+    default         { ASET(type, p); CAT(block); fgoto block; };
+    EOF;
+  *|;
+
+}%%
+
+%% write data nofinal;
+
+VALUE
+superredcloth_transform(p, pe)
+  char *p, *pe;
+{
+  int cs, act, nest;
+  char *tokstart, *tokend, *reg;
+  VALUE html = rb_str_new2("");
+  VALUE table = rb_str_new2("");
+  VALUE block = rb_str_new2("");
+  VALUE regs = rb_hash_new();
+  VALUE list_layout = Qnil;
+  char *list_type = NULL;
+
+  %% write init;
+
+  %% write exec;
+
+  if (RSTRING(block)->len > 0)
+  {
+    ADD_BLOCK();
+  }
+
+  return html;
+}
+
+VALUE
+superredcloth_transform2(str)
+  VALUE str;
+{
+  rb_str_cat2(str, "\n");
+  StringValue(str);
+  return superredcloth_transform(RSTRING(str)->ptr, RSTRING(str)->ptr + RSTRING(str)->len + 1);
+}
+
+static VALUE
+superredcloth_to_html(self)
+  VALUE self;
+{
+  char *pe, *p;
+  int len = 0;
+
+  return superredcloth_transform2(self);
+}
+
+void Init_superredcloth_scan()
+{
+  super_RedCloth = rb_define_class("SuperRedCloth", rb_cString);
+  rb_define_method(super_RedCloth, "to_html", superredcloth_to_html, 0);
+  super_ParseError = rb_define_class_under(super_RedCloth, "ParseError", rb_eException);
+}

data/extras/mingw-rbconfig.rb

@@ -0,0 +1,176 @@
+
+# This rbconfig.rb corresponds to a Ruby installation for win32 cross-compiled
+# with mingw under i686-linux. It can be used to cross-compile extensions for
+# win32 using said toolchain.
+# 
+# This file assumes that a cross-compiled mingw32 build (compatible with the
+# mswin32 builds) is installed under $HOME/ruby-mingw32.
+
+module Config
+  #RUBY_VERSION == "1.8.5" or
+  #  raise "ruby lib version (1.8.5) doesn't match executable version (#{RUBY_VERSION})"
+
+  mingw32 = ENV['MINGW32_RUBY'] || "#{ENV["HOME"]}/ruby-mingw32"
+  mingwpre = ENV['MINGW32_PREFIX']
+  TOPDIR = File.dirname(__FILE__).chomp!("/lib/ruby/1.8/i386-mingw32")
+  DESTDIR = '' unless defined? DESTDIR
+  CONFIG = {}
+  CONFIG["DESTDIR"] = DESTDIR
+  CONFIG["INSTALL"] = "/usr/bin/install -c"
+  CONFIG["prefix"] = (TOPDIR || DESTDIR + mingw32)
+  CONFIG["EXEEXT"] = ".exe"
+  CONFIG["ruby_install_name"] = "ruby"
+  CONFIG["RUBY_INSTALL_NAME"] = "ruby"
+  CONFIG["RUBY_SO_NAME"] = "msvcrt-ruby18"
+  CONFIG["SHELL"] = "/bin/sh"
+  CONFIG["PATH_SEPARATOR"] = ":"
+  CONFIG["PACKAGE_NAME"] = ""
+  CONFIG["PACKAGE_TARNAME"] = ""
+  CONFIG["PACKAGE_VERSION"] = ""
+  CONFIG["PACKAGE_STRING"] = ""
+  CONFIG["PACKAGE_BUGREPORT"] = ""
+  CONFIG["exec_prefix"] = "$(prefix)"
+  CONFIG["bindir"] = "$(exec_prefix)/bin"
+  CONFIG["sbindir"] = "$(exec_prefix)/sbin"
+  CONFIG["libexecdir"] = "$(exec_prefix)/libexec"
+  CONFIG["datadir"] = "$(prefix)/share"
+  CONFIG["sysconfdir"] = "$(prefix)/etc"
+  CONFIG["sharedstatedir"] = "$(prefix)/com"
+  CONFIG["localstatedir"] = "$(prefix)/var"
+  CONFIG["libdir"] = "$(exec_prefix)/lib"
+  CONFIG["includedir"] = "$(prefix)/include"
+  CONFIG["oldincludedir"] = "/usr/include"
+  CONFIG["infodir"] = "$(prefix)/info"
+  CONFIG["mandir"] = "$(prefix)/man"
+  CONFIG["build_alias"] = "i686-linux"
+  CONFIG["host_alias"] = "#{mingwpre}"
+  CONFIG["target_alias"] = "i386-mingw32"
+  CONFIG["ECHO_C"] = ""
+  CONFIG["ECHO_N"] = "-n"
+  CONFIG["ECHO_T"] = ""
+  CONFIG["LIBS"] = "-lwsock32 "
+  CONFIG["MAJOR"] = "1"
+  CONFIG["MINOR"] = "8"
+  CONFIG["TEENY"] = "4"
+  CONFIG["build"] = "i686-pc-linux"
+  CONFIG["build_cpu"] = "i686"
+  CONFIG["build_vendor"] = "pc"
+  CONFIG["build_os"] = "linux"
+  CONFIG["host"] = "i586-pc-mingw32msvc"
+  CONFIG["host_cpu"] = "i586"
+  CONFIG["host_vendor"] = "pc"
+  CONFIG["host_os"] = "mingw32msvc"
+  CONFIG["target"] = "i386-pc-mingw32"
+  CONFIG["target_cpu"] = "i386"
+  CONFIG["target_vendor"] = "pc"
+  CONFIG["target_os"] = "mingw32"
+  CONFIG["CC"] = "#{mingwpre}-gcc"
+  CONFIG["CFLAGS"] = "-g -O2 "
+  CONFIG["LDFLAGS"] = ""
+  CONFIG["CPPFLAGS"] = ""
+  CONFIG["OBJEXT"] = "o"
+  CONFIG["CPP"] = "#{mingwpre}-gcc -E"
+  CONFIG["EGREP"] = "grep -E"
+  CONFIG["GNU_LD"] = "yes"
+  CONFIG["CPPOUTFILE"] = "-o conftest.i"
+  CONFIG["OUTFLAG"] = "-o "
+  CONFIG["YACC"] = "bison -y"
+  CONFIG["RANLIB"] = "#{mingwpre}-ranlib"
+  CONFIG["AR"] = "#{mingwpre}-ar"
+  CONFIG["NM"] = "#{mingwpre}-nm"
+  CONFIG["WINDRES"] = "#{mingwpre}-windres"
+  CONFIG["DLLWRAP"] = "#{mingwpre}-dllwrap"
+  CONFIG["OBJDUMP"] = "#{mingwpre}-objdump"
+  CONFIG["LN_S"] = "ln -s"
+  CONFIG["SET_MAKE"] = ""
+  CONFIG["INSTALL_PROGRAM"] = "$(INSTALL)"
+  CONFIG["INSTALL_SCRIPT"] = "$(INSTALL)"
+  CONFIG["INSTALL_DATA"] = "$(INSTALL) -m 644"
+  CONFIG["RM"] = "rm -f"
+  CONFIG["CP"] = "cp"
+  CONFIG["MAKEDIRS"] = "mkdir -p"
+  CONFIG["LIBOBJS"] = " fileblocks$(U).o crypt$(U).o flock$(U).o acosh$(U).o win32$(U).o"
+  CONFIG["ALLOCA"] = ""
+  CONFIG["DLDFLAGS"] = " -Wl,--enable-auto-import,--export-all"
+  CONFIG["ARCH_FLAG"] = ""
+  CONFIG["STATIC"] = ""
+  CONFIG["CCDLFLAGS"] = ""
+  CONFIG["LDSHARED"] = "#{mingwpre}-gcc -shared -s"
+  CONFIG["DLEXT"] = "so"
+  CONFIG["DLEXT2"] = "dll"
+  CONFIG["LIBEXT"] = "a"
+  CONFIG["LINK_SO"] = ""
+  CONFIG["LIBPATHFLAG"] = " -L\"%s\""
+  CONFIG["RPATHFLAG"] = ""
+  CONFIG["LIBPATHENV"] = ""
+  CONFIG["TRY_LINK"] = ""
+  CONFIG["STRIP"] = "strip"
+  CONFIG["EXTSTATIC"] = ""
+  CONFIG["setup"] = "Setup"
+  CONFIG["MINIRUBY"] = "ruby -rfake"
+  CONFIG["PREP"] = "fake.rb"
+  CONFIG["RUNRUBY"] = "$(MINIRUBY) -I`cd $(srcdir)/lib; pwd`"
+  CONFIG["EXTOUT"] = ".ext"
+  CONFIG["ARCHFILE"] = ""
+  CONFIG["RDOCTARGET"] = ""
+  CONFIG["XCFLAGS"] = " -DRUBY_EXPORT"
+  CONFIG["XLDFLAGS"] = " -Wl,--stack,0x02000000 -L."
+  CONFIG["LIBRUBY_LDSHARED"] = "#{mingwpre}-gcc -shared -s"
+  CONFIG["LIBRUBY_DLDFLAGS"] = " -Wl,--enable-auto-import,--export-all -Wl,--out-implib=$(LIBRUBY)"
+  CONFIG["rubyw_install_name"] = "rubyw"
+  CONFIG["RUBYW_INSTALL_NAME"] = "rubyw"
+  CONFIG["LIBRUBY_A"] = "lib$(RUBY_SO_NAME)-static.a"
+  CONFIG["LIBRUBY_SO"] = "$(RUBY_SO_NAME).dll"
+  CONFIG["LIBRUBY_ALIASES"] = ""
+  CONFIG["LIBRUBY"] = "lib$(LIBRUBY_SO).a"
+  CONFIG["LIBRUBYARG"] = "$(LIBRUBYARG_SHARED)"
+  CONFIG["LIBRUBYARG_STATIC"] = "-l$(RUBY_SO_NAME)-static"
+  CONFIG["LIBRUBYARG_SHARED"] = "-l$(RUBY_SO_NAME)"
+  CONFIG["SOLIBS"] = "$(LIBS)"
+  CONFIG["DLDLIBS"] = ""
+  CONFIG["ENABLE_SHARED"] = "yes"
+  CONFIG["MAINLIBS"] = ""
+  CONFIG["COMMON_LIBS"] = "m"
+  CONFIG["COMMON_MACROS"] = ""
+  CONFIG["COMMON_HEADERS"] = "windows.h winsock.h"
+  CONFIG["EXPORT_PREFIX"] = ""
+  CONFIG["MINIOBJS"] = "dmydln.o"
+  CONFIG["MAKEFILES"] = "Makefile GNUmakefile"
+  CONFIG["arch"] = "i386-mingw32"
+  CONFIG["sitearch"] = "i386-msvcrt"
+  CONFIG["sitedir"] = "$(prefix)/lib/ruby/site_ruby"
+  CONFIG["configure_args"] = "'--host=#{mingwpre}' '--target=i386-mingw32' '--build=i686-linux' '--prefix=#{mingw32}' 'build_alias=i686-linux' 'host_alias=#{mingwpre}' 'target_alias=i386-mingw32'"
+  CONFIG["NROFF"] = "/usr/bin/nroff"
+  CONFIG["MANTYPE"] = "doc"
+  CONFIG["LTLIBOBJS"] = " fileblocks$(U).lo crypt$(U).lo flock$(U).lo acosh$(U).lo win32$(U).lo"
+  CONFIG["ruby_version"] = "$(MAJOR).$(MINOR)"
+  CONFIG["rubylibdir"] = "$(libdir)/ruby/$(ruby_version)"
+  CONFIG["archdir"] = "$(rubylibdir)/$(arch)"
+  CONFIG["sitelibdir"] = "$(sitedir)/$(ruby_version)"
+  CONFIG["sitearchdir"] = "$(sitelibdir)/$(sitearch)"
+  CONFIG["topdir"] = File.dirname(__FILE__)
+  MAKEFILE_CONFIG = {}
+  CONFIG.each{|k,v| MAKEFILE_CONFIG[k] = v.dup}
+  def Config::expand(val, config = CONFIG)
+    val.gsub!(/\$\$|\$\(([^()]+)\)|\$\{([^{}]+)\}/) do |var|
+      if !(v = $1 || $2)
+	'$'
+      elsif key = config[v = v[/\A[^:]+(?=(?::(.*?)=(.*))?\z)/]]
+	pat, sub = $1, $2
+	config[v] = false
+	Config::expand(key, config)
+	config[v] = key
+	key = key.gsub(/#{Regexp.quote(pat)}(?=\s|\z)/n) {sub} if pat
+	key
+      else
+	var
+      end
+    end
+    val
+  end
+  CONFIG.each_value do |val|
+    Config::expand(val)
+  end
+end
+RbConfig = Config # compatibility for ruby-1.9
+CROSS_COMPILING = nil unless defined? CROSS_COMPILING

data/lib/superredcloth.rb

@@ -0,0 +1,126 @@
+require 'superredcloth_scan'
+
+class << SuperRedCloth
+  def pba opts
+    atts = ''
+    if opts[:block]
+      opts[:float] = opts.delete(:align)
+    else
+      opts[:"text-align"] = opts.delete(:align)
+    end
+    [:float, :"text-align"].each do |a|
+      opts[:style] = "#{a}:#{opts[a]};#{opts[:style]}" if opts[a]
+    end
+    [:"padding-right", :"padding-left"].each do |a|
+      opts[:style] = "#{a}:#{opts[a]}em;#{opts[:style]}" if opts[a]
+    end
+    [:style, :class, :lang, :id, :colspan, :rowspan, :title, :start].each do |a|
+      atts << " #{a}=\"#{ opts[a] }\"" if opts[a]
+    end
+    atts
+  end
+  [:h1, :h2, :h3, :h4, :h5, :h6, :p].each do |m|
+    define_method(m) do |opts|
+      "<#{m}#{pba(opts)}>#{opts[:text]}</#{m}>"
+    end
+  end
+  [:strong, :code, :em, :i, :b, :del, :ins, :sup, :sub, :span, :cite, :acronym].each do |m|
+    define_method(m) do |opts|
+      opts[:block] = true
+      "<#{m}#{pba(opts)}>#{opts[:text]}</#{m}>"
+    end
+  end
+  [:ol, :ul].each do |m|
+    define_method("#{m}_open") do |opts|
+      opts[:block] = true
+      "<#{m}#{pba(opts)}>\n"
+    end
+    define_method("#{m}_close") do |opts|
+      "</#{m}>"
+    end
+  end
+  def li opts
+    "\t<li#{pba(opts)}>#{opts[:text]}</li>\n"
+  end
+  def ignore opts
+    opts[:text]
+  end
+  alias_method :notextile, :ignore
+  def para txt
+    "<p>" + txt + "</p>"
+  end
+  def td opts
+    "\t\t\t<td#{pba(opts)}>#{opts[:text]}</td>\n"
+  end
+  def tr_open opts
+    "\t\t<tr#{pba(opts)}>\n"
+  end
+  def tr_close opts
+    "\t\t</tr>\n"
+  end
+  def table_open opts
+    "<table#{pba(opts)}>\n"
+  end
+  def table_close opts
+    "\t</table>"
+  end
+  def bq opts
+    "<blockquote><p>" + opts[:text] + "</p></blockquote>"
+  end
+  def link opts
+    "<a href=\"#{opts[:href].gsub(/&/, '&#38;')}\"#{pba(opts)}>#{opts[:name]}</a>"
+  end
+  def image opts
+    p_opts = {:block => true, :align => opts.delete(:align)} if opts[:align]
+    opts[:alt] = opts[:title]
+    img = "<img src=\"#{opts[:src]}\"#{pba(opts)} alt=\"#{opts[:alt]}\" />"  
+    img = "<a href=\"#{urlesc opts[:href]}\">#{img}</a>" if opts[:href]
+    img = "<p#{pba(p_opts)}>#{img}</p>" if p_opts
+    img
+  end
+  def footno opts
+    opts[:id] ||= opts[:text]
+    "<sup><a href=\"#fn#{opts[:id]}\">#{opts[:text]}</a></sup>"
+  end
+  def fn opts
+    no = opts[:id]
+    opts[:id] = "fn#{no}"
+    "<p#{pba(opts)}><sup>#{no}</sup> #{opts[:text]}</p>"
+  end
+  def snip opts
+    "<pre#{pba(opts)}><code>#{opts[:text]}</code></pre>"
+  end
+  def quote1 opts
+    "&#8216;#{opts[:text]}&#8217;"
+  end
+  def quote2 opts
+    "&#8220;#{opts[:text]}&#8221;"
+  end
+  def ellipsis opts
+    "#{opts[:text]}&#8230;"
+  end
+  def emdash opts
+    "&#8212;"
+  end
+  def endash opts
+    "&#8211;"
+  end
+  def arrow opts
+    "&rarr;"
+  end
+  def dim opts
+    "#{opts[:x]}&#215;#{opts[:y]}"
+  end
+  def trademark opts
+    "&#8482;"
+  end
+  def registered opts
+    "&#174;"
+  end
+  def copyright opts
+    "&#169;"
+  end
+  def urlesc txt
+    txt.gsub(/&/, '&#38;')
+  end
+end

data/test/code.yml

@@ -0,0 +1,148 @@
+---
+in: 'This is an empty dictionary: @{}@'
+out: '<p>This is an empty dictionary: <code>{}</code></p>'
+---
+in: 'This is an empty dictionary: ==```=={}==```=='
+out: '<p>This is an empty dictionary: ```{}```</p>'
+---
+in: 'This is an empty dictionary: ```{}```'
+out: '<p>This is an empty dictionary: <pre><code>{}</code></pre></p>'
+---
+in: |-
+  Testing nested pre tags...
+
+  <pre>
+  <code>
+    Good code here.
+
+    <pre>
+      a = 1
+    </pre>
+
+    Bad code here.
+
+    <script language="JavaScript">
+      window.open( "about:blank" );
+    </script>
+  </code>
+  </pre>
+
+out: |-
+  <p>Testing nested pre tags&#8230;</p>
+  
+
+  <pre>
+  <code>
+    Good code here.
+  
+    &lt;pre&gt;
+      a = 1
+    &lt;/pre&gt;
+  
+    Bad code here.
+  
+    &lt;script language="JavaScript"&gt;
+      window.open( "about:blank" );
+    &lt;/script&gt;
+  </code>
+  </pre>
+---
+in: |-
+  <pre>
+  *** test
+  </pre>
+out: |-
+  <pre>
+  *** test
+  </pre>
+---
+in: |-
+  <notextile>
+  *** test
+  </notextile>
+out: |-
+  *** test
+---
+in: '*this <span></span> is strong*'
+out: '<p><strong>this <span></span> is strong</strong></p>'
+---
+in: '*this <span>test</span> is strong*'
+out: '<p><strong>this <span>test</span> is strong</strong></p>'
+---
+in: <pre class="code"> __inline__</pre>
+out: <pre class="code"> __inline__</pre>
+---
+in: |-
+  * @foo@
+  * @bar@
+  * and @x@ is also.
+
+out: |-
+  <ul>
+  	<li><code>foo</code></li>
+  	<li><code>bar</code></li>
+  	<li>and <code>x</code> is also.</li>
+  </ul>
+
+
+---
+in: |-
+  <pre class="code"> <hello> </pre>
+  <pre class="code"> <hello> </pre>
+out: |-
+  <pre class="code"> &lt;hello&gt; </pre>
+  <pre class="code"> &lt;hello&gt; </pre>
+---
+in: |-
+  Test of Markdown-style indented code.
+
+    a = [1, 2, 3]
+    a.each do |x|
+      puts "test number", x,
+        "and more!"
+    end
+
+  Paragraph 2.
+
+  Paragraph 3.
+out: |-
+  <p>Test of Markdown-style indented code.</p>
+  
+  	<pre><code>a = [1, 2, 3]
+  a.each do |x|
+    puts "test number", x,
+      "and more!" 
+  end</code></pre>
+  
+  	<p>Paragraph 2.</p>
+  
+  	<p>Paragraph 3.</p>
+---
+in: |-
+  If, however, you have a line or two of code or HTML or the like to embed, sandwich it between two sets of triple-backticks, ==```==, like so:
+
+  ```
+  ./foo.pl%
+  <p>foo outputs an HTML paragraph</p>
+
+  ```
+out: |-
+  <p>If, however, you have a line or two of code or <span class="caps">HTML</span> or the like to embed, sandwich it between two sets of triple-backticks, ```, like so:</p>
+
+  <pre><code>
+  ./foo.pl%
+  &lt;p&gt;foo outputs an HTML paragraph&lt;/p&gt;
+  </code></pre>
+---
+in: |-
+  ```
+  here is some *starred* code
+
+  but I want some redcloth*bold*redcloth code
+  ```
+out: |-
+  <pre><code>
+  here is some *starred* code
+
+  but I want some <strong>bold</strong> code
+  </code></pre>