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