skwp-superredcloth 1.160

data/CHANGELOG

@@ -0,0 +1,4 @@
+= 4.0
+=== 27th January 2007
+
+* Rewrote RedCloth using the Ragel State Machine Compiler.  Ten times faster and more correct!

data/COPYING

@@ -0,0 +1,18 @@
+Copyright (c) 2006 why the lucky stiff
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to
+deal in the Software without restriction, including without limitation the
+rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+  
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+   
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER 
+IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README

@@ -0,0 +1,162 @@
+= RedCloth - Textile and Markdown Hybrid for Ruby
+
+Homepage::  http://whytheluckystiff.net/ruby/redcloth/
+Author::    why the lucky stiff (http://whytheluckystiff.net/)
+Copyright:: (cc) 2004 why the lucky stiff (and his puppet organizations.)
+License::   BSD
+
+(see http://hobix.com/textile/ for a Textile Reference.)
+
+Based on (and also inspired by) both:
+
+PyTextile: http://diveintomark.org/projects/textile/textile.py.txt
+Textism for PHP: http://www.textism.com/tools/textile/
+
+= RedCloth
+
+RedCloth is a Ruby library for converting Textile and/or Markdown
+into HTML.  You can use either format, intermingled or separately.
+You can also extend RedCloth to honor your own custom text stylings.
+
+RedCloth users are encouraged to use Textile if they are generating
+HTML and to use Markdown if others will be viewing the plain text.
+
+== What is Textile?
+
+Textile is a simple formatting style for text
+documents, loosely based on some HTML conventions.
+
+== Sample Textile Text
+
+ h2. This is a title
+
+ h3. This is a subhead
+
+ This is a bit of paragraph.
+
+ bq. This is a blockquote.
+
+= Writing Textile
+
+A Textile document consists of paragraphs.  Paragraphs
+can be specially formatted by adding a small instruction
+to the beginning of the paragraph.
+
+ h[n].   Header of size [n].
+ bq.     Blockquote.
+ #       Numeric list.
+ *       Bulleted list.
+
+== Quick Phrase Modifiers
+
+Quick phrase modifiers are also included, to allow formatting
+of small portions of text within a paragraph.
+
+ \_emphasis\_
+ \_\_italicized\_\_
+ \*strong\*
+ \*\*bold\*\*
+ ??citation??
+ -deleted text-
+ +inserted text+
+ ^superscript^
+ ~subscript~
+ @code@
+ %(classname)span%
+
+ ==notextile== (leave text alone)
+
+== Links
+
+To make a hypertext link, put the link text in "quotation 
+marks" followed immediately by a colon and the URL of the link.
+
+Optional: text in (parentheses) following the link text, 
+but before the closing quotation mark, will become a Title 
+attribute for the link, visible as a tool tip when a cursor is above it.
+
+Example:
+
+ "This is a link (This is a title) ":http://www.textism.com
+
+Will become:
+
+ <a href="http://www.textism.com" title="This is a title">This is a link</a>
+
+== Images
+
+To insert an image, put the URL for the image inside exclamation marks.
+
+Optional: text that immediately follows the URL in (parentheses) will 
+be used as the Alt text for the image. Images on the web should always 
+have descriptive Alt text for the benefit of readers using non-graphical 
+browsers.
+
+Optional: place a colon followed by a URL immediately after the 
+closing ! to make the image into a link.
+
+Example:
+
+ !http://www.textism.com/common/textist.gif(Textist)!
+
+Will become:
+
+ <img src="http://www.textism.com/common/textist.gif" alt="Textist" />
+
+With a link:
+
+ !/common/textist.gif(Textist)!:http://textism.com
+
+Will become:
+
+ <a href="http://textism.com"><img src="/common/textist.gif" alt="Textist" /></a>
+
+== Defining Acronyms
+
+HTML allows authors to define acronyms via the tag. The definition appears as a 
+tool tip when a cursor hovers over the acronym. A crucial aid to clear writing, 
+this should be used at least once for each acronym in documents where they appear.
+
+To quickly define an acronym in Textile, place the full text in (parentheses) 
+immediately following the acronym.
+
+Example:
+
+ ACLU(American Civil Liberties Union)
+
+Will become:
+
+ <acronym title="American Civil Liberties Union">ACLU</acronym>
+
+== Adding Tables
+
+In Textile, simple tables can be added by seperating each column by
+a pipe.
+
+    |a|simple|table|row|
+    |And|Another|table|row|
+
+Attributes are defined by style definitions in parentheses.
+
+    table(border:1px solid black).
+    (background:#ddd;color:red). |{}| | | |
+
+== Using RedCloth
+
+RedCloth is simply an extension of the String class, which can handle
+Textile formatting.  Use it like a String and output HTML with its
+RedCloth#to_html method.
+
+ doc = RedCloth.new "
+
+ h2. Test document
+
+ Just a simple test."
+
+ puts doc.to_html
+
+By default, RedCloth uses both Textile and Markdown formatting, with
+Textile formatting taking precedence.  If you want to turn off Markdown
+formatting, to boost speed and limit the processor:
+
+ class RedCloth::Textile.new( str )

data/Rakefile

@@ -0,0 +1,180 @@
+require 'rake'
+require 'rake/clean'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require 'rake/testtask'
+require 'fileutils'
+include FileUtils
+
+NAME = "superredcloth"
+SUMMARY = "a fast library for formatting Textile and Markdown as HTML"
+REV = `svn info`[/Revision: (\d+)/, 1] rescue nil
+VERS = ENV['VERSION'] || "1" + (REV ? ".#{REV}" : "")
+CLEAN.include ['ext/superredcloth_scan/*.{bundle,so,obj,pdb,lib,def,exp}', 'ext/superredcloth_scan/Makefile', 
+               '**/.*.sw?', '*.gem', '.config']
+
+desc "Does a full compile, test run"
+task :default => [:compile, :test]
+
+desc "Compiles all extensions"
+task :compile => [:superredcloth_scan] do
+  if Dir.glob(File.join("lib","superredcloth_scan.*")).length == 0
+    STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+    STDERR.puts "Gem actually failed to build.  Your system is"
+    STDERR.puts "NOT configured properly to build superredcloth."
+    STDERR.puts "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
+    exit(1)
+  end
+end
+task :superredcloth_scan => [:ragel]
+
+desc "Packages up SuperRedCloth."
+task :package => [:clean, :ragel]
+
+desc "Releases packages for all SuperRedCloth packages and platforms."
+task :release => [:package, :rubygems_win32]
+
+desc "Run all the tests"
+Rake::TestTask.new do |t|
+    t.libs << "test"
+    t.test_files = FileList['test/test_*.rb']
+    t.verbose = true
+end
+
+Rake::RDocTask.new do |rdoc|
+    rdoc.rdoc_dir = 'doc/rdoc'
+    # rdoc.options += RDOC_OPTS
+    # rdoc.template = "extras/flipbook_rdoc.rb"
+    rdoc.main = "README"
+    rdoc.title = "SuperRedCloth Documentation"
+    rdoc.rdoc_files.add ['README', 'CHANGELOG', 'COPYING', 'lib/**/*.rb']
+end
+
+spec =
+    Gem::Specification.new do |s|
+        s.name = NAME
+        s.version = VERS
+        s.platform = Gem::Platform::RUBY
+        s.has_rdoc = true
+        s.extra_rdoc_files = ["README", "CHANGELOG", "COPYING"]
+        s.summary = SUMMARY
+        s.description = s.summary
+        s.author = "why the lucky stiff"
+        s.email = 'why@ruby-lang.org'
+        s.homepage = 'http://code.whytheluckystiff.net/redcloth/'
+
+        s.files = %w(COPYING README Rakefile) +
+          Dir.glob("{bin,doc,test,lib,extras}/**/*") + 
+          Dir.glob("ext/**/*.{h,c,rb,rl}") + 
+          %w[ext/superredcloth_scan/superredcloth_scan.c] # needed because it's generated later
+        
+        s.require_path = "lib"
+        #s.autorequire = "superredcloth"  # no no no this is tHe 3v1l
+        s.extensions = FileList["ext/**/extconf.rb"].to_a
+        s.bindir = "bin"
+    end
+
+Rake::GemPackageTask.new(spec) do |p|
+    p.need_tar = true
+    p.gem_spec = spec
+end
+
+extension = "superredcloth_scan"
+ext = "ext/superredcloth_scan"
+ext_so = "#{ext}/#{extension}.#{Config::CONFIG['DLEXT']}"
+ext_files = FileList[
+  "#{ext}/*.c",
+  "#{ext}/*.h",
+  "#{ext}/*.rl",
+  "#{ext}/extconf.rb",
+  "#{ext}/Makefile",
+  "lib"
+] 
+
+task "lib" do
+  directory "lib"
+end
+
+desc "Builds just the #{extension} extension"
+task extension.to_sym => ["#{ext}/Makefile", ext_so ]
+
+file "#{ext}/Makefile" => ["#{ext}/extconf.rb"] do
+  Dir.chdir(ext) do ruby "extconf.rb" end
+end
+
+file ext_so => ext_files do
+  Dir.chdir(ext) do
+    sh(PLATFORM =~ /win32/ ? 'nmake' : 'make')
+  end
+  cp ext_so, "lib"
+end
+
+desc "Generates the scanner code with Ragel."
+task :ragel do
+  Dir.chdir('ext/superredcloth_scan') do
+    ['superredcloth_scan', 'superredcloth_inline'].each do |src|
+      sh %{ragel #{src}.rl | rlcodegen -G2 -o #{src}.c}
+    end
+  end
+end
+
+PKG_FILES = FileList[
+  "test/**/*.{rb,html,xhtml}",
+  "lib/**/*.rb",
+  "ext/**/*.{c,rb,h,rl}",
+  "CHANGELOG", "README", "Rakefile", "COPYING",
+  "extras/**/*", "lib/superredcloth_scan.so"]
+
+Win32Spec = Gem::Specification.new do |s|
+  s.name = NAME
+  s.version = VERS
+  s.platform = Gem::Platform::WIN32
+  s.has_rdoc = false
+  s.extra_rdoc_files = ["README", "CHANGELOG", "COPYING"]
+  s.summary = SUMMARY 
+  s.description = s.summary
+  s.author = "why the lucky stiff"
+  s.email = 'why@ruby-lang.org'
+  s.homepage = 'http://code.whytheluckystiff.net/redcloth/'
+
+  s.files = PKG_FILES
+
+  s.require_path = "lib"
+  #s.autorequire = "superredcloth"  # no no no this is tHe 3v1l
+  s.extensions = []
+  s.bindir = "bin"
+end
+  
+WIN32_PKG_DIR = "superredcloth-" + VERS
+
+file WIN32_PKG_DIR => [:package] do
+  sh "tar zxf pkg/#{WIN32_PKG_DIR}.tgz"
+end
+
+desc "Cross-compile the superredcloth_scan extension for win32"
+file "superredcloth_scan_win32" => [WIN32_PKG_DIR] do
+  cp "extras/mingw-rbconfig.rb", "#{WIN32_PKG_DIR}/ext/superredcloth_scan/rbconfig.rb"
+  sh "cd #{WIN32_PKG_DIR}/ext/superredcloth_scan/ && ruby -I. extconf.rb && make"
+  mv "#{WIN32_PKG_DIR}/ext/superredcloth_scan/superredcloth_scan.so", "#{WIN32_PKG_DIR}/lib"
+end
+
+desc "Build the binary RubyGems package for win32"
+task :rubygems_win32 => ["superredcloth_scan_win32"] do
+  Dir.chdir("#{WIN32_PKG_DIR}") do
+    Gem::Builder.new(Win32Spec).build
+    verbose(true) {
+      mv Dir["*.gem"].first, "../pkg/superredcloth-#{VERS}-mswin32.gem"
+    }
+  end
+end
+
+CLEAN.include WIN32_PKG_DIR
+
+task :install do
+  sh %{rake package}
+  sh %{sudo gem install pkg/#{NAME}-#{VERS}}
+end
+
+task :uninstall => [:clean] do
+  sh %{sudo gem uninstall #{NAME}}
+end

data/ext/superredcloth_scan/extconf.rb

@@ -0,0 +1,6 @@
+require 'mkmf'
+
+dir_config("superredcloth_scan")
+have_library("c", "main")
+
+create_makefile("superredcloth_scan")

data/ext/superredcloth_scan/superredcloth.h

@@ -0,0 +1,77 @@
+#ifndef superredcloth_h
+#define superredcloth_h
+
+/* variable defs */
+#ifndef superredcloth_scan_c
+extern VALUE super_ParseError, super_RedCloth;
+#endif
+
+/* function defs */
+void rb_str_cat_escaped(VALUE str, char *tokstart, char *tokend);
+VALUE superredcloth_inline(char *p, char *pe);
+VALUE superredcloth_inline2(VALUE str);
+VALUE superredcloth_transform(char *p, char *pe);
+VALUE superredcloth_transform2(VALUE str);
+void red_inc(VALUE regs, VALUE ref);
+VALUE red_block(VALUE block, ID meth);
+VALUE red_pass2(VALUE regs, VALUE ref, VALUE btype);
+VALUE red_pass(VALUE regs, VALUE ref, ID meth);
+
+/* parser macros */
+#define CAT(H)         rb_str_cat(H, tokstart, tokend-tokstart)
+#define CLEAR(H)       H = rb_str_new2("")
+#define INLINE(H, T)   rb_str_append(H, rb_funcall(super_RedCloth, rb_intern(#T), 1, regs))
+#define DONE(H)        rb_str_append(html, H); CLEAR(H); regs = rb_hash_new()
+#define PASS(H, A, T)  rb_str_append(H, red_pass(regs, ID2SYM(rb_intern(#A)), rb_intern(#T)))
+#define PASS2(H, A, T) rb_str_append(H, red_pass2(regs, ID2SYM(rb_intern(#A)), ID2SYM(rb_intern(#T))))
+#define ADD_BLOCK()    rb_str_append(html, red_block(regs, block)); CLEAR(block); regs = rb_hash_new()
+#define ASET(T, V)     rb_hash_aset(regs, ID2SYM(rb_intern(#T)), rb_str_new2(#V));
+#define AINC(T)        red_inc(regs, ID2SYM(rb_intern(#T)));
+#define STORE(T)  \
+  if (p > reg && reg >= tokstart) { \
+    while (reg < p && ( *reg == '\r' || *reg == '\n' ) ) { reg++; } \
+    while (p > reg && ( *(p - 1) == '\r' || *(p - 1) == '\n' ) ) { p--; } \
+  } \
+  if (p > reg && reg >= tokstart) { \
+    VALUE str = rb_str_new(reg, p-reg); \
+    rb_hash_aset(regs, ID2SYM(rb_intern(#T)), str); \
+    /* printf("STORE(" #T ") %s\n", RSTRING(str)->ptr); */ \
+  } else { \
+    rb_hash_aset(regs, ID2SYM(rb_intern(#T)), Qnil); \
+  }
+#define STORE_URL(T) \
+  if (p > reg && reg >= tokstart) { \
+    char punct = 1; \
+    while (p > reg && punct == 1) { \
+      switch (*(p - 1)) { \
+        case '!': case '"': case '#': case '$': case '%': case ']': case '[': case '&': case '\'': \
+        case '*': case '+': case ',': case '-': case '.': case ')': case '(': case ':':  \
+        case ';': case '=': case '?': case '@': case '\\': case '^': case '_': \
+        case '`': case '|': case '~': p--; break; \
+        default: punct = 0; \
+      } \
+    } \
+    tokend = p; \
+  } \
+  STORE(T)
+#define LIST_ITEM() \
+    char listm[10] = ""; \
+    if (nest > RARRAY(list_layout)->len) \
+    { \
+      sprintf(listm, "%s_open", list_type); \
+      rb_str_append(html, rb_funcall(super_RedCloth, rb_intern(listm), 1, regs)); \
+      rb_ary_store(list_layout, nest-1, rb_str_new2(list_type)); \
+    } \
+    while (nest < RARRAY(list_layout)->len) \
+    { \
+      VALUE end_list = rb_ary_pop(list_layout); \
+      if (!NIL_P(end_list)) \
+      { \
+        StringValue(end_list); \
+        sprintf(listm, "%s_close", RSTRING(end_list)->ptr); \
+        rb_str_append(html, rb_funcall(super_RedCloth, rb_intern(listm), 1, regs)); \
+      } \
+    } \
+    ASET(type, li)
+
+#endif