Module: MaRuKu::Out::HTML

Includes:
REXML
Defined in:
lib/omf-web/widget/text/maruku/output/to_html.rb

Constant Summary collapse

Xhtml10strict = 
"<?xml version='1.0' encoding='utf-8'?>
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN'
'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>\n"
Xhtml11strict_mathml2 = 
'<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1 plus MathML 2.0//EN"
               "http://www.w3.org/TR/MathML2/dtd/xhtml-math11-f.dtd" [
  <!ENTITY mathml "http://www.w3.org/1998/Math/MathML">
]>
'
Xhtml11_mathml2_svg11 = 
'<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC
    "-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN"
    "http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd">
'
METAS = 
%w{description keywords author revised}
HTML4Attributes = 
{}

Instance Method Summary collapse

Instance Method Details

#add_class_to(el, cl) ⇒ Object 



703
704
705
706
707
708
709
710
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 703

def add_class_to(el, cl)
  el.attributes['class'] =
  if already = el.attributes['class']
    already + " " + cl
  else
    cl
  end
end

#add_class_to_link(a) ⇒ Object 



712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 712

def add_class_to_link(a)
  return # not ready yet

  # url = a.attributes['href']
  # return if not url
  #
  # if url =~ /^#/
  # 	add_class_to(a, 'maruku-link-samedoc')
  # elsif url =~ /^http:/
  # 	add_class_to(a, 'maruku-link-external')
  # else
  # 	add_class_to(a, 'maruku-link-local')
  # end
  #
#		puts a.attributes['class']
end

#add_css_to(head) ⇒ Object 



270
271
272
273
274
275
276
277
278
279
280
281
282
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 270

def add_css_to(head)
  if css_list = self.attributes[:css]
    css_list.split.each do |css|
    # <link type="text/css" rel="stylesheet" href="..." />
    link = Element.new 'link'
    link.attributes['type'] = 'text/css'
    link.attributes['rel'] = 'stylesheet'
    link.attributes['href'] = css
    head << link
    head << xml_newline
    end
  end
end

#add_ws(e) ⇒ Object 



775
776
777
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 775

def add_ws(e)
  [Text.new("\n"), e, Text.new("\n")]
end

#array_to_html(array) ⇒ Object 



1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 1000

def array_to_html(array)
  #array.each {|a| puts a.inspect }
  res = []
  res << (e = [])
  first_header = true
  array.each do |c|
    method = c.kind_of?(MDElement) ? "to_html_#{c.node_type}" : "to_html"
    if not c.respond_to?(method)
      #raise "Object does not answer to #{method}: #{c.class} #{c.inspect}"
      next
    end

    Thread.current['maruku.line_no'] = c.line_no if c.respond_to? :line_no
    h =  c.send(method)
    if h.nil?
      raise "Nil html created by method  #{method}:\n#{h.inspect}\n"+
      " for object #{c.inspect[0,300]}"
    end

    unless (Thread.current['maruku_context'] || {})[:suppress_section]
      if method == 'to_html_header'
        if res.length > 1
          res.pop
          s = res[-1][-1]
          e.each do |el| s << el end
          e = res[-1]
        end

        # Wrap into 'section' to more easily find back into MD from html
        e << (s = Element.new('section'))
        s.attributes['line_no'] = c.line_no
        s.attributes['level'] = c.level

        toc = Thread.current['maruku.toc'] ||= []
        li = c.level - 1
        toc[li] = toc[li] ? (toc[li]  + 1) : 1
        s.attributes['toc'] = toc.map {|l| l ? l : 1 }.join('.')

        res << (e = [])

      end
    end

    if h.kind_of?Array
      e.concat(h) #h.each do |hh| e << hh end
    else
      e << h
    end
#                   puts "LOOP ENDN res: #{res.inspect} -- e: #{e.inspect}"
  end
#                puts "after: #{res.inspect} e: #{e.inspect}"
  if res.length > 1
    res.pop
    s = res[-1][-1]
    e.each do |el| s << el end
    e = res[-1]
  end
