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