flannel 0.0.1

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,6 @@
+tmp*
+log*
+*[~#]
+pkg/*
+nbproject*
+coverage*

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Jamal Hansen
+
+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 OR COPYRIGHT HOLDERS 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.rdoc

@@ -0,0 +1,7 @@
+= flannel
+
+A soft comfortable worn in markup language for Ruby.
+
+== Copyright
+
+Copyright (c) 2009 Jamal Hansen. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,67 @@
+require 'rubygems'
+require 'rake'
+require 'yaml'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "flannel"
+    gem.summary = %Q{A soft comfortable worn in markup language for Ruby}
+    gem.email = "jamal.hansen@gmail.com"
+    gem.homepage = "http://github.com/rubyyot/flannel"
+    gem.authors = ["Jamal Hansen"]
+    gem.rubyforge_project = "flannel"
+    gem.add_development_dependency 'technicalpickles-shoulda'
+
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+begin
+  require 'cucumber/rake/task'
+  Cucumber::Rake::Task.new(:features)
+rescue LoadError
+  task :features do
+    abort "Cucumber is not available. In order to run features, you must: sudo gem install cucumber"
+  end
+end
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "flannel #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

data/VERSION.yml

@@ -0,0 +1,4 @@
+--- 
+:major: 0
+:minor: 0
+:patch: 1

data/features/external_link.feature

@@ -0,0 +1,9 @@
+Feature: External link conversion
+  In order to create external links
+  A user of Flannel
+  Will quilt external link markup
+
+  Scenario: Preformatting text
+    Given input of "external_link" text
+    When I quilt it with flannel
+    Then valid html should be produced

data/features/fixtures/external_link.flannel

@@ -0,0 +1,3 @@
+Lorem ipsum [dolor sit amet|http://www.example.com], consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel [porttitor|www.example.com] [ commodo | http://www.example.com | nunc ], justo. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel [ porttitor | http://www.example.com ] commodo, justo.

data/features/fixtures/external_link.out

@@ -0,0 +1,3 @@
+<p>Lorem ipsum <a href="http://www.example.com" target="_blank">dolor sit amet</a>, consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel <a href="http://www.example.com" target="_blank">porttitor</a> <a href="http://www.example.com" title="nunc" target="_blank">commodo</a>, justo. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel <a href="http://www.example.com" target="_blank">porttitor</a> commodo, justo.</p>

data/features/fixtures/list.flannel

@@ -0,0 +1,3 @@
+* Item one
+* Item two
+* This is the much longer item and this item is known simply as item three.

data/features/fixtures/list.out

@@ -0,0 +1,3 @@
+<ul><li>Item one</li>
+<li>Item two</li>
+<li>This is the much longer item and this item is known simply as item three.</li></ul>

data/features/fixtures/paragraph.flannel

@@ -0,0 +1,6 @@
+
+This is paragraph one.
+
+This is paragraph two.
+
+This is paragraph three. Watchout for the end of file.

data/features/fixtures/paragraph.out

@@ -0,0 +1,5 @@
+<p>This is paragraph one.</p>
+
+<p>This is paragraph two.</p>
+
+<p>This is paragraph three. Watchout for the end of file.</p>

data/features/fixtures/preformatted.flannel

@@ -0,0 +1,15 @@
+This is a paragraph
+
+_   This is preformatted text
+        it's cool
+
+_   and Spiffy
+
+_This is preformatted too
+_
+
+_
+ So is this
+_
+
+This is a paragraph

data/features/fixtures/preformatted.out

@@ -0,0 +1,12 @@
+<p>This is a paragraph</p>
+
+<pre>   This is preformatted text
+        it's cool
+
+   and Spiffy</pre>
+
+<pre>This is preformatted too</pre>
+
+<pre> So is this</pre>
+
+<p>This is a paragraph</p>

data/features/fixtures/wiki_links.flannel

@@ -0,0 +1,2 @@
+Lorem ipsum -dolor sit amet>, consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel -porttitor> commodo, justo. 

data/features/fixtures/wiki_links.out

@@ -0,0 +1,2 @@
+<p>Lorem ipsum <a href="dolor-sit-amet">dolor sit amet</a>, consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel <a href="porttitor">porttitor</a> commodo, justo.</p>

data/features/fixtures/wiki_links_for_lambda.out

@@ -0,0 +1,2 @@
+<p>Lorem ipsum <a href="http://www.example.com/foo/dolor-sit-amet">dolor sit amet</a>, consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel <a href="http://www.example.com/foo/porttitor">porttitor</a> commodo, justo.</p>

data/features/fixtures/wiki_links_for_lamdba.flannel

@@ -0,0 +1,2 @@
+Lorem ipsum -dolor sit amet>, consectetur adipiscing elit. Nam ac magna augue, a pretium magna. Aliquam erat volutpat.
+Proin malesuada, nunc vel -porttitor> commodo, justo. 

data/features/list.feature

@@ -0,0 +1,9 @@
+Feature: Paragraphs
+  In order to create lists
+  A user of Flannel
+  Will quilt list markup
+
+  Scenario: Wrapping text in paragraphs
+    Given input of "paragraph" text
+    When I quilt it with flannel
+    Then valid html should be produced

data/features/paragraph.feature

@@ -0,0 +1,9 @@
+Feature: List generation
+  In order to create lists
+  A user of Flannel
+  Will quilt list markup
+
+  Scenario: Creating a list
+    Given input of "list" text
+    When I quilt it with flannel
+    Then valid html should be produced

data/features/preformatted_text.feature

@@ -0,0 +1,9 @@
+Feature: Preformatted text conversion
+  In order to create preformatted text
+  A user of Flannel
+  Will quilt preformatted text markup
+
+  Scenario: Preformatting text
+    Given input of "preformatted" text
+    When I quilt it with flannel
+    Then valid html should be produced

data/features/step_definitions/flannel_steps.rb

@@ -0,0 +1,20 @@
+
+Given /^input of "([^\"]*)" text$/ do |feature|
+  flannel_filename = File.join("features", "fixtures", "#{feature}.flannel")
+  out_filename = File.join("features", "fixtures", "#{feature}.out")
+  @before = File.read(flannel_filename)
+  @after = File.read(out_filename)
+  @wiki_link = nil
+end
+
+When /^I quilt it with flannel$/ do
+  @output = Flannel.quilt @before, :wiki_link => @wiki_link
+end
+
+Then /^valid html should be produced$/ do
+  assert_equal @after, @output
+end
+
+Given /^a formatter of '([^\"']*)'$/ do |formatter|
+  @wiki_link = lambda { |keyword| eval formatter }
+end

data/features/support/env.rb

@@ -0,0 +1,6 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__) + '/../../lib')
+require 'flannel'
+
+require 'test/unit/assertions'
+
+World(Test::Unit::Assertions)

data/features/wiki_links.feature

@@ -0,0 +1,15 @@
+Feature: Paragraphs
+  In order to create wiki links
+  A user of Flannel
+  Will use wiki links
+
+  Scenario: Creating wiki links
+    Given input of "wiki_links" text
+    When I quilt it with flannel
+    Then valid html should be produced
+
+  Scenario: Creating wiki links with a custom url
+    Given input of "wiki_links" text
+    And a formatter of 'http://www.example.com/foo/#{keyword}'
+    When I quilt it with flannel
+    Then valid html should be produced

data/flannel.gemspec

@@ -0,0 +1,86 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{flannel}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Jamal Hansen"]
+  s.date = %q{2009-12-26}
+  s.email = %q{jamal.hansen@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION.yml",
+     "features/external_link.feature",
+     "features/fixtures/external_link.flannel",
+     "features/fixtures/external_link.out",
+     "features/fixtures/list.flannel",
+     "features/fixtures/list.out",
+     "features/fixtures/paragraph.flannel",
+     "features/fixtures/paragraph.out",
+     "features/fixtures/preformatted.flannel",
+     "features/fixtures/preformatted.out",
+     "features/fixtures/wiki_links.flannel",
+     "features/fixtures/wiki_links.out",
+     "features/fixtures/wiki_links_for_lambda.out",
+     "features/fixtures/wiki_links_for_lamdba.flannel",
+     "features/list.feature",
+     "features/paragraph.feature",
+     "features/preformatted_text.feature",
+     "features/step_definitions/flannel_steps.rb",
+     "features/support/env.rb",
+     "features/wiki_links.feature",
+     "flannel.gemspec",
+     "lib/cutting_board.rb",
+     "lib/flannel.rb",
+     "lib/shears.rb",
+     "lib/square.rb",
+     "lib/stripe.rb",
+     "lib/wrappable.rb",
+     "test/cutting_board_test.rb",
+     "test/flannel_test.rb",
+     "test/shears_test.rb",
+     "test/square_test.rb",
+     "test/stripe_test.rb",
+     "test/test_helper.rb"
+  ]
+  s.homepage = %q{http://github.com/rubyyot/flannel}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{flannel}
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{A soft comfortable worn in markup language for Ruby}
+  s.test_files = [
+    "test/test_helper.rb",
+     "test/stripe_test.rb",
+     "test/cutting_board_test.rb",
+     "test/flannel_test.rb",
+     "test/square_test.rb",
+     "test/shears_test.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<technicalpickles-shoulda>, [">= 0"])
+    else
+      s.add_dependency(%q<technicalpickles-shoulda>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<technicalpickles-shoulda>, [">= 0"])
+  end
+end
+

data/lib/cutting_board.rb

@@ -0,0 +1,16 @@
+require 'shears'
+
+
+module Flannel
+  class CuttingBoard
+    def initialize params={}
+      @wiki_link= params[:wiki_link]
+    end
+
+    def cut markup
+      shears = Flannel::Shears.new
+      squares = shears.cut markup
+      squares.map { |square| square.to_h }.join("\n\n")
+    end
+  end
+end

data/lib/flannel.rb

@@ -0,0 +1,9 @@
+require 'cutting_board'
+
+module Flannel
+  def self.quilt markup, params={}
+    return nil unless markup
+    shears = Flannel::CuttingBoard.new params
+    shears.cut markup
+  end
+end

data/lib/shears.rb

@@ -0,0 +1,83 @@
+require 'square'
+require 'stripe'
+
+module Flannel
+  class Shears
+    def cut markup
+      @squares = []
+      @square = Flannel::Square.new
+      @end_preformat = false
+
+      markup.split("\n").each { |line| cut_into_squares line }
+
+      @squares << @square
+    end
+
+    def cut_into_squares line
+     if need_new_square? line
+        shift_square
+      else
+        add line
+      end
+    end
+
+    def shift_square
+      @squares << @square unless @square.blank?
+      @square = Flannel::Square.new
+    end
+
+    def need_new_square? line
+      @square.style == :preformatted ? @end_preformat : empty?(line.strip)
+    end
+
+    def add line
+      @preformatted_marker_line = false
+      line = strip_markers line
+      line = remove_hanging_preformatted_lines line
+
+      @square << line unless line.nil?
+    end
+
+    def remove_hanging_preformatted_lines line
+      if @preformatted_marker_line
+        @end_preformat = @square.populated?
+        if line.strip == ""
+          return nil
+        end
+      else
+        @end_preformat = false
+      end
+      line
+    end
+
+    def strip_markers line
+      parts = line.match(/^([=_*]+)(.*)/)
+
+      if parts
+        set_style parts[1]
+        line = parts[2]
+      end
+      line
+    end
+
+    def set_style marker
+        if marker
+        case marker[0]
+        when 61               # equals (header)
+          style = "header_#{marker.length}"
+          @square.style = style.to_sym
+        when 95               # underscore (preformatted)
+          @square.style = :preformatted
+          @preformatted_marker_line = true
+        when 42               # star (list)
+          @square.style = :list
+        end
+      end
+    end
+
+    def empty? str
+      str.nil? || str == ""
+    end
+  end
+end
+

data/lib/square.rb

@@ -0,0 +1,90 @@
+require 'wrappable'
+
+module Flannel
+  class Square
+    include Flannel::Wrappable
+    attr_accessor :style
+    
+    def initialize params={}
+      @tags ={:preformatted => "pre", :list => "ul", :header_1 => "h1", :header_2 => "h2", :header_3 => "h3", :header_4 => "h4", :header_5 => "h5", :header_6 => "h6"}
+      @stripes = []
+      @style = :paragraph
+    end
+
+    def << text
+      text = text.strip unless @style == :preformatted
+      @stripes << Flannel::Stripe.stitch(text, :style=>@style)
+    end
+
+    def to_s
+      @stripes.map { |stripe| stripe.weave }.join("\n")
+    end
+
+    def blank?
+      (@stripes.length == 0 || all_stripes_blank)
+    end
+
+    def populated?
+      !blank?
+    end
+
+    def all_stripes_blank
+      @stripes.each do |stripe|
+        return false if !stripe.empty?
+      end
+
+      return true
+    end
+
+    def to_h
+      @post_wrap = nil
+      lines = @stripes.map { |stripe| stripe.to_h }
+
+      quilt lines
+    end
+    
+    def quilt lines
+      output = lines.join("\n")
+      output = convert_external_links output
+      return wrap(output, find_tag)
+    end
+
+    def preformatted
+      @style == :preformatted
+    end
+
+    def convert_external_links text
+      return text if preformatted
+      text.gsub(/\[([^\|]*\|[^\]]*)\]/) { |match| build_external_link match }
+    end
+
+    def build_external_link match
+      text, url, title = match[1..-2].split("|", 3)
+
+      url = format_link url.strip
+      text.strip!
+      title.strip! if title
+
+      if title
+        %{<a href="#{url}" title="#{title}" target="_blank">#{text}</a>}
+      else
+        %{<a href="#{url}" target="_blank">#{text}</a>}
+      end
+    end
+
+    def format_link url
+      return url if /:\/\// =~ url
+      "http://#{url}"
+    end
+
+    def find_tag
+      if @style && @tags.has_key?(@style)
+        tag = @tags[@style]
+      else
+        tag = "p"
+      end
+      tag
+    end
+  end
+end
+

data/lib/stripe.rb

@@ -0,0 +1,67 @@
+require 'wrappable'
+
+module Flannel
+  class Stripe
+    include Wrappable
+    attr_reader :weave
+
+    def self.stitch weave="", params={}
+       Flannel::Stripe.new weave, params
+    end
+
+    def initialize weave="", params={}
+      @weave = weave
+      @wiki_link = params[:wiki_link]
+      @style = params[:style]
+    end
+    
+    def wiki_link topic
+      if @wiki_link
+        @wiki_link.call(permalink topic)
+      else
+        permalink topic[1..-2]
+      end
+    end
+
+    def permalink topic
+      require 'iconv'
+      # thanks to ismasan http://snippets.dzone.com/posts/show/4457
+      (Iconv.new('US-ASCII//TRANSLIT', 'utf-8').iconv topic).gsub(/[^\w\s\-]/,'').gsub(/[^\w]|[\_]/,' ').split.join('-').downcase
+    end
+
+    def empty?
+      @weave == nil || @weave.strip == ""
+    end
+
+    def build_wiki_links
+      return @weave if preformatted
+      @weave.gsub(/-\w(.*)\w>/) { |match| %{<a href="#{wiki_link match}">#{match[1..-2]}</a>}}
+    end
+
+    def to_h
+      text = build_wiki_links
+      markup text
+    end
+
+    def preformatted
+      @style == :preformatted
+    end
+
+    def list
+      @style == :list
+    end
+
+    def markup text
+      return html_escape text if preformatted
+
+      tag = "li" if list
+      wrap(text, tag)
+    end
+
+    def html_escape text
+      require 'cgi'
+
+      CGI::escapeHTML(text)
+    end
+  end
+end

data/lib/wrappable.rb

@@ -0,0 +1,17 @@
+module Flannel
+  module Wrappable
+    def wrap content, tag
+      if empty_string?(content) || empty_string?(tag)
+        return content
+      end
+
+      content.strip! unless tag == "pre"
+
+      "<#{tag}>#{content}</#{tag}>"
+    end
+
+    def empty_string? str
+      str.nil? || str.strip == ""
+    end
+  end
+end

data/test/cutting_board_test.rb

@@ -0,0 +1,54 @@
+require 'test_helper'
+
+class CuttingBoardTest < Test::Unit::TestCase
+  context "basic behavior" do
+    setup do
+      @board = Flannel::CuttingBoard.new
+    end
+
+    should "strip and convert underscores to pre tags" do
+      markup = "_foo\n\n   bar\n_"
+      assert_equal "<pre>foo\n\n   bar</pre>", @board.cut(markup)
+    end
+
+    should "preformat text when both start and end line have the markers" do
+      markup = "_foo\n\n_   bar"
+      assert_equal "<pre>foo\n\n   bar</pre>", @board.cut(markup)
+    end
+
+    should "not replace in preformatted text" do
+      markup = "_4 - 2 > 2 - 2\n_"
+      assert_equal '<pre>4 - 2 &gt; 2 - 2</pre>', @board.cut(markup)
+    end
+  end
+
+  context "When block starts with one or more equals signs, it" do
+    setup do
+      @board = Flannel::CuttingBoard.new
+    end
+
+    should "convert one equals to a header one" do
+      markup = "= Some header"
+      result = "<h1>Some header</h1>"
+
+      assert_equal result, @board.cut(markup)
+    end
+
+    should "convert two equals to a header two" do
+      markup = "== Some header"
+      result = "<h2>Some header</h2>"
+
+      assert_equal result, @board.cut(markup)
+    end
+  end
+
+  context "When block starts with a star, it" do
+    should "tell square that it's a list, so that it will be wrapped in ul tags" do
+      board = Flannel::CuttingBoard.new
+      markup = "* Yadda"
+      result = "<ul><li>Yadda</li></ul>"
+
+      assert_equal result, board.cut(markup)
+    end
+  end
+end

data/test/flannel_test.rb

@@ -0,0 +1,12 @@
+require 'test_helper'
+
+class FlannelTest < Test::Unit::TestCase
+  should "wrap functionality up in a neat package" do
+    markup = "== Foo\n\n* Bar"
+    assert_equal "<h2>Foo</h2>\n\n<ul><li>Bar</li></ul>", Flannel.quilt(markup)
+  end
+
+  should "return nil if text is nil" do
+    assert_nil Flannel.quilt(nil)
+  end
+end

data/test/shears_test.rb

@@ -0,0 +1,43 @@
+require 'test_helper'
+
+class ShearsTest < Test::Unit::TestCase
+  context "basic behavior" do
+    setup do
+      @shears = Flannel::Shears.new
+    end
+
+    should "split a flannel document into squares based on blank lines" do
+      markup = "foo\n\nbar"
+
+      squares = @shears.cut markup
+      assert_equal 2, squares.length
+      assert_equal "foo", squares[0].to_s
+      assert_equal "bar", squares[1].to_s
+    end
+
+    should "not split preformatted text based on blank lines" do
+      markup = "_foo\n\nbar\n_"
+
+      squares = @shears.cut markup
+      assert_equal 1, squares.length
+      assert_equal :preformatted, squares[0].style
+    end
+
+
+    should "separate preformatted blocks" do
+      markup = "_foo\n_\n\n_bar\n_"
+
+      squares = @shears.cut markup
+      assert_equal 2, squares.length
+      assert_equal :preformatted, squares[0].style
+      assert_equal :preformatted, squares[1].style
+    end
+
+    should "strip preformatted markers when found" do
+      markup = "_foo\n\nbar\n_"
+
+      squares = @shears.cut markup
+      assert_equal "foo\n\nbar",  squares[0].to_s
+    end
+  end
+end

data/test/square_test.rb

@@ -0,0 +1,103 @@
+require 'test_helper'
+require 'stripe'
+
+class SquareTest < Test::Unit::TestCase
+  context "basic behavior" do
+    setup do
+      @square = Flannel::Square.new
+    end
+
+    should "accept strings with <<" do
+      @square << "foo"
+      assert_equal "foo", @square.to_s
+    end
+
+    should "be blank when there are no stripes" do
+      assert @square.blank?
+      @square << "foo"
+      assert !@square.blank?
+    end
+
+    should "be blank when the first stripe is an empty string" do
+      @square <<  ""
+      assert @square.blank?
+    end
+
+    should "be blank when the first stripe is whitespace" do
+      @square <<  "  "
+      assert @square.blank?
+    end
+
+    should "be blank when the all stripes are empty strings" do
+      @square <<  ""
+      @square <<  ""
+      @square <<  ""
+      assert @square.blank?
+    end
+
+    should "be blank when the all stripes are whitespace" do
+      @square <<  " "
+      @square <<  " "
+      @square <<  ""
+      assert @square.blank?
+    end
+
+    should "not be blank when a stripe is not blank" do
+      @square <<  " "
+      @square <<  " "
+      @square <<  "foo"
+      assert !@square.blank?
+    end
+
+    should "return html" do
+      @square <<  "foo"
+      assert_equal "<p>foo</p>", @square.to_h
+    end
+
+    should "accept a style" do
+      @square.style = :preformatted
+      assert_equal :preformatted, @square.style
+    end
+  end
+
+  context "style" do
+    should "accept an optional style parameter" do
+      square = Flannel::Square.new
+      square.style = :foo
+    end
+
+    should "wrap in pre tags when preformatted" do
+      square = Flannel::Square.new
+      square.style = :preformatted
+      square << "foo"
+      assert_equal "<pre>foo</pre>", square.to_h
+    end
+
+    should "wrap in ul tags when unordered_list" do
+      square = Flannel::Square.new
+      square.style = :list
+      square << "foo"
+      assert_equal "<ul><li>foo</li></ul>", square.to_h
+    end
+  end
+
+  context "external links" do
+    should "convert [|] pattern to an external link" do
+      square = Flannel::Square.new
+      square << "yadda [yadda|http://example.com] yadda"
+      assert_equal '<p>yadda <a href="http://example.com" target="_blank">yadda</a> yadda</p>', square.to_h
+    end
+
+    should "add http:// to external links" do
+      square = Flannel::Square.new
+      square << "yadda [yadda|example.com] yadda"
+      assert_equal '<p>yadda <a href="http://example.com" target="_blank">yadda</a> yadda</p>', square.to_h
+    end
+
+    should "add create title if provided to external links" do
+      square = Flannel::Square.new
+      square << "yadda [yadda|example.com|My title] yadda"
+      assert_equal '<p>yadda <a href="http://example.com" title="My title" target="_blank">yadda</a> yadda</p>', square.to_h
+    end
+  end
+end

data/test/stripe_test.rb

@@ -0,0 +1,102 @@
+require 'test_helper'
+require 'stripe'
+
+class StripeTest < Test::Unit::TestCase
+  context "basic operations" do
+    setup do
+      @stripe = Flannel::Stripe.stitch "foo"
+    end
+
+    should "be of of kind Flannel::Stripe" do
+      assert Flannel::Stripe, @stripe.class
+    end
+
+    should "create instance with stitch" do
+      assert_equal "foo", @stripe.weave
+    end
+
+    should "return html fragment with to_h" do
+      assert_equal "foo", @stripe.to_h
+    end
+  end
+
+  context "building wiki links" do
+    setup do
+      wiki_link = lambda { |keyword| "http://www.example.com/foo/#{keyword}"}
+      @stripe = Flannel::Stripe.stitch "the -roof is on fire>", :wiki_link => wiki_link
+    end
+
+    should "build wiki links based on a lambda" do
+      assert_equal "http://www.example.com/foo/cheese", @stripe.wiki_link("cheese")
+    end
+
+    should "find and replace wiki link markup" do
+      assert_equal 'the <a href="http://www.example.com/foo/roof-is-on-fire">roof is on fire</a>', @stripe.to_h
+    end
+    
+    should "permalink topics when making wiki links" do
+      assert_equal "http://www.example.com/foo/cheese-tastes-good", @stripe.wiki_link("cheese tastes good")
+    end
+  end
+
+  context "no lambda is provided" do
+    setup do
+      @stripe = Flannel::Stripe.stitch "baz"
+    end
+
+    should "output the wiki text" do
+      assert_equal "cheese", @stripe.wiki_link("-cheese>")
+    end
+
+    should "prermalink the wiki text" do
+      assert_equal "cheese-is-good", @stripe.wiki_link("-cheese is good>")
+    end
+  end
+
+  context "replacing wiki links" do
+    should "replace surrounded by - and > with a wiki link" do
+      stripe = Flannel::Stripe.stitch("red, -green>, refactor")
+      assert_equal 'red, <a href="green">green</a>, refactor', stripe.to_h
+    end
+
+    should "not replace surrounded by - and > with a wiki link if spaced" do
+      stripe = Flannel::Stripe.stitch("red, - green >, refactor")
+      assert_equal 'red, - green >, refactor', stripe.to_h
+    end
+
+    should "not replace surrounded by - and > with a wiki link if spaced on right" do
+      stripe = Flannel::Stripe.stitch("red, -green >, refactor")
+      assert_equal 'red, -green >, refactor', stripe.to_h
+    end
+
+    should "not replace surrounded by - and > with a wiki link if spaced on left" do
+      stripe = Flannel::Stripe.stitch("red, - green>, refactor")
+      assert_equal 'red, - green>, refactor', stripe.to_h
+    end
+  end
+
+  context "preformatted text" do
+    should "html escape preformatted text" do
+      stripe = Flannel::Stripe.stitch "<p>& foo</p>", :style => :preformatted
+      assert_equal "&lt;p&gt;&amp; foo&lt;/p&gt;", stripe.to_h
+    end
+  end
+
+  context "making permalinks" do
+    setup do
+      @stripe = Flannel::Stripe.stitch ""
+    end
+
+    should "replace spaces with dashes" do
+      assert_equal "get-the-box", @stripe.permalink("get the box")
+    end
+
+    should "replace multiple spaces with single dashes" do
+      assert_equal "get-the-box", @stripe.permalink("get    the box")
+    end
+
+    should "replace odd characters with dashes" do
+      assert_equal "get-the-box", @stripe.permalink("get the @#)(* box")
+    end
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'flannel'
+
+class Test::Unit::TestCase
+end

metadata

@@ -0,0 +1,107 @@
+--- !ruby/object:Gem::Specification 
+name: flannel
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Jamal Hansen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-12-26 00:00:00 -06:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: technicalpickles-shoulda
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: 
+email: jamal.hansen@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION.yml
+- features/external_link.feature
+- features/fixtures/external_link.flannel
+- features/fixtures/external_link.out
+- features/fixtures/list.flannel
+- features/fixtures/list.out
+- features/fixtures/paragraph.flannel
+- features/fixtures/paragraph.out
+- features/fixtures/preformatted.flannel
+- features/fixtures/preformatted.out
+- features/fixtures/wiki_links.flannel
+- features/fixtures/wiki_links.out
+- features/fixtures/wiki_links_for_lambda.out
+- features/fixtures/wiki_links_for_lamdba.flannel
+- features/list.feature
+- features/paragraph.feature
+- features/preformatted_text.feature
+- features/step_definitions/flannel_steps.rb
+- features/support/env.rb
+- features/wiki_links.feature
+- flannel.gemspec
+- lib/cutting_board.rb
+- lib/flannel.rb
+- lib/shears.rb
+- lib/square.rb
+- lib/stripe.rb
+- lib/wrappable.rb
+- test/cutting_board_test.rb
+- test/flannel_test.rb
+- test/shears_test.rb
+- test/square_test.rb
+- test/stripe_test.rb
+- test/test_helper.rb
+has_rdoc: true
+homepage: http://github.com/rubyyot/flannel
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: flannel
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: A soft comfortable worn in markup language for Ruby
+test_files: 
+- test/test_helper.rb
+- test/stripe_test.rb
+- test/cutting_board_test.rb
+- test/flannel_test.rb
+- test/square_test.rb
+- test/shears_test.rb