#puts e.inspect
  e
end

#children_to_html ⇒ Object

Convert each child to html



996
997
998
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 996

def children_to_html
  array_to_html(@children)
end

#create_html_element(name, attributes_to_copy = []) ⇒ Object 



434
435
436
437
438
439
440
441
442
443
444
445
446
447
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 434

def create_html_element(name, attributes_to_copy=[])
  m = Element.new name
  #puts "ATTR>>> #{@attributes}"
  if atts = HTML4Attributes[name] then
    atts.each do |att|
      if v = @attributes[att] then
        m.attributes[att.to_s] = v.to_s
      end
    end
  else
  #	puts "not atts for #{name.inspect}"
  end
  m
end

#day_suffix(day) ⇒ Object

returns “st”,“nd”,“rd” or “th” as appropriate



285
286
287
288
289
290
291
292
293
294
295
296
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 285

def day_suffix(day)
  s = {
    1 => 'st',
    2 => 'nd',
    3 => 'rd',
    21 => 'st',
    22 => 'nd',
    23 => 'rd',
    31 => 'st'
  }
  return s[day] || 'th';
end

#maruku_html_signature ⇒ Object 



307
308
309
310
311
312
313
314
315
316
317
318
319
320
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 307

def maruku_html_signature
  div = Element.new 'div'
    div.attributes['class'] = 'maruku_signature'
    Element.new 'hr', div
    span = Element.new 'span', div
      span.attributes['style'] = 'font-size: small; font-style: italic'
      span << Text.new('Created by ')
      a = Element.new('a', span)
        a.attributes['href'] = 'http://maruku.rubyforge.org'
        a.attributes['title'] = 'Maruku: a Markdown-superset interpreter for Ruby'
        a << Text.new('Maruku')
      span << Text.new(nice_date+".")
  div
end

#nice_date ⇒ Object

formats a nice date



299
300
301
302
303
304
305
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 299

def nice_date
  t = Time.now
  t.strftime(" at %H:%M on ")+
  t.strftime("%A, %B %d")+
  day_suffix(t.day)+
  t.strftime(", %Y")
end

#obfuscate(s) ⇒ Object

Email address



780
781
782
783
784
785
786
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 780

def obfuscate(s)
  res = ''
  s.each_byte do |char|
    res +=  "&#%03d;" % char
  end
  res
end

#render_footnotes ⇒ Object 



322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 322

def render_footnotes()
  div = Element.new 'div'
  div.attributes['class'] = 'footnotes'
  div <<  Element.new('hr')
    ol = Element.new 'ol'
    @doc.footnotes_order.each_with_index do |fid, i| num = i+1
      f = self.footnotes[fid]
      if f
        li = f.wrap_as_element('li')
        li.attributes['id'] = "#{get_setting(:doc_prefix)}fn:#{num}"

        a = Element.new 'a'
          a.attributes['href'] = "\##{get_setting(:doc_prefix)}fnref:#{num}"
          a.attributes['rev'] = 'footnote'
          a<< Text.new('&#8617;', true, nil, true)
        li.insert_after(li.children.last, a)
        ol << li
      else
        maruku_error "Could not find footnote id '#{fid}' among ["+
         self.footnotes.keys.map{|s|"'"+s+"'"}.join(', ')+"]."
      end
    end
  div << ol
  div
end

#render_section_number ⇒ Object

nil if not applicable, else SPAN element



506
507
508
509
510
511
512
513
514
515
516
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 506

def render_section_number
  # if we are bound to a section, add section number
  if num = section_number
    span = Element.new 'span'
    span.attributes['class'] = 'maruku_section_number'
    span << Text.new(section_number)
    span
  else
    nil
  end
end

#section_number ⇒ Object

nil if not applicable, else string



494
495
496
497
498
499
500
501
502
503
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 494

