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