dimus-biodiversity 0.0.18 → 0.5.1

data/lib/biodiversity/parser/scientific_name_dirty.rb

@@ -1,23 +1,227 @@
+# encoding: UTF-8
 module ScientificNameDirty
   include Treetop::Runtime
 
   def root
-    @root || :composite_scientific_name
+    @root || :root
   end
 
   include ScientificNameClean
 
-  def _nt_composite_scientific_name
+  def _nt_root
     start_index = index
-    if node_cache[:composite_scientific_name].has_key?(index)
-      cached = node_cache[:composite_scientific_name][index]
+    if node_cache[:root].has_key?(index)
+      cached = node_cache[:root][index]
       @index = cached.interval.end if cached
       return cached
     end
 
     r0 = super
 
-    node_cache[:composite_scientific_name][start_index] = r0
+    node_cache[:root][start_index] = r0
+
+    return r0
+  end
+
+  module Species0
+    def a
+      elements[0]
+    end
+
+    def space
+      elements[1]
+    end
+
+    def b
+      elements[2]
+    end
+  end
+
+  module Species1
+    def value
+      a.value + " " + b.value
+    end
+  
+    def canonical
+      a.canonical
+    end
+  
+    def pos
+      a.pos.merge(b.pos)
+    end
+  
+    def details
+      {:species => a.details[:species].merge(b.details)}
+    end
+  end
+
+  def _nt_species
+    start_index = index
+    if node_cache[:species].has_key?(index)
+      cached = node_cache[:species][index]
+      @index = cached.interval.end if cached
+      return cached
+    end
+
+    i0 = index
+    i1, s1 = index, []
+    r2 = _nt_species_epitheton
+    s1 << r2
+    if r2
+      r3 = _nt_space
+      s1 << r3
+      if r3
+        r4 = _nt_year
+        s1 << r4
+      end
+    end
+    if s1.last
+      r1 = instantiate_node(SyntaxNode,input, i1...index, s1)
+      r1.extend(Species0)
+      r1.extend(Species1)
+    else
+      self.index = i1
+      r1 = nil
+    end
+    if r1
+      r0 = r1
+    else
+      r5 = super
+      if r5
+        r0 = r5
+      else
+        self.index = i0
+        r0 = nil
+      end
+    end
+
+    node_cache[:species][start_index] = r0
+
+    return r0
+  end
+
+  module RightParen0
+    def space
+      elements[1]
+    end
+
+  end
+
+  def _nt_right_paren
+    start_index = index
+    if node_cache[:right_paren].has_key?(index)
+      cached = node_cache[:right_paren][index]
+      @index = cached.interval.end if cached
+      return cached
+    end
+
+    i0 = index
+    i1, s1 = index, []
+    if input.index(")", index) == index
+      r2 = instantiate_node(SyntaxNode,input, index...(index + 1))
+      @index += 1
+    else
+      terminal_parse_failure(")")
+      r2 = nil
+    end
+    s1 << r2
+    if r2
+      r3 = _nt_space
+      s1 << r3
+      if r3
+        if input.index(")", index) == index
+          r4 = instantiate_node(SyntaxNode,input, index...(index + 1))
+          @index += 1
+        else
+          terminal_parse_failure(")")
+          r4 = nil
+        end
+        s1 << r4
+      end
+    end
+    if s1.last
+      r1 = instantiate_node(SyntaxNode,input, i1...index, s1)
+      r1.extend(RightParen0)
+    else
+      self.index = i1
+      r1 = nil
+    end
+    if r1
+      r0 = r1
+    else
+      r5 = super
+      if r5
+        r0 = r5
+      else
+        self.index = i0
+        r0 = nil
+      end
+    end
+
+    node_cache[:right_paren][start_index] = r0
+
+    return r0
+  end
+
+  module LeftParen0
+    def space
+      elements[1]
+    end
+
+  end
+
+  def _nt_left_paren
+    start_index = index
+    if node_cache[:left_paren].has_key?(index)
+      cached = node_cache[:left_paren][index]
+      @index = cached.interval.end if cached
+      return cached
+    end
+
+    i0 = index
+    i1, s1 = index, []
+    if input.index("(", index) == index
+      r2 = instantiate_node(SyntaxNode,input, index...(index + 1))
+      @index += 1
+    else
+      terminal_parse_failure("(")
+      r2 = nil
+    end
+    s1 << r2
+    if r2
+      r3 = _nt_space
+      s1 << r3
+      if r3
+        if input.index("(", index) == index
+          r4 = instantiate_node(SyntaxNode,input, index...(index + 1))
+          @index += 1
+        else
+          terminal_parse_failure("(")
+          r4 = nil
+        end
+        s1 << r4
+      end
+    end
+    if s1.last
+      r1 = instantiate_node(SyntaxNode,input, i1...index, s1)
+      r1.extend(LeftParen0)
+    else
+      self.index = i1
+      r1 = nil
+    end
+    if r1
+      r0 = r1
+    else
+      r5 = super
+      if r5
+        r0 = r5
+      else
+        self.index = i0
+        r0 = nil
+      end
+    end
+
+    node_cache[:left_paren][start_index] = r0
 
     return r0
   end
