##// END OF EJS Templates
Disable textile inline styles to prevent XSS attacks (#2377)....
Jean-Philippe Lang -
r2190:35f5e3683895
parent child
Show More
@@ -1,1175 +1,1174
1 # vim:ts=4:sw=4:
1 # vim:ts=4:sw=4:
2 # = RedCloth - Textile and Markdown Hybrid for Ruby
2 # = RedCloth - Textile and Markdown Hybrid for Ruby
3 #
3 #
4 # Homepage:: http://whytheluckystiff.net/ruby/redcloth/
4 # Homepage:: http://whytheluckystiff.net/ruby/redcloth/
5 # Author:: why the lucky stiff (http://whytheluckystiff.net/)
5 # Author:: why the lucky stiff (http://whytheluckystiff.net/)
6 # Copyright:: (cc) 2004 why the lucky stiff (and his puppet organizations.)
6 # Copyright:: (cc) 2004 why the lucky stiff (and his puppet organizations.)
7 # License:: BSD
7 # License:: BSD
8 #
8 #
9 # (see http://hobix.com/textile/ for a Textile Reference.)
9 # (see http://hobix.com/textile/ for a Textile Reference.)
10 #
10 #
11 # Based on (and also inspired by) both:
11 # Based on (and also inspired by) both:
12 #
12 #
13 # PyTextile: http://diveintomark.org/projects/textile/textile.py.txt
13 # PyTextile: http://diveintomark.org/projects/textile/textile.py.txt
14 # Textism for PHP: http://www.textism.com/tools/textile/
14 # Textism for PHP: http://www.textism.com/tools/textile/
15 #
15 #
16 #
16 #
17
17
18 # = RedCloth
18 # = RedCloth
19 #
19 #
20 # RedCloth is a Ruby library for converting Textile and/or Markdown
20 # RedCloth is a Ruby library for converting Textile and/or Markdown
21 # into HTML. You can use either format, intermingled or separately.
21 # into HTML. You can use either format, intermingled or separately.
22 # You can also extend RedCloth to honor your own custom text stylings.
22 # You can also extend RedCloth to honor your own custom text stylings.
23 #
23 #
24 # RedCloth users are encouraged to use Textile if they are generating
24 # RedCloth users are encouraged to use Textile if they are generating
25 # HTML and to use Markdown if others will be viewing the plain text.
25 # HTML and to use Markdown if others will be viewing the plain text.
26 #
26 #
27 # == What is Textile?
27 # == What is Textile?
28 #
28 #
29 # Textile is a simple formatting style for text
29 # Textile is a simple formatting style for text
30 # documents, loosely based on some HTML conventions.
30 # documents, loosely based on some HTML conventions.
31 #
31 #
32 # == Sample Textile Text
32 # == Sample Textile Text
33 #
33 #
34 # h2. This is a title
34 # h2. This is a title
35 #
35 #
36 # h3. This is a subhead
36 # h3. This is a subhead
37 #
37 #
38 # This is a bit of paragraph.
38 # This is a bit of paragraph.
39 #
39 #
40 # bq. This is a blockquote.
40 # bq. This is a blockquote.
41 #
41 #
42 # = Writing Textile
42 # = Writing Textile
43 #
43 #
44 # A Textile document consists of paragraphs. Paragraphs
44 # A Textile document consists of paragraphs. Paragraphs
45 # can be specially formatted by adding a small instruction
45 # can be specially formatted by adding a small instruction
46 # to the beginning of the paragraph.
46 # to the beginning of the paragraph.
47 #
47 #
48 # h[n]. Header of size [n].
48 # h[n]. Header of size [n].
49 # bq. Blockquote.
49 # bq. Blockquote.
50 # # Numeric list.
50 # # Numeric list.
51 # * Bulleted list.
51 # * Bulleted list.
52 #
52 #
53 # == Quick Phrase Modifiers
53 # == Quick Phrase Modifiers
54 #
54 #
55 # Quick phrase modifiers are also included, to allow formatting
55 # Quick phrase modifiers are also included, to allow formatting
56 # of small portions of text within a paragraph.
56 # of small portions of text within a paragraph.
57 #
57 #
58 # \_emphasis\_
58 # \_emphasis\_
59 # \_\_italicized\_\_
59 # \_\_italicized\_\_
60 # \*strong\*
60 # \*strong\*
61 # \*\*bold\*\*
61 # \*\*bold\*\*
62 # ??citation??
62 # ??citation??
63 # -deleted text-
63 # -deleted text-
64 # +inserted text+
64 # +inserted text+
65 # ^superscript^
65 # ^superscript^
66 # ~subscript~
66 # ~subscript~
67 # @code@
67 # @code@
68 # %(classname)span%
68 # %(classname)span%
69 #
69 #
70 # ==notextile== (leave text alone)
70 # ==notextile== (leave text alone)
71 #
71 #
72 # == Links
72 # == Links
73 #
73 #
74 # To make a hypertext link, put the link text in "quotation
74 # To make a hypertext link, put the link text in "quotation
75 # marks" followed immediately by a colon and the URL of the link.
75 # marks" followed immediately by a colon and the URL of the link.
76 #
76 #
77 # Optional: text in (parentheses) following the link text,
77 # Optional: text in (parentheses) following the link text,
78 # but before the closing quotation mark, will become a Title
78 # but before the closing quotation mark, will become a Title
79 # attribute for the link, visible as a tool tip when a cursor is above it.
79 # attribute for the link, visible as a tool tip when a cursor is above it.
80 #
80 #
81 # Example:
81 # Example:
82 #
82 #
83 # "This is a link (This is a title) ":http://www.textism.com
83 # "This is a link (This is a title) ":http://www.textism.com
84 #
84 #
85 # Will become:
85 # Will become:
86 #
86 #
87 # <a href="http://www.textism.com" title="This is a title">This is a link</a>
87 # <a href="http://www.textism.com" title="This is a title">This is a link</a>
88 #
88 #
89 # == Images
89 # == Images
90 #
90 #
91 # To insert an image, put the URL for the image inside exclamation marks.
91 # To insert an image, put the URL for the image inside exclamation marks.
92 #
92 #
93 # Optional: text that immediately follows the URL in (parentheses) will
93 # Optional: text that immediately follows the URL in (parentheses) will
94 # be used as the Alt text for the image. Images on the web should always
94 # be used as the Alt text for the image. Images on the web should always
95 # have descriptive Alt text for the benefit of readers using non-graphical
95 # have descriptive Alt text for the benefit of readers using non-graphical
96 # browsers.
96 # browsers.
97 #
97 #
98 # Optional: place a colon followed by a URL immediately after the
98 # Optional: place a colon followed by a URL immediately after the
99 # closing ! to make the image into a link.
99 # closing ! to make the image into a link.
100 #
100 #
101 # Example:
101 # Example:
102 #
102 #
103 # !http://www.textism.com/common/textist.gif(Textist)!
103 # !http://www.textism.com/common/textist.gif(Textist)!
104 #
104 #
105 # Will become:
105 # Will become:
106 #
106 #
107 # <img src="http://www.textism.com/common/textist.gif" alt="Textist" />
107 # <img src="http://www.textism.com/common/textist.gif" alt="Textist" />
108 #
108 #
109 # With a link:
109 # With a link:
110 #
110 #
111 # !/common/textist.gif(Textist)!:http://textism.com
111 # !/common/textist.gif(Textist)!:http://textism.com
112 #
112 #
113 # Will become:
113 # Will become:
114 #
114 #
115 # <a href="http://textism.com"><img src="/common/textist.gif" alt="Textist" /></a>
115 # <a href="http://textism.com"><img src="/common/textist.gif" alt="Textist" /></a>
116 #
116 #
117 # == Defining Acronyms
117 # == Defining Acronyms
118 #
118 #
119 # HTML allows authors to define acronyms via the tag. The definition appears as a
119 # HTML allows authors to define acronyms via the tag. The definition appears as a
120 # tool tip when a cursor hovers over the acronym. A crucial aid to clear writing,
120 # tool tip when a cursor hovers over the acronym. A crucial aid to clear writing,
121 # this should be used at least once for each acronym in documents where they appear.
121 # this should be used at least once for each acronym in documents where they appear.
122 #
122 #
123 # To quickly define an acronym in Textile, place the full text in (parentheses)
123 # To quickly define an acronym in Textile, place the full text in (parentheses)
124 # immediately following the acronym.
124 # immediately following the acronym.
125 #
125 #
126 # Example:
126 # Example:
127 #
127 #
128 # ACLU(American Civil Liberties Union)
128 # ACLU(American Civil Liberties Union)
129 #
129 #
130 # Will become:
130 # Will become:
131 #
131 #
132 # <acronym title="American Civil Liberties Union">ACLU</acronym>
132 # <acronym title="American Civil Liberties Union">ACLU</acronym>
133 #
133 #
134 # == Adding Tables
134 # == Adding Tables
135 #
135 #
136 # In Textile, simple tables can be added by seperating each column by
136 # In Textile, simple tables can be added by seperating each column by
137 # a pipe.
137 # a pipe.
138 #
138 #
139 # |a|simple|table|row|
139 # |a|simple|table|row|
140 # |And|Another|table|row|
140 # |And|Another|table|row|
141 #
141 #
142 # Attributes are defined by style definitions in parentheses.
142 # Attributes are defined by style definitions in parentheses.
143 #
143 #
144 # table(border:1px solid black).
144 # table(border:1px solid black).
145 # (background:#ddd;color:red). |{}| | | |
145 # (background:#ddd;color:red). |{}| | | |
146 #
146 #
147 # == Using RedCloth
147 # == Using RedCloth
148 #
148 #
149 # RedCloth is simply an extension of the String class, which can handle
149 # RedCloth is simply an extension of the String class, which can handle
150 # Textile formatting. Use it like a String and output HTML with its
150 # Textile formatting. Use it like a String and output HTML with its
151 # RedCloth#to_html method.
151 # RedCloth#to_html method.
152 #
152 #
153 # doc = RedCloth.new "
153 # doc = RedCloth.new "
154 #
154 #
155 # h2. Test document
155 # h2. Test document
156 #
156 #
157 # Just a simple test."
157 # Just a simple test."
158 #
158 #
159 # puts doc.to_html
159 # puts doc.to_html
160 #
160 #
161 # By default, RedCloth uses both Textile and Markdown formatting, with
161 # By default, RedCloth uses both Textile and Markdown formatting, with
162 # Textile formatting taking precedence. If you want to turn off Markdown
162 # Textile formatting taking precedence. If you want to turn off Markdown
163 # formatting, to boost speed and limit the processor:
163 # formatting, to boost speed and limit the processor:
164 #
164 #
165 # class RedCloth::Textile.new( str )
165 # class RedCloth::Textile.new( str )
166
166
167 class RedCloth3 < String
167 class RedCloth3 < String
168
168
169 VERSION = '3.0.4'
169 VERSION = '3.0.4'
170 DEFAULT_RULES = [:textile, :markdown]
170 DEFAULT_RULES = [:textile, :markdown]
171
171
172 #
172 #
173 # Two accessor for setting security restrictions.
173 # Two accessor for setting security restrictions.
174 #
174 #
175 # This is a nice thing if you're using RedCloth for
175 # This is a nice thing if you're using RedCloth for
176 # formatting in public places (e.g. Wikis) where you
176 # formatting in public places (e.g. Wikis) where you
177 # don't want users to abuse HTML for bad things.
177 # don't want users to abuse HTML for bad things.
178 #
178 #
179 # If +:filter_html+ is set, HTML which wasn't
179 # If +:filter_html+ is set, HTML which wasn't
180 # created by the Textile processor will be escaped.
180 # created by the Textile processor will be escaped.
181 #
181 #
182 # If +:filter_styles+ is set, it will also disable
182 # If +:filter_styles+ is set, it will also disable
183 # the style markup specifier. ('{color: red}')
183 # the style markup specifier. ('{color: red}')
184 #
184 #
185 attr_accessor :filter_html, :filter_styles
185 attr_accessor :filter_html, :filter_styles
186
186
187 #
187 #
188 # Accessor for toggling hard breaks.
188 # Accessor for toggling hard breaks.
189 #
189 #
190 # If +:hard_breaks+ is set, single newlines will
190 # If +:hard_breaks+ is set, single newlines will
191 # be converted to HTML break tags. This is the
191 # be converted to HTML break tags. This is the
192 # default behavior for traditional RedCloth.
192 # default behavior for traditional RedCloth.
193 #
193 #
194 attr_accessor :hard_breaks
194 attr_accessor :hard_breaks
195
195
196 # Accessor for toggling lite mode.
196 # Accessor for toggling lite mode.
197 #
197 #
198 # In lite mode, block-level rules are ignored. This means
198 # In lite mode, block-level rules are ignored. This means
199 # that tables, paragraphs, lists, and such aren't available.
199 # that tables, paragraphs, lists, and such aren't available.
200 # Only the inline markup for bold, italics, entities and so on.
200 # Only the inline markup for bold, italics, entities and so on.
201 #
201 #
202 # r = RedCloth.new( "And then? She *fell*!", [:lite_mode] )
202 # r = RedCloth.new( "And then? She *fell*!", [:lite_mode] )
203 # r.to_html
203 # r.to_html
204 # #=> "And then? She <strong>fell</strong>!"
204 # #=> "And then? She <strong>fell</strong>!"
205 #
205 #
206 attr_accessor :lite_mode
206 attr_accessor :lite_mode
207
207
208 #
208 #
209 # Accessor for toggling span caps.
209 # Accessor for toggling span caps.
210 #
210 #
211 # Textile places `span' tags around capitalized
211 # Textile places `span' tags around capitalized
212 # words by default, but this wreaks havoc on Wikis.
212 # words by default, but this wreaks havoc on Wikis.
213 # If +:no_span_caps+ is set, this will be
213 # If +:no_span_caps+ is set, this will be
214 # suppressed.
214 # suppressed.
215 #
215 #
216 attr_accessor :no_span_caps
216 attr_accessor :no_span_caps
217
217
218 #
218 #
219 # Establishes the markup predence. Available rules include:
219 # Establishes the markup predence. Available rules include:
220 #
220 #
221 # == Textile Rules
221 # == Textile Rules
222 #
222 #
223 # The following textile rules can be set individually. Or add the complete
223 # The following textile rules can be set individually. Or add the complete
224 # set of rules with the single :textile rule, which supplies the rule set in
224 # set of rules with the single :textile rule, which supplies the rule set in
225 # the following precedence:
225 # the following precedence:
226 #
226 #
227 # refs_textile:: Textile references (i.e. [hobix]http://hobix.com/)
227 # refs_textile:: Textile references (i.e. [hobix]http://hobix.com/)
228 # block_textile_table:: Textile table block structures
228 # block_textile_table:: Textile table block structures
229 # block_textile_lists:: Textile list structures
229 # block_textile_lists:: Textile list structures
230 # block_textile_prefix:: Textile blocks with prefixes (i.e. bq., h2., etc.)
230 # block_textile_prefix:: Textile blocks with prefixes (i.e. bq., h2., etc.)
231 # inline_textile_image:: Textile inline images
231 # inline_textile_image:: Textile inline images
232 # inline_textile_link:: Textile inline links
232 # inline_textile_link:: Textile inline links
233 # inline_textile_span:: Textile inline spans
233 # inline_textile_span:: Textile inline spans
234 # glyphs_textile:: Textile entities (such as em-dashes and smart quotes)
234 # glyphs_textile:: Textile entities (such as em-dashes and smart quotes)
235 #
235 #
236 # == Markdown
236 # == Markdown
237 #
237 #
238 # refs_markdown:: Markdown references (for example: [hobix]: http://hobix.com/)
238 # refs_markdown:: Markdown references (for example: [hobix]: http://hobix.com/)
239 # block_markdown_setext:: Markdown setext headers
239 # block_markdown_setext:: Markdown setext headers
240 # block_markdown_atx:: Markdown atx headers
240 # block_markdown_atx:: Markdown atx headers
241 # block_markdown_rule:: Markdown horizontal rules
241 # block_markdown_rule:: Markdown horizontal rules
242 # block_markdown_bq:: Markdown blockquotes
242 # block_markdown_bq:: Markdown blockquotes
243 # block_markdown_lists:: Markdown lists
243 # block_markdown_lists:: Markdown lists
244 # inline_markdown_link:: Markdown links
244 # inline_markdown_link:: Markdown links
245 attr_accessor :rules
245 attr_accessor :rules
246
246
247 # Returns a new RedCloth object, based on _string_ and
247 # Returns a new RedCloth object, based on _string_ and
248 # enforcing all the included _restrictions_.
248 # enforcing all the included _restrictions_.
249 #
249 #
250 # r = RedCloth.new( "h1. A <b>bold</b> man", [:filter_html] )
250 # r = RedCloth.new( "h1. A <b>bold</b> man", [:filter_html] )
251 # r.to_html
251 # r.to_html
252 # #=>"<h1>A &lt;b&gt;bold&lt;/b&gt; man</h1>"
252 # #=>"<h1>A &lt;b&gt;bold&lt;/b&gt; man</h1>"
253 #
253 #
254 def initialize( string, restrictions = [] )
254 def initialize( string, restrictions = [] )
255 restrictions.each { |r| method( "#{ r }=" ).call( true ) }
255 restrictions.each { |r| method( "#{ r }=" ).call( true ) }
256 super( string )
256 super( string )
257 end
257 end
258
258
259 #
259 #
260 # Generates HTML from the Textile contents.
260 # Generates HTML from the Textile contents.
261 #
261 #
262 # r = RedCloth.new( "And then? She *fell*!" )
262 # r = RedCloth.new( "And then? She *fell*!" )
263 # r.to_html( true )
263 # r.to_html( true )
264 # #=>"And then? She <strong>fell</strong>!"
264 # #=>"And then? She <strong>fell</strong>!"
265 #
265 #
266 def to_html( *rules )
266 def to_html( *rules )
267 rules = DEFAULT_RULES if rules.empty?
267 rules = DEFAULT_RULES if rules.empty?
268 # make our working copy
268 # make our working copy
269 text = self.dup
269 text = self.dup
270
270
271 @urlrefs = {}
271 @urlrefs = {}
272 @shelf = []
272 @shelf = []
273 textile_rules = [:refs_textile, :block_textile_table, :block_textile_lists,
273 textile_rules = [:refs_textile, :block_textile_table, :block_textile_lists,
274 :block_textile_prefix, :inline_textile_image, :inline_textile_link,
274 :block_textile_prefix, :inline_textile_image, :inline_textile_link,
275 :inline_textile_code, :inline_textile_span, :glyphs_textile]
275 :inline_textile_code, :inline_textile_span, :glyphs_textile]
276 markdown_rules = [:refs_markdown, :block_markdown_setext, :block_markdown_atx, :block_markdown_rule,
276 markdown_rules = [:refs_markdown, :block_markdown_setext, :block_markdown_atx, :block_markdown_rule,
277 :block_markdown_bq, :block_markdown_lists,
277 :block_markdown_bq, :block_markdown_lists,
278 :inline_markdown_reflink, :inline_markdown_link]
278 :inline_markdown_reflink, :inline_markdown_link]
279 @rules = rules.collect do |rule|
279 @rules = rules.collect do |rule|
280 case rule
280 case rule
281 when :markdown
281 when :markdown
282 markdown_rules
282 markdown_rules
283 when :textile
283 when :textile
284 textile_rules
284 textile_rules
285 else
285 else
286 rule
286 rule
287 end
287 end
288 end.flatten
288 end.flatten
289
289
290 # standard clean up
290 # standard clean up
291 incoming_entities text
291 incoming_entities text
292 clean_white_space text
292 clean_white_space text
293
293
294 # start processor
294 # start processor
295 @pre_list = []
295 @pre_list = []
296 rip_offtags text
296 rip_offtags text
297 no_textile text
297 no_textile text
298 escape_html_tags text
298 escape_html_tags text
299 hard_break text
299 hard_break text
300 unless @lite_mode
300 unless @lite_mode
301 refs text
301 refs text
302 # need to do this before text is split by #blocks
302 # need to do this before text is split by #blocks
303 block_textile_quotes text
303 block_textile_quotes text
304 blocks text
304 blocks text
305 end
305 end
306 inline text
306 inline text
307 smooth_offtags text
307 smooth_offtags text
308
308
309 retrieve text
309 retrieve text
310
310
311 text.gsub!( /<\/?notextile>/, '' )
311 text.gsub!( /<\/?notextile>/, '' )
312 text.gsub!( /x%x%/, '&#38;' )
312 text.gsub!( /x%x%/, '&#38;' )
313 clean_html text if filter_html
313 clean_html text if filter_html
314 text.strip!
314 text.strip!
315 text
315 text
316
316
317 end
317 end
318
318
319 #######
319 #######
320 private
320 private
321 #######
321 #######
322 #
322 #
323 # Mapping of 8-bit ASCII codes to HTML numerical entity equivalents.
323 # Mapping of 8-bit ASCII codes to HTML numerical entity equivalents.
324 # (from PyTextile)
324 # (from PyTextile)
325 #
325 #
326 TEXTILE_TAGS =
326 TEXTILE_TAGS =
327
327
328 [[128, 8364], [129, 0], [130, 8218], [131, 402], [132, 8222], [133, 8230],
328 [[128, 8364], [129, 0], [130, 8218], [131, 402], [132, 8222], [133, 8230],
329 [134, 8224], [135, 8225], [136, 710], [137, 8240], [138, 352], [139, 8249],
329 [134, 8224], [135, 8225], [136, 710], [137, 8240], [138, 352], [139, 8249],
330 [140, 338], [141, 0], [142, 0], [143, 0], [144, 0], [145, 8216], [146, 8217],
330 [140, 338], [141, 0], [142, 0], [143, 0], [144, 0], [145, 8216], [146, 8217],
331 [147, 8220], [148, 8221], [149, 8226], [150, 8211], [151, 8212], [152, 732],
331 [147, 8220], [148, 8221], [149, 8226], [150, 8211], [151, 8212], [152, 732],
332 [153, 8482], [154, 353], [155, 8250], [156, 339], [157, 0], [158, 0], [159, 376]].
332 [153, 8482], [154, 353], [155, 8250], [156, 339], [157, 0], [158, 0], [159, 376]].
333
333
334 collect! do |a, b|
334 collect! do |a, b|
335 [a.chr, ( b.zero? and "" or "&#{ b };" )]
335 [a.chr, ( b.zero? and "" or "&#{ b };" )]
336 end
336 end
337
337
338 #
338 #
339 # Regular expressions to convert to HTML.
339 # Regular expressions to convert to HTML.
340 #
340 #
341 A_HLGN = /(?:(?:<>|<|>|\=|[()]+)+)/
341 A_HLGN = /(?:(?:<>|<|>|\=|[()]+)+)/
342 A_VLGN = /[\-^~]/
342 A_VLGN = /[\-^~]/
343 C_CLAS = '(?:\([^)]+\))'
343 C_CLAS = '(?:\([^)]+\))'
344 C_LNGE = '(?:\[[^\[\]]+\])'
344 C_LNGE = '(?:\[[^\[\]]+\])'
345 C_STYL = '(?:\{[^}]+\})'
345 C_STYL = '(?:\{[^}]+\})'
346 S_CSPN = '(?:\\\\\d+)'
346 S_CSPN = '(?:\\\\\d+)'
347 S_RSPN = '(?:/\d+)'
347 S_RSPN = '(?:/\d+)'
348 A = "(?:#{A_HLGN}?#{A_VLGN}?|#{A_VLGN}?#{A_HLGN}?)"
348 A = "(?:#{A_HLGN}?#{A_VLGN}?|#{A_VLGN}?#{A_HLGN}?)"
349 S = "(?:#{S_CSPN}?#{S_RSPN}|#{S_RSPN}?#{S_CSPN}?)"
349 S = "(?:#{S_CSPN}?#{S_RSPN}|#{S_RSPN}?#{S_CSPN}?)"
350 C = "(?:#{C_CLAS}?#{C_STYL}?#{C_LNGE}?|#{C_STYL}?#{C_LNGE}?#{C_CLAS}?|#{C_LNGE}?#{C_STYL}?#{C_CLAS}?)"
350 C = "(?:#{C_CLAS}?#{C_STYL}?#{C_LNGE}?|#{C_STYL}?#{C_LNGE}?#{C_CLAS}?|#{C_LNGE}?#{C_STYL}?#{C_CLAS}?)"
351 # PUNCT = Regexp::quote( '!"#$%&\'()*+,-./:;<=>?@[\\]^_`{|}~' )
351 # PUNCT = Regexp::quote( '!"#$%&\'()*+,-./:;<=>?@[\\]^_`{|}~' )
352 PUNCT = Regexp::quote( '!"#$%&\'*+,-./:;=?@\\^_`|~' )
352 PUNCT = Regexp::quote( '!"#$%&\'*+,-./:;=?@\\^_`|~' )
353 PUNCT_NOQ = Regexp::quote( '!"#$&\',./:;=?@\\`|' )
353 PUNCT_NOQ = Regexp::quote( '!"#$&\',./:;=?@\\`|' )
354 PUNCT_Q = Regexp::quote( '*-_+^~%' )
354 PUNCT_Q = Regexp::quote( '*-_+^~%' )
355 HYPERLINK = '(\S+?)([^\w\s/;=\?]*?)(?=\s|<|$)'
355 HYPERLINK = '(\S+?)([^\w\s/;=\?]*?)(?=\s|<|$)'
356
356
357 # Text markup tags, don't conflict with block tags
357 # Text markup tags, don't conflict with block tags
358 SIMPLE_HTML_TAGS = [
358 SIMPLE_HTML_TAGS = [
359 'tt', 'b', 'i', 'big', 'small', 'em', 'strong', 'dfn', 'code',
359 'tt', 'b', 'i', 'big', 'small', 'em', 'strong', 'dfn', 'code',
360 'samp', 'kbd', 'var', 'cite', 'abbr', 'acronym', 'a', 'img', 'br',
360 'samp', 'kbd', 'var', 'cite', 'abbr', 'acronym', 'a', 'img', 'br',
361 'br', 'map', 'q', 'sub', 'sup', 'span', 'bdo'
361 'br', 'map', 'q', 'sub', 'sup', 'span', 'bdo'
362 ]
362 ]
363
363
364 QTAGS = [
364 QTAGS = [
365 ['**', 'b', :limit],
365 ['**', 'b', :limit],
366 ['*', 'strong', :limit],
366 ['*', 'strong', :limit],
367 ['??', 'cite', :limit],
367 ['??', 'cite', :limit],
368 ['-', 'del', :limit],
368 ['-', 'del', :limit],
369 ['__', 'i', :limit],
369 ['__', 'i', :limit],
370 ['_', 'em', :limit],
370 ['_', 'em', :limit],
371 ['%', 'span', :limit],
371 ['%', 'span', :limit],
372 ['+', 'ins', :limit],
372 ['+', 'ins', :limit],
373 ['^', 'sup', :limit],
373 ['^', 'sup', :limit],
374 ['~', 'sub', :limit]
374 ['~', 'sub', :limit]
375 ]
375 ]
376 QTAGS.collect! do |rc, ht, rtype|
376 QTAGS.collect! do |rc, ht, rtype|
377 rcq = Regexp::quote rc
377 rcq = Regexp::quote rc
378 re =
378 re =
379 case rtype
379 case rtype
380 when :limit
380 when :limit
381 /(^|[>\s\(])
381 /(^|[>\s\(])
382 (#{rcq})
382 (#{rcq})
383 (#{C})
383 (#{C})
384 (?::(\S+?))?
384 (?::(\S+?))?
385 (\w|[^\s\-].*?[^\s\-])
385 (\w|[^\s\-].*?[^\s\-])
386 #{rcq}
386 #{rcq}
387 (?=[[:punct:]]|\s|\)|$)/x
387 (?=[[:punct:]]|\s|\)|$)/x
388 else
388 else
389 /(#{rcq})
389 /(#{rcq})
390 (#{C})
390 (#{C})
391 (?::(\S+))?
391 (?::(\S+))?
392 (\w|[^\s\-].*?[^\s\-])
392 (\w|[^\s\-].*?[^\s\-])
393 #{rcq}/xm
393 #{rcq}/xm
394 end
394 end
395 [rc, ht, re, rtype]
395 [rc, ht, re, rtype]
396 end
396 end
397
397
398 # Elements to handle
398 # Elements to handle
399 GLYPHS = [
399 GLYPHS = [
400 # [ /([^\s\[{(>])?\'([dmst]\b|ll\b|ve\b|\s|:|$)/, '\1&#8217;\2' ], # single closing
400 # [ /([^\s\[{(>])?\'([dmst]\b|ll\b|ve\b|\s|:|$)/, '\1&#8217;\2' ], # single closing
401 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)\'/, '\1&#8217;' ], # single closing
401 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)\'/, '\1&#8217;' ], # single closing
402 # [ /\'(?=[#{PUNCT_Q}]*(s\b|[\s#{PUNCT_NOQ}]))/, '&#8217;' ], # single closing
402 # [ /\'(?=[#{PUNCT_Q}]*(s\b|[\s#{PUNCT_NOQ}]))/, '&#8217;' ], # single closing
403 # [ /\'/, '&#8216;' ], # single opening
403 # [ /\'/, '&#8216;' ], # single opening
404 # [ /</, '&lt;' ], # less-than
404 # [ /</, '&lt;' ], # less-than
405 # [ />/, '&gt;' ], # greater-than
405 # [ />/, '&gt;' ], # greater-than
406 # [ /([^\s\[{(])?"(\s|:|$)/, '\1&#8221;\2' ], # double closing
406 # [ /([^\s\[{(])?"(\s|:|$)/, '\1&#8221;\2' ], # double closing
407 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)"/, '\1&#8221;' ], # double closing
407 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)"/, '\1&#8221;' ], # double closing
408 # [ /"(?=[#{PUNCT_Q}]*[\s#{PUNCT_NOQ}])/, '&#8221;' ], # double closing
408 # [ /"(?=[#{PUNCT_Q}]*[\s#{PUNCT_NOQ}])/, '&#8221;' ], # double closing
409 # [ /"/, '&#8220;' ], # double opening
409 # [ /"/, '&#8220;' ], # double opening
410 # [ /\b( )?\.{3}/, '\1&#8230;' ], # ellipsis
410 # [ /\b( )?\.{3}/, '\1&#8230;' ], # ellipsis
411 # [ /\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/, '<acronym title="\2">\1</acronym>' ], # 3+ uppercase acronym
411 # [ /\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/, '<acronym title="\2">\1</acronym>' ], # 3+ uppercase acronym
412 # [ /(^|[^"][>\s])([A-Z][A-Z0-9 ]+[A-Z0-9])([^<A-Za-z0-9]|$)/, '\1<span class="caps">\2</span>\3', :no_span_caps ], # 3+ uppercase caps
412 # [ /(^|[^"][>\s])([A-Z][A-Z0-9 ]+[A-Z0-9])([^<A-Za-z0-9]|$)/, '\1<span class="caps">\2</span>\3', :no_span_caps ], # 3+ uppercase caps
413 # [ /(\.\s)?\s?--\s?/, '\1&#8212;' ], # em dash
413 # [ /(\.\s)?\s?--\s?/, '\1&#8212;' ], # em dash
414 # [ /\s->\s/, ' &rarr; ' ], # right arrow
414 # [ /\s->\s/, ' &rarr; ' ], # right arrow
415 # [ /\s-\s/, ' &#8211; ' ], # en dash
415 # [ /\s-\s/, ' &#8211; ' ], # en dash
416 # [ /(\d+) ?x ?(\d+)/, '\1&#215;\2' ], # dimension sign
416 # [ /(\d+) ?x ?(\d+)/, '\1&#215;\2' ], # dimension sign
417 # [ /\b ?[(\[]TM[\])]/i, '&#8482;' ], # trademark
417 # [ /\b ?[(\[]TM[\])]/i, '&#8482;' ], # trademark
418 # [ /\b ?[(\[]R[\])]/i, '&#174;' ], # registered
418 # [ /\b ?[(\[]R[\])]/i, '&#174;' ], # registered
419 # [ /\b ?[(\[]C[\])]/i, '&#169;' ] # copyright
419 # [ /\b ?[(\[]C[\])]/i, '&#169;' ] # copyright
420 ]
420 ]
421
421
422 H_ALGN_VALS = {
422 H_ALGN_VALS = {
423 '<' => 'left',
423 '<' => 'left',
424 '=' => 'center',
424 '=' => 'center',
425 '>' => 'right',
425 '>' => 'right',
426 '<>' => 'justify'
426 '<>' => 'justify'
427 }
427 }
428
428
429 V_ALGN_VALS = {
429 V_ALGN_VALS = {
430 '^' => 'top',
430 '^' => 'top',
431 '-' => 'middle',
431 '-' => 'middle',
432 '~' => 'bottom'
432 '~' => 'bottom'
433 }
433 }
434
434
435 #
435 #
436 # Flexible HTML escaping
436 # Flexible HTML escaping
437 #
437 #
438 def htmlesc( str, mode=:Quotes )
438 def htmlesc( str, mode=:Quotes )
439 if str
439 if str
440 str.gsub!( '&', '&amp;' )
440 str.gsub!( '&', '&amp;' )
441 str.gsub!( '"', '&quot;' ) if mode != :NoQuotes
441 str.gsub!( '"', '&quot;' ) if mode != :NoQuotes
442 str.gsub!( "'", '&#039;' ) if mode == :Quotes
442 str.gsub!( "'", '&#039;' ) if mode == :Quotes
443 str.gsub!( '<', '&lt;')
443 str.gsub!( '<', '&lt;')
444 str.gsub!( '>', '&gt;')
444 str.gsub!( '>', '&gt;')
445 end
445 end
446 str
446 str
447 end
447 end
448
448
449 # Search and replace for Textile glyphs (quotes, dashes, other symbols)
449 # Search and replace for Textile glyphs (quotes, dashes, other symbols)
450 def pgl( text )
450 def pgl( text )
451 #GLYPHS.each do |re, resub, tog|
451 #GLYPHS.each do |re, resub, tog|
452 # next if tog and method( tog ).call
452 # next if tog and method( tog ).call
453 # text.gsub! re, resub
453 # text.gsub! re, resub
454 #end
454 #end
455 text.gsub!(/\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/) do |m|
455 text.gsub!(/\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/) do |m|
456 "<acronym title=\"#{htmlesc $2}\">#{$1}</acronym>"
456 "<acronym title=\"#{htmlesc $2}\">#{$1}</acronym>"
457 end
457 end
458 end
458 end
459
459
460 # Parses Textile attribute lists and builds an HTML attribute string
460 # Parses Textile attribute lists and builds an HTML attribute string
461 def pba( text_in, element = "" )
461 def pba( text_in, element = "" )
462
462
463 return '' unless text_in
463 return '' unless text_in
464
464
465 style = []
465 style = []
466 text = text_in.dup
466 text = text_in.dup
467 if element == 'td'
467 if element == 'td'
468 colspan = $1 if text =~ /\\(\d+)/
468 colspan = $1 if text =~ /\\(\d+)/
469 rowspan = $1 if text =~ /\/(\d+)/
469 rowspan = $1 if text =~ /\/(\d+)/
470 style << "vertical-align:#{ v_align( $& ) };" if text =~ A_VLGN
470 style << "vertical-align:#{ v_align( $& ) };" if text =~ A_VLGN
471 end
471 end
472
472
473 style << "#{ htmlesc $1 };" if not filter_styles and
473 style << "#{ htmlesc $1 };" if text.sub!( /\{([^}]*)\}/, '' ) && !filter_styles
474 text.sub!( /\{([^}]*)\}/, '' )
475
474
476 lang = $1 if
475 lang = $1 if
477 text.sub!( /\[([^)]+?)\]/, '' )
476 text.sub!( /\[([^)]+?)\]/, '' )
478
477
479 cls = $1 if
478 cls = $1 if
480 text.sub!( /\(([^()]+?)\)/, '' )
479 text.sub!( /\(([^()]+?)\)/, '' )
481
480
482 style << "padding-left:#{ $1.length }em;" if
481 style << "padding-left:#{ $1.length }em;" if
483 text.sub!( /([(]+)/, '' )
482 text.sub!( /([(]+)/, '' )
484
483
485 style << "padding-right:#{ $1.length }em;" if text.sub!( /([)]+)/, '' )
484 style << "padding-right:#{ $1.length }em;" if text.sub!( /([)]+)/, '' )
486
485
487 style << "text-align:#{ h_align( $& ) };" if text =~ A_HLGN
486 style << "text-align:#{ h_align( $& ) };" if text =~ A_HLGN
488
487
489 cls, id = $1, $2 if cls =~ /^(.*?)#(.*)$/
488 cls, id = $1, $2 if cls =~ /^(.*?)#(.*)$/
490
489
491 atts = ''
490 atts = ''
492 atts << " style=\"#{ style.join }\"" unless style.empty?
491 atts << " style=\"#{ style.join }\"" unless style.empty?
493 atts << " class=\"#{ cls }\"" unless cls.to_s.empty?
492 atts << " class=\"#{ cls }\"" unless cls.to_s.empty?
494 atts << " lang=\"#{ lang }\"" if lang
493 atts << " lang=\"#{ lang }\"" if lang
495 atts << " id=\"#{ id }\"" if id
494 atts << " id=\"#{ id }\"" if id
496 atts << " colspan=\"#{ colspan }\"" if colspan
495 atts << " colspan=\"#{ colspan }\"" if colspan
497 atts << " rowspan=\"#{ rowspan }\"" if rowspan
496 atts << " rowspan=\"#{ rowspan }\"" if rowspan
498
497
499 atts
498 atts
500 end
499 end
501
500
502 TABLE_RE = /^(?:table(_?#{S}#{A}#{C})\. ?\n)?^(#{A}#{C}\.? ?\|.*?\|)(\n\n|\Z)/m
501 TABLE_RE = /^(?:table(_?#{S}#{A}#{C})\. ?\n)?^(#{A}#{C}\.? ?\|.*?\|)(\n\n|\Z)/m
503
502
504 # Parses a Textile table block, building HTML from the result.
503 # Parses a Textile table block, building HTML from the result.
505 def block_textile_table( text )
504 def block_textile_table( text )
506 text.gsub!( TABLE_RE ) do |matches|
505 text.gsub!( TABLE_RE ) do |matches|
507
506
508 tatts, fullrow = $~[1..2]
507 tatts, fullrow = $~[1..2]
509 tatts = pba( tatts, 'table' )
508 tatts = pba( tatts, 'table' )
510 tatts = shelve( tatts ) if tatts
509 tatts = shelve( tatts ) if tatts
511 rows = []
510 rows = []
512
511
513 fullrow.each_line do |row|
512 fullrow.each_line do |row|
514 ratts, row = pba( $1, 'tr' ), $2 if row =~ /^(#{A}#{C}\. )(.*)/m
513 ratts, row = pba( $1, 'tr' ), $2 if row =~ /^(#{A}#{C}\. )(.*)/m
515 cells = []
514 cells = []
516 row.split( /(\|)(?![^\[\|]*\]\])/ )[1..-2].each do |cell|
515 row.split( /(\|)(?![^\[\|]*\]\])/ )[1..-2].each do |cell|
517 next if cell == '|'
516 next if cell == '|'
518 ctyp = 'd'
517 ctyp = 'd'
519 ctyp = 'h' if cell =~ /^_/
518 ctyp = 'h' if cell =~ /^_/
520
519
521 catts = ''
520 catts = ''
522 catts, cell = pba( $1, 'td' ), $2 if cell =~ /^(_?#{S}#{A}#{C}\. ?)(.*)/
521 catts, cell = pba( $1, 'td' ), $2 if cell =~ /^(_?#{S}#{A}#{C}\. ?)(.*)/
523
522
524 catts = shelve( catts ) if catts
523 catts = shelve( catts ) if catts
525 cells << "\t\t\t<t#{ ctyp }#{ catts }>#{ cell }</t#{ ctyp }>"
524 cells << "\t\t\t<t#{ ctyp }#{ catts }>#{ cell }</t#{ ctyp }>"
526 end
525 end
527 ratts = shelve( ratts ) if ratts
526 ratts = shelve( ratts ) if ratts
528 rows << "\t\t<tr#{ ratts }>\n#{ cells.join( "\n" ) }\n\t\t</tr>"
527 rows << "\t\t<tr#{ ratts }>\n#{ cells.join( "\n" ) }\n\t\t</tr>"
529 end
528 end
530 "\t<table#{ tatts }>\n#{ rows.join( "\n" ) }\n\t</table>\n\n"
529 "\t<table#{ tatts }>\n#{ rows.join( "\n" ) }\n\t</table>\n\n"
531 end
530 end
532 end
531 end
533
532
534 LISTS_RE = /^([#*]+?#{C} .*?)$(?![^#*])/m
533 LISTS_RE = /^([#*]+?#{C} .*?)$(?![^#*])/m
535 LISTS_CONTENT_RE = /^([#*]+)(#{A}#{C}) (.*)$/m
534 LISTS_CONTENT_RE = /^([#*]+)(#{A}#{C}) (.*)$/m
536
535
537 # Parses Textile lists and generates HTML
536 # Parses Textile lists and generates HTML
538 def block_textile_lists( text )
537 def block_textile_lists( text )
539 text.gsub!( LISTS_RE ) do |match|
538 text.gsub!( LISTS_RE ) do |match|
540 lines = match.split( /\n/ )
539 lines = match.split( /\n/ )
541 last_line = -1
540 last_line = -1
542 depth = []
541 depth = []
543 lines.each_with_index do |line, line_id|
542 lines.each_with_index do |line, line_id|
544 if line =~ LISTS_CONTENT_RE
543 if line =~ LISTS_CONTENT_RE
545 tl,atts,content = $~[1..3]
544 tl,atts,content = $~[1..3]
546 if depth.last
545 if depth.last
547 if depth.last.length > tl.length
546 if depth.last.length > tl.length
548 (depth.length - 1).downto(0) do |i|
547 (depth.length - 1).downto(0) do |i|
549 break if depth[i].length == tl.length
548 break if depth[i].length == tl.length
550 lines[line_id - 1] << "</li>\n\t</#{ lT( depth[i] ) }l>\n\t"
549 lines[line_id - 1] << "</li>\n\t</#{ lT( depth[i] ) }l>\n\t"
551 depth.pop
550 depth.pop
552 end
551 end
553 end
552 end
554 if depth.last and depth.last.length == tl.length
553 if depth.last and depth.last.length == tl.length
555 lines[line_id - 1] << '</li>'
554 lines[line_id - 1] << '</li>'
556 end
555 end
557 end
556 end
558 unless depth.last == tl
557 unless depth.last == tl
559 depth << tl
558 depth << tl
560 atts = pba( atts )
559 atts = pba( atts )
561 atts = shelve( atts ) if atts
560 atts = shelve( atts ) if atts
562 lines[line_id] = "\t<#{ lT(tl) }l#{ atts }>\n\t<li>#{ content }"
561 lines[line_id] = "\t<#{ lT(tl) }l#{ atts }>\n\t<li>#{ content }"
563 else
562 else
564 lines[line_id] = "\t\t<li>#{ content }"
563 lines[line_id] = "\t\t<li>#{ content }"
565 end
564 end
566 last_line = line_id
565 last_line = line_id
567
566
568 else
567 else
569 last_line = line_id
568 last_line = line_id
570 end
569 end
571 if line_id - last_line > 1 or line_id == lines.length - 1
570 if line_id - last_line > 1 or line_id == lines.length - 1
572 depth.delete_if do |v|
571 depth.delete_if do |v|
573 lines[last_line] << "</li>\n\t</#{ lT( v ) }l>"
572 lines[last_line] << "</li>\n\t</#{ lT( v ) }l>"
574 end
573 end
575 end
574 end
576 end
575 end
577 lines.join( "\n" )
576 lines.join( "\n" )
578 end
577 end
579 end
578 end
580
579
581 QUOTES_RE = /(^>+([^\n]*?)\n?)+/m
580 QUOTES_RE = /(^>+([^\n]*?)\n?)+/m
582 QUOTES_CONTENT_RE = /^([> ]+)(.*)$/m
581 QUOTES_CONTENT_RE = /^([> ]+)(.*)$/m
583
582
584 def block_textile_quotes( text )
583 def block_textile_quotes( text )
585 text.gsub!( QUOTES_RE ) do |match|
584 text.gsub!( QUOTES_RE ) do |match|
586 lines = match.split( /\n/ )
585 lines = match.split( /\n/ )
587 quotes = ''
586 quotes = ''
588 indent = 0
587 indent = 0
589 lines.each do |line|
588 lines.each do |line|
590 line =~ QUOTES_CONTENT_RE
589 line =~ QUOTES_CONTENT_RE
591 bq,content = $1, $2
590 bq,content = $1, $2
592 l = bq.count('>')
591 l = bq.count('>')
593 if l != indent
592 if l != indent
594 quotes << ("\n\n" + (l>indent ? '<blockquote>' * (l-indent) : '</blockquote>' * (indent-l)) + "\n\n")
593 quotes << ("\n\n" + (l>indent ? '<blockquote>' * (l-indent) : '</blockquote>' * (indent-l)) + "\n\n")
595 indent = l
594 indent = l
596 end
595 end
597 quotes << (content + "\n")
596 quotes << (content + "\n")
598 end
597 end
599 quotes << ("\n" + '</blockquote>' * indent + "\n\n")
598 quotes << ("\n" + '</blockquote>' * indent + "\n\n")
600 quotes
599 quotes
601 end
600 end
602 end
601 end
603
602
604 CODE_RE = /(\W)
603 CODE_RE = /(\W)
605 @
604 @
606 (?:\|(\w+?)\|)?
605 (?:\|(\w+?)\|)?
607 (.+?)
606 (.+?)
608 @
607 @
609 (?=\W)/x
608 (?=\W)/x
610
609
611 def inline_textile_code( text )
610 def inline_textile_code( text )
612 text.gsub!( CODE_RE ) do |m|
611 text.gsub!( CODE_RE ) do |m|
613 before,lang,code,after = $~[1..4]
612 before,lang,code,after = $~[1..4]
614 lang = " lang=\"#{ lang }\"" if lang
613 lang = " lang=\"#{ lang }\"" if lang
615 rip_offtags( "#{ before }<code#{ lang }>#{ code }</code>#{ after }" )
614 rip_offtags( "#{ before }<code#{ lang }>#{ code }</code>#{ after }" )
616 end
615 end
617 end
616 end
618
617
619 def lT( text )
618 def lT( text )
620 text =~ /\#$/ ? 'o' : 'u'
619 text =~ /\#$/ ? 'o' : 'u'
621 end
620 end
622
621
623 def hard_break( text )
622 def hard_break( text )
624 text.gsub!( /(.)\n(?!\Z| *([#*=]+(\s|$)|[{|]))/, "\\1<br />" ) if hard_breaks
623 text.gsub!( /(.)\n(?!\Z| *([#*=]+(\s|$)|[{|]))/, "\\1<br />" ) if hard_breaks
625 end
624 end
626
625
627 BLOCKS_GROUP_RE = /\n{2,}(?! )/m
626 BLOCKS_GROUP_RE = /\n{2,}(?! )/m
628
627
629 def blocks( text, deep_code = false )
628 def blocks( text, deep_code = false )
630 text.replace( text.split( BLOCKS_GROUP_RE ).collect do |blk|
629 text.replace( text.split( BLOCKS_GROUP_RE ).collect do |blk|
631 plain = blk !~ /\A[#*> ]/
630 plain = blk !~ /\A[#*> ]/
632
631
633 # skip blocks that are complex HTML
632 # skip blocks that are complex HTML
634 if blk =~ /^<\/?(\w+).*>/ and not SIMPLE_HTML_TAGS.include? $1
633 if blk =~ /^<\/?(\w+).*>/ and not SIMPLE_HTML_TAGS.include? $1
635 blk
634 blk
636 else
635 else
637 # search for indentation levels
636 # search for indentation levels
638 blk.strip!
637 blk.strip!
639 if blk.empty?
638 if blk.empty?
640 blk
639 blk
641 else
640 else
642 code_blk = nil
641 code_blk = nil
643 blk.gsub!( /((?:\n(?:\n^ +[^\n]*)+)+)/m ) do |iblk|
642 blk.gsub!( /((?:\n(?:\n^ +[^\n]*)+)+)/m ) do |iblk|
644 flush_left iblk
643 flush_left iblk
645 blocks iblk, plain
644 blocks iblk, plain
646 iblk.gsub( /^(\S)/, "\t\\1" )
645 iblk.gsub( /^(\S)/, "\t\\1" )
647 if plain
646 if plain
648 code_blk = iblk; ""
647 code_blk = iblk; ""
649 else
648 else
650 iblk
649 iblk
651 end
650 end
652 end
651 end
653
652
654 block_applied = 0
653 block_applied = 0
655 @rules.each do |rule_name|
654 @rules.each do |rule_name|
656 block_applied += 1 if ( rule_name.to_s.match /^block_/ and method( rule_name ).call( blk ) )
655 block_applied += 1 if ( rule_name.to_s.match /^block_/ and method( rule_name ).call( blk ) )
657 end
656 end
658 if block_applied.zero?
657 if block_applied.zero?
659 if deep_code
658 if deep_code
660 blk = "\t<pre><code>#{ blk }</code></pre>"
659 blk = "\t<pre><code>#{ blk }</code></pre>"
661 else
660 else
662 blk = "\t<p>#{ blk }</p>"
661 blk = "\t<p>#{ blk }</p>"
663 end
662 end
664 end
663 end
665 # hard_break blk
664 # hard_break blk
666 blk + "\n#{ code_blk }"
665 blk + "\n#{ code_blk }"
667 end
666 end
668 end
667 end
669
668
670 end.join( "\n\n" ) )
669 end.join( "\n\n" ) )
671 end
670 end
672
671
673 def textile_bq( tag, atts, cite, content )
672 def textile_bq( tag, atts, cite, content )
674 cite, cite_title = check_refs( cite )
673 cite, cite_title = check_refs( cite )
675 cite = " cite=\"#{ cite }\"" if cite
674 cite = " cite=\"#{ cite }\"" if cite
676 atts = shelve( atts ) if atts
675 atts = shelve( atts ) if atts
677 "\t<blockquote#{ cite }>\n\t\t<p#{ atts }>#{ content }</p>\n\t</blockquote>"
676 "\t<blockquote#{ cite }>\n\t\t<p#{ atts }>#{ content }</p>\n\t</blockquote>"
678 end
677 end
679
678
680 def textile_p( tag, atts, cite, content )
679 def textile_p( tag, atts, cite, content )
681 atts = shelve( atts ) if atts
680 atts = shelve( atts ) if atts
682 "\t<#{ tag }#{ atts }>#{ content }</#{ tag }>"
681 "\t<#{ tag }#{ atts }>#{ content }</#{ tag }>"
683 end
682 end
684
683
685 alias textile_h1 textile_p
684 alias textile_h1 textile_p
686 alias textile_h2 textile_p
685 alias textile_h2 textile_p
687 alias textile_h3 textile_p
686 alias textile_h3 textile_p
688 alias textile_h4 textile_p
687 alias textile_h4 textile_p
689 alias textile_h5 textile_p
688 alias textile_h5 textile_p
690 alias textile_h6 textile_p
689 alias textile_h6 textile_p
691
690
692 def textile_fn_( tag, num, atts, cite, content )
691 def textile_fn_( tag, num, atts, cite, content )
693 atts << " id=\"fn#{ num }\" class=\"footnote\""
692 atts << " id=\"fn#{ num }\" class=\"footnote\""
694 content = "<sup>#{ num }</sup> #{ content }"
693 content = "<sup>#{ num }</sup> #{ content }"
695 atts = shelve( atts ) if atts
694 atts = shelve( atts ) if atts
696 "\t<p#{ atts }>#{ content }</p>"
695 "\t<p#{ atts }>#{ content }</p>"
697 end
696 end
698
697
699 BLOCK_RE = /^(([a-z]+)(\d*))(#{A}#{C})\.(?::(\S+))? (.*)$/m
698 BLOCK_RE = /^(([a-z]+)(\d*))(#{A}#{C})\.(?::(\S+))? (.*)$/m
700
699
701 def block_textile_prefix( text )
700 def block_textile_prefix( text )
702 if text =~ BLOCK_RE
701 if text =~ BLOCK_RE
703 tag,tagpre,num,atts,cite,content = $~[1..6]
702 tag,tagpre,num,atts,cite,content = $~[1..6]
704 atts = pba( atts )
703 atts = pba( atts )
705
704
706 # pass to prefix handler
705 # pass to prefix handler
707 if respond_to? "textile_#{ tag }", true
706 if respond_to? "textile_#{ tag }", true
708 text.gsub!( $&, method( "textile_#{ tag }" ).call( tag, atts, cite, content ) )
707 text.gsub!( $&, method( "textile_#{ tag }" ).call( tag, atts, cite, content ) )
709 elsif respond_to? "textile_#{ tagpre }_", true
708 elsif respond_to? "textile_#{ tagpre }_", true
710 text.gsub!( $&, method( "textile_#{ tagpre }_" ).call( tagpre, num, atts, cite, content ) )
709 text.gsub!( $&, method( "textile_#{ tagpre }_" ).call( tagpre, num, atts, cite, content ) )
711 end
710 end
712 end
711 end
713 end
712 end
714
713
715 SETEXT_RE = /\A(.+?)\n([=-])[=-]* *$/m
714 SETEXT_RE = /\A(.+?)\n([=-])[=-]* *$/m
716 def block_markdown_setext( text )
715 def block_markdown_setext( text )
717 if text =~ SETEXT_RE
716 if text =~ SETEXT_RE
718 tag = if $2 == "="; "h1"; else; "h2"; end
717 tag = if $2 == "="; "h1"; else; "h2"; end
719 blk, cont = "<#{ tag }>#{ $1 }</#{ tag }>", $'
718 blk, cont = "<#{ tag }>#{ $1 }</#{ tag }>", $'
720 blocks cont
719 blocks cont
721 text.replace( blk + cont )
720 text.replace( blk + cont )
722 end
721 end
723 end
722 end
724
723
725 ATX_RE = /\A(\#{1,6}) # $1 = string of #'s
724 ATX_RE = /\A(\#{1,6}) # $1 = string of #'s
726 [ ]*
725 [ ]*
727 (.+?) # $2 = Header text
726 (.+?) # $2 = Header text
728 [ ]*
727 [ ]*
729 \#* # optional closing #'s (not counted)
728 \#* # optional closing #'s (not counted)
730 $/x
729 $/x
731 def block_markdown_atx( text )
730 def block_markdown_atx( text )
732 if text =~ ATX_RE
731 if text =~ ATX_RE
733 tag = "h#{ $1.length }"
732 tag = "h#{ $1.length }"
734 blk, cont = "<#{ tag }>#{ $2 }</#{ tag }>\n\n", $'
733 blk, cont = "<#{ tag }>#{ $2 }</#{ tag }>\n\n", $'
735 blocks cont
734 blocks cont
736 text.replace( blk + cont )
735 text.replace( blk + cont )
737 end
736 end
738 end
737 end
739
738
740 MARKDOWN_BQ_RE = /\A(^ *> ?.+$(.+\n)*\n*)+/m
739 MARKDOWN_BQ_RE = /\A(^ *> ?.+$(.+\n)*\n*)+/m
741
740
742 def block_markdown_bq( text )
741 def block_markdown_bq( text )
743 text.gsub!( MARKDOWN_BQ_RE ) do |blk|
742 text.gsub!( MARKDOWN_BQ_RE ) do |blk|
744 blk.gsub!( /^ *> ?/, '' )
743 blk.gsub!( /^ *> ?/, '' )
745 flush_left blk
744 flush_left blk
746 blocks blk
745 blocks blk
747 blk.gsub!( /^(\S)/, "\t\\1" )
746 blk.gsub!( /^(\S)/, "\t\\1" )
748 "<blockquote>\n#{ blk }\n</blockquote>\n\n"
747 "<blockquote>\n#{ blk }\n</blockquote>\n\n"
749 end
748 end
750 end
749 end
751
750
752 MARKDOWN_RULE_RE = /^(#{
751 MARKDOWN_RULE_RE = /^(#{
753 ['*', '-', '_'].collect { |ch| ' ?(' + Regexp::quote( ch ) + ' ?){3,}' }.join( '|' )
752 ['*', '-', '_'].collect { |ch| ' ?(' + Regexp::quote( ch ) + ' ?){3,}' }.join( '|' )
754 })$/
753 })$/
755
754
756 def block_markdown_rule( text )
755 def block_markdown_rule( text )
757 text.gsub!( MARKDOWN_RULE_RE ) do |blk|
756 text.gsub!( MARKDOWN_RULE_RE ) do |blk|
758 "<hr />"
757 "<hr />"
759 end
758 end
760 end
759 end
761
760
762 # XXX TODO XXX
761 # XXX TODO XXX
763 def block_markdown_lists( text )
762 def block_markdown_lists( text )
764 end
763 end
765
764
766 def inline_textile_span( text )
765 def inline_textile_span( text )
767 QTAGS.each do |qtag_rc, ht, qtag_re, rtype|
766 QTAGS.each do |qtag_rc, ht, qtag_re, rtype|
768 text.gsub!( qtag_re ) do |m|
767 text.gsub!( qtag_re ) do |m|
769
768
770 case rtype
769 case rtype
771 when :limit
770 when :limit
772 sta,qtag,atts,cite,content = $~[1..5]
771 sta,qtag,atts,cite,content = $~[1..5]
773 else
772 else
774 qtag,atts,cite,content = $~[1..4]
773 qtag,atts,cite,content = $~[1..4]
775 sta = ''
774 sta = ''
776 end
775 end
777 atts = pba( atts )
776 atts = pba( atts )
778 atts << " cite=\"#{ cite }\"" if cite
777 atts << " cite=\"#{ cite }\"" if cite
779 atts = shelve( atts ) if atts
778 atts = shelve( atts ) if atts
780
779
781 "#{ sta }<#{ ht }#{ atts }>#{ content }</#{ ht }>"
780 "#{ sta }<#{ ht }#{ atts }>#{ content }</#{ ht }>"
782
781
783 end
782 end
784 end
783 end
785 end
784 end
786
785
787 LINK_RE = /
786 LINK_RE = /
788 ([\s\[{(]|[#{PUNCT}])? # $pre
787 ([\s\[{(]|[#{PUNCT}])? # $pre
789 " # start
788 " # start
790 (#{C}) # $atts
789 (#{C}) # $atts
791 ([^"\n]+?) # $text
790 ([^"\n]+?) # $text
792 \s?
791 \s?
793 (?:\(([^)]+?)\)(?="))? # $title
792 (?:\(([^)]+?)\)(?="))? # $title
794 ":
793 ":
795 ([\w\/]\S+?) # $url
794 ([\w\/]\S+?) # $url
796 (\/)? # $slash
795 (\/)? # $slash
797 ([^\w\=\/;\(\)]*?) # $post
796 ([^\w\=\/;\(\)]*?) # $post
798 (?=<|\s|$)
797 (?=<|\s|$)
799 /x
798 /x
800 #"
799 #"
801 def inline_textile_link( text )
800 def inline_textile_link( text )
802 text.gsub!( LINK_RE ) do |m|
801 text.gsub!( LINK_RE ) do |m|
803 pre,atts,text,title,url,slash,post = $~[1..7]
802 pre,atts,text,title,url,slash,post = $~[1..7]
804
803
805 url, url_title = check_refs( url )
804 url, url_title = check_refs( url )
806 title ||= url_title
805 title ||= url_title
807
806
808 # Idea below : an URL with unbalanced parethesis and
807 # Idea below : an URL with unbalanced parethesis and
809 # ending by ')' is put into external parenthesis
808 # ending by ')' is put into external parenthesis
810 if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )
809 if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )
811 url=url[0..-2] # discard closing parenth from url
810 url=url[0..-2] # discard closing parenth from url
812 post = ")"+post # add closing parenth to post
811 post = ")"+post # add closing parenth to post
813 end
812 end
814 atts = pba( atts )
813 atts = pba( atts )
815 atts = " href=\"#{ url }#{ slash }\"#{ atts }"
814 atts = " href=\"#{ url }#{ slash }\"#{ atts }"
816 atts << " title=\"#{ htmlesc title }\"" if title
815 atts << " title=\"#{ htmlesc title }\"" if title
817 atts = shelve( atts ) if atts
816 atts = shelve( atts ) if atts
818
817
819 external = (url =~ /^https?:\/\//) ? ' class="external"' : ''
818 external = (url =~ /^https?:\/\//) ? ' class="external"' : ''
820
819
821 "#{ pre }<a#{ atts }#{ external }>#{ text }</a>#{ post }"
820 "#{ pre }<a#{ atts }#{ external }>#{ text }</a>#{ post }"
822 end
821 end
823 end
822 end
824
823
825 MARKDOWN_REFLINK_RE = /
824 MARKDOWN_REFLINK_RE = /
826 \[([^\[\]]+)\] # $text
825 \[([^\[\]]+)\] # $text
827 [ ]? # opt. space
826 [ ]? # opt. space
828 (?:\n[ ]*)? # one optional newline followed by spaces
827 (?:\n[ ]*)? # one optional newline followed by spaces
829 \[(.*?)\] # $id
828 \[(.*?)\] # $id
830 /x
829 /x
831
830
832 def inline_markdown_reflink( text )
831 def inline_markdown_reflink( text )
833 text.gsub!( MARKDOWN_REFLINK_RE ) do |m|
832 text.gsub!( MARKDOWN_REFLINK_RE ) do |m|
834 text, id = $~[1..2]
833 text, id = $~[1..2]
835
834
836 if id.empty?
835 if id.empty?
837 url, title = check_refs( text )
836 url, title = check_refs( text )
838 else
837 else
839 url, title = check_refs( id )
838 url, title = check_refs( id )
840 end
839 end
841
840
842 atts = " href=\"#{ url }\""
841 atts = " href=\"#{ url }\""
843 atts << " title=\"#{ title }\"" if title
842 atts << " title=\"#{ title }\"" if title
844 atts = shelve( atts )
843 atts = shelve( atts )
845
844
846 "<a#{ atts }>#{ text }</a>"
845 "<a#{ atts }>#{ text }</a>"
847 end
846 end
848 end
847 end
849
848
850 MARKDOWN_LINK_RE = /
849 MARKDOWN_LINK_RE = /
851 \[([^\[\]]+)\] # $text
850 \[([^\[\]]+)\] # $text
852 \( # open paren
851 \( # open paren
853 [ \t]* # opt space
852 [ \t]* # opt space
854 <?(.+?)>? # $href
853 <?(.+?)>? # $href
855 [ \t]* # opt space
854 [ \t]* # opt space
856 (?: # whole title
855 (?: # whole title
857 (['"]) # $quote
856 (['"]) # $quote
858 (.*?) # $title
857 (.*?) # $title
859 \3 # matching quote
858 \3 # matching quote
860 )? # title is optional
859 )? # title is optional
861 \)
860 \)
862 /x
861 /x
863
862
864 def inline_markdown_link( text )
863 def inline_markdown_link( text )
865 text.gsub!( MARKDOWN_LINK_RE ) do |m|
864 text.gsub!( MARKDOWN_LINK_RE ) do |m|
866 text, url, quote, title = $~[1..4]
865 text, url, quote, title = $~[1..4]
867
866
868 atts = " href=\"#{ url }\""
867 atts = " href=\"#{ url }\""
869 atts << " title=\"#{ title }\"" if title
868 atts << " title=\"#{ title }\"" if title
870 atts = shelve( atts )
869 atts = shelve( atts )
871
870
872 "<a#{ atts }>#{ text }</a>"
871 "<a#{ atts }>#{ text }</a>"
873 end
872 end
874 end
873 end
875
874
876 TEXTILE_REFS_RE = /(^ *)\[([^\[\n]+?)\](#{HYPERLINK})(?=\s|$)/
875 TEXTILE_REFS_RE = /(^ *)\[([^\[\n]+?)\](#{HYPERLINK})(?=\s|$)/
877 MARKDOWN_REFS_RE = /(^ *)\[([^\n]+?)\]:\s+<?(#{HYPERLINK})>?(?:\s+"((?:[^"]|\\")+)")?(?=\s|$)/m
876 MARKDOWN_REFS_RE = /(^ *)\[([^\n]+?)\]:\s+<?(#{HYPERLINK})>?(?:\s+"((?:[^"]|\\")+)")?(?=\s|$)/m
878
877
879 def refs( text )
878 def refs( text )
880 @rules.each do |rule_name|
879 @rules.each do |rule_name|
881 method( rule_name ).call( text ) if rule_name.to_s.match /^refs_/
880 method( rule_name ).call( text ) if rule_name.to_s.match /^refs_/
882 end
881 end
883 end
882 end
884
883
885 def refs_textile( text )
884 def refs_textile( text )
886 text.gsub!( TEXTILE_REFS_RE ) do |m|
885 text.gsub!( TEXTILE_REFS_RE ) do |m|
887 flag, url = $~[2..3]
886 flag, url = $~[2..3]
888 @urlrefs[flag.downcase] = [url, nil]
887 @urlrefs[flag.downcase] = [url, nil]
889 nil
888 nil
890 end
889 end
891 end
890 end
892
891
893 def refs_markdown( text )
892 def refs_markdown( text )
894 text.gsub!( MARKDOWN_REFS_RE ) do |m|
893 text.gsub!( MARKDOWN_REFS_RE ) do |m|
895 flag, url = $~[2..3]
894 flag, url = $~[2..3]
896 title = $~[6]
895 title = $~[6]
897 @urlrefs[flag.downcase] = [url, title]
896 @urlrefs[flag.downcase] = [url, title]
898 nil
897 nil
899 end
898 end
900 end
899 end
901
900
902 def check_refs( text )
901 def check_refs( text )
903 ret = @urlrefs[text.downcase] if text
902 ret = @urlrefs[text.downcase] if text
904 ret || [text, nil]
903 ret || [text, nil]
905 end
904 end
906
905
907 IMAGE_RE = /
906 IMAGE_RE = /
908 (<p>|.|^) # start of line?
907 (<p>|.|^) # start of line?
909 \! # opening
908 \! # opening
910 (\<|\=|\>)? # optional alignment atts
909 (\<|\=|\>)? # optional alignment atts
911 (#{C}) # optional style,class atts
910 (#{C}) # optional style,class atts
912 (?:\. )? # optional dot-space
911 (?:\. )? # optional dot-space
913 ([^\s(!]+?) # presume this is the src
912 ([^\s(!]+?) # presume this is the src
914 \s? # optional space
913 \s? # optional space
915 (?:\(((?:[^\(\)]|\([^\)]+\))+?)\))? # optional title
914 (?:\(((?:[^\(\)]|\([^\)]+\))+?)\))? # optional title
916 \! # closing
915 \! # closing
917 (?::#{ HYPERLINK })? # optional href
916 (?::#{ HYPERLINK })? # optional href
918 /x
917 /x
919
918
920 def inline_textile_image( text )
919 def inline_textile_image( text )
921 text.gsub!( IMAGE_RE ) do |m|
920 text.gsub!( IMAGE_RE ) do |m|
922 stln,algn,atts,url,title,href,href_a1,href_a2 = $~[1..8]
921 stln,algn,atts,url,title,href,href_a1,href_a2 = $~[1..8]
923 htmlesc title
922 htmlesc title
924 atts = pba( atts )
923 atts = pba( atts )
925 atts = " src=\"#{ url }\"#{ atts }"
924 atts = " src=\"#{ url }\"#{ atts }"
926 atts << " title=\"#{ title }\"" if title
925 atts << " title=\"#{ title }\"" if title
927 atts << " alt=\"#{ title }\""
926 atts << " alt=\"#{ title }\""
928 # size = @getimagesize($url);
927 # size = @getimagesize($url);
929 # if($size) $atts.= " $size[3]";
928 # if($size) $atts.= " $size[3]";
930
929
931 href, alt_title = check_refs( href ) if href
930 href, alt_title = check_refs( href ) if href
932 url, url_title = check_refs( url )
931 url, url_title = check_refs( url )
933
932
934 out = ''
933 out = ''
935 out << "<a#{ shelve( " href=\"#{ href }\"" ) }>" if href
934 out << "<a#{ shelve( " href=\"#{ href }\"" ) }>" if href
936 out << "<img#{ shelve( atts ) } />"
935 out << "<img#{ shelve( atts ) } />"
937 out << "</a>#{ href_a1 }#{ href_a2 }" if href
936 out << "</a>#{ href_a1 }#{ href_a2 }" if href
938
937
939 if algn
938 if algn
940 algn = h_align( algn )
939 algn = h_align( algn )
941 if stln == "<p>"
940 if stln == "<p>"
942 out = "<p style=\"float:#{ algn }\">#{ out }"
941 out = "<p style=\"float:#{ algn }\">#{ out }"
943 else
942 else
944 out = "#{ stln }<div style=\"float:#{ algn }\">#{ out }</div>"
943 out = "#{ stln }<div style=\"float:#{ algn }\">#{ out }</div>"
945 end
944 end
946 else
945 else
947 out = stln + out
946 out = stln + out
948 end
947 end
949
948
950 out
949 out
951 end
950 end
952 end
951 end
953
952
954 def shelve( val )
953 def shelve( val )
955 @shelf << val
954 @shelf << val
956 " :redsh##{ @shelf.length }:"
955 " :redsh##{ @shelf.length }:"
957 end
956 end
958
957
959 def retrieve( text )
958 def retrieve( text )
960 @shelf.each_with_index do |r, i|
959 @shelf.each_with_index do |r, i|
961 text.gsub!( " :redsh##{ i + 1 }:", r )
960 text.gsub!( " :redsh##{ i + 1 }:", r )
962 end
961 end
963 end
962 end
964
963
965 def incoming_entities( text )
964 def incoming_entities( text )
966 ## turn any incoming ampersands into a dummy character for now.
965 ## turn any incoming ampersands into a dummy character for now.
967 ## This uses a negative lookahead for alphanumerics followed by a semicolon,
966 ## This uses a negative lookahead for alphanumerics followed by a semicolon,
968 ## implying an incoming html entity, to be skipped
967 ## implying an incoming html entity, to be skipped
969
968
970 text.gsub!( /&(?![#a-z0-9]+;)/i, "x%x%" )
969 text.gsub!( /&(?![#a-z0-9]+;)/i, "x%x%" )
971 end
970 end
972
971
973 def no_textile( text )
972 def no_textile( text )
974 text.gsub!( /(^|\s)==([^=]+.*?)==(\s|$)?/,
973 text.gsub!( /(^|\s)==([^=]+.*?)==(\s|$)?/,
975 '\1<notextile>\2</notextile>\3' )
974 '\1<notextile>\2</notextile>\3' )
976 text.gsub!( /^ *==([^=]+.*?)==/m,
975 text.gsub!( /^ *==([^=]+.*?)==/m,
977 '\1<notextile>\2</notextile>\3' )
976 '\1<notextile>\2</notextile>\3' )
978 end
977 end
979
978
980 def clean_white_space( text )
979 def clean_white_space( text )
981 # normalize line breaks
980 # normalize line breaks
982 text.gsub!( /\r\n/, "\n" )
981 text.gsub!( /\r\n/, "\n" )
983 text.gsub!( /\r/, "\n" )
982 text.gsub!( /\r/, "\n" )
984 text.gsub!( /\t/, ' ' )
983 text.gsub!( /\t/, ' ' )
985 text.gsub!( /^ +$/, '' )
984 text.gsub!( /^ +$/, '' )
986 text.gsub!( /\n{3,}/, "\n\n" )
985 text.gsub!( /\n{3,}/, "\n\n" )
987 text.gsub!( /"$/, "\" " )
986 text.gsub!( /"$/, "\" " )
988
987
989 # if entire document is indented, flush
988 # if entire document is indented, flush
990 # to the left side
989 # to the left side
991 flush_left text
990 flush_left text
992 end
991 end
993
992
994 def flush_left( text )
993 def flush_left( text )
995 indt = 0
994 indt = 0
996 if text =~ /^ /
995 if text =~ /^ /
997 while text !~ /^ {#{indt}}\S/
996 while text !~ /^ {#{indt}}\S/
998 indt += 1
997 indt += 1
999 end unless text.empty?
998 end unless text.empty?
1000 if indt.nonzero?
999 if indt.nonzero?
1001 text.gsub!( /^ {#{indt}}/, '' )
1000 text.gsub!( /^ {#{indt}}/, '' )
1002 end
1001 end
1003 end
1002 end
1004 end
1003 end
1005
1004
1006 def footnote_ref( text )
1005 def footnote_ref( text )
1007 text.gsub!( /\b\[([0-9]+?)\](\s)?/,
1006 text.gsub!( /\b\[([0-9]+?)\](\s)?/,
1008 '<sup><a href="#fn\1">\1</a></sup>\2' )
1007 '<sup><a href="#fn\1">\1</a></sup>\2' )
1009 end
1008 end
1010
1009
1011 OFFTAGS = /(code|pre|kbd|notextile)/
1010 OFFTAGS = /(code|pre|kbd|notextile)/
1012 OFFTAG_MATCH = /(?:(<\/#{ OFFTAGS }>)|(<#{ OFFTAGS }[^>]*>))(.*?)(?=<\/?#{ OFFTAGS }|\Z)/mi
1011 OFFTAG_MATCH = /(?:(<\/#{ OFFTAGS }>)|(<#{ OFFTAGS }[^>]*>))(.*?)(?=<\/?#{ OFFTAGS }|\Z)/mi
1013 OFFTAG_OPEN = /<#{ OFFTAGS }/
1012 OFFTAG_OPEN = /<#{ OFFTAGS }/
1014 OFFTAG_CLOSE = /<\/?#{ OFFTAGS }/
1013 OFFTAG_CLOSE = /<\/?#{ OFFTAGS }/
1015 HASTAG_MATCH = /(<\/?\w[^\n]*?>)/m
1014 HASTAG_MATCH = /(<\/?\w[^\n]*?>)/m
1016 ALLTAG_MATCH = /(<\/?\w[^\n]*?>)|.*?(?=<\/?\w[^\n]*?>|$)/m
1015 ALLTAG_MATCH = /(<\/?\w[^\n]*?>)|.*?(?=<\/?\w[^\n]*?>|$)/m
1017
1016
1018 def glyphs_textile( text, level = 0 )
1017 def glyphs_textile( text, level = 0 )
1019 if text !~ HASTAG_MATCH
1018 if text !~ HASTAG_MATCH
1020 pgl text
1019 pgl text
1021 footnote_ref text
1020 footnote_ref text
1022 else
1021 else
1023 codepre = 0
1022 codepre = 0
1024 text.gsub!( ALLTAG_MATCH ) do |line|
1023 text.gsub!( ALLTAG_MATCH ) do |line|
1025 ## matches are off if we're between <code>, <pre> etc.
1024 ## matches are off if we're between <code>, <pre> etc.
1026 if $1
1025 if $1
1027 if line =~ OFFTAG_OPEN
1026 if line =~ OFFTAG_OPEN
1028 codepre += 1
1027 codepre += 1
1029 elsif line =~ OFFTAG_CLOSE
1028 elsif line =~ OFFTAG_CLOSE
1030 codepre -= 1
1029 codepre -= 1
1031 codepre = 0 if codepre < 0
1030 codepre = 0 if codepre < 0
1032 end
1031 end
1033 elsif codepre.zero?
1032 elsif codepre.zero?
1034 glyphs_textile( line, level + 1 )
1033 glyphs_textile( line, level + 1 )
1035 else
1034 else
1036 htmlesc( line, :NoQuotes )
1035 htmlesc( line, :NoQuotes )
1037 end
1036 end
1038 # p [level, codepre, line]
1037 # p [level, codepre, line]
1039
1038
1040 line
1039 line
1041 end
1040 end
1042 end
1041 end
1043 end
1042 end
1044
1043
1045 def rip_offtags( text )
1044 def rip_offtags( text )
1046 if text =~ /<.*>/
1045 if text =~ /<.*>/
1047 ## strip and encode <pre> content
1046 ## strip and encode <pre> content
1048 codepre, used_offtags = 0, {}
1047 codepre, used_offtags = 0, {}
1049 text.gsub!( OFFTAG_MATCH ) do |line|
1048 text.gsub!( OFFTAG_MATCH ) do |line|
1050 if $3
1049 if $3
1051 offtag, aftertag = $4, $5
1050 offtag, aftertag = $4, $5
1052 codepre += 1
1051 codepre += 1
1053 used_offtags[offtag] = true
1052 used_offtags[offtag] = true
1054 if codepre - used_offtags.length > 0
1053 if codepre - used_offtags.length > 0
1055 htmlesc( line, :NoQuotes )
1054 htmlesc( line, :NoQuotes )
1056 @pre_list.last << line
1055 @pre_list.last << line
1057 line = ""
1056 line = ""
1058 else
1057 else
1059 htmlesc( aftertag, :NoQuotes ) if aftertag
1058 htmlesc( aftertag, :NoQuotes ) if aftertag
1060 line = "<redpre##{ @pre_list.length }>"
1059 line = "<redpre##{ @pre_list.length }>"
1061 $3.match(/<#{ OFFTAGS }([^>]*)>/)
1060 $3.match(/<#{ OFFTAGS }([^>]*)>/)
1062 tag = $1
1061 tag = $1
1063 $2.to_s.match(/(class\=\S+)/i)
1062 $2.to_s.match(/(class\=\S+)/i)
1064 tag << " #{$1}" if $1
1063 tag << " #{$1}" if $1
1065 @pre_list << "<#{ tag }>#{ aftertag }"
1064 @pre_list << "<#{ tag }>#{ aftertag }"
1066 end
1065 end
1067 elsif $1 and codepre > 0
1066 elsif $1 and codepre > 0
1068 if codepre - used_offtags.length > 0
1067 if codepre - used_offtags.length > 0
1069 htmlesc( line, :NoQuotes )
1068 htmlesc( line, :NoQuotes )
1070 @pre_list.last << line
1069 @pre_list.last << line
1071 line = ""
1070 line = ""
1072 end
1071 end
1073 codepre -= 1 unless codepre.zero?
1072 codepre -= 1 unless codepre.zero?
1074 used_offtags = {} if codepre.zero?
1073 used_offtags = {} if codepre.zero?
1075 end
1074 end
1076 line
1075 line
1077 end
1076 end
1078 end
1077 end
1079 text
1078 text
1080 end
1079 end
1081
1080
1082 def smooth_offtags( text )
1081 def smooth_offtags( text )
1083 unless @pre_list.empty?
1082 unless @pre_list.empty?
1084 ## replace <pre> content
1083 ## replace <pre> content
1085 text.gsub!( /<redpre#(\d+)>/ ) { @pre_list[$1.to_i] }
1084 text.gsub!( /<redpre#(\d+)>/ ) { @pre_list[$1.to_i] }
1086 end
1085 end
1087 end
1086 end
1088
1087
1089 def inline( text )
1088 def inline( text )
1090 [/^inline_/, /^glyphs_/].each do |meth_re|
1089 [/^inline_/, /^glyphs_/].each do |meth_re|
1091 @rules.each do |rule_name|
1090 @rules.each do |rule_name|
1092 method( rule_name ).call( text ) if rule_name.to_s.match( meth_re )
1091 method( rule_name ).call( text ) if rule_name.to_s.match( meth_re )
1093 end
1092 end
1094 end
1093 end
1095 end
1094 end
1096
1095
1097 def h_align( text )
1096 def h_align( text )
1098 H_ALGN_VALS[text]
1097 H_ALGN_VALS[text]
1099 end
1098 end
1100
1099
1101 def v_align( text )
1100 def v_align( text )
1102 V_ALGN_VALS[text]
1101 V_ALGN_VALS[text]
1103 end
1102 end
1104
1103
1105 def textile_popup_help( name, windowW, windowH )
1104 def textile_popup_help( name, windowW, windowH )
1106 ' <a target="_blank" href="http://hobix.com/textile/#' + helpvar + '" onclick="window.open(this.href, \'popupwindow\', \'width=' + windowW + ',height=' + windowH + ',scrollbars,resizable\'); return false;">' + name + '</a><br />'
1105 ' <a target="_blank" href="http://hobix.com/textile/#' + helpvar + '" onclick="window.open(this.href, \'popupwindow\', \'width=' + windowW + ',height=' + windowH + ',scrollbars,resizable\'); return false;">' + name + '</a><br />'
1107 end
1106 end
1108
1107
1109 # HTML cleansing stuff
1108 # HTML cleansing stuff
1110 BASIC_TAGS = {
1109 BASIC_TAGS = {
1111 'a' => ['href', 'title'],
1110 'a' => ['href', 'title'],
1112 'img' => ['src', 'alt', 'title'],
1111 'img' => ['src', 'alt', 'title'],
1113 'br' => [],
1112 'br' => [],
1114 'i' => nil,
1113 'i' => nil,
1115 'u' => nil,
1114 'u' => nil,
1116 'b' => nil,
1115 'b' => nil,
1117 'pre' => nil,
1116 'pre' => nil,
1118 'kbd' => nil,
1117 'kbd' => nil,
1119 'code' => ['lang'],
1118 'code' => ['lang'],
1120 'cite' => nil,
1119 'cite' => nil,
1121 'strong' => nil,
1120 'strong' => nil,
1122 'em' => nil,
1121 'em' => nil,
1123 'ins' => nil,
1122 'ins' => nil,
1124 'sup' => nil,
1123 'sup' => nil,
1125 'sub' => nil,
1124 'sub' => nil,
1126 'del' => nil,
1125 'del' => nil,
1127 'table' => nil,
1126 'table' => nil,
1128 'tr' => nil,
1127 'tr' => nil,
1129 'td' => ['colspan', 'rowspan'],
1128 'td' => ['colspan', 'rowspan'],
1130 'th' => nil,
1129 'th' => nil,
1131 'ol' => nil,
1130 'ol' => nil,
1132 'ul' => nil,
1131 'ul' => nil,
1133 'li' => nil,
1132 'li' => nil,
1134 'p' => nil,
1133 'p' => nil,
1135 'h1' => nil,
1134 'h1' => nil,
1136 'h2' => nil,
1135 'h2' => nil,
1137 'h3' => nil,
1136 'h3' => nil,
1138 'h4' => nil,
1137 'h4' => nil,
1139 'h5' => nil,
1138 'h5' => nil,
1140 'h6' => nil,
1139 'h6' => nil,
1141 'blockquote' => ['cite']
1140 'blockquote' => ['cite']
1142 }
1141 }
1143
1142
1144 def clean_html( text, tags = BASIC_TAGS )
1143 def clean_html( text, tags = BASIC_TAGS )
1145 text.gsub!( /<!\[CDATA\[/, '' )
1144 text.gsub!( /<!\[CDATA\[/, '' )
1146 text.gsub!( /<(\/*)(\w+)([^>]*)>/ ) do
1145 text.gsub!( /<(\/*)(\w+)([^>]*)>/ ) do
1147 raw = $~
1146 raw = $~
1148 tag = raw[2].downcase
1147 tag = raw[2].downcase
1149 if tags.has_key? tag
1148 if tags.has_key? tag
1150 pcs = [tag]
1149 pcs = [tag]
1151 tags[tag].each do |prop|
1150 tags[tag].each do |prop|
1152 ['"', "'", ''].each do |q|
1151 ['"', "'", ''].each do |q|
1153 q2 = ( q != '' ? q : '\s' )
1152 q2 = ( q != '' ? q : '\s' )
1154 if raw[3] =~ /#{prop}\s*=\s*#{q}([^#{q2}]+)#{q}/i
1153 if raw[3] =~ /#{prop}\s*=\s*#{q}([^#{q2}]+)#{q}/i
1155 attrv = $1
1154 attrv = $1
1156 next if prop == 'src' and attrv =~ %r{^(?!http)\w+:}
1155 next if prop == 'src' and attrv =~ %r{^(?!http)\w+:}
1157 pcs << "#{prop}=\"#{$1.gsub('"', '\\"')}\""
1156 pcs << "#{prop}=\"#{$1.gsub('"', '\\"')}\""
1158 break
1157 break
1159 end
1158 end
1160 end
1159 end
1161 end if tags[tag]
1160 end if tags[tag]
1162 "<#{raw[1]}#{pcs.join " "}>"
1161 "<#{raw[1]}#{pcs.join " "}>"
1163 else
1162 else
1164 " "
1163 " "
1165 end
1164 end
1166 end
1165 end
1167 end
1166 end
1168
1167
1169 ALLOWED_TAGS = %w(redpre pre code notextile)
1168 ALLOWED_TAGS = %w(redpre pre code notextile)
1170
1169
1171 def escape_html_tags(text)
1170 def escape_html_tags(text)
1172 text.gsub!(%r{<(\/?([!\w]+)[^<>\n]*)(>?)}) {|m| ALLOWED_TAGS.include?($2) ? "<#{$1}#{$3}" : "&lt;#{$1}#{'&gt;' unless $3.blank?}" }
1171 text.gsub!(%r{<(\/?([!\w]+)[^<>\n]*)(>?)}) {|m| ALLOWED_TAGS.include?($2) ? "<#{$1}#{$3}" : "&lt;#{$1}#{'&gt;' unless $3.blank?}" }
1173 end
1172 end
1174 end
1173 end
1175
1174
@@ -1,183 +1,184
1 # Redmine - project management software
1 # Redmine - project management software
2 # Copyright (C) 2006-2008 Jean-Philippe Lang
2 # Copyright (C) 2006-2008 Jean-Philippe Lang
3 #
3 #
4 # This program is free software; you can redistribute it and/or
4 # This program is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU General Public License
5 # modify it under the terms of the GNU General Public License
6 # as published by the Free Software Foundation; either version 2
6 # as published by the Free Software Foundation; either version 2
7 # of the License, or (at your option) any later version.
7 # of the License, or (at your option) any later version.
8 #
8 #
9 # This program is distributed in the hope that it will be useful,
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
12 # GNU General Public License for more details.
13 #
13 #
14 # You should have received a copy of the GNU General Public License
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, write to the Free Software
15 # along with this program; if not, write to the Free Software
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17
17
18 require 'redcloth3'
18 require 'redcloth3'
19 require 'coderay'
19 require 'coderay'
20
20
21 module Redmine
21 module Redmine
22 module WikiFormatting
22 module WikiFormatting
23 module Textile
23 module Textile
24 class Formatter < RedCloth3
24 class Formatter < RedCloth3
25
25
26 # auto_link rule after textile rules so that it doesn't break !image_url! tags
26 # auto_link rule after textile rules so that it doesn't break !image_url! tags
27 RULES = [:textile, :block_markdown_rule, :inline_auto_link, :inline_auto_mailto, :inline_toc, :inline_macros]
27 RULES = [:textile, :block_markdown_rule, :inline_auto_link, :inline_auto_mailto, :inline_toc, :inline_macros]
28
28
29 def initialize(*args)
29 def initialize(*args)
30 super
30 super
31 self.hard_breaks=true
31 self.hard_breaks=true
32 self.no_span_caps=true
32 self.no_span_caps=true
33 self.filter_styles=true
33 end
34 end
34
35
35 def to_html(*rules, &block)
36 def to_html(*rules, &block)
36 @toc = []
37 @toc = []
37 @macros_runner = block
38 @macros_runner = block
38 super(*RULES).to_s
39 super(*RULES).to_s
39 end
40 end
40
41
41 private
42 private
42
43
43 # Patch for RedCloth. Fixed in RedCloth r128 but _why hasn't released it yet.
44 # Patch for RedCloth. Fixed in RedCloth r128 but _why hasn't released it yet.
44 # <a href="http://code.whytheluckystiff.net/redcloth/changeset/128">http://code.whytheluckystiff.net/redcloth/changeset/128</a>
45 # <a href="http://code.whytheluckystiff.net/redcloth/changeset/128">http://code.whytheluckystiff.net/redcloth/changeset/128</a>
45 def hard_break( text )
46 def hard_break( text )
46 text.gsub!( /(.)\n(?!\n|\Z|>| *(>? *[#*=]+(\s|$)|[{|]))/, "\\1<br />\n" ) if hard_breaks
47 text.gsub!( /(.)\n(?!\n|\Z|>| *(>? *[#*=]+(\s|$)|[{|]))/, "\\1<br />\n" ) if hard_breaks
47 end
48 end
48
49
49 # Patch to add code highlighting support to RedCloth
50 # Patch to add code highlighting support to RedCloth
50 def smooth_offtags( text )
51 def smooth_offtags( text )
51 unless @pre_list.empty?
52 unless @pre_list.empty?
52 ## replace <pre> content
53 ## replace <pre> content
53 text.gsub!(/<redpre#(\d+)>/) do
54 text.gsub!(/<redpre#(\d+)>/) do
54 content = @pre_list[$1.to_i]
55 content = @pre_list[$1.to_i]
55 if content.match(/<code\s+class="(\w+)">\s?(.+)/m)
56 if content.match(/<code\s+class="(\w+)">\s?(.+)/m)
56 content = "<code class=\"#{$1} CodeRay\">" +
57 content = "<code class=\"#{$1} CodeRay\">" +
57 CodeRay.scan($2, $1.downcase).html(:escape => false, :line_numbers => :inline)
58 CodeRay.scan($2, $1.downcase).html(:escape => false, :line_numbers => :inline)
58 end
59 end
59 content
60 content
60 end
61 end
61 end
62 end
62 end
63 end
63
64
64 # Patch to add 'table of content' support to RedCloth
65 # Patch to add 'table of content' support to RedCloth
65 def textile_p_withtoc(tag, atts, cite, content)
66 def textile_p_withtoc(tag, atts, cite, content)
66 # removes wiki links from the item
67 # removes wiki links from the item
67 toc_item = content.gsub(/(\[\[|\]\])/, '')
68 toc_item = content.gsub(/(\[\[|\]\])/, '')
68 # removes styles
69 # removes styles
69 # eg. %{color:red}Triggers% => Triggers
70 # eg. %{color:red}Triggers% => Triggers
70 toc_item.gsub! %r[%\{[^\}]*\}([^%]+)%], '\\1'
71 toc_item.gsub! %r[%\{[^\}]*\}([^%]+)%], '\\1'
71
72
72 # replaces non word caracters by dashes
73 # replaces non word caracters by dashes
73 anchor = toc_item.gsub(%r{[^\w\s\-]}, '').gsub(%r{\s+(\-+\s*)?}, '-')
74 anchor = toc_item.gsub(%r{[^\w\s\-]}, '').gsub(%r{\s+(\-+\s*)?}, '-')
74
75
75 unless anchor.blank?
76 unless anchor.blank?
76 if tag =~ /^h(\d)$/
77 if tag =~ /^h(\d)$/
77 @toc << [$1.to_i, anchor, toc_item]
78 @toc << [$1.to_i, anchor, toc_item]
78 end
79 end
79 atts << " id=\"#{anchor}\""
80 atts << " id=\"#{anchor}\""
80 content = content + "<a href=\"##{anchor}\" class=\"wiki-anchor\">&para;</a>"
81 content = content + "<a href=\"##{anchor}\" class=\"wiki-anchor\">&para;</a>"
81 end
82 end
82 textile_p(tag, atts, cite, content)
83 textile_p(tag, atts, cite, content)
83 end
84 end
84
85
85 alias :textile_h1 :textile_p_withtoc
86 alias :textile_h1 :textile_p_withtoc
86 alias :textile_h2 :textile_p_withtoc
87 alias :textile_h2 :textile_p_withtoc
87 alias :textile_h3 :textile_p_withtoc
88 alias :textile_h3 :textile_p_withtoc
88
89
89 def inline_toc(text)
90 def inline_toc(text)
90 text.gsub!(/<p>\{\{([<>]?)toc\}\}<\/p>/i) do
91 text.gsub!(/<p>\{\{([<>]?)toc\}\}<\/p>/i) do
91 div_class = 'toc'
92 div_class = 'toc'
92 div_class << ' right' if $1 == '>'
93 div_class << ' right' if $1 == '>'
93 div_class << ' left' if $1 == '<'
94 div_class << ' left' if $1 == '<'
94 out = "<ul class=\"#{div_class}\">"
95 out = "<ul class=\"#{div_class}\">"
95 @toc.each do |heading|
96 @toc.each do |heading|
96 level, anchor, toc_item = heading
97 level, anchor, toc_item = heading
97 out << "<li class=\"heading#{level}\"><a href=\"##{anchor}\">#{toc_item}</a></li>\n"
98 out << "<li class=\"heading#{level}\"><a href=\"##{anchor}\">#{toc_item}</a></li>\n"
98 end
99 end
99 out << '</ul>'
100 out << '</ul>'
100 out
101 out
101 end
102 end
102 end
103 end
103
104
104 MACROS_RE = /
105 MACROS_RE = /
105 (!)? # escaping
106 (!)? # escaping
106 (
107 (
107 \{\{ # opening tag
108 \{\{ # opening tag
108 ([\w]+) # macro name
109 ([\w]+) # macro name
109 (\(([^\}]*)\))? # optional arguments
110 (\(([^\}]*)\))? # optional arguments
110 \}\} # closing tag
111 \}\} # closing tag
111 )
112 )
112 /x unless const_defined?(:MACROS_RE)
113 /x unless const_defined?(:MACROS_RE)
113
114
114 def inline_macros(text)
115 def inline_macros(text)
115 text.gsub!(MACROS_RE) do
116 text.gsub!(MACROS_RE) do
116 esc, all, macro = $1, $2, $3.downcase
117 esc, all, macro = $1, $2, $3.downcase
117 args = ($5 || '').split(',').each(&:strip)
118 args = ($5 || '').split(',').each(&:strip)
118 if esc.nil?
119 if esc.nil?
119 begin
120 begin
120 @macros_runner.call(macro, args)
121 @macros_runner.call(macro, args)
121 rescue => e
122 rescue => e
122 "<div class=\"flash error\">Error executing the <strong>#{macro}</strong> macro (#{e})</div>"
123 "<div class=\"flash error\">Error executing the <strong>#{macro}</strong> macro (#{e})</div>"
123 end || all
124 end || all
124 else
125 else
125 all
126 all
126 end
127 end
127 end
128 end
128 end
129 end
129
130
130 AUTO_LINK_RE = %r{
131 AUTO_LINK_RE = %r{
131 ( # leading text
132 ( # leading text
132 <\w+.*?>| # leading HTML tag, or
133 <\w+.*?>| # leading HTML tag, or
133 [^=<>!:'"/]| # leading punctuation, or
134 [^=<>!:'"/]| # leading punctuation, or
134 ^ # beginning of line
135 ^ # beginning of line
135 )
136 )
136 (
137 (
137 (?:https?://)| # protocol spec, or
138 (?:https?://)| # protocol spec, or
138 (?:s?ftps?://)|
139 (?:s?ftps?://)|
139 (?:www\.) # www.*
140 (?:www\.) # www.*
140 )
141 )
141 (
142 (
142 (\S+?) # url
143 (\S+?) # url
143 (\/)? # slash
144 (\/)? # slash
144 )
145 )
145 ([^\w\=\/;\(\)]*?) # post
146 ([^\w\=\/;\(\)]*?) # post
146 (?=<|\s|$)
147 (?=<|\s|$)
147 }x unless const_defined?(:AUTO_LINK_RE)
148 }x unless const_defined?(:AUTO_LINK_RE)
148
149
149 # Turns all urls into clickable links (code from Rails).
150 # Turns all urls into clickable links (code from Rails).
150 def inline_auto_link(text)
151 def inline_auto_link(text)
151 text.gsub!(AUTO_LINK_RE) do
152 text.gsub!(AUTO_LINK_RE) do
152 all, leading, proto, url, post = $&, $1, $2, $3, $6
153 all, leading, proto, url, post = $&, $1, $2, $3, $6
153 if leading =~ /<a\s/i || leading =~ /![<>=]?/
154 if leading =~ /<a\s/i || leading =~ /![<>=]?/
154 # don't replace URL's that are already linked
155 # don't replace URL's that are already linked
155 # and URL's prefixed with ! !> !< != (textile images)
156 # and URL's prefixed with ! !> !< != (textile images)
156 all
157 all
157 else
158 else
158 # Idea below : an URL with unbalanced parethesis and
159 # Idea below : an URL with unbalanced parethesis and
159 # ending by ')' is put into external parenthesis
160 # ending by ')' is put into external parenthesis
160 if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )
161 if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )
161 url=url[0..-2] # discard closing parenth from url
162 url=url[0..-2] # discard closing parenth from url
162 post = ")"+post # add closing parenth to post
163 post = ")"+post # add closing parenth to post
163 end
164 end
164 %(#{leading}<a class="external" href="#{proto=="www."?"http://www.":proto}#{url}">#{proto + url}</a>#{post})
165 %(#{leading}<a class="external" href="#{proto=="www."?"http://www.":proto}#{url}">#{proto + url}</a>#{post})
165 end
166 end
166 end
167 end
167 end
168 end
168
169
169 # Turns all email addresses into clickable links (code from Rails).
170 # Turns all email addresses into clickable links (code from Rails).
170 def inline_auto_mailto(text)
171 def inline_auto_mailto(text)
171 text.gsub!(/([\w\.!#\$%\-+.]+@[A-Za-z0-9\-]+(\.[A-Za-z0-9\-]+)+)/) do
172 text.gsub!(/([\w\.!#\$%\-+.]+@[A-Za-z0-9\-]+(\.[A-Za-z0-9\-]+)+)/) do
172 mail = $1
173 mail = $1
173 if text.match(/<a\b[^>]*>(.*)(#{Regexp.escape(mail)})(.*)<\/a>/)
174 if text.match(/<a\b[^>]*>(.*)(#{Regexp.escape(mail)})(.*)<\/a>/)
174 mail
175 mail
175 else
176 else
176 %{<a href="mailto:#{mail}" class="email">#{mail}</a>}
177 %{<a href="mailto:#{mail}" class="email">#{mail}</a>}
177 end
178 end
178 end
179 end
179 end
180 end
180 end
181 end
181 end
182 end
182 end
183 end
183 end
184 end
@@ -1,446 +1,447
1 # redMine - project management software
1 # redMine - project management software
2 # Copyright (C) 2006-2007 Jean-Philippe Lang
2 # Copyright (C) 2006-2007 Jean-Philippe Lang
3 #
3 #
4 # This program is free software; you can redistribute it and/or
4 # This program is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU General Public License
5 # modify it under the terms of the GNU General Public License
6 # as published by the Free Software Foundation; either version 2
6 # as published by the Free Software Foundation; either version 2
7 # of the License, or (at your option) any later version.
7 # of the License, or (at your option) any later version.
8 #
8 #
9 # This program is distributed in the hope that it will be useful,
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
12 # GNU General Public License for more details.
13 #
13 #
14 # You should have received a copy of the GNU General Public License
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, write to the Free Software
15 # along with this program; if not, write to the Free Software
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17
17
18 require File.dirname(__FILE__) + '/../../test_helper'
18 require File.dirname(__FILE__) + '/../../test_helper'
19
19
20 class ApplicationHelperTest < HelperTestCase
20 class ApplicationHelperTest < HelperTestCase
21 include ApplicationHelper
21 include ApplicationHelper
22 include ActionView::Helpers::TextHelper
22 include ActionView::Helpers::TextHelper
23 fixtures :projects, :roles, :enabled_modules, :users,
23 fixtures :projects, :roles, :enabled_modules, :users,
24 :repositories, :changesets,
24 :repositories, :changesets,
25 :trackers, :issue_statuses, :issues, :versions, :documents,
25 :trackers, :issue_statuses, :issues, :versions, :documents,
26 :wikis, :wiki_pages, :wiki_contents,
26 :wikis, :wiki_pages, :wiki_contents,
27 :boards, :messages,
27 :boards, :messages,
28 :attachments
28 :attachments
29
29
30 def setup
30 def setup
31 super
31 super
32 end
32 end
33
33
34 def test_auto_links
34 def test_auto_links
35 to_test = {
35 to_test = {
36 'http://foo.bar' => '<a class="external" href="http://foo.bar">http://foo.bar</a>',
36 'http://foo.bar' => '<a class="external" href="http://foo.bar">http://foo.bar</a>',
37 'http://foo.bar/~user' => '<a class="external" href="http://foo.bar/~user">http://foo.bar/~user</a>',
37 'http://foo.bar/~user' => '<a class="external" href="http://foo.bar/~user">http://foo.bar/~user</a>',
38 'http://foo.bar.' => '<a class="external" href="http://foo.bar">http://foo.bar</a>.',
38 'http://foo.bar.' => '<a class="external" href="http://foo.bar">http://foo.bar</a>.',
39 'https://foo.bar.' => '<a class="external" href="https://foo.bar">https://foo.bar</a>.',
39 'https://foo.bar.' => '<a class="external" href="https://foo.bar">https://foo.bar</a>.',
40 'This is a link: http://foo.bar.' => 'This is a link: <a class="external" href="http://foo.bar">http://foo.bar</a>.',
40 'This is a link: http://foo.bar.' => 'This is a link: <a class="external" href="http://foo.bar">http://foo.bar</a>.',
41 'A link (eg. http://foo.bar).' => 'A link (eg. <a class="external" href="http://foo.bar">http://foo.bar</a>).',
41 'A link (eg. http://foo.bar).' => 'A link (eg. <a class="external" href="http://foo.bar">http://foo.bar</a>).',
42 'http://foo.bar/foo.bar#foo.bar.' => '<a class="external" href="http://foo.bar/foo.bar#foo.bar">http://foo.bar/foo.bar#foo.bar</a>.',
42 'http://foo.bar/foo.bar#foo.bar.' => '<a class="external" href="http://foo.bar/foo.bar#foo.bar">http://foo.bar/foo.bar#foo.bar</a>.',
43 'http://www.foo.bar/Test_(foobar)' => '<a class="external" href="http://www.foo.bar/Test_(foobar)">http://www.foo.bar/Test_(foobar)</a>',
43 'http://www.foo.bar/Test_(foobar)' => '<a class="external" href="http://www.foo.bar/Test_(foobar)">http://www.foo.bar/Test_(foobar)</a>',
44 '(see inline link : http://www.foo.bar/Test_(foobar))' => '(see inline link : <a class="external" href="http://www.foo.bar/Test_(foobar)">http://www.foo.bar/Test_(foobar)</a>)',
44 '(see inline link : http://www.foo.bar/Test_(foobar))' => '(see inline link : <a class="external" href="http://www.foo.bar/Test_(foobar)">http://www.foo.bar/Test_(foobar)</a>)',
45 '(see inline link : http://www.foo.bar/Test)' => '(see inline link : <a class="external" href="http://www.foo.bar/Test">http://www.foo.bar/Test</a>)',
45 '(see inline link : http://www.foo.bar/Test)' => '(see inline link : <a class="external" href="http://www.foo.bar/Test">http://www.foo.bar/Test</a>)',
46 '(see inline link : http://www.foo.bar/Test).' => '(see inline link : <a class="external" href="http://www.foo.bar/Test">http://www.foo.bar/Test</a>).',
46 '(see inline link : http://www.foo.bar/Test).' => '(see inline link : <a class="external" href="http://www.foo.bar/Test">http://www.foo.bar/Test</a>).',
47 '(see "inline link":http://www.foo.bar/Test_(foobar))' => '(see <a href="http://www.foo.bar/Test_(foobar)" class="external">inline link</a>)',
47 '(see "inline link":http://www.foo.bar/Test_(foobar))' => '(see <a href="http://www.foo.bar/Test_(foobar)" class="external">inline link</a>)',
48 '(see "inline link":http://www.foo.bar/Test)' => '(see <a href="http://www.foo.bar/Test" class="external">inline link</a>)',
48 '(see "inline link":http://www.foo.bar/Test)' => '(see <a href="http://www.foo.bar/Test" class="external">inline link</a>)',
49 '(see "inline link":http://www.foo.bar/Test).' => '(see <a href="http://www.foo.bar/Test" class="external">inline link</a>).',
49 '(see "inline link":http://www.foo.bar/Test).' => '(see <a href="http://www.foo.bar/Test" class="external">inline link</a>).',
50 'www.foo.bar' => '<a class="external" href="http://www.foo.bar">www.foo.bar</a>',
50 'www.foo.bar' => '<a class="external" href="http://www.foo.bar">www.foo.bar</a>',
51 'http://foo.bar/page?p=1&t=z&s=' => '<a class="external" href="http://foo.bar/page?p=1&#38;t=z&#38;s=">http://foo.bar/page?p=1&#38;t=z&#38;s=</a>',
51 'http://foo.bar/page?p=1&t=z&s=' => '<a class="external" href="http://foo.bar/page?p=1&#38;t=z&#38;s=">http://foo.bar/page?p=1&#38;t=z&#38;s=</a>',
52 'http://foo.bar/page#125' => '<a class="external" href="http://foo.bar/page#125">http://foo.bar/page#125</a>',
52 'http://foo.bar/page#125' => '<a class="external" href="http://foo.bar/page#125">http://foo.bar/page#125</a>',
53 'http://foo@www.bar.com' => '<a class="external" href="http://foo@www.bar.com">http://foo@www.bar.com</a>',
53 'http://foo@www.bar.com' => '<a class="external" href="http://foo@www.bar.com">http://foo@www.bar.com</a>',
54 'http://foo:bar@www.bar.com' => '<a class="external" href="http://foo:bar@www.bar.com">http://foo:bar@www.bar.com</a>',
54 'http://foo:bar@www.bar.com' => '<a class="external" href="http://foo:bar@www.bar.com">http://foo:bar@www.bar.com</a>',
55 'ftp://foo.bar' => '<a class="external" href="ftp://foo.bar">ftp://foo.bar</a>',
55 'ftp://foo.bar' => '<a class="external" href="ftp://foo.bar">ftp://foo.bar</a>',
56 'ftps://foo.bar' => '<a class="external" href="ftps://foo.bar">ftps://foo.bar</a>',
56 'ftps://foo.bar' => '<a class="external" href="ftps://foo.bar">ftps://foo.bar</a>',
57 'sftp://foo.bar' => '<a class="external" href="sftp://foo.bar">sftp://foo.bar</a>',
57 'sftp://foo.bar' => '<a class="external" href="sftp://foo.bar">sftp://foo.bar</a>',
58 }
58 }
59 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
59 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
60 end
60 end
61
61
62 def test_auto_mailto
62 def test_auto_mailto
63 assert_equal '<p><a href="mailto:test@foo.bar" class="email">test@foo.bar</a></p>',
63 assert_equal '<p><a href="mailto:test@foo.bar" class="email">test@foo.bar</a></p>',
64 textilizable('test@foo.bar')
64 textilizable('test@foo.bar')
65 end
65 end
66
66
67 def test_inline_images
67 def test_inline_images
68 to_test = {
68 to_test = {
69 '!http://foo.bar/image.jpg!' => '<img src="http://foo.bar/image.jpg" alt="" />',
69 '!http://foo.bar/image.jpg!' => '<img src="http://foo.bar/image.jpg" alt="" />',
70 'floating !>http://foo.bar/image.jpg!' => 'floating <div style="float:right"><img src="http://foo.bar/image.jpg" alt="" /></div>',
70 'floating !>http://foo.bar/image.jpg!' => 'floating <div style="float:right"><img src="http://foo.bar/image.jpg" alt="" /></div>',
71 'with class !(some-class)http://foo.bar/image.jpg!' => 'with class <img src="http://foo.bar/image.jpg" class="some-class" alt="" />',
71 'with class !(some-class)http://foo.bar/image.jpg!' => 'with class <img src="http://foo.bar/image.jpg" class="some-class" alt="" />',
72 'with style !{width:100px;height100px}http://foo.bar/image.jpg!' => 'with style <img src="http://foo.bar/image.jpg" style="width:100px;height100px;" alt="" />',
72 # inline styles should be stripped
73 'with style !{width:100px;height100px}http://foo.bar/image.jpg!' => 'with style <img src="http://foo.bar/image.jpg" alt="" />',
73 'with title !http://foo.bar/image.jpg(This is a title)!' => 'with title <img src="http://foo.bar/image.jpg" title="This is a title" alt="This is a title" />',
74 'with title !http://foo.bar/image.jpg(This is a title)!' => 'with title <img src="http://foo.bar/image.jpg" title="This is a title" alt="This is a title" />',
74 'with title !http://foo.bar/image.jpg(This is a double-quoted "title")!' => 'with title <img src="http://foo.bar/image.jpg" title="This is a double-quoted &quot;title&quot;" alt="This is a double-quoted &quot;title&quot;" />',
75 'with title !http://foo.bar/image.jpg(This is a double-quoted "title")!' => 'with title <img src="http://foo.bar/image.jpg" title="This is a double-quoted &quot;title&quot;" alt="This is a double-quoted &quot;title&quot;" />',
75 }
76 }
76 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
77 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
77 end
78 end
78
79
79 def test_acronyms
80 def test_acronyms
80 to_test = {
81 to_test = {
81 'this is an acronym: GPL(General Public License)' => 'this is an acronym: <acronym title="General Public License">GPL</acronym>',
82 'this is an acronym: GPL(General Public License)' => 'this is an acronym: <acronym title="General Public License">GPL</acronym>',
82 'GPL(This is a double-quoted "title")' => '<acronym title="This is a double-quoted &quot;title&quot;">GPL</acronym>',
83 'GPL(This is a double-quoted "title")' => '<acronym title="This is a double-quoted &quot;title&quot;">GPL</acronym>',
83 }
84 }
84 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
85 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
85
86
86 end
87 end
87
88
88 def test_attached_images
89 def test_attached_images
89 to_test = {
90 to_test = {
90 'Inline image: !logo.gif!' => 'Inline image: <img src="/attachments/download/3" title="This is a logo" alt="This is a logo" />',
91 'Inline image: !logo.gif!' => 'Inline image: <img src="/attachments/download/3" title="This is a logo" alt="This is a logo" />',
91 'Inline image: !logo.GIF!' => 'Inline image: <img src="/attachments/download/3" title="This is a logo" alt="This is a logo" />'
92 'Inline image: !logo.GIF!' => 'Inline image: <img src="/attachments/download/3" title="This is a logo" alt="This is a logo" />'
92 }
93 }
93 attachments = Attachment.find(:all)
94 attachments = Attachment.find(:all)
94 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text, :attachments => attachments) }
95 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text, :attachments => attachments) }
95 end
96 end
96
97
97 def test_textile_external_links
98 def test_textile_external_links
98 to_test = {
99 to_test = {
99 'This is a "link":http://foo.bar' => 'This is a <a href="http://foo.bar" class="external">link</a>',
100 'This is a "link":http://foo.bar' => 'This is a <a href="http://foo.bar" class="external">link</a>',
100 'This is an intern "link":/foo/bar' => 'This is an intern <a href="/foo/bar">link</a>',
101 'This is an intern "link":/foo/bar' => 'This is an intern <a href="/foo/bar">link</a>',
101 '"link (Link title)":http://foo.bar' => '<a href="http://foo.bar" title="Link title" class="external">link</a>',
102 '"link (Link title)":http://foo.bar' => '<a href="http://foo.bar" title="Link title" class="external">link</a>',
102 '"link (Link title with "double-quotes")":http://foo.bar' => '<a href="http://foo.bar" title="Link title with &quot;double-quotes&quot;" class="external">link</a>',
103 '"link (Link title with "double-quotes")":http://foo.bar' => '<a href="http://foo.bar" title="Link title with &quot;double-quotes&quot;" class="external">link</a>',
103 "This is not a \"Link\":\n\nAnother paragraph" => "This is not a \"Link\":</p>\n\n\n\t<p>Another paragraph",
104 "This is not a \"Link\":\n\nAnother paragraph" => "This is not a \"Link\":</p>\n\n\n\t<p>Another paragraph",
104 # no multiline link text
105 # no multiline link text
105 "This is a double quote \"on the first line\nand another on a second line\":test" => "This is a double quote \"on the first line<br />\nand another on a second line\":test"
106 "This is a double quote \"on the first line\nand another on a second line\":test" => "This is a double quote \"on the first line<br />\nand another on a second line\":test"
106 }
107 }
107 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
108 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
108 end
109 end
109
110
110 def test_redmine_links
111 def test_redmine_links
111 issue_link = link_to('#3', {:controller => 'issues', :action => 'show', :id => 3},
112 issue_link = link_to('#3', {:controller => 'issues', :action => 'show', :id => 3},
112 :class => 'issue', :title => 'Error 281 when updating a recipe (New)')
113 :class => 'issue', :title => 'Error 281 when updating a recipe (New)')
113
114
114 changeset_link = link_to('r1', {:controller => 'repositories', :action => 'revision', :id => 'ecookbook', :rev => 1},
115 changeset_link = link_to('r1', {:controller => 'repositories', :action => 'revision', :id => 'ecookbook', :rev => 1},
115 :class => 'changeset', :title => 'My very first commit')
116 :class => 'changeset', :title => 'My very first commit')
116
117
117 document_link = link_to('Test document', {:controller => 'documents', :action => 'show', :id => 1},
118 document_link = link_to('Test document', {:controller => 'documents', :action => 'show', :id => 1},
118 :class => 'document')
119 :class => 'document')
119
120
120 version_link = link_to('1.0', {:controller => 'versions', :action => 'show', :id => 2},
121 version_link = link_to('1.0', {:controller => 'versions', :action => 'show', :id => 2},
121 :class => 'version')
122 :class => 'version')
122
123
123 message_url = {:controller => 'messages', :action => 'show', :board_id => 1, :id => 4}
124 message_url = {:controller => 'messages', :action => 'show', :board_id => 1, :id => 4}
124
125
125 source_url = {:controller => 'repositories', :action => 'entry', :id => 'ecookbook', :path => ['some', 'file']}
126 source_url = {:controller => 'repositories', :action => 'entry', :id => 'ecookbook', :path => ['some', 'file']}
126 source_url_with_ext = {:controller => 'repositories', :action => 'entry', :id => 'ecookbook', :path => ['some', 'file.ext']}
127 source_url_with_ext = {:controller => 'repositories', :action => 'entry', :id => 'ecookbook', :path => ['some', 'file.ext']}
127
128
128 to_test = {
129 to_test = {
129 # tickets
130 # tickets
130 '#3, #3 and #3.' => "#{issue_link}, #{issue_link} and #{issue_link}.",
131 '#3, #3 and #3.' => "#{issue_link}, #{issue_link} and #{issue_link}.",
131 # changesets
132 # changesets
132 'r1' => changeset_link,
133 'r1' => changeset_link,
133 # documents
134 # documents
134 'document#1' => document_link,
135 'document#1' => document_link,
135 'document:"Test document"' => document_link,
136 'document:"Test document"' => document_link,
136 # versions
137 # versions
137 'version#2' => version_link,
138 'version#2' => version_link,
138 'version:1.0' => version_link,
139 'version:1.0' => version_link,
139 'version:"1.0"' => version_link,
140 'version:"1.0"' => version_link,
140 # source
141 # source
141 'source:/some/file' => link_to('source:/some/file', source_url, :class => 'source'),
142 'source:/some/file' => link_to('source:/some/file', source_url, :class => 'source'),
142 'source:/some/file.' => link_to('source:/some/file', source_url, :class => 'source') + ".",
143 'source:/some/file.' => link_to('source:/some/file', source_url, :class => 'source') + ".",
143 'source:/some/file.ext.' => link_to('source:/some/file.ext', source_url_with_ext, :class => 'source') + ".",
144 'source:/some/file.ext.' => link_to('source:/some/file.ext', source_url_with_ext, :class => 'source') + ".",
144 'source:/some/file. ' => link_to('source:/some/file', source_url, :class => 'source') + ".",
145 'source:/some/file. ' => link_to('source:/some/file', source_url, :class => 'source') + ".",
145 'source:/some/file.ext. ' => link_to('source:/some/file.ext', source_url_with_ext, :class => 'source') + ".",
146 'source:/some/file.ext. ' => link_to('source:/some/file.ext', source_url_with_ext, :class => 'source') + ".",
146 'source:/some/file, ' => link_to('source:/some/file', source_url, :class => 'source') + ",",
147 'source:/some/file, ' => link_to('source:/some/file', source_url, :class => 'source') + ",",
147 'source:/some/file@52' => link_to('source:/some/file@52', source_url.merge(:rev => 52), :class => 'source'),
148 'source:/some/file@52' => link_to('source:/some/file@52', source_url.merge(:rev => 52), :class => 'source'),
148 'source:/some/file.ext@52' => link_to('source:/some/file.ext@52', source_url_with_ext.merge(:rev => 52), :class => 'source'),
149 'source:/some/file.ext@52' => link_to('source:/some/file.ext@52', source_url_with_ext.merge(:rev => 52), :class => 'source'),
149 'source:/some/file#L110' => link_to('source:/some/file#L110', source_url.merge(:anchor => 'L110'), :class => 'source'),
150 'source:/some/file#L110' => link_to('source:/some/file#L110', source_url.merge(:anchor => 'L110'), :class => 'source'),
150 'source:/some/file.ext#L110' => link_to('source:/some/file.ext#L110', source_url_with_ext.merge(:anchor => 'L110'), :class => 'source'),
151 'source:/some/file.ext#L110' => link_to('source:/some/file.ext#L110', source_url_with_ext.merge(:anchor => 'L110'), :class => 'source'),
151 'source:/some/file@52#L110' => link_to('source:/some/file@52#L110', source_url.merge(:rev => 52, :anchor => 'L110'), :class => 'source'),
152 'source:/some/file@52#L110' => link_to('source:/some/file@52#L110', source_url.merge(:rev => 52, :anchor => 'L110'), :class => 'source'),
152 'export:/some/file' => link_to('export:/some/file', source_url.merge(:format => 'raw'), :class => 'source download'),
153 'export:/some/file' => link_to('export:/some/file', source_url.merge(:format => 'raw'), :class => 'source download'),
153 # message
154 # message
154 'message#4' => link_to('Post 2', message_url, :class => 'message'),
155 'message#4' => link_to('Post 2', message_url, :class => 'message'),
155 'message#5' => link_to('RE: post 2', message_url.merge(:anchor => 'message-5'), :class => 'message'),
156 'message#5' => link_to('RE: post 2', message_url.merge(:anchor => 'message-5'), :class => 'message'),
156 # escaping
157 # escaping
157 '!#3.' => '#3.',
158 '!#3.' => '#3.',
158 '!r1' => 'r1',
159 '!r1' => 'r1',
159 '!document#1' => 'document#1',
160 '!document#1' => 'document#1',
160 '!document:"Test document"' => 'document:"Test document"',
161 '!document:"Test document"' => 'document:"Test document"',
161 '!version#2' => 'version#2',
162 '!version#2' => 'version#2',
162 '!version:1.0' => 'version:1.0',
163 '!version:1.0' => 'version:1.0',
163 '!version:"1.0"' => 'version:"1.0"',
164 '!version:"1.0"' => 'version:"1.0"',
164 '!source:/some/file' => 'source:/some/file',
165 '!source:/some/file' => 'source:/some/file',
165 # invalid expressions
166 # invalid expressions
166 'source:' => 'source:',
167 'source:' => 'source:',
167 # url hash
168 # url hash
168 "http://foo.bar/FAQ#3" => '<a class="external" href="http://foo.bar/FAQ#3">http://foo.bar/FAQ#3</a>',
169 "http://foo.bar/FAQ#3" => '<a class="external" href="http://foo.bar/FAQ#3">http://foo.bar/FAQ#3</a>',
169 }
170 }
170 @project = Project.find(1)
171 @project = Project.find(1)
171 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
172 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
172 end
173 end
173
174
174 def test_wiki_links
175 def test_wiki_links
175 to_test = {
176 to_test = {
176 '[[CookBook documentation]]' => '<a href="/wiki/ecookbook/CookBook_documentation" class="wiki-page">CookBook documentation</a>',
177 '[[CookBook documentation]]' => '<a href="/wiki/ecookbook/CookBook_documentation" class="wiki-page">CookBook documentation</a>',
177 '[[Another page|Page]]' => '<a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a>',
178 '[[Another page|Page]]' => '<a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a>',
178 # link with anchor
179 # link with anchor
179 '[[CookBook documentation#One-section]]' => '<a href="/wiki/ecookbook/CookBook_documentation#One-section" class="wiki-page">CookBook documentation</a>',
180 '[[CookBook documentation#One-section]]' => '<a href="/wiki/ecookbook/CookBook_documentation#One-section" class="wiki-page">CookBook documentation</a>',
180 '[[Another page#anchor|Page]]' => '<a href="/wiki/ecookbook/Another_page#anchor" class="wiki-page">Page</a>',
181 '[[Another page#anchor|Page]]' => '<a href="/wiki/ecookbook/Another_page#anchor" class="wiki-page">Page</a>',
181 # page that doesn't exist
182 # page that doesn't exist
182 '[[Unknown page]]' => '<a href="/wiki/ecookbook/Unknown_page" class="wiki-page new">Unknown page</a>',
183 '[[Unknown page]]' => '<a href="/wiki/ecookbook/Unknown_page" class="wiki-page new">Unknown page</a>',
183 '[[Unknown page|404]]' => '<a href="/wiki/ecookbook/Unknown_page" class="wiki-page new">404</a>',
184 '[[Unknown page|404]]' => '<a href="/wiki/ecookbook/Unknown_page" class="wiki-page new">404</a>',
184 # link to another project wiki
185 # link to another project wiki
185 '[[onlinestore:]]' => '<a href="/wiki/onlinestore/" class="wiki-page">onlinestore</a>',
186 '[[onlinestore:]]' => '<a href="/wiki/onlinestore/" class="wiki-page">onlinestore</a>',
186 '[[onlinestore:|Wiki]]' => '<a href="/wiki/onlinestore/" class="wiki-page">Wiki</a>',
187 '[[onlinestore:|Wiki]]' => '<a href="/wiki/onlinestore/" class="wiki-page">Wiki</a>',
187 '[[onlinestore:Start page]]' => '<a href="/wiki/onlinestore/Start_page" class="wiki-page">Start page</a>',
188 '[[onlinestore:Start page]]' => '<a href="/wiki/onlinestore/Start_page" class="wiki-page">Start page</a>',
188 '[[onlinestore:Start page|Text]]' => '<a href="/wiki/onlinestore/Start_page" class="wiki-page">Text</a>',
189 '[[onlinestore:Start page|Text]]' => '<a href="/wiki/onlinestore/Start_page" class="wiki-page">Text</a>',
189 '[[onlinestore:Unknown page]]' => '<a href="/wiki/onlinestore/Unknown_page" class="wiki-page new">Unknown page</a>',
190 '[[onlinestore:Unknown page]]' => '<a href="/wiki/onlinestore/Unknown_page" class="wiki-page new">Unknown page</a>',
190 # striked through link
191 # striked through link
191 '-[[Another page|Page]]-' => '<del><a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a></del>',
192 '-[[Another page|Page]]-' => '<del><a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a></del>',
192 '-[[Another page|Page]] link-' => '<del><a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a> link</del>',
193 '-[[Another page|Page]] link-' => '<del><a href="/wiki/ecookbook/Another_page" class="wiki-page">Page</a> link</del>',
193 # escaping
194 # escaping
194 '![[Another page|Page]]' => '[[Another page|Page]]',
195 '![[Another page|Page]]' => '[[Another page|Page]]',
195 }
196 }
196 @project = Project.find(1)
197 @project = Project.find(1)
197 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
198 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
198 end
199 end
199
200
200 def test_html_tags
201 def test_html_tags
201 to_test = {
202 to_test = {
202 "<div>content</div>" => "<p>&lt;div&gt;content&lt;/div&gt;</p>",
203 "<div>content</div>" => "<p>&lt;div&gt;content&lt;/div&gt;</p>",
203 "<div class=\"bold\">content</div>" => "<p>&lt;div class=\"bold\"&gt;content&lt;/div&gt;</p>",
204 "<div class=\"bold\">content</div>" => "<p>&lt;div class=\"bold\"&gt;content&lt;/div&gt;</p>",
204 "<script>some script;</script>" => "<p>&lt;script&gt;some script;&lt;/script&gt;</p>",
205 "<script>some script;</script>" => "<p>&lt;script&gt;some script;&lt;/script&gt;</p>",
205 # do not escape pre/code tags
206 # do not escape pre/code tags
206 "<pre>\nline 1\nline2</pre>" => "<pre>\nline 1\nline2</pre>",
207 "<pre>\nline 1\nline2</pre>" => "<pre>\nline 1\nline2</pre>",
207 "<pre><code>\nline 1\nline2</code></pre>" => "<pre><code>\nline 1\nline2</code></pre>",
208 "<pre><code>\nline 1\nline2</code></pre>" => "<pre><code>\nline 1\nline2</code></pre>",
208 "<pre><div>content</div></pre>" => "<pre>&lt;div&gt;content&lt;/div&gt;</pre>",
209 "<pre><div>content</div></pre>" => "<pre>&lt;div&gt;content&lt;/div&gt;</pre>",
209 "HTML comment: <!-- no comments -->" => "<p>HTML comment: &lt;!-- no comments --&gt;</p>",
210 "HTML comment: <!-- no comments -->" => "<p>HTML comment: &lt;!-- no comments --&gt;</p>",
210 "<!-- opening comment" => "<p>&lt;!-- opening comment</p>",
211 "<!-- opening comment" => "<p>&lt;!-- opening comment</p>",
211 # remove attributes except class
212 # remove attributes except class
212 "<pre class='foo'>some text</pre>" => "<pre class='foo'>some text</pre>",
213 "<pre class='foo'>some text</pre>" => "<pre class='foo'>some text</pre>",
213 "<pre onmouseover='alert(1)'>some text</pre>" => "<pre>some text</pre>",
214 "<pre onmouseover='alert(1)'>some text</pre>" => "<pre>some text</pre>",
214 }
215 }
215 to_test.each { |text, result| assert_equal result, textilizable(text) }
216 to_test.each { |text, result| assert_equal result, textilizable(text) }
216 end
217 end
217
218
218 def test_allowed_html_tags
219 def test_allowed_html_tags
219 to_test = {
220 to_test = {
220 "<pre>preformatted text</pre>" => "<pre>preformatted text</pre>",
221 "<pre>preformatted text</pre>" => "<pre>preformatted text</pre>",
221 "<notextile>no *textile* formatting</notextile>" => "no *textile* formatting",
222 "<notextile>no *textile* formatting</notextile>" => "no *textile* formatting",
222 "<notextile>this is <tag>a tag</tag></notextile>" => "this is &lt;tag&gt;a tag&lt;/tag&gt;"
223 "<notextile>this is <tag>a tag</tag></notextile>" => "this is &lt;tag&gt;a tag&lt;/tag&gt;"
223 }
224 }
224 to_test.each { |text, result| assert_equal result, textilizable(text) }
225 to_test.each { |text, result| assert_equal result, textilizable(text) }
225 end
226 end
226
227
227 def syntax_highlight
228 def syntax_highlight
228 raw = <<-RAW
229 raw = <<-RAW
229 <pre><code class="ruby">
230 <pre><code class="ruby">
230 # Some ruby code here
231 # Some ruby code here
231 </pre></code>
232 </pre></code>
232 RAW
233 RAW
233
234
234 expected = <<-EXPECTED
235 expected = <<-EXPECTED
235 <pre><code class="ruby CodeRay"><span class="no">1</span> <span class="c"># Some ruby code here</span>
236 <pre><code class="ruby CodeRay"><span class="no">1</span> <span class="c"># Some ruby code here</span>
236 </pre></code>
237 </pre></code>
237 EXPECTED
238 EXPECTED
238
239
239 assert_equal expected.gsub(%r{[\r\n\t]}, ''), textilizable(raw).gsub(%r{[\r\n\t]}, '')
240 assert_equal expected.gsub(%r{[\r\n\t]}, ''), textilizable(raw).gsub(%r{[\r\n\t]}, '')
240 end
241 end
241
242
242 def test_wiki_links_in_tables
243 def test_wiki_links_in_tables
243 to_test = {"|[[Page|Link title]]|[[Other Page|Other title]]|\n|Cell 21|[[Last page]]|" =>
244 to_test = {"|[[Page|Link title]]|[[Other Page|Other title]]|\n|Cell 21|[[Last page]]|" =>
244 '<tr><td><a href="/wiki/ecookbook/Page" class="wiki-page new">Link title</a></td>' +
245 '<tr><td><a href="/wiki/ecookbook/Page" class="wiki-page new">Link title</a></td>' +
245 '<td><a href="/wiki/ecookbook/Other_Page" class="wiki-page new">Other title</a></td>' +
246 '<td><a href="/wiki/ecookbook/Other_Page" class="wiki-page new">Other title</a></td>' +
246 '</tr><tr><td>Cell 21</td><td><a href="/wiki/ecookbook/Last_page" class="wiki-page new">Last page</a></td></tr>'
247 '</tr><tr><td>Cell 21</td><td><a href="/wiki/ecookbook/Last_page" class="wiki-page new">Last page</a></td></tr>'
247 }
248 }
248 @project = Project.find(1)
249 @project = Project.find(1)
249 to_test.each { |text, result| assert_equal "<table>#{result}</table>", textilizable(text).gsub(/[\t\n]/, '') }
250 to_test.each { |text, result| assert_equal "<table>#{result}</table>", textilizable(text).gsub(/[\t\n]/, '') }
250 end
251 end
251
252
252 def test_text_formatting
253 def test_text_formatting
253 to_test = {'*_+bold, italic and underline+_*' => '<strong><em><ins>bold, italic and underline</ins></em></strong>',
254 to_test = {'*_+bold, italic and underline+_*' => '<strong><em><ins>bold, italic and underline</ins></em></strong>',
254 '(_text within parentheses_)' => '(<em>text within parentheses</em>)',
255 '(_text within parentheses_)' => '(<em>text within parentheses</em>)',
255 'a *Humane Web* Text Generator' => 'a <strong>Humane Web</strong> Text Generator',
256 'a *Humane Web* Text Generator' => 'a <strong>Humane Web</strong> Text Generator',
256 'a H *umane* W *eb* T *ext* G *enerator*' => 'a H <strong>umane</strong> W <strong>eb</strong> T <strong>ext</strong> G <strong>enerator</strong>',
257 'a H *umane* W *eb* T *ext* G *enerator*' => 'a H <strong>umane</strong> W <strong>eb</strong> T <strong>ext</strong> G <strong>enerator</strong>',
257 'a *H* umane *W* eb *T* ext *G* enerator' => 'a <strong>H</strong> umane <strong>W</strong> eb <strong>T</strong> ext <strong>G</strong> enerator',
258 'a *H* umane *W* eb *T* ext *G* enerator' => 'a <strong>H</strong> umane <strong>W</strong> eb <strong>T</strong> ext <strong>G</strong> enerator',
258 }
259 }
259 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
260 to_test.each { |text, result| assert_equal "<p>#{result}</p>", textilizable(text) }
260 end
261 end
261
262
262 def test_wiki_horizontal_rule
263 def test_wiki_horizontal_rule
263 assert_equal '<hr />', textilizable('---')
264 assert_equal '<hr />', textilizable('---')
264 assert_equal '<p>Dashes: ---</p>', textilizable('Dashes: ---')
265 assert_equal '<p>Dashes: ---</p>', textilizable('Dashes: ---')
265 end
266 end
266
267
267 def test_acronym
268 def test_acronym
268 assert_equal '<p>This is an acronym: <acronym title="American Civil Liberties Union">ACLU</acronym>.</p>',
269 assert_equal '<p>This is an acronym: <acronym title="American Civil Liberties Union">ACLU</acronym>.</p>',
269 textilizable('This is an acronym: ACLU(American Civil Liberties Union).')
270 textilizable('This is an acronym: ACLU(American Civil Liberties Union).')
270 end
271 end
271
272
272 def test_footnotes
273 def test_footnotes
273 raw = <<-RAW
274 raw = <<-RAW
274 This is some text[1].
275 This is some text[1].
275
276
276 fn1. This is the foot note
277 fn1. This is the foot note
277 RAW
278 RAW
278
279
279 expected = <<-EXPECTED
280 expected = <<-EXPECTED
280 <p>This is some text<sup><a href=\"#fn1\">1</a></sup>.</p>
281 <p>This is some text<sup><a href=\"#fn1\">1</a></sup>.</p>
281 <p id="fn1" class="footnote"><sup>1</sup> This is the foot note</p>
282 <p id="fn1" class="footnote"><sup>1</sup> This is the foot note</p>
282 EXPECTED
283 EXPECTED
283
284
284 assert_equal expected.gsub(%r{[\r\n\t]}, ''), textilizable(raw).gsub(%r{[\r\n\t]}, '')
285 assert_equal expected.gsub(%r{[\r\n\t]}, ''), textilizable(raw).gsub(%r{[\r\n\t]}, '')
285 end
286 end
286
287
287 def test_table_of_content
288 def test_table_of_content
288 raw = <<-RAW
289 raw = <<-RAW
289 {{toc}}
290 {{toc}}
290
291
291 h1. Title
292 h1. Title
292
293
293 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
294 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
294
295
295 h2. Subtitle
296 h2. Subtitle
296
297
297 Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
298 Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
298
299
299 h2. Subtitle with %{color:red}red text%
300 h2. Subtitle with %{color:red}red text%
300
301
301 h1. Another title
302 h1. Another title
302
303
303 RAW
304 RAW
304
305
305 expected = '<ul class="toc">' +
306 expected = '<ul class="toc">' +
306 '<li class="heading1"><a href="#Title">Title</a></li>' +
307 '<li class="heading1"><a href="#Title">Title</a></li>' +
307 '<li class="heading2"><a href="#Subtitle">Subtitle</a></li>' +
308 '<li class="heading2"><a href="#Subtitle">Subtitle</a></li>' +
308 '<li class="heading2"><a href="#Subtitle-with-red-text">Subtitle with red text</a></li>' +
309 '<li class="heading2"><a href="#Subtitle-with-red-text">Subtitle with red text</a></li>' +
309 '<li class="heading1"><a href="#Another-title">Another title</a></li>' +
310 '<li class="heading1"><a href="#Another-title">Another title</a></li>' +
310 '</ul>'
311 '</ul>'
311
312
312 assert textilizable(raw).gsub("\n", "").include?(expected)
313 assert textilizable(raw).gsub("\n", "").include?(expected)
313 end
314 end
314
315
315 def test_blockquote
316 def test_blockquote
316 # orig raw text
317 # orig raw text
317 raw = <<-RAW
318 raw = <<-RAW
318 John said:
319 John said:
319 > Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
320 > Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
320 > Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
321 > Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
321 > * Donec odio lorem,
322 > * Donec odio lorem,
322 > * sagittis ac,
323 > * sagittis ac,
323 > * malesuada in,
324 > * malesuada in,
324 > * adipiscing eu, dolor.
325 > * adipiscing eu, dolor.
325 >
326 >
326 > >Nulla varius pulvinar diam. Proin id arcu id lorem scelerisque condimentum. Proin vehicula turpis vitae lacus.
327 > >Nulla varius pulvinar diam. Proin id arcu id lorem scelerisque condimentum. Proin vehicula turpis vitae lacus.
327 > Proin a tellus. Nam vel neque.
328 > Proin a tellus. Nam vel neque.
328
329
329 He's right.
330 He's right.
330 RAW
331 RAW
331
332
332 # expected html
333 # expected html
333 expected = <<-EXPECTED
334 expected = <<-EXPECTED
334 <p>John said:</p>
335 <p>John said:</p>
335 <blockquote>
336 <blockquote>
336 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
337 Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Maecenas sed libero.
337 Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
338 Nullam commodo metus accumsan nulla. Curabitur lobortis dui id dolor.
338 <ul>
339 <ul>
339 <li>Donec odio lorem,</li>
340 <li>Donec odio lorem,</li>
340 <li>sagittis ac,</li>
341 <li>sagittis ac,</li>
341 <li>malesuada in,</li>
342 <li>malesuada in,</li>
342 <li>adipiscing eu, dolor.</li>
343 <li>adipiscing eu, dolor.</li>
343 </ul>
344 </ul>
344 <blockquote>
345 <blockquote>
345 <p>Nulla varius pulvinar diam. Proin id arcu id lorem scelerisque condimentum. Proin vehicula turpis vitae lacus.</p>
346 <p>Nulla varius pulvinar diam. Proin id arcu id lorem scelerisque condimentum. Proin vehicula turpis vitae lacus.</p>
346 </blockquote>
347 </blockquote>
347 <p>Proin a tellus. Nam vel neque.</p>
348 <p>Proin a tellus. Nam vel neque.</p>
348 </blockquote>
349 </blockquote>
349 <p>He's right.</p>
350 <p>He's right.</p>
350 EXPECTED
351 EXPECTED
351
352
352 assert_equal expected.gsub(%r{\s+}, ''), textilizable(raw).gsub(%r{\s+}, '')
353 assert_equal expected.gsub(%r{\s+}, ''), textilizable(raw).gsub(%r{\s+}, '')
353 end
354 end
354
355
355 def test_table
356 def test_table
356 raw = <<-RAW
357 raw = <<-RAW
357 This is a table with empty cells:
358 This is a table with empty cells:
358
359
359 |cell11|cell12||
360 |cell11|cell12||
360 |cell21||cell23|
361 |cell21||cell23|
361 |cell31|cell32|cell33|
362 |cell31|cell32|cell33|
362 RAW
363 RAW
363
364
364 expected = <<-EXPECTED
365 expected = <<-EXPECTED
365 <p>This is a table with empty cells:</p>
366 <p>This is a table with empty cells:</p>
366
367
367 <table>
368 <table>
368 <tr><td>cell11</td><td>cell12</td><td></td></tr>
369 <tr><td>cell11</td><td>cell12</td><td></td></tr>
369 <tr><td>cell21</td><td></td><td>cell23</td></tr>
370 <tr><td>cell21</td><td></td><td>cell23</td></tr>
370 <tr><td>cell31</td><td>cell32</td><td>cell33</td></tr>
371 <tr><td>cell31</td><td>cell32</td><td>cell33</td></tr>
371 </table>
372 </table>
372 EXPECTED
373 EXPECTED
373
374
374 assert_equal expected.gsub(%r{\s+}, ''), textilizable(raw).gsub(%r{\s+}, '')
375 assert_equal expected.gsub(%r{\s+}, ''), textilizable(raw).gsub(%r{\s+}, '')
375 end
376 end
376
377
377 def test_default_formatter
378 def test_default_formatter
378 Setting.text_formatting = 'unknown'
379 Setting.text_formatting = 'unknown'
379 text = 'a *link*: http://www.example.net/'
380 text = 'a *link*: http://www.example.net/'
380 assert_equal '<p>a *link*: <a href="http://www.example.net/">http://www.example.net/</a></p>', textilizable(text)
381 assert_equal '<p>a *link*: <a href="http://www.example.net/">http://www.example.net/</a></p>', textilizable(text)
381 Setting.text_formatting = 'textile'
382 Setting.text_formatting = 'textile'
382 end
383 end
383
384
384 def test_date_format_default
385 def test_date_format_default
385 today = Date.today
386 today = Date.today
386 Setting.date_format = ''
387 Setting.date_format = ''
387 assert_equal l_date(today), format_date(today)
388 assert_equal l_date(today), format_date(today)
388 end
389 end
389
390
390 def test_date_format
391 def test_date_format
391 today = Date.today
392 today = Date.today
392 Setting.date_format = '%d %m %Y'
393 Setting.date_format = '%d %m %Y'
393 assert_equal today.strftime('%d %m %Y'), format_date(today)
394 assert_equal today.strftime('%d %m %Y'), format_date(today)
394 end
395 end
395
396
396 def test_time_format_default
397 def test_time_format_default
397 now = Time.now
398 now = Time.now
398 Setting.date_format = ''
399 Setting.date_format = ''
399 Setting.time_format = ''
400 Setting.time_format = ''
400 assert_equal l_datetime(now), format_time(now)
401 assert_equal l_datetime(now), format_time(now)
401 assert_equal l_time(now), format_time(now, false)
402 assert_equal l_time(now), format_time(now, false)
402 end
403 end
403
404
404 def test_time_format
405 def test_time_format
405 now = Time.now
406 now = Time.now
406 Setting.date_format = '%d %m %Y'
407 Setting.date_format = '%d %m %Y'
407 Setting.time_format = '%H %M'
408 Setting.time_format = '%H %M'
408 assert_equal now.strftime('%d %m %Y %H %M'), format_time(now)
409 assert_equal now.strftime('%d %m %Y %H %M'), format_time(now)
409 assert_equal now.strftime('%H %M'), format_time(now, false)
410 assert_equal now.strftime('%H %M'), format_time(now, false)
410 end
411 end
411
412
412 def test_utc_time_format
413 def test_utc_time_format
413 now = Time.now.utc
414 now = Time.now.utc
414 Setting.date_format = '%d %m %Y'
415 Setting.date_format = '%d %m %Y'
415 Setting.time_format = '%H %M'
416 Setting.time_format = '%H %M'
416 assert_equal Time.now.strftime('%d %m %Y %H %M'), format_time(now)
417 assert_equal Time.now.strftime('%d %m %Y %H %M'), format_time(now)
417 assert_equal Time.now.strftime('%H %M'), format_time(now, false)
418 assert_equal Time.now.strftime('%H %M'), format_time(now, false)
418 end
419 end
419
420
420 def test_due_date_distance_in_words
421 def test_due_date_distance_in_words
421 to_test = { Date.today => 'Due in 0 days',
422 to_test = { Date.today => 'Due in 0 days',
422 Date.today + 1 => 'Due in 1 day',
423 Date.today + 1 => 'Due in 1 day',
423 Date.today + 100 => 'Due in 100 days',
424 Date.today + 100 => 'Due in 100 days',
424 Date.today + 20000 => 'Due in 20000 days',
425 Date.today + 20000 => 'Due in 20000 days',
425 Date.today - 1 => '1 day late',
426 Date.today - 1 => '1 day late',
426 Date.today - 100 => '100 days late',
427 Date.today - 100 => '100 days late',
427 Date.today - 20000 => '20000 days late',
428 Date.today - 20000 => '20000 days late',
428 }
429 }
429 to_test.each do |date, expected|
430 to_test.each do |date, expected|
430 assert_equal expected, due_date_distance_in_words(date)
431 assert_equal expected, due_date_distance_in_words(date)
431 end
432 end
432 end
433 end
433
434
434 def test_avatar
435 def test_avatar
435 # turn on avatars
436 # turn on avatars
436 Setting.gravatar_enabled = '1'
437 Setting.gravatar_enabled = '1'
437 assert avatar(User.find_by_mail('jsmith@somenet.foo')).include?(Digest::MD5.hexdigest('jsmith@somenet.foo'))
438 assert avatar(User.find_by_mail('jsmith@somenet.foo')).include?(Digest::MD5.hexdigest('jsmith@somenet.foo'))
438 assert avatar('jsmith <jsmith@somenet.foo>').include?(Digest::MD5.hexdigest('jsmith@somenet.foo'))
439 assert avatar('jsmith <jsmith@somenet.foo>').include?(Digest::MD5.hexdigest('jsmith@somenet.foo'))
439 assert_nil avatar('jsmith')
440 assert_nil avatar('jsmith')
440 assert_nil avatar(nil)
441 assert_nil avatar(nil)
441
442
442 # turn off avatars
443 # turn off avatars
443 Setting.gravatar_enabled = '0'
444 Setting.gravatar_enabled = '0'
444 assert_nil avatar(User.find_by_mail('jsmith@somenet.foo'))
445 assert_nil avatar(User.find_by_mail('jsmith@somenet.foo'))
445 end
446 end
446 end
447 end
General Comments 0
You need to be logged in to leave comments. Login now