def section_number
  return nil if not get_setting(:use_numbered_headers)

  n = @attributes[:section_number]
  if n && (not n.empty?)
     n.join('.')+". "
  else
    nil
  end
end

#source2html(source) ⇒ Object 



540
541
542
543
544
545
546
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 540

def source2html(source)
#		source = source.gsub(/&/,'&amp;')
  source = Text.normalize(source)
  source = source.gsub(/\&apos;/,'&#39;') # IE bug
  source = source.gsub(/'/,'&#39;') # IE bug
  Text.new(source, true, nil, true )
end

#to_html(context = {}) ⇒ Object

Render as an HTML fragment (no head, just the content of BODY). (returns a string)



45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 45

def to_html(context={})
  Thread.current['maruku_context'] = context
  indent = context[:indent] || -1
  ie_hack = context[:ie_hack] || true

  div = Element.new 'dummy'
    children_to_html.each do |e|
      div << e
    end

    # render footnotes
    if @doc.footnotes_order.size > 0
      div << render_footnotes
    end

  doc = Document.new(nil,{:respect_whitespace =>:all})
  doc << div

  # REXML Bug? if indent!=-1 whitespace is not respected for 'pre' elements
  # containing code.
  xml =""

  if $rexml_new_version
    formatter = if indent > -1
          REXML::Formatters::Pretty.new( indent, ie_hack )
        else
          REXML::Formatters::Default.new( ie_hack )
        end
    formatter.write( div, xml)
  else
    div.write(xml,indent,transitive=true,ie_hack)
  end

  xml.gsub!(/\A<dummy>\s*/,'')
  xml.gsub!(/\s*<\/dummy>\Z/,'')
  xml.gsub!(/\A<dummy\s*\/>/,'')
  xml
end

#to_html_abbr ⇒ Object 



878
879
880
881
882
883
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 878

def to_html_abbr
  abbr = Element.new 'abbr'
  abbr << Text.new(children[0])
  abbr.attributes['title'] = self.title if self.title
  abbr
end

#to_html_cell ⇒ Object 



958
959
960
961
962
963
964
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 958

def to_html_cell
 if @attributes[:scope]
   wrap_as_element('th', [:scope])
 else
   wrap_as_element('td')
 end
end

#to_html_code ⇒ Object 



582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 582

def to_html_code;
  source = self.raw_code

  lang = self.attributes[:lang] || @doc.attributes[:code_lang]

  lang = 'xml' if lang=='html'

  use_syntax = get_setting :html_use_syntax

  element =
  if use_syntax && lang
    begin
      if not $syntax_loaded
        require 'rubygems'
        require 'syntax'
        require 'syntax/convertors/html'
        $syntax_loaded = true
      end
      convertor = Syntax::Convertors::HTML.for_syntax lang

      # eliminate trailing newlines otherwise Syntax crashes
      source = source.gsub(/\n*\Z/,'')

      html = convertor.convert( source )
      html = html.gsub(/\&apos;/,'&#39;') # IE bug
      html = html.gsub(/'/,'&#39;') # IE bug
#			html = html.gsub(/&/,'&amp;')

      code = Document.new(html, {:respect_whitespace =>:all}).root
      code.name = 'code'
      code.attributes['class'] = lang
      code.attributes['lang'] = lang

      pre = Element.new 'pre'
      pre << code
      pre
    rescue LoadError => e
      maruku_error "Could not load package 'syntax'.\n"+
        "Please install it, for example using 'gem install syntax'."
      to_html_code_using_pre(source)
    rescue Object => e
      maruku_error"Error while using the syntax library for code:\n#{source.inspect}"+
       "Lang is #{lang} object is: \n"+
        self.inspect +
      "\nException: #{e.class}: #{e.message}\n\t#{e.backtrace.join("\n\t")}"

      tell_user("Using normal PRE because the syntax library did not work.")
      to_html_code_using_pre(source)
    end
  else
    to_html_code_using_pre(source)
  end

  color = get_setting(:code_background_color)
  if color != Globals[:code_background_color]
    element.attributes['style'] = "background-color: #{color};"
  end
  add_ws element
end

#to_html_code_using_pre(source) ⇒ Object 



662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 662

def to_html_code_using_pre(source)
  pre = create_html_element  'pre'
  code = Element.new 'code', pre
  s = source

#		s  = s.gsub(/&/,'&amp;')
  s = Text.normalize(s)
  s  = s.gsub(/\&apos;/,'&#39;') # IE bug
  s  = s.gsub(/'/,'&#39;') # IE bug

  if get_setting(:code_show_spaces)
    # 187 = raquo
    # 160 = nbsp
    # 172 = not
    s.gsub!(/\t/,'&#187;'+'&#160;'*3)
    s.gsub!(/ /,'&#172;')
  end

  text = Text.new(s, respect_ws=true, parent=nil, raw=true )

  if lang = self.attributes[:lang]
    code.attributes['lang'] = lang
    code.attributes['class'] = lang
  end
  code << text
  pre
end

#to_html_definition ⇒ Object 



919
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 919

def to_html_definition() children_to_html end

#to_html_definition_data ⇒ Object 



921
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 921

def to_html_definition_data() add_ws wrap_as_element('dd') end

#to_html_definition_list ⇒ Object

Definition lists ###



918
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 918

def to_html_definition_list() add_ws wrap_as_element('dl') end

#to_html_definition_term ⇒ Object 



920
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 920

def to_html_definition_term() add_ws wrap_as_element('dt') end

#to_html_document(context = {}) ⇒ Object

Render to a complete HTML document (returns a string)



85
86
87
88
89
90
91
92
93
94
95
96
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 85

def to_html_document(context={})
  indent = context[:indent] || -1
  ie_hack = context[:ie_hack] ||true
  doc = to_html_document_tree
  xml  = ""

  # REXML Bug? if indent!=-1 whitespace is not respected for 'pre' elements
  # containing code.
  doc.write(xml,indent,transitive=true,ie_hack);

  Xhtml11_mathml2_svg11 + xml
end

#to_html_document_tree(context = {}) ⇒ Object

Render to a complete HTML document (returns a REXML document tree)



199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 199

def to_html_document_tree(context={})
  Thread.current['maruku_context'] = context
  doc = Document.new(nil,{:respect_whitespace =>:all})
#	doc << XMLDecl.new

  root = Element.new('html', doc)
  root.add_namespace('http://www.w3.org/1999/xhtml')
  root.add_namespace('svg', "http://www.w3.org/2000/svg" )
  lang = self.attributes[:lang] || 'en'
  root.attributes['xml:lang'] = lang

  root << xml_newline
  head = Element.new 'head', root

    #<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
    me = Element.new 'meta', head
    me.attributes['http-equiv'] = 'Content-type'
#			me.attributes['content'] = 'text/html;charset=utf-8'
    me.attributes['content'] = 'application/xhtml+xml;charset=utf-8'

    METAS.each do |m|
      if value = self.attributes[m.to_sym]
        meta = Element.new 'meta', head
        meta.attributes['name'] = m
        meta.attributes['content'] = value.to_s
      end
    end


    self.attributes.each do |k,v|
      if k.to_s =~ /\Ameta-(.*)\Z/
        meta = Element.new 'meta', head
        meta.attributes['name'] = $1
        meta.attributes['content'] = v.to_s
      end
    end



    # Create title element
    doc_title = self.attributes[:title] || self.attributes[:subject] || ""
    title = Element.new 'title', head
      title << Text.new(doc_title)

    add_css_to(head)


  root << xml_newline

  body = Element.new 'body'

    children_to_html.each do |e|
      body << e
    end

    # render footnotes
    if @doc.footnotes_order.size > 0
      body << render_footnotes
    end

    # When we are rendering a whole document, we add a signature
    # at the bottom.
    if get_setting(:maruku_signature)
      body << maruku_html_signature
    end

  root << body

  doc
end

#to_html_email_address ⇒ Object 



788
789
790
791
792
793
794
795
796
797
798
799
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 788

def to_html_email_address
  email = self.email
  a = create_html_element 'a'
    #a.attributes['href'] = Text.new("mailto:"+obfuscate(email),false,nil,true)
    #a.attributes.add Attribute.new('href',Text.new(
    #"mailto:"+obfuscate(email),false,nil,true))
    # Sorry, for the moment it doesn't work
    a.attributes['href'] = "mailto:#{email}"

    a << Text.new(obfuscate(email),false,nil,true)
  a
end

#to_html_emphasis ⇒ Object 



480
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 480

def to_html_emphasis;  wrap_as_element('em')               end

#to_html_entity ⇒ Object 



966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 966

def to_html_entity
  MaRuKu::Out::Latex.need_entity_table

  entity_name = self.entity_name

  if (e = MaRuKu::Out::Latex::ENTITY_TABLE[entity_name]) && e.html_num
    entity_name = e.html_num
  end

  # Fix for Internet Explorer
  if entity_name == 'apos'
    entity_name = 39
  end


  if entity_name.kind_of? Fixnum
#			Entity.new(entity_name)
    Text.new('&#%d;' % [entity_name],  false, nil, true)
  else
    Text.new('&%s;' % [entity_name],  false, nil, true)
  end
end

#to_html_footnote_reference ⇒ Object 



885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 885

def to_html_footnote_reference
  id = self.footnote_id

  # save the order of used footnotes
  order = @doc.footnotes_order

  if order.include? id
    # footnote has already been used
    return []
  end

  if not @doc.footnotes[id]
    return []
  end

  # take next number
  order << id

  #num = order.size;
  num = order.index(id) + 1

  sup = Element.new 'sup'
  sup.attributes['id'] = "#{get_setting(:doc_prefix)}fnref:#{num}"
    a = Element.new 'a'
    a << Text.new(num.to_s)
    a.attributes['href'] = "\##{get_setting(:doc_prefix)}fn:#{num}"
    a.attributes['rel'] = 'footnote'
  sup << a

  sup
end

#to_html_head_cell ⇒ Object 



957
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 957

def to_html_head_cell; wrap_as_element('th') end

#to_html_header ⇒ Object 



528
529
530
531
532
533
534
535
536
537
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 528

def to_html_header
  element_name = "h#{self.level}"
  h = wrap_as_element element_name

  if span = render_section_number
    h.insert_before(h.children.first, span)
  end
  #puts "h>>> #{h}"
  add_ws h
end

#to_html_header_orig ⇒ Object 



518
519
520
521
522
523
524
525
526
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 518

def to_html_header_orig
  element_name = "h#{self.level}"
  h = wrap_as_element element_name

  if span = render_section_number
    h.insert_before(h.children.first, span)
  end
  add_ws h
end

#to_html_hrule ⇒ Object 



349
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 349

def to_html_hrule; create_html_element 'hr' end

#to_html_im_image ⇒ Object 



821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 821

def to_html_im_image
  if not url = self.url
    maruku_error "Image with no url: #{self.inspect}"
    tell_user "Could not create image with ref_id = #{id.inspect};"+
      " Using SPAN element as replacement."
    return wrap_as_element('span')
  end
  if url_resolver = (Thread.current['maruku_context'] || {})[:img_url_resolver]
    url = url_resolver.call(url)
  end

  title = self.title
  a =  create_html_element 'img'
  a.attributes['src'] = url.to_s
  a.attributes['alt'] = children_to_s
  return a
end

#to_html_im_link ⇒ Object 



760
761
762
763
764
765
766
767
768
769
770
771
772
773
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 760

def to_html_im_link
  if url = self.url
    title = self.title
    a =  wrap_as_element 'a'
    a.attributes['href'] = url
    a.attributes['xhref'] = url # BUG ALERT: Strange behaviour of jquery's replaceWith related to href
    a.attributes['title'] = title if title
    return a
  else
    maruku_error"Could not find url in #{self.inspect}"
    tell_user "Not creating a link for ref_id = #{id.inspect}."
    return wrap_as_element('span')
  end
end

#to_html_image ⇒ Object

Images



803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 803

def to_html_image
  a =  create_html_element 'img'
  id = self.ref_id
  if ref = @doc.refs[id]
    url = ref[:url]
    title = ref[:title]
    a.attributes['src'] = url.to_s
    a.attributes['alt'] = children_to_s
  else
    maruku_error"Could not find id = #{id.inspect} for\n #{self.inspect}"
    tell_user "Could not create image with ref_id = #{id.inspect};"+
       " Using SPAN element as replacement."
      return wrap_as_element('span')
  end
  raise "IMAGE: #{url}"
  return a
end

#to_html_immediate_link ⇒ Object 



730
731
732
733
734
735
736
737
738
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 730

def to_html_immediate_link
  a =  create_html_element 'a'
  url = self.url
  text = url.gsub(/^mailto:/,'') # don't show mailto
  a << Text.new(text)
  a.attributes['href'] = url
  add_class_to_link(a)
  a
end

#to_html_inline_code ⇒ Object 



690
691
692
693
694
695
696
697
698
699
700
701
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 690

def to_html_inline_code;
  pre =  create_html_element 'code'
    source = self.raw_code
    pre << source2html(source)

    color = get_setting(:code_background_color)
    if color != Globals[:code_background_color]
      pre.attributes['style'] = "background-color: #{color};"+(pre.attributes['style']||"")
    end

  pre
end

#to_html_li ⇒ Object 



476
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 476

def to_html_li;        add_ws wrap_as_element('li')        end

#to_html_li_span ⇒ Object 



477
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 477

def to_html_li_span;   add_ws wrap_as_element('li')        end

#to_html_linebreak ⇒ Object 



350
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 350

def to_html_linebreak; Element.new 'br' end

#to_html_link ⇒ Object 



740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 740

def to_html_link
  a =  wrap_as_element 'a'
  id = self.ref_id

  if ref = @doc.refs[id]
    url = ref[:url]
    title = ref[:title]
    a.attributes['href'] = url if url
    a.attributes['title'] = title if title
  else
    maruku_error "Could not find ref_id = #{id.inspect} for #{self.inspect}\n"+
      "Available refs are #{@doc.refs.keys.inspect}"
    tell_user "Not creating a link for ref_id = #{id.inspect}."
    return wrap_as_element('span')
  end

#		add_class_to_link(a)
  return a
end

#to_html_ol ⇒ Object 



475
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 475

def to_html_ol;        add_ws wrap_as_element('ol')        end

#to_html_paragraph ⇒ Object 



461
462
463
464
465
466
467
468
469
470
471
472
473
474
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 461

def to_html_paragraph
  #add_ws wrap_as_element('p')
  dt = Element.new 'p'
  dt.attributes['class'] = 'drop-target'
  dt.attributes['line_no'] = Thread.current['maruku.line_no']
  dt.attributes['delegate'] = 'plan'  # should most likely go into the js column handler
  dt.text = ' ';
  p = wrap_as_element('p')
  p.attributes['class'] = 'content'
  p.attributes['line_no'] = Thread.current['maruku.line_no']
  p.attributes['delegate'] = 'plan'  # should most likely go into the js column handler
  #[Text.new("\n"), p, dt, Text.new("\n")]
  [Text.new("\n"), p, Text.new("\n")]
end

#to_html_quote ⇒ Object 



478
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 478

def to_html_quote;     add_ws wrap_as_element('blockquote')  end

#to_html_raw_html ⇒ Object

Attribute: filter_html Scope: document

If true, raw HTML is discarded from the output.



847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 847

def to_html_raw_html
  return [] if get_setting(:filter_html)

  raw_html = self.raw_html
  if rexml_doc = @parsed_html
    root = rexml_doc.root
    if root.nil?
      s = "Bug in REXML: root() of Document is nil: \n#{rexml_doc.inspect}\n"+
      "Raw HTML:\n#{raw_html.inspect}"
      maruku_error s
      tell_user 'The REXML version you have has a bug, omitting HTML'
      div = Element.new 'div'
      #div << Text.new(s)
      return div
    end

    # copies the @children array (FIXME is it deep?)
    elements =  root.to_a
    return elements
  else # invalid
    # Creates red box with offending HTML
    tell_user "Wrapping bad html in a PRE with class 'markdown-html-error'\n"+
      add_tabs(raw_html,1,'|')
    pre = Element.new('pre')
    pre.attributes['style'] = 'border: solid 3px red; background-color: pink'
    pre.attributes['class'] = 'markdown-html-error'
    pre << Text.new("REXML could not parse this XML/HTML: \n#{raw_html}", true)
    return pre
  end
end

#to_html_ref_definition ⇒ Object 



1061
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 1061

def to_html_ref_definition; [] end

#to_html_strong ⇒ Object 



479
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 479

def to_html_strong;    wrap_as_element('strong')           end

#to_html_table ⇒ Object

FIXME: Ugly code



924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 924

def to_html_table
  align = self.align
  num_columns = align.size

  head = @children.slice(0, num_columns)
  rows = []
  i = num_columns
  while i<@children.size
    rows << @children.slice(i, num_columns)
    i += num_columns
  end

  table = create_html_element 'table'
    thead = Element.new 'thead'
    tr = Element.new 'tr'
      array_to_html(head).each do |x| tr<<x end
    thead << tr
    table << thead

    tbody = Element.new 'tbody'
    rows.each do |row|
      tr = Element.new 'tr'
        array_to_html(row).each_with_index do |x,i|
          x.attributes['style'] ="text-align: #{align[i].to_s};"
          tr<<x
        end

      tbody << tr << Text.new("\n")
    end
    table << tbody
  table
end

#to_html_tree(context = {}) ⇒ Object

Render to an HTML fragment (returns a REXML document tree)



163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 163

def to_html_tree(context={})
  Thread.current['maruku_context'] = context
  div = Element.new 'div'
    div.attributes['class'] = 'maruku_wrapper_div'
      children_to_html.each do |e|
            div << e
      end

      # render footnotes
      if @doc.footnotes_order.size > 0
            div << render_footnotes
      end

   doc = Document.new(nil,{:respect_whitespace =>:all})
   doc << div
end

#to_html_ul ⇒ Object 



450
451
452
453
454
455
456
457
458
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 450

def to_html_ul
  if @attributes[:toc]
    # render toc
    html_toc = @doc.toc.to_html
    return html_toc
  else
    add_ws  wrap_as_element('ul')
  end
end

#to_html_xml_instr ⇒ Object 



989
990
991
992
993
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 989

def to_html_xml_instr
  target = self.target || ''
  code = self.code || ''
  REXML::Instruction.new(target, code)
end

#to_latex_ref_definition ⇒ Object 



1062
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 1062

def to_latex_ref_definition; [] end

#wrap_as_element(name, attributes_to_copy = []) ⇒ Object

renders children as html and wraps into an element of given name

Sets ‘id’ if meta is set



355
356
357
358
359
360
361
362
363
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 355

def wrap_as_element(name, attributes_to_copy=[])
  m = create_html_element(name, attributes_to_copy)
  #puts "MMM>>> #{m} - #{attributes_to_copy}"
  children_to_html.each do |e| m << e; end

#			m << Comment.new( "{"+self.al.to_md+"}") if not self.al.empty?
#			m << Comment.new( @attributes.inspect) if not @attributes.empty?
  m
end

#xml_newline ⇒ Object 



120
 
# File 'lib/omf-web/widget/text/maruku/output/to_html.rb', line 120

def xml_newline() Text.new("\n") end