@@ -37,15 +241,16 @@ module ScientificNameDirty
   end
 
   module Year1
-
-    def value
-      a.text_value + " " + b.text_value
-    end
-    def pos
-      {a.interval.begin => ['year', a.interval.end]}.merge(b.pos)
-    end
-    def details
-      {:ambiguous_year => value}
+    def value
+      a.value + " " + b.value
+    end
+    
+    def pos
+      a.pos.merge(b.pos)
+    end
+    
+    def details
+      {:year => a.value, :approximate_year => b.value}
     end
   end
 
@@ -54,23 +259,26 @@ module ScientificNameDirty
       elements[0]
     end
 
-    def page_number
+    def space
       elements[1]
     end
+
+    def page_number
+      elements[2]
+    end
   end
 
   module Year3
-
-    def value
-      a.text_value
-    end
-    
-    def pos
-      {a.interval.begin => ['year', a.interval.end]}
-    end
-    
-    def details
-      {:year => value}
+    def value
+      a.text_value
+    end
+    
+    def pos
+      {a.interval.begin => ['year', a.interval.end]}
+    end
+    
+    def details
+      {:year => value}
     end
   end
 
@@ -84,33 +292,14 @@ module ScientificNameDirty
 
     i0 = index
     i1, s1 = index, []
-    s2, i2 = [], index
-    loop do
-      if input.index(Regexp.new('[\\d]'), index) == index
-        r3 = instantiate_node(SyntaxNode,input, index...(index + 1))
-        @index += 1
-      else
-        r3 = nil
-      end
-      if r3
-        s2 << r3
-      else
-        break
-      end
-    end
-    if s2.empty?
-      self.index = i2
-      r2 = nil
-    else
-      r2 = instantiate_node(SyntaxNode,input, i2...index, s2)
-    end
+    r2 = _nt_year_number
     s1 << r2
     if r2
-      r4 = _nt_space
-      s1 << r4
-      if r4
-        r5 = _nt_approximate_year
-        s1 << r5
+      r3 = _nt_space
+      s1 << r3
+      if r3
+        r4 = _nt_approximate_year
+        s1 << r4
       end
     end
     if s1.last
@@ -124,54 +313,39 @@ module ScientificNameDirty
     if r1
       r0 = r1
     else
-      i6, s6 = index, []
-      s7, i7 = [], index
-      loop do
-        if input.index(Regexp.new('[\\d]'), index) == index
-          r8 = instantiate_node(SyntaxNode,input, index...(index + 1))
-          @index += 1
-        else
-          r8 = nil
-        end
-        if r8
-          s7 << r8
-        else
-          break
+      i5, s5 = index, []
+      r6 = _nt_year_number
+      s5 << r6
+      if r6
+        r7 = _nt_space
+        s5 << r7
+        if r7
+          r8 = _nt_page_number
+          s5 << r8
         end
       end
