##// END OF EJS Templates
jro_apps » redmine
RSS
Fixes some textile issues with JRuby (#5404)....
Jean-Philippe Lang -
r3604:0a47389a65f3
parent child
Show More
Side by Side Unified
Context file:
r3604:0a47389a65f3 Loading diff...:
Show file before | Show file after | Hide comments
@@ -1,1193 +1,1193
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 = [: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, :glyphs_textile]
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_JOIN = QTAGS.map {|rc, ht, rtype| Regexp::quote rc}.join('|')
377 377
378 378 QTAGS.collect! do |rc, ht, rtype|
379 379 rcq = Regexp::quote rc
380 380 re =
381 381 case rtype
382 382 when :limit
383 383 /(^|[>\s\(]) # sta
384 384 (?!\-\-)
385 385 (#{QTAGS_JOIN}|) # oqs
386 386 (#{rcq}) # qtag
387 387 (\w|[^\s].*?[^\s]) # content
388 388 (?!\-\-)
389 389 #{rcq}
390 390 (#{QTAGS_JOIN}|) # oqa
391 (?=[[:punct:]]|\s|\)|$)/x
391 (?=[[:punct:]]|<|\s|\)|$)/x
392 392 else
393 393 /(#{rcq})
394 394 (#{C})
395 395 (?::(\S+))?
396 396 (\w|[^\s\-].*?[^\s\-])
397 397 #{rcq}/xm
398 398 end
399 399 [rc, ht, re, rtype]
400 400 end
401 401
402 402 # Elements to handle
403 403 GLYPHS = [
404 404 # [ /([^\s\[{(>])?\'([dmst]\b|ll\b|ve\b|\s|:|$)/, '\1&#8217;\2' ], # single closing
405 405 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)\'/, '\1&#8217;' ], # single closing
406 406 # [ /\'(?=[#{PUNCT_Q}]*(s\b|[\s#{PUNCT_NOQ}]))/, '&#8217;' ], # single closing
407 407 # [ /\'/, '&#8216;' ], # single opening
408 408 # [ /</, '&lt;' ], # less-than
409 409 # [ />/, '&gt;' ], # greater-than
410 410 # [ /([^\s\[{(])?"(\s|:|$)/, '\1&#8221;\2' ], # double closing
411 411 # [ /([^\s\[{(>#{PUNCT_Q}][#{PUNCT_Q}]*)"/, '\1&#8221;' ], # double closing
412 412 # [ /"(?=[#{PUNCT_Q}]*[\s#{PUNCT_NOQ}])/, '&#8221;' ], # double closing
413 413 # [ /"/, '&#8220;' ], # double opening
414 414 # [ /\b( )?\.{3}/, '\1&#8230;' ], # ellipsis
415 415 # [ /\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/, '<acronym title="\2">\1</acronym>' ], # 3+ uppercase acronym
416 416 # [ /(^|[^"][>\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
417 417 # [ /(\.\s)?\s?--\s?/, '\1&#8212;' ], # em dash
418 418 # [ /\s->\s/, ' &rarr; ' ], # right arrow
419 419 # [ /\s-\s/, ' &#8211; ' ], # en dash
420 420 # [ /(\d+) ?x ?(\d+)/, '\1&#215;\2' ], # dimension sign
421 421 # [ /\b ?[(\[]TM[\])]/i, '&#8482;' ], # trademark
422 422 # [ /\b ?[(\[]R[\])]/i, '&#174;' ], # registered
423 423 # [ /\b ?[(\[]C[\])]/i, '&#169;' ] # copyright
424 424 ]
425 425
426 426 H_ALGN_VALS = {
427 427 '<' => 'left',
428 428 '=' => 'center',
429 429 '>' => 'right',
430 430 '<>' => 'justify'
431 431 }
432 432
433 433 V_ALGN_VALS = {
434 434 '^' => 'top',
435 435 '-' => 'middle',
436 436 '~' => 'bottom'
437 437 }
438 438
439 439 #
440 440 # Flexible HTML escaping
441 441 #
442 442 def htmlesc( str, mode=:Quotes )
443 443 if str
444 444 str.gsub!( '&', '&amp;' )
445 445 str.gsub!( '"', '&quot;' ) if mode != :NoQuotes
446 446 str.gsub!( "'", '&#039;' ) if mode == :Quotes
447 447 str.gsub!( '<', '&lt;')
448 448 str.gsub!( '>', '&gt;')
449 449 end
450 450 str
451 451 end
452 452
453 453 # Search and replace for Textile glyphs (quotes, dashes, other symbols)
454 454 def pgl( text )
455 455 #GLYPHS.each do |re, resub, tog|
456 456 # next if tog and method( tog ).call
457 457 # text.gsub! re, resub
458 458 #end
459 459 text.gsub!(/\b([A-Z][A-Z0-9]{2,})\b(?:[(]([^)]*)[)])/) do |m|
460 460 "<acronym title=\"#{htmlesc $2}\">#{$1}</acronym>"
461 461 end
462 462 end
463 463
464 464 # Parses Textile attribute lists and builds an HTML attribute string
465 465 def pba( text_in, element = "" )
466 466
467 467 return '' unless text_in
468 468
469 469 style = []
470 470 text = text_in.dup
471 471 if element == 'td'
472 472 colspan = $1 if text =~ /\\(\d+)/
473 473 rowspan = $1 if text =~ /\/(\d+)/
474 474 style << "vertical-align:#{ v_align( $& ) };" if text =~ A_VLGN
475 475 end
476 476
477 477 style << "#{ htmlesc $1 };" if text.sub!( /\{([^}]*)\}/, '' ) && !filter_styles
478 478
479 479 lang = $1 if
480 480 text.sub!( /\[([^)]+?)\]/, '' )
481 481
482 482 cls = $1 if
483 483 text.sub!( /\(([^()]+?)\)/, '' )
484 484
485 485 style << "padding-left:#{ $1.length }em;" if
486 486 text.sub!( /([(]+)/, '' )
487 487
488 488 style << "padding-right:#{ $1.length }em;" if text.sub!( /([)]+)/, '' )
489 489
490 490 style << "text-align:#{ h_align( $& ) };" if text =~ A_HLGN
491 491
492 492 cls, id = $1, $2 if cls =~ /^(.*?)#(.*)$/
493 493
494 494 atts = ''
495 495 atts << " style=\"#{ style.join }\"" unless style.empty?
496 496 atts << " class=\"#{ cls }\"" unless cls.to_s.empty?
497 497 atts << " lang=\"#{ lang }\"" if lang
498 498 atts << " id=\"#{ id }\"" if id
499 499 atts << " colspan=\"#{ colspan }\"" if colspan
500 500 atts << " rowspan=\"#{ rowspan }\"" if rowspan
501 501
502 502 atts
503 503 end
504 504
505 505 TABLE_RE = /^(?:table(_?#{S}#{A}#{C})\. ?\n)?^(#{A}#{C}\.? ?\|.*?\|)(\n\n|\Z)/m
506 506
507 507 # Parses a Textile table block, building HTML from the result.
508 508 def block_textile_table( text )
509 509 text.gsub!( TABLE_RE ) do |matches|
510 510
511 511 tatts, fullrow = $~[1..2]
512 512 tatts = pba( tatts, 'table' )
513 513 tatts = shelve( tatts ) if tatts
514 514 rows = []
515 515
516 516 fullrow.each_line do |row|
517 517 ratts, row = pba( $1, 'tr' ), $2 if row =~ /^(#{A}#{C}\. )(.*)/m
518 518 cells = []
519 519 row.split( /(\|)(?![^\[\|]*\]\])/ )[1..-2].each do |cell|
520 520 next if cell == '|'
521 521 ctyp = 'd'
522 522 ctyp = 'h' if cell =~ /^_/
523 523
524 524 catts = ''
525 525 catts, cell = pba( $1, 'td' ), $2 if cell =~ /^(_?#{S}#{A}#{C}\. ?)(.*)/
526 526
527 527 catts = shelve( catts ) if catts
528 528 cells << "\t\t\t<t#{ ctyp }#{ catts }>#{ cell }</t#{ ctyp }>"
529 529 end
530 530 ratts = shelve( ratts ) if ratts
531 531 rows << "\t\t<tr#{ ratts }>\n#{ cells.join( "\n" ) }\n\t\t</tr>"
532 532 end
533 533 "\t<table#{ tatts }>\n#{ rows.join( "\n" ) }\n\t</table>\n\n"
534 534 end
535 535 end
536 536
537 537 LISTS_RE = /^([#*]+?#{C} .*?)$(?![^#*])/m
538 538 LISTS_CONTENT_RE = /^([#*]+)(#{A}#{C}) (.*)$/m
539 539
540 540 # Parses Textile lists and generates HTML
541 541 def block_textile_lists( text )
542 542 text.gsub!( LISTS_RE ) do |match|
543 543 lines = match.split( /\n/ )
544 544 last_line = -1
545 545 depth = []
546 546 lines.each_with_index do |line, line_id|
547 547 if line =~ LISTS_CONTENT_RE
548 548 tl,atts,content = $~[1..3]
549 549 if depth.last
550 550 if depth.last.length > tl.length
551 551 (depth.length - 1).downto(0) do |i|
552 552 break if depth[i].length == tl.length
553 553 lines[line_id - 1] << "</li>\n\t</#{ lT( depth[i] ) }l>\n\t"
554 554 depth.pop
555 555 end
556 556 end
557 557 if depth.last and depth.last.length == tl.length
558 558 lines[line_id - 1] << '</li>'
559 559 end
560 560 end
561 561 unless depth.last == tl
562 562 depth << tl
563 563 atts = pba( atts )
564 564 atts = shelve( atts ) if atts
565 565 lines[line_id] = "\t<#{ lT(tl) }l#{ atts }>\n\t<li>#{ content }"
566 566 else
567 567 lines[line_id] = "\t\t<li>#{ content }"
568 568 end
569 569 last_line = line_id
570 570
571 571 else
572 572 last_line = line_id
573 573 end
574 574 if line_id - last_line > 1 or line_id == lines.length - 1
575 575 depth.delete_if do |v|
576 576 lines[last_line] << "</li>\n\t</#{ lT( v ) }l>"
577 577 end
578 578 end
579 579 end
580 580 lines.join( "\n" )
581 581 end
582 582 end
583 583
584 584 QUOTES_RE = /(^>+([^\n]*?)(\n|$))+/m
585 585 QUOTES_CONTENT_RE = /^([> ]+)(.*)$/m
586 586
587 587 def block_textile_quotes( text )
588 588 text.gsub!( QUOTES_RE ) do |match|
589 589 lines = match.split( /\n/ )
590 590 quotes = ''
591 591 indent = 0
592 592 lines.each do |line|
593 593 line =~ QUOTES_CONTENT_RE
594 594 bq,content = $1, $2
595 595 l = bq.count('>')
596 596 if l != indent
597 597 quotes << ("\n\n" + (l>indent ? '<blockquote>' * (l-indent) : '</blockquote>' * (indent-l)) + "\n\n")
598 598 indent = l
599 599 end
600 600 quotes << (content + "\n")
601 601 end
602 602 quotes << ("\n" + '</blockquote>' * indent + "\n\n")
603 603 quotes
604 604 end
605 605 end
606 606
607 607 CODE_RE = /(\W)
608 608 @
609 609 (?:\|(\w+?)\|)?
610 610 (.+?)
611 611 @
612 612 (?=\W)/x
613 613
614 614 def inline_textile_code( text )
615 615 text.gsub!( CODE_RE ) do |m|
616 616 before,lang,code,after = $~[1..4]
617 617 lang = " lang=\"#{ lang }\"" if lang
618 618 rip_offtags( "#{ before }<code#{ lang }>#{ code }</code>#{ after }", false )
619 619 end
620 620 end
621 621
622 622 def lT( text )
623 623 text =~ /\#$/ ? 'o' : 'u'
624 624 end
625 625
626 626 def hard_break( text )
627 627 text.gsub!( /(.)\n(?!\Z| *([#*=]+(\s|$)|[{|]))/, "\\1<br />" ) if hard_breaks
628 628 end
629 629
630 630 BLOCKS_GROUP_RE = /\n{2,}(?! )/m
631 631
632 632 def blocks( text, deep_code = false )
633 633 text.replace( text.split( BLOCKS_GROUP_RE ).collect do |blk|
634 634 plain = blk !~ /\A[#*> ]/
635 635
636 636 # skip blocks that are complex HTML
637 637 if blk =~ /^<\/?(\w+).*>/ and not SIMPLE_HTML_TAGS.include? $1
638 638 blk
639 639 else
640 640 # search for indentation levels
641 641 blk.strip!
642 642 if blk.empty?
643 643 blk
644 644 else
645 645 code_blk = nil
646 646 blk.gsub!( /((?:\n(?:\n^ +[^\n]*)+)+)/m ) do |iblk|
647 647 flush_left iblk
648 648 blocks iblk, plain
649 649 iblk.gsub( /^(\S)/, "\t\\1" )
650 650 if plain
651 651 code_blk = iblk; ""
652 652 else
653 653 iblk
654 654 end
655 655 end
656 656
657 657 block_applied = 0
658 658 @rules.each do |rule_name|
659 659 block_applied += 1 if ( rule_name.to_s.match /^block_/ and method( rule_name ).call( blk ) )
660 660 end
661 661 if block_applied.zero?
662 662 if deep_code
663 663 blk = "\t<pre><code>#{ blk }</code></pre>"
664 664 else
665 665 blk = "\t<p>#{ blk }</p>"
666 666 end
667 667 end
668 668 # hard_break blk
669 669 blk + "\n#{ code_blk }"
670 670 end
671 671 end
672 672
673 673 end.join( "\n\n" ) )
674 674 end
675 675
676 676 def textile_bq( tag, atts, cite, content )
677 677 cite, cite_title = check_refs( cite )
678 678 cite = " cite=\"#{ cite }\"" if cite
679 679 atts = shelve( atts ) if atts
680 680 "\t<blockquote#{ cite }>\n\t\t<p#{ atts }>#{ content }</p>\n\t</blockquote>"
681 681 end
682 682
683 683 def textile_p( tag, atts, cite, content )
684 684 atts = shelve( atts ) if atts
685 685 "\t<#{ tag }#{ atts }>#{ content }</#{ tag }>"
686 686 end
687 687
688 688 alias textile_h1 textile_p
689 689 alias textile_h2 textile_p
690 690 alias textile_h3 textile_p
691 691 alias textile_h4 textile_p
692 692 alias textile_h5 textile_p
693 693 alias textile_h6 textile_p
694 694
695 695 def textile_fn_( tag, num, atts, cite, content )
696 696 atts << " id=\"fn#{ num }\" class=\"footnote\""
697 697 content = "<sup>#{ num }</sup> #{ content }"
698 698 atts = shelve( atts ) if atts
699 699 "\t<p#{ atts }>#{ content }</p>"
700 700 end
701 701
702 702 BLOCK_RE = /^(([a-z]+)(\d*))(#{A}#{C})\.(?::(\S+))? (.*)$/m
703 703
704 704 def block_textile_prefix( text )
705 705 if text =~ BLOCK_RE
706 706 tag,tagpre,num,atts,cite,content = $~[1..6]
707 707 atts = pba( atts )
708 708
709 709 # pass to prefix handler
710 710 if respond_to? "textile_#{ tag }", true
711 711 text.gsub!( $&, method( "textile_#{ tag }" ).call( tag, atts, cite, content ) )
712 712 elsif respond_to? "textile_#{ tagpre }_", true
713 713 text.gsub!( $&, method( "textile_#{ tagpre }_" ).call( tagpre, num, atts, cite, content ) )
714 714 end
715 715 end
716 716 end
717 717
718 718 SETEXT_RE = /\A(.+?)\n([=-])[=-]* *$/m
719 719 def block_markdown_setext( text )
720 720 if text =~ SETEXT_RE
721 721 tag = if $2 == "="; "h1"; else; "h2"; end
722 722 blk, cont = "<#{ tag }>#{ $1 }</#{ tag }>", $'
723 723 blocks cont
724 724 text.replace( blk + cont )
725 725 end
726 726 end
727 727
728 728 ATX_RE = /\A(\#{1,6}) # $1 = string of #'s
729 729 [ ]*
730 730 (.+?) # $2 = Header text
731 731 [ ]*
732 732 \#* # optional closing #'s (not counted)
733 733 $/x
734 734 def block_markdown_atx( text )
735 735 if text =~ ATX_RE
736 736 tag = "h#{ $1.length }"
737 737 blk, cont = "<#{ tag }>#{ $2 }</#{ tag }>\n\n", $'
738 738 blocks cont
739 739 text.replace( blk + cont )
740 740 end
741 741 end
742 742
743 743 MARKDOWN_BQ_RE = /\A(^ *> ?.+$(.+\n)*\n*)+/m
744 744
745 745 def block_markdown_bq( text )
746 746 text.gsub!( MARKDOWN_BQ_RE ) do |blk|
747 747 blk.gsub!( /^ *> ?/, '' )
748 748 flush_left blk
749 749 blocks blk
750 750 blk.gsub!( /^(\S)/, "\t\\1" )
751 751 "<blockquote>\n#{ blk }\n</blockquote>\n\n"
752 752 end
753 753 end
754 754
755 755 MARKDOWN_RULE_RE = /^(#{
756 756 ['*', '-', '_'].collect { |ch| ' ?(' + Regexp::quote( ch ) + ' ?){3,}' }.join( '|' )
757 757 })$/
758 758
759 759 def block_markdown_rule( text )
760 760 text.gsub!( MARKDOWN_RULE_RE ) do |blk|
761 761 "<hr />"
762 762 end
763 763 end
764 764
765 765 # XXX TODO XXX
766 766 def block_markdown_lists( text )
767 767 end
768 768
769 769 def inline_textile_span( text )
770 770 QTAGS.each do |qtag_rc, ht, qtag_re, rtype|
771 771 text.gsub!( qtag_re ) do |m|
772 772
773 773 case rtype
774 774 when :limit
775 775 sta,oqs,qtag,content,oqa = $~[1..6]
776 776 atts = nil
777 777 if content =~ /^(#{C})(.+)$/
778 778 atts, content = $~[1..2]
779 779 end
780 780 else
781 781 qtag,atts,cite,content = $~[1..4]
782 782 sta = ''
783 783 end
784 784 atts = pba( atts )
785 785 atts = shelve( atts ) if atts
786 786
787 787 "#{ sta }#{ oqs }<#{ ht }#{ atts }>#{ content }</#{ ht }>#{ oqa }"
788 788
789 789 end
790 790 end
791 791 end
792 792
793 793 LINK_RE = /
794 794 (
795 795 ([\s\[{(]|[#{PUNCT}])? # $pre
796 796 " # start
797 797 (#{C}) # $atts
798 798 ([^"\n]+?) # $text
799 799 \s?
800 800 (?:\(([^)]+?)\)(?="))? # $title
801 801 ":
802 802 ( # $url
803 803 (\/|[a-zA-Z]+:\/\/|www\.|mailto:) # $proto
804 804 [\w\/]\S+?
805 805 )
806 806 (\/)? # $slash
807 807 ([^\w\=\/;\(\)]*?) # $post
808 808 )
809 809 (?=<|\s|$)
810 810 /x
811 811 #"
812 812 def inline_textile_link( text )
813 813 text.gsub!( LINK_RE ) do |m|
814 814 all,pre,atts,text,title,url,proto,slash,post = $~[1..9]
815 815 if text.include?('<br />')
816 816 all
817 817 else
818 818 url, url_title = check_refs( url )
819 819 title ||= url_title
820 820
821 821 # Idea below : an URL with unbalanced parethesis and
822 822 # ending by ')' is put into external parenthesis
823 823 if ( url[-1]==?) and ((url.count("(") - url.count(")")) < 0 ) )
824 824 url=url[0..-2] # discard closing parenth from url
825 825 post = ")"+post # add closing parenth to post
826 826 end
827 827 atts = pba( atts )
828 828 atts = " href=\"#{ htmlesc url }#{ slash }\"#{ atts }"
829 829 atts << " title=\"#{ htmlesc title }\"" if title
830 830 atts = shelve( atts ) if atts
831 831
832 832 external = (url =~ /^https?:\/\//) ? ' class="external"' : ''
833 833
834 834 "#{ pre }<a#{ atts }#{ external }>#{ text }</a>#{ post }"
835 835 end
836 836 end
837 837 end
838 838
839 839 MARKDOWN_REFLINK_RE = /
840 840 \[([^\[\]]+)\] # $text
841 841 [ ]? # opt. space
842 842 (?:\n[ ]*)? # one optional newline followed by spaces
843 843 \[(.*?)\] # $id
844 844 /x
845 845
846 846 def inline_markdown_reflink( text )
847 847 text.gsub!( MARKDOWN_REFLINK_RE ) do |m|
848 848 text, id = $~[1..2]
849 849
850 850 if id.empty?
851 851 url, title = check_refs( text )
852 852 else
853 853 url, title = check_refs( id )
854 854 end
855 855
856 856 atts = " href=\"#{ url }\""
857 857 atts << " title=\"#{ title }\"" if title
858 858 atts = shelve( atts )
859 859
860 860 "<a#{ atts }>#{ text }</a>"
861 861 end
862 862 end
863 863
864 864 MARKDOWN_LINK_RE = /
865 865 \[([^\[\]]+)\] # $text
866 866 \( # open paren
867 867 [ \t]* # opt space
868 868 <?(.+?)>? # $href
869 869 [ \t]* # opt space
870 870 (?: # whole title
871 871 (['"]) # $quote
872 872 (.*?) # $title
873 873 \3 # matching quote
874 874 )? # title is optional
875 875 \)
876 876 /x
877 877
878 878 def inline_markdown_link( text )
879 879 text.gsub!( MARKDOWN_LINK_RE ) do |m|
880 880 text, url, quote, title = $~[1..4]
881 881
882 882 atts = " href=\"#{ url }\""
883 883 atts << " title=\"#{ title }\"" if title
884 884 atts = shelve( atts )
885 885
886 886 "<a#{ atts }>#{ text }</a>"
887 887 end
888 888 end
889 889
890 890 TEXTILE_REFS_RE = /(^ *)\[([^\[\n]+?)\](#{HYPERLINK})(?=\s|$)/
891 891 MARKDOWN_REFS_RE = /(^ *)\[([^\n]+?)\]:\s+<?(#{HYPERLINK})>?(?:\s+"((?:[^"]|\\")+)")?(?=\s|$)/m
892 892
893 893 def refs( text )
894 894 @rules.each do |rule_name|
895 895 method( rule_name ).call( text ) if rule_name.to_s.match /^refs_/
896 896 end
897 897 end
898 898
899 899 def refs_textile( text )
900 900 text.gsub!( TEXTILE_REFS_RE ) do |m|
901 901 flag, url = $~[2..3]
902 902 @urlrefs[flag.downcase] = [url, nil]
903 903 nil
904 904 end
905 905 end
906 906
907 907 def refs_markdown( text )
908 908 text.gsub!( MARKDOWN_REFS_RE ) do |m|
909 909 flag, url = $~[2..3]
910 910 title = $~[6]
911 911 @urlrefs[flag.downcase] = [url, title]
912 912 nil
913 913 end
914 914 end
915 915
916 916 def check_refs( text )
917 917 ret = @urlrefs[text.downcase] if text
918 918 ret || [text, nil]
919 919 end
920 920
921 921 IMAGE_RE = /
922 922 (>|\s|^) # start of line?
923 923 \! # opening
924 924 (\<|\=|\>)? # optional alignment atts
925 925 (#{C}) # optional style,class atts
926 926 (?:\. )? # optional dot-space
927 927 ([^\s(!]+?) # presume this is the src
928 928 \s? # optional space
929 929 (?:\(((?:[^\(\)]|\([^\)]+\))+?)\))? # optional title
930 930 \! # closing
931 931 (?::#{ HYPERLINK })? # optional href
932 932 /x
933 933
934 934 def inline_textile_image( text )
935 935 text.gsub!( IMAGE_RE ) do |m|
936 936 stln,algn,atts,url,title,href,href_a1,href_a2 = $~[1..8]
937 937 htmlesc title
938 938 atts = pba( atts )
939 939 atts = " src=\"#{ url }\"#{ atts }"
940 940 atts << " title=\"#{ title }\"" if title
941 941 atts << " alt=\"#{ title }\""
942 942 # size = @getimagesize($url);
943 943 # if($size) $atts.= " $size[3]";
944 944
945 945 href, alt_title = check_refs( href ) if href
946 946 url, url_title = check_refs( url )
947 947
948 948 out = ''
949 949 out << "<a#{ shelve( " href=\"#{ href }\"" ) }>" if href
950 950 out << "<img#{ shelve( atts ) } />"
951 951 out << "</a>#{ href_a1 }#{ href_a2 }" if href
952 952
953 953 if algn
954 954 algn = h_align( algn )
955 955 if stln == "<p>"
956 956 out = "<p style=\"float:#{ algn }\">#{ out }"
957 957 else
958 958 out = "#{ stln }<div style=\"float:#{ algn }\">#{ out }</div>"
959 959 end
960 960 else
961 961 out = stln + out
962 962 end
963 963
964 964 out
965 965 end
966 966 end
967 967
968 968 def shelve( val )
969 969 @shelf << val
970 970 " :redsh##{ @shelf.length }:"
971 971 end
972 972
973 973 def retrieve( text )
974 974 @shelf.each_with_index do |r, i|
975 975 text.gsub!( " :redsh##{ i + 1 }:", r )
976 976 end
977 977 end
978 978
979 979 def incoming_entities( text )
980 980 ## turn any incoming ampersands into a dummy character for now.
981 981 ## This uses a negative lookahead for alphanumerics followed by a semicolon,
982 982 ## implying an incoming html entity, to be skipped
983 983
984 984 text.gsub!( /&(?![#a-z0-9]+;)/i, "x%x%" )
985 985 end
986 986
987 987 def no_textile( text )
988 988 text.gsub!( /(^|\s)==([^=]+.*?)==(\s|$)?/,
989 989 '\1<notextile>\2</notextile>\3' )
990 990 text.gsub!( /^ *==([^=]+.*?)==/m,
991 991 '\1<notextile>\2</notextile>\3' )
992 992 end
993 993
994 994 def clean_white_space( text )
995 995 # normalize line breaks
996 996 text.gsub!( /\r\n/, "\n" )
997 997 text.gsub!( /\r/, "\n" )
998 998 text.gsub!( /\t/, ' ' )
999 999 text.gsub!( /^ +$/, '' )
1000 1000 text.gsub!( /\n{3,}/, "\n\n" )
1001 1001 text.gsub!( /"$/, "\" " )
1002 1002
1003 1003 # if entire document is indented, flush
1004 1004 # to the left side
1005 1005 flush_left text
1006 1006 end
1007 1007
1008 1008 def flush_left( text )
1009 1009 indt = 0
1010 1010 if text =~ /^ /
1011 1011 while text !~ /^ {#{indt}}\S/
1012 1012 indt += 1
1013 1013 end unless text.empty?
1014 1014 if indt.nonzero?
1015 1015 text.gsub!( /^ {#{indt}}/, '' )
1016 1016 end
1017 1017 end
1018 1018 end
1019 1019
1020 1020 def footnote_ref( text )
1021 1021 text.gsub!( /\b\[([0-9]+?)\](\s)?/,
1022 1022 '<sup><a href="#fn\1">\1</a></sup>\2' )
1023 1023 end
1024 1024
1025 1025 OFFTAGS = /(code|pre|kbd|notextile)/
1026 1026 OFFTAG_MATCH = /(?:(<\/#{ OFFTAGS }>)|(<#{ OFFTAGS }[^>]*>))(.*?)(?=<\/?#{ OFFTAGS }\W|\Z)/mi
1027 1027 OFFTAG_OPEN = /<#{ OFFTAGS }/
1028 1028 OFFTAG_CLOSE = /<\/?#{ OFFTAGS }/
1029 1029 HASTAG_MATCH = /(<\/?\w[^\n]*?>)/m
1030 1030 ALLTAG_MATCH = /(<\/?\w[^\n]*?>)|.*?(?=<\/?\w[^\n]*?>|$)/m
1031 1031
1032 1032 def glyphs_textile( text, level = 0 )
1033 1033 if text !~ HASTAG_MATCH
1034 1034 pgl text
1035 1035 footnote_ref text
1036 1036 else
1037 1037 codepre = 0
1038 1038 text.gsub!( ALLTAG_MATCH ) do |line|
1039 1039 ## matches are off if we're between <code>, <pre> etc.
1040 1040 if $1
1041 1041 if line =~ OFFTAG_OPEN
1042 1042 codepre += 1
1043 1043 elsif line =~ OFFTAG_CLOSE
1044 1044 codepre -= 1
1045 1045 codepre = 0 if codepre < 0
1046 1046 end
1047 1047 elsif codepre.zero?
1048 1048 glyphs_textile( line, level + 1 )
1049 1049 else
1050 1050 htmlesc( line, :NoQuotes )
1051 1051 end
1052 1052 # p [level, codepre, line]
1053 1053
1054 1054 line
1055 1055 end
1056 1056 end
1057 1057 end
1058 1058
1059 1059 def rip_offtags( text, escape_aftertag=true )
1060 1060 if text =~ /<.*>/
1061 1061 ## strip and encode <pre> content
1062 1062 codepre, used_offtags = 0, {}
1063 1063 text.gsub!( OFFTAG_MATCH ) do |line|
1064 1064 if $3
1065 1065 first, offtag, aftertag = $3, $4, $5
1066 1066 codepre += 1
1067 1067 used_offtags[offtag] = true
1068 1068 if codepre - used_offtags.length > 0
1069 1069 htmlesc( line, :NoQuotes )
1070 1070 @pre_list.last << line
1071 1071 line = ""
1072 1072 else
1073 1073 ### htmlesc is disabled between CODE tags which will be parsed with highlighter
1074 1074 ### Regexp in formatter.rb is : /<code\s+class="(\w+)">\s?(.+)/m
1075 1075 ### NB: some changes were made not to use $N variables, because we use "match"
1076 1076 ### and it breaks following lines
1077 1077 htmlesc( aftertag, :NoQuotes ) if aftertag && escape_aftertag && !first.match(/<code\s+class="(\w+)">/)
1078 1078 line = "<redpre##{ @pre_list.length }>"
1079 1079 first.match(/<#{ OFFTAGS }([^>]*)>/)
1080 1080 tag = $1
1081 1081 $2.to_s.match(/(class\=\S+)/i)
1082 1082 tag << " #{$1}" if $1
1083 1083 @pre_list << "<#{ tag }>#{ aftertag }"
1084 1084 end
1085 1085 elsif $1 and codepre > 0
1086 1086 if codepre - used_offtags.length > 0
1087 1087 htmlesc( line, :NoQuotes )
1088 1088 @pre_list.last << line
1089 1089 line = ""
1090 1090 end
1091 1091 codepre -= 1 unless codepre.zero?
1092 1092 used_offtags = {} if codepre.zero?
1093 1093 end
1094 1094 line
1095 1095 end
1096 1096 end
1097 1097 text
1098 1098 end
1099 1099
1100 1100 def smooth_offtags( text )
1101 1101 unless @pre_list.empty?
1102 1102 ## replace <pre> content
1103 1103 text.gsub!( /<redpre#(\d+)>/ ) { @pre_list[$1.to_i] }
1104 1104 end
1105 1105 end
1106 1106
1107 1107 def inline( text )
1108 1108 [/^inline_/, /^glyphs_/].each do |meth_re|
1109 1109 @rules.each do |rule_name|
1110 1110 method( rule_name ).call( text ) if rule_name.to_s.match( meth_re )
1111 1111 end
1112 1112 end
1113 1113 end
1114 1114
1115 1115 def h_align( text )
1116 1116 H_ALGN_VALS[text]
1117 1117 end
1118 1118
1119 1119 def v_align( text )
1120 1120 V_ALGN_VALS[text]
1121 1121 end
1122 1122
1123 1123 def textile_popup_help( name, windowW, windowH )
1124 1124 ' <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 />'
1125 1125 end
1126 1126
1127 1127 # HTML cleansing stuff
1128 1128 BASIC_TAGS = {
1129 1129 'a' => ['href', 'title'],
1130 1130 'img' => ['src', 'alt', 'title'],
1131 1131 'br' => [],
1132 1132 'i' => nil,
1133 1133 'u' => nil,
1134 1134 'b' => nil,
1135 1135 'pre' => nil,
1136 1136 'kbd' => nil,
1137 1137 'code' => ['lang'],
1138 1138 'cite' => nil,
1139 1139 'strong' => nil,
1140 1140 'em' => nil,
1141 1141 'ins' => nil,
1142 1142 'sup' => nil,
1143 1143 'sub' => nil,
1144 1144 'del' => nil,
1145 1145 'table' => nil,
1146 1146 'tr' => nil,
1147 1147 'td' => ['colspan', 'rowspan'],
1148 1148 'th' => nil,
1149 1149 'ol' => nil,
1150 1150 'ul' => nil,
1151 1151 'li' => nil,
1152 1152 'p' => nil,
1153 1153 'h1' => nil,
1154 1154 'h2' => nil,
1155 1155 'h3' => nil,
1156 1156 'h4' => nil,
1157 1157 'h5' => nil,
1158 1158 'h6' => nil,
1159 1159 'blockquote' => ['cite']
1160 1160 }
1161 1161
1162 1162 def clean_html( text, tags = BASIC_TAGS )
1163 1163 text.gsub!( /<!\[CDATA\[/, '' )
1164 1164 text.gsub!( /<(\/*)(\w+)([^>]*)>/ ) do
1165 1165 raw = $~
1166 1166 tag = raw[2].downcase
1167 1167 if tags.has_key? tag
1168 1168 pcs = [tag]
1169 1169 tags[tag].each do |prop|
1170 1170 ['"', "'", ''].each do |q|
1171 1171 q2 = ( q != '' ? q : '\s' )
1172 1172 if raw[3] =~ /#{prop}\s*=\s*#{q}([^#{q2}]+)#{q}/i
1173 1173 attrv = $1
1174 1174 next if prop == 'src' and attrv =~ %r{^(?!http)\w+:}
1175 1175 pcs << "#{prop}=\"#{$1.gsub('"', '\\"')}\""
1176 1176 break
1177 1177 end
1178 1178 end
1179 1179 end if tags[tag]
1180 1180 "<#{raw[1]}#{pcs.join " "}>"
1181 1181 else
1182 1182 " "
1183 1183 end
1184 1184 end
1185 1185 end
1186 1186
1187 1187 ALLOWED_TAGS = %w(redpre pre code notextile)
1188 1188
1189 1189 def escape_html_tags(text)
1190 1190 text.gsub!(%r{<(\/?([!\w]+)[^<>\n]*)(>?)}) {|m| ALLOWED_TAGS.include?($2) ? "<#{$1}#{$3}" : "&lt;#{$1}#{'&gt;' unless $3.blank?}" }
1191 1191 end
1192 1192 end
1193 1193
General Comments 0
You need to be logged in to leave comments. Login now