coradoc 1.0.0 → 1.1.1

data/lib/coradoc/parser/asciidoc/block.rb

@@ -0,0 +1,82 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Block
+
+        def block
+          sidebar_block |
+          example_block |
+          source_block |
+          quote_block |
+          pass_block
+        end
+
+        def source_block
+          block_style("-", 2)
+        end
+
+        def pass_block
+          block_style("+", 4, :pass)
+        end
+
+        def source_block
+          block_style("-", 2)
+        end
+
+        def quote_block
+          block_style("_")
+        end
+
+        def block_content(n_deep = 2)
+          c = block_image |
+            list |
+            text_line |
+            empty_line.as(:line_break)
+          c = c | block_content(n_deep - 1) if (n_deep > 0)
+          c.repeat(1)
+        end
+
+        def sidebar_block
+          block_style("*")
+        end
+
+        def example_block
+          block_style("=")
+        end
+
+        def block_title
+          match('^\\.') >> space.absent? >> text.as(:title) >> newline
+        end
+
+        def block_type(type)
+          (match('^\[') >> str("[").absent? >>
+            str(type).as(:type) >>
+            str("]")) | 
+          (match('^\[') >> keyword.as(:type) >> str("]")) >> newline
+        end
+
+        def block_id
+          (match('^\[') >> str("[") >> str('[').absent? >> keyword.as(:id) >> str("]]") |
+            str("[#") >> keyword.as(:id) >> str("]")) >> newline
+        end
+
+        def block_style(delimiter = "*", repeater = 4, type = nil)
+          block_id.maybe >>
+          block_title.maybe >>
+            newline.maybe >>
+            (attribute_list >> newline ).maybe >>
+            block_id.maybe >>
+            (attribute_list >> newline ).maybe >>
+            str(delimiter).repeat(repeater).as(:delimiter) >> newline >>
+            if type == :pass
+              (text_line | empty_line.as(:line_break)).repeat(1).as(:lines)
+            else
+              block_content.as(:lines)
+            end >>
+            str(delimiter).repeat(repeater) >> newline
+        end
+
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/citation.rb

@@ -0,0 +1,48 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Citation
+        def xref_anchor
+          match('[^,>]').repeat(1).as(:href_arg).repeat(1,1)
+        end
+
+        def xref_str
+          match('[^,>]').repeat(1).as(:text)
+        end
+
+        def xref_arg
+          (str('section') | str('paragraph') | str('clause') | str('annex') | str('table')).as(:key) >>
+          match('[ =]').as(:delimiter) >>
+          match('[^,>=]').repeat(1).as(:value)
+        end
+
+        def cross_reference
+          str('<<') >> xref_anchor >>
+          ( (str(',') >> xref_arg).repeat(1) |
+            (str(',') >> xref_str).repeat(1)
+            ).maybe >>
+            str('>>')
+        end
+
+        def citation_xref
+          cross_reference.as(:cross_reference) >> newline |
+          cross_reference.as(:cross_reference) >>
+            (text_line.repeat(1)
+            ).as(:comment).maybe
+        end
+
+        def citation_noxref
+          (text_line.repeat(1)
+          ).as(:comment)
+        end
+
+        def citation
+          match('^[\[]') >> str(".source]\n") >>
+          ( citation_xref |
+            citation_noxref
+          ).as(:citation)
+        end
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/content.rb

@@ -2,66 +2,6 @@ module Coradoc
   module Parser
     module Asciidoc
       module Content
-        include Coradoc::Parser::Asciidoc::Base
-
-        def paragraph
-          paragraph_meta.as(:meta).maybe >>
-            text_line.repeat(1).as(:lines)
-        end
-
-        def glossaries
-          glossary.repeat(1)
-        end
-
-        # List
-        def list
-          unordered_list.as(:unordered) |
-            definition_list.as(:definition) | ordered_list.as(:ordered)
-        end
-
-        def contents
-          (
-            block.as(:block) |
-            list.as(:list) |
-            table.as(:table) |
-            highlight.as(:highlight) |
-            glossaries.as(:glossaries) |
-            paragraph.as(:paragraph) | empty_line
-          ).repeat(1)
-        end
-
-        def block
-          sidebar_block | example_block | source_block | quote_block
-        end
-
-        def source_block
-          block_style("-", 2)
-        end
-
-        def quote_block
-          block_style("_")
-        end
-
-        def sidebar_block
-          block_style("*")
-        end
-
-        def example_block
-          block_style("=")
-        end
-
-        def block_style(delimiter = "*", repeater = 4)
-          block_title.maybe >>
-            newline.maybe >>
-            block_type.maybe >>
-            str(delimiter).repeat(repeater).as(:delimiter) >> newline >>
-            text_line.repeat(1).as(:lines) >>
-            str(delimiter).repeat(repeater) >> newline
-        end
-
-        def block_type
-          str("[") >> keyword.as(:type) >> str("]") >> newline
-        end
 
         def highlight
           text_id >> newline >>