-      if s7.empty?
-        self.index = i7
-        r7 = nil
-      else
-        r7 = instantiate_node(SyntaxNode,input, i7...index, s7)
-      end
-      s6 << r7
-      if r7
-        r9 = _nt_page_number
-        s6 << r9
-      end
-      if s6.last
-        r6 = instantiate_node(SyntaxNode,input, i6...index, s6)
-        r6.extend(Year2)
-        r6.extend(Year3)
+      if s5.last
+        r5 = instantiate_node(SyntaxNode,input, i5...index, s5)
+        r5.extend(Year2)
+        r5.extend(Year3)
       else
-        self.index = i6
-        r6 = nil
+        self.index = i5
+        r5 = nil
       end
-      if r6
-        r0 = r6
+      if r5
+        r0 = r5
       else
-        r10 = _nt_double_year
-        if r10
-          r0 = r10
+        r9 = _nt_approximate_year
+        if r9
+          r0 = r9
         else
-          r11 = _nt_approximate_year
-          if r11
-            r0 = r11
+          r10 = _nt_double_year
+          if r10
+            r0 = r10
           else
-            r12 = super
-            if r12
-              r0 = r12
+            r11 = super
+            if r11
+              r0 = r11
             else
               self.index = i0
               r0 = nil
@@ -187,9 +361,6 @@ module ScientificNameDirty
   end
 
   module ApproximateYear0
-  end
-
-  module ApproximateYear1
     def space
       elements[1]
     end
@@ -204,18 +375,17 @@ module ScientificNameDirty
 
   end
 
-  module ApproximateYear2
-
-    def value
-     "(" + a.text_value + ")"
-    end
-    
-    def pos
-      {a.interval.begin => ['year', a.interval.end]}
-    end
-    
-    def details
-      {:approximate_year => value}
+  module ApproximateYear1
+    def value
+     "(" + a.text_value + ")"
+    end
+    
+    def pos
+      {a.interval.begin => ['year', a.interval.end]}
+    end
+    
+    def details
+      {:approximate_year => value}
     end
   end
 
@@ -240,97 +410,42 @@ module ScientificNameDirty
       r2 = _nt_space
       s0 << r2
       if r2
-        i3, s3 = index, []
-        if input.index(Regexp.new('[\\d]'), index) == index
-          r4 = instantiate_node(SyntaxNode,input, index...(index + 1))
-          @index += 1
-        else
-          r4 = nil
-        end
-        s3 << r4
-        if r4
-          if input.index(Regexp.new('[\\d]'), index) == index
-            r5 = instantiate_node(SyntaxNode,input, index...(index + 1))
-            @index += 1
-          else
-            r5 = nil
-          end
-          s3 << r5
-          if r5
-            if input.index(Regexp.new('[\\d]'), index) == index
-              r6 = instantiate_node(SyntaxNode,input, index...(index + 1))
-              @index += 1
-            else
-              r6 = nil
-            end
-            s3 << r6
-            if r6
-              s7, i7 = [], index
-              loop do
-                if input.index(Regexp.new('[\\d\\?]'), index) == index
-                  r8 = instantiate_node(SyntaxNode,input, index...(index + 1))
-                  @index += 1
-                else
-                  r8 = nil
-                end
-                if r8
-                  s7 << r8
-                else
-                  break
-                end
-              end
-              if s7.empty?
-                self.index = i7
-                r7 = nil
-              else
-                r7 = instantiate_node(SyntaxNode,input, i7...index, s7)
-              end
-              s3 << r7
-            end
-          end
-        end
-        if s3.last
-          r3 = instantiate_node(SyntaxNode,input, i3...index, s3)
-          r3.extend(ApproximateYear0)
-        else
-          self.index = i3
-          r3 = nil
-        end
+        r3 = _nt_year_number
         s0 << r3
         if r3
-          r9 = _nt_space
-          s0 << r9
-          if r9
-            s10, i10 = [], index
+          r4 = _nt_space
+          s0 << r4
+          if r4
+            s5, i5 = [], index
             loop do
               if input.index("]", index) == index
-                r11 = instantiate_node(SyntaxNode,input, index...(index + 1))
+                r6 = instantiate_node(SyntaxNode,input, index...(index + 1))
                 @index += 1
               else
                 terminal_parse_failure("]")
