Chris@0: # Redmine - project management software
Chris@1115: # Copyright (C) 2006-2012  Jean-Philippe Lang
Chris@0: #
Chris@0: # This program is free software; you can redistribute it and/or
Chris@0: # modify it under the terms of the GNU General Public License
Chris@0: # as published by the Free Software Foundation; either version 2
Chris@0: # of the License, or (at your option) any later version.
Chris@909: #
Chris@0: # This program is distributed in the hope that it will be useful,
Chris@0: # but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@0: # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@0: # GNU General Public License for more details.
Chris@909: #
Chris@0: # You should have received a copy of the GNU General Public License
Chris@0: # along with this program; if not, write to the Free Software
Chris@0: # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
Chris@0: 
Chris@0: require 'redcloth3'
Chris@909: require 'digest/md5'
Chris@0: 
Chris@0: module Redmine
Chris@0:   module WikiFormatting
Chris@0:     module Textile
Chris@0:       class Formatter < RedCloth3
Chris@0:         include ActionView::Helpers::TagHelper
Chris@1115:         include Redmine::WikiFormatting::LinksHelper
Chris@1115: 
Chris@1115:         alias :inline_auto_link :auto_link!
Chris@1115:         alias :inline_auto_mailto :auto_mailto!
Chris@909: 
Chris@0:         # auto_link rule after textile rules so that it doesn't break !image_url! tags
chris@37:         RULES = [:textile, :block_markdown_rule, :inline_auto_link, :inline_auto_mailto]
Chris@909: 
Chris@0:         def initialize(*args)
Chris@0:           super
Chris@0:           self.hard_breaks=true
Chris@0:           self.no_span_caps=true
Chris@1115:           self.filter_styles=false
Chris@0:         end
Chris@909: 
Chris@0:         def to_html(*rules)
Chris@0:           @toc = []
Chris@0:           super(*RULES).to_s
Chris@0:         end
Chris@909: 
Chris@909:         def get_section(index)
Chris@909:           section = extract_sections(index)[1]
Chris@909:           hash = Digest::MD5.hexdigest(section)
Chris@909:           return section, hash
Chris@909:         end
Chris@909: 
Chris@909:         def update_section(index, update, hash=nil)
Chris@909:           t = extract_sections(index)
Chris@909:           if hash.present? && hash != Digest::MD5.hexdigest(t[1])
Chris@909:             raise Redmine::WikiFormatting::StaleSectionError
Chris@909:           end
Chris@909:           t[1] = update unless t[1].blank?
Chris@909:           t.reject(&:blank?).join "\n\n"
Chris@909:         end
Chris@909: 
Chris@909:         def extract_sections(index)
Chris@909:           @pre_list = []
Chris@909:           text = self.dup
Chris@909:           rip_offtags text, false, false
Chris@909:           before = ''
Chris@909:           s = ''
Chris@909:           after = ''
Chris@909:           i = 0
Chris@909:           l = 1
Chris@909:           started = false
Chris@909:           ended = false
Chris@1294:           text.scan(/(((?:.*?)(\A|\r?\n\s*\r?\n))(h(\d+)(#{A}#{C})\.(?::(\S+))?[ \t](.*?)$)|.*)/m).each do |all, content, lf, heading, level|
Chris@909:             if heading.nil?
Chris@909:               if ended
Chris@909:                 after << all
Chris@909:               elsif started
Chris@909:                 s << all
Chris@909:               else
Chris@909:                 before << all
Chris@909:               end
Chris@909:               break
Chris@909:             end
Chris@909:             i += 1
Chris@909:             if ended
Chris@909:               after << all
Chris@909:             elsif i == index
Chris@909:               l = level.to_i
Chris@909:               before << content
Chris@909:               s << heading
Chris@909:               started = true
Chris@909:             elsif i > index
Chris@909:               s << content
Chris@909:               if level.to_i > l
Chris@909:                 s << heading
Chris@909:               else
Chris@909:                 after << heading
Chris@909:                 ended = true
Chris@909:               end
Chris@909:             else
Chris@909:               before << all
Chris@909:             end
Chris@909:           end
Chris@909:           sections = [before.strip, s.strip, after.strip]
Chris@909:           sections.each {|section| smooth_offtags_without_code_highlighting section}
Chris@909:           sections
Chris@909:         end
Chris@909: 
Chris@0:       private
Chris@909: 
Chris@0:         # Patch for RedCloth.  Fixed in RedCloth r128 but _why hasn't released it yet.
Chris@0:         # <a href="http://code.whytheluckystiff.net/redcloth/changeset/128">http://code.whytheluckystiff.net/redcloth/changeset/128</a>
Chris@909:         def hard_break( text )
Chris@441:           text.gsub!( /(.)\n(?!\n|\Z| *([#*=]+(\s|$)|[{|]))/, "\\1<br />" ) if hard_breaks
Chris@0:         end
Chris@909: 
Chris@909:         alias :smooth_offtags_without_code_highlighting :smooth_offtags
Chris@0:         # Patch to add code highlighting support to RedCloth
Chris@0:         def smooth_offtags( text )
Chris@0:           unless @pre_list.empty?
Chris@0:             ## replace <pre> content
Chris@0:             text.gsub!(/<redpre#(\d+)>/) do
Chris@0:               content = @pre_list[$1.to_i]
Chris@0:               if content.match(/<code\s+class="(\w+)">\s?(.+)/m)
Chris@909:                 content = "<code class=\"#{$1} syntaxhl\">" +
Chris@0:                   Redmine::SyntaxHighlighting.highlight_by_language($2, $1)
Chris@0:               end
Chris@0:               content
Chris@0:             end
Chris@0:           end
Chris@0:         end
Chris@0:       end
Chris@0:     end
Chris@0:   end
Chris@0: end