@@ -76,27 +16,6 @@ module Coradoc
           str("#") >> words.as(:text) >> str("#")
         end
 
-        # Table
-        def table
-          block_title >>
-            str("|===") >> line_ending >>
-            table_row.repeat(1).as(:rows) >>
-            str("|===") >> line_ending
-        end
-
-        def table_row
-          (literal_space? >> str("|") >> (cell_content | empty_cell_content))
-            .repeat(1).as(:cols) >> line_ending
-        end
-
-        def empty_cell_content
-          str("|").absent? >> literal_space.as(:text)
-        end
-
-        def cell_content
-          str("|").absent? >> literal_space? >> rich_texts.as(:text)
-        end
-
         def literal_space
           (match[" "] | match[' \t']).repeat(1)
         end
@@ -106,63 +25,39 @@ module Coradoc
           literal_space.maybe
         end
 
-        def block_title
-          str(".") >> text.as(:title) >> line_ending
-        end
-
         # Text
-        def text_line
-          (asciidoc_char_with_id.absent? | text_id) >> literal_space? >>
-            text.as(:text) >> line_ending.as(:break)
+        def text_line(many_breaks = false)
+            tl = (asciidoc_char_with_id.absent? | text_id) >> literal_space? >>
+            text.as(:text)
+            if many_breaks
+              tl >> line_ending.repeat(1).as(:line_break)
+            else
+              tl >> line_ending.as(:line_break)
+            end
         end
 
         def asciidoc_char
-          match("^[*_:=-]")
+          match('^[*_:=\-+]')
         end
 
         def asciidoc_char_with_id
-          asciidoc_char | str("[#") | str("[[")
+          asciidoc_char | str('[#') | str('[[')
         end
 
         def text_id
-          str("[[") >> keyword.as(:id) >> str("]]") |
+          str("[[") >> str('[').absent? >> keyword.as(:id) >> str("]]") |
             str("[#") >> keyword.as(:id) >> str("]")
         end
 
-        def paragraph_meta
-          str("[") >>
-            keyword.as(:key) >> str("=") >>
-            word.as(:value) >> str("]") >> newline
-        end
-
         def glossary
-          keyword.as(:key) >> str("::") >> space? >>
-            text.as(:value) >> line_ending.as(:break)
+          keyword.as(:key) >> str("::") >> (str(" ") | newline) >>
+            text.as(:value) >> line_ending.as(:line_break)
         end
 
-        def ordered_list
-          olist_item.repeat(1)
-        end
-
-        def unordered_list
-          (ulist_item >> newline.maybe).repeat(1)
-        end
-
-        def definition_list
-          dlist_item.repeat(1)
-        end
-
-        def olist_item
-          match("\.") >> space >> text_line
-        end
-
-        def ulist_item
-          match("\\*") >> space >> text_line
+        def glossaries
+          glossary.repeat(1)
         end
 
-        def dlist_item
-          str("term") >> space >> digits >> str("::") >> space >> text_line
-        end
       end
     end
   end

data/lib/coradoc/parser/asciidoc/document_attributes.rb

@@ -2,16 +2,23 @@ module Coradoc
   module Parser
     module Asciidoc
       module DocumentAttributes
-        include Coradoc::Parser::Asciidoc::Base
 
-        # DocumentAttributes
-        def document_attributess
-          document_attributes.repeat(1)
+        def attribute_name
+          match("[a-zA-Z0-9_-]").repeat(1)
+        end
+
+        def attribute_value
+          text | str("") >> str("\n").absent?
         end
 
         def document_attributes
+          (document_attribute.repeat(1)
+            ).as(:document_attributes)
+        end
+
+        def document_attribute
           str(":") >> attribute_name.as(:key) >> str(":") >>
-            space? >> attribute_value.as(:value) >> line_ending
+            space? >> (attribute_value | str("")).as(:value) >> line_ending
         end
       end
     end

data/lib/coradoc/parser/asciidoc/header.rb

@@ -1,10 +1,7 @@
-require_relative "base"
-
 module Coradoc
   module Parser
     module Asciidoc
       module Header
-        include Coradoc::Parser::Asciidoc::Base
 
         def header
           header_title >>
@@ -13,7 +10,7 @@ module Coradoc
         end
 
         def header_title
-          match("=") >> space? >> text.as(:title) >> newline
+          match("^=") >> str('=').absent? >> space? >> text.as(:title) >> newline
         end
 
         def author

data/lib/coradoc/parser/asciidoc/inline.rb