-                r11 = nil
+                r6 = nil
               end
-              if r11
-                s10 << r11
+              if r6
+                s5 << r6
               else
                 break
               end
             end
-            if s10.empty?
-              self.index = i10
-              r10 = nil
+            if s5.empty?
+              self.index = i5
+              r5 = nil
             else
-              r10 = instantiate_node(SyntaxNode,input, i10...index, s10)
+              r5 = instantiate_node(SyntaxNode,input, i5...index, s5)
             end
-            s0 << r10
+            s0 << r5
           end
         end
       end
     end
     if s0.last
       r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+      r0.extend(ApproximateYear0)
       r0.extend(ApproximateYear1)
-      r0.extend(ApproximateYear2)
     else
       self.index = i0
       r0 = nil
@@ -342,20 +457,23 @@ module ScientificNameDirty
   end
 
   module DoubleYear0
+    def year_number
+      elements[0]
+    end
+
   end
 
   module DoubleYear1
-
-    def value
-      text_value
-    end
-    
-    def pos
-      {interval.begin => ['year', interval.end]}
-    end
-    
-    def details
-      {:year => value}
+    def value
+      text_value
+    end
+    
+    def pos
+      {interval.begin => ['year', interval.end]}
+    end
+    
+    def details
+      {:year => value}
     end
   end
 
@@ -368,35 +486,68 @@ module ScientificNameDirty
     end
 
     i0, s0 = index, []
-    if input.index(Regexp.new('[0-9]'), index) == index
-      r1 = instantiate_node(SyntaxNode,input, index...(index + 1))
-      @index += 1
-    else
-      r1 = nil
-    end
+    r1 = _nt_year_number
     s0 << r1
     if r1
-      s2, i2 = [], index
-      loop do
-        if input.index(Regexp.new('[0-9A-Za-z\\?\\-]'), index) == index
-          r3 = instantiate_node(SyntaxNode,input, index...(index + 1))
-          @index += 1
-        else
+      if input.index("-", index) == index
+        r2 = instantiate_node(SyntaxNode,input, index...(index + 1))
+        @index += 1
+      else
+        terminal_parse_failure("-")
+        r2 = nil
+      end
+      s0 << r2
+      if r2
+        s3, i3 = [], index
+        loop do
+          if input.index(Regexp.new('[0-9]'), index) == index
+            r4 = instantiate_node(SyntaxNode,input, index...(index + 1))
+            @index += 1
+          else
+            r4 = nil
+          end
+          if r4
+            s3 << r4
+          else
+            break
+          end
+        end
+        if s3.empty?
+          self.index = i3
           r3 = nil
+        else
+          r3 = instantiate_node(SyntaxNode,input, i3...index, s3)
         end
+        s0 << r3
         if r3
-          s2 << r3
-        else
-          break
+          if input.index(Regexp.new('[A-Za-z]'), index) == index
+            r6 = instantiate_node(SyntaxNode,input, index...(index + 1))
+            @index += 1
+          else
+            r6 = nil
+          end
+          if r6
+            r5 = r6
+          else
+            r5 = instantiate_node(SyntaxNode,input, index...index)
+          end
+          s0 << r5
+          if r5
+            if input.index(Regexp.new('[\\?]'), index) == index
+              r8 = instantiate_node(SyntaxNode,input, index...(index + 1))
+              @index += 1
+            else
+              r8 = nil
+            end
+            if r8
+              r7 = r8
+            else
+              r7 = instantiate_node(SyntaxNode,input, index...index)
+            end
+            s0 << r7
+          end
         end
       end
-      if s2.empty?
-        self.index = i2
-        r2 = nil
-      else
-        r2 = instantiate_node(SyntaxNode,input, i2...index, s2)
-      end
-      s0 << r2
     end
     if s0.last
       r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
@@ -420,8 +571,7 @@ module ScientificNameDirty
   end
 
   module PageNumber1
-
-    def value
+    def value
     end
   end
 
@@ -488,4 +638,3 @@ end
 class ScientificNameDirtyParser < Treetop::Runtime::CompiledParser
   include ScientificNameDirty
 end
-