@@ -0,0 +1,72 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Inline
+
+        def bold_constrained
+          (str('*') >>
+            match("[^*]").repeat(1).as(:text).repeat(1,1) >>
+             str('*')  >> str('*').absent?
+            ).as(:bold_constrained)
+        end
+
+        def bold_unconstrained
+          (str('**') >>
+            match("[^*\n]").repeat(1).as(:text).repeat(1,1) >>
+             str('**')
+            ).as(:bold_unconstrained)
+        end
+
+        def highlight_constrained
+          (str('#') >>
+            match('[^#]').repeat(1).as(:text).repeat(1,1) >>
+             str('#') >> str('#').absent?
+            ).as(:highlight_constrained)
+        end
+
+        def highlight_unconstrained
+          (str('##') >>
+            match('[^#]').repeat(1).as(:text).repeat(1,1) >>
+             str('##')
+            ).as(:highlight_unconstrained)
+        end
+
+        def italic_constrained
+          (str('_') >>
+            match('[^_]').repeat(1).as(:text).repeat(1,1) >>
+             str('_') >> str('_').absent?
+            ).as(:italic_constrained)
+        end
+
+        def italic_unconstrained
+          (str('__') >>
+            match('[^_]').repeat(1).as(:text).repeat(1,1) >>
+             str('__')
+            ).as(:italic_unconstrained)
+        end
+
+        def text_unformatted
+          (admonition_line.absent? >>
+          (cross_reference.absent? |
+            bold_unconstrained.absent? |
+            bold_constrained.absent? |
+            highlight_unconstrained.absent? |
+            highlight_constrained.absent? |
+            italic_unconstrained.absent? |
+            italic_constrained.absent?) >>
+            match('[^\n]').repeat(1)
+            )
+        end
+
+        def text_formatted
+           ((cross_reference |
+            bold_unconstrained | bold_constrained |
+            highlight_unconstrained | highlight_constrained |
+            italic_unconstrained | italic_constrained )|
+            text_unformatted).repeat(1)
+           
+        end
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/list.rb

@@ -0,0 +1,81 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module List
+
+        def list
+          (
+          unordered_list |
+             ordered_list # definition_list |
+            ).as(:list)
+        end
+
+        def ordered_list(nesting_level = 1)
+          attrs = (attribute_list >> newline).maybe
+          r = olist_item(nesting_level)
+          if nesting_level <= 8
+            r = r | ordered_list(nesting_level + 1)
+          end
+          attrs >> r.repeat(1).as(:ordered)
+        end
+
+        def unordered_list(nesting_level = 1)
+          attrs = (attribute_list >> newline).maybe
+          r = ulist_item(nesting_level)
+          if nesting_level <= 8
+            r = r | unordered_list(nesting_level + 1)
+          end
+          attrs >> r.repeat(1).as(:unordered)
+        end
+
+        def definition_list(delimiter = "::")
+          (attribute_list >> newline).maybe >>
+          dlist_item(delimiter).as(:definition_list).repeat(1) >>
+          dlist_item(delimiter).absent?
+        end
+
+        def olist_item(nesting_level = 1)
+          nl2 = nesting_level - 1
+          marker = match(/^\./)
+          marker = marker >>  str(".").repeat(nl2, nl2) if nl2 > 0
+          str("").as(:list_item) >> 
+          marker.as(:marker) >> str(".").absent? >>
+          match("\n").absent? >> space >> text_line(true)
+        end
+
+        def ulist_item(nesting_level = 1)
+          nl2 = nesting_level - 1
+          marker = match(/^\*/)
+          marker = marker >>  str("*").repeat(nl2, nl2) if nl2 > 0
+          str("").as(:list_item) >>
+          marker.as(:marker) >> str("*").absent? >>
+          str(' [[[').absent? >>
+          match("\n").absent? >> space >> text_line(true)
+        end
+
+        def dlist_delimiter
+          (str("::") | str(":::") | str("::::") | str(";;")
+            ).as(:delimiter)
+        end
+
+        def dlist_term(delimiter)
+          (match("[^\n:]").repeat(1) #>> empty_line.repeat(0)
+            ).as(:term) >> dlist_delimiter
+        end
+
+        def dlist_definition
+          (text #>> empty_line.repeat(0)
+            ).as(:definition) >> line_ending >> empty_line.repeat(0)
+        end
+
+        def dlist_item(delimiter)
+          (((dlist_term(delimiter).as(:terms).repeat(1) >> line_ending >>
+            empty_line.repeat(0)).repeat(1) >>
+            dlist_definition)  |
+            (dlist_term(delimiter).repeat(1,1).as(:terms) >> space >> dlist_definition)
+            ).as(:definition_list_item).repeat(1)
+        end
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/paragraph.rb

@@ -0,0 +1,33 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Paragraph
+
+        def paragraph_text_line
+          (asciidoc_char_with_id.absent? | text_id ) >>
+          literal_space? >>
+          (text_formatted.as(:text) # >>
+          ) | term | term2
+        end
+
+        def paragraph
+          ( block_id.maybe >>
+            block_title.maybe >>
+            (attribute_list >> newline).maybe >>
+            (paragraph_text_line.repeat(1,1) >> any.absent? |
+              (paragraph_text_line >> newline_single.as(:line_break)).repeat(1) >>
+              (paragraph_text_line.repeat(1,1)).repeat(0,1)
+            ).as(:lines) >>
+            newline.repeat(0)
+          ).as(:paragraph)
+        end
+
+        def paragraph_attributes
+          str("[") >>
+            keyword.as(:key) >> str("=") >>
+            word.as(:value) >> str("]") >> newline
+        end
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/section.rb

@@ -1,15 +1,34 @@
-require_relative "base"
-require_relative "content"
-
 module Coradoc
   module Parser
     module Asciidoc
       module Section
-        include Coradoc::Parser::Asciidoc::Base
-        include Coradoc::Parser::Asciidoc::Content
+
+        def contents
+          (
+            citation |
+            term | term2 |
+            bib_entry |
+            block_image |
+            tag |
+            comment_block |
+            comment_line |
+            include_directive |
+            admonition_line |
+            block.as(:block) |
+            table.as(:table) |
+            highlight.as(:highlight) |
+            glossaries.as(:glossaries) |
+            paragraph |
+            list |
+            empty_line.as(:line_break)
+          ).repeat(1)
+        end
 
         def section_block(level = 2)
+          return nil if level > 8
+          (attribute_list >> newline).maybe >>
           section_id.maybe >>
+          (attribute_list >> newline).maybe >>
             section_title(level).as(:title) >>
             contents.as(:contents).maybe
         end
@@ -23,37 +42,23 @@ module Coradoc
         # Heading
         def section_title(level = 2, max_level = 8)
           match("=").repeat(level, max_level).as(:level) >>
-            space? >> text.as(:text) >> endline.as(:break)
+            str('=').absent? >>
+            space? >> text.as(:text) >> endline.as(:line_break)
         end
 
         # section
-        def section
-          section_block >> second_level_section.repeat.maybe.as(:sections)
-        end
-
-        def sub_section(level)
-          newline.maybe >> section_block(level)
-        end
-
-        def second_level_section
-          sub_section(3) >> third_level_section.repeat.maybe.as(:sections)
+        def section(level = 2)
+          r = section_block(level) 
+          if level < 8
+            r = r >> section(level + 1).as(:section).repeat(0).as(:sections)
+          end
+          if level == 2
+            (r).as(:section)
+          else
+            r
+          end
         end
 
-        def third_level_section
-          sub_section(4) >> fourth_level_section.repeat.maybe.as(:sections)
-        end
-
-        def fourth_level_section
-          sub_section(5) >> fifth_level_section.repeat.maybe.as(:sections)
-        end
-
-        def fifth_level_section
-          sub_section(6) >> sixth_level_section.repeat.maybe.as(:sections)
-        end
-
-        def sixth_level_section
-          sub_section(7) >> sub_section(8).repeat.maybe.as(:sections)
-        end
       end
     end
   end

data/lib/coradoc/parser/asciidoc/table.rb

@@ -0,0 +1,32 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Table
+        # include Coradoc::Parser::Asciidoc::Base
+
+        def table
+          block_id.maybe >>
+          (attribute_list >> newline).maybe >>
+          block_title.maybe >>
+          (attribute_list >> newline).maybe >>
+            str("|===") >> line_ending >>
+            table_row.repeat(1).as(:rows) >>
+            str("|===") >> line_ending
+        end
+
+        def table_row
+          (literal_space? >> str("|") >> (cell_content | empty_cell_content))
+            .repeat(1).as(:cols) >> line_ending
+        end
+
+        def empty_cell_content
+          str("|").absent? >> literal_space.as(:text)
+        end
+
+        def cell_content
+          str("|").absent? >> literal_space? >> rich_texts.as(:text)
+        end
+      end
+    end
+  end
+end

data/lib/coradoc/parser/asciidoc/term.rb

@@ -0,0 +1,23 @@
+module Coradoc
+  module Parser
+    module Asciidoc
+      module Term
+        def term_type
+          (str("alt") | str("deprecated") | str("domain")).as(:term_type)
+        end
+
+        def term
+          term_type >> str(':[') >>
+          match('[^\]]').repeat(1).as(:term) >>
+          str("]") >> str("\n").repeat(1).as(:line_break)
+        end
+
+        def term2
+          match('^\[') >> term_type >> str(']#') >>
+          match('[^\#]').repeat(1).as(:term2) >> str('#') >>
+          str("\n").repeat(1).as(:line_break)
+        end
+      end
+    end
+  end
+end