mail 1.0.0

data/lib/mail/parsers/content_type.treetop

@@ -0,0 +1,58 @@
+module Mail
+  grammar ContentType
+
+    include RFC2822
+    include RFC2045
+    
+    rule content_type
+      main_type "/" sub_type param_hashes:(CFWS ";" parameter CFWS)* {
+        def parameters
+          param_hashes.elements.map do |param|
+            param.parameter.param_hash
+          end
+        end
+      }
+    end
+
+    rule main_type
+      discrete_type / composite_type
+    end
+
+    rule discrete_type
+      "text" / "image" / "audio" / "video" / "application" / extension_token
+    end
+
+    rule composite_type
+      "message" / "multipart" / extension_token
+    end
+  
+    rule extension_token
+      ietf_token / x_token
+    end
+
+    rule sub_type
+      extension_token / iana_token
+    end
+  
+    rule parameter
+      CFWS? attr:attribute "=" val:value CFWS? {
+        def param_hash
+          {attr.text_value => val.text_value}
+        end
+      }
+    end
+
+    rule attribute
+      token+
+    end
+
+    rule value
+      quoted_string {
+        def text_value
+          quoted_content.text_value
+        end
+      } / (token / [\x3d])+
+    end
+
+  end
+end

data/lib/mail/parsers/date_time.rb

@@ -0,0 +1,111 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Mail
+  module DateTime
+    include Treetop::Runtime
+
+    def root
+      @root || :primary
+    end
+
+    include RFC2822
+
+    module Primary0
+      def day_of_week
+        elements[0]
+      end
+
+    end
+
+    module Primary1
+      def date
+        elements[1]
+      end
+
+      def FWS
+        elements[2]
+      end
+
+      def time
+        elements[3]
+      end
+
+    end
+
+    def _nt_primary
+      start_index = index
+      if node_cache[:primary].has_key?(index)
+        cached = node_cache[:primary][index]
+        @index = cached.interval.end if cached
+        return cached
+      end
+
+      i0, s0 = index, []
+      i2, s2 = index, []
+      r3 = _nt_day_of_week
+      s2 << r3
+      if r3
+        if has_terminal?(",", false, index)
+          r4 = instantiate_node(SyntaxNode,input, index...(index + 1))
+          @index += 1
+        else
+          terminal_parse_failure(",")
+          r4 = nil
+        end
+        s2 << r4
+      end
+      if s2.last
+        r2 = instantiate_node(SyntaxNode,input, i2...index, s2)
+        r2.extend(Primary0)
+      else
+        @index = i2
+        r2 = nil
+      end
+      if r2
+        r1 = r2
+      else
+        r1 = instantiate_node(SyntaxNode,input, index...index)
+      end
+      s0 << r1
+      if r1
+        r5 = _nt_date
+        s0 << r5
+        if r5
+          r6 = _nt_FWS
+          s0 << r6
+          if r6
+            r7 = _nt_time
+            s0 << r7
+            if r7
+              r9 = _nt_CFWS
+              if r9
+                r8 = r9
+              else
+                r8 = instantiate_node(SyntaxNode,input, index...index)
+              end
+              s0 << r8
+            end
+          end
+        end
+      end
+      if s0.last
+        r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+        r0.extend(Primary1)
+      else
+        @index = i0
+        r0 = nil
+      end
+
+      node_cache[:primary][start_index] = r0
+
+      r0
+    end
+
+  end
+
+  class DateTimeParser < Treetop::Runtime::CompiledParser
+    include DateTime
+  end
+
+end

data/lib/mail/parsers/date_time.treetop

@@ -0,0 +1,11 @@
+module Mail
+  grammar DateTime
+
+    include RFC2822
+
+    rule primary
+      ( day_of_week ",")? date FWS time CFWS?
+    end
+    
+  end
+end

data/lib/mail/parsers/envelope_from.rb

@@ -0,0 +1,188 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Mail
+  module EnvelopeFrom
+    include Treetop::Runtime
+
+    def root
+      @root || :primary
+    end
+
+    include RFC2822
+
+    module Primary0
+      def addr_spec
+        elements[0]
+      end
+
+      def ctime_date
+        elements[1]
+      end
+    end
+
+    def _nt_primary
+      start_index = index
+      if node_cache[:primary].has_key?(index)
+        cached = node_cache[:primary][index]
+        @index = cached.interval.end if cached
+        return cached
+      end
+
+      i0, s0 = index, []
+      r1 = _nt_addr_spec
+      s0 << r1
+      if r1
+        r2 = _nt_ctime_date
+        s0 << r2
+      end
+      if s0.last
+        r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+        r0.extend(Primary0)
+      else
+        @index = i0
+        r0 = nil
+      end
+
+      node_cache[:primary][start_index] = r0
+
+      r0
+    end
+
+    module CtimeDate0
+      def day_name
+        elements[0]
+      end
+
+      def month_name
+        elements[2]
+      end
+
+      def day
+        elements[4]
+      end
+
+      def time_of_day
+        elements[6]
+      end
+
+      def year
+        elements[8]
+      end
+    end
+
+    def _nt_ctime_date
+      start_index = index
+      if node_cache[:ctime_date].has_key?(index)
+        cached = node_cache[:ctime_date][index]
+        @index = cached.interval.end if cached
+        return cached
+      end
+
+      i0, s0 = index, []
+      r1 = _nt_day_name
+      s0 << r1
+      if r1
+        s2, i2 = [], index
+        loop do
+          if has_terminal?(" ", false, index)
+            r3 = instantiate_node(SyntaxNode,input, index...(index + 1))
+            @index += 1
+          else
+            terminal_parse_failure(" ")
+            r3 = nil
+          end
+          if r3
+            s2 << r3
+          else
+            break
+          end
+        end
+        if s2.empty?
+          @index = i2
+          r2 = nil
+        else
+          r2 = instantiate_node(SyntaxNode,input, i2...index, s2)
+        end
+        s0 << r2
+        if r2
+          r4 = _nt_month_name
+          s0 << r4
+          if r4
+            s5, i5 = [], index
+            loop do
+              if has_terminal?(" ", false, index)
+                r6 = instantiate_node(SyntaxNode,input, index...(index + 1))
+                @index += 1
+              else
+                terminal_parse_failure(" ")
+                r6 = nil
+              end
+              if r6
+                s5 << r6
+              else
+                break
+              end
+            end
+            if s5.empty?
+              @index = i5
+              r5 = nil
+            else
+              r5 = instantiate_node(SyntaxNode,input, i5...index, s5)
+            end
+            s0 << r5
+            if r5
+              r7 = _nt_day
+              s0 << r7
+              if r7
+                if has_terminal?(" ", false, index)
+                  r8 = instantiate_node(SyntaxNode,input, index...(index + 1))
+                  @index += 1
+                else
+                  terminal_parse_failure(" ")
+                  r8 = nil
+                end
+                s0 << r8
+                if r8
+                  r9 = _nt_time_of_day
+                  s0 << r9
+                  if r9
+                    if has_terminal?(" ", false, index)
+                      r10 = instantiate_node(SyntaxNode,input, index...(index + 1))
+                      @index += 1
+                    else
+                      terminal_parse_failure(" ")
+                      r10 = nil
+                    end
+                    s0 << r10
+                    if r10
+                      r11 = _nt_year
+                      s0 << r11
+                    end
+                  end
+                end
+              end
+            end
+          end
+        end
+      end
+      if s0.last
+        r0 = instantiate_node(SyntaxNode,input, i0...index, s0)
+        r0.extend(CtimeDate0)
+      else
+        @index = i0
+        r0 = nil
+      end
+
+      node_cache[:ctime_date][start_index] = r0
+
+      r0
+    end
+
+  end
+
+  class EnvelopeFromParser < Treetop::Runtime::CompiledParser
+    include EnvelopeFrom
+  end
+
+end

data/lib/mail/parsers/envelope_from.treetop

@@ -0,0 +1,32 @@
+module Mail
+  grammar EnvelopeFrom
+
+    include RFC2822
+
+    #        The exact character sequence of "From";
+    #
+    #        a single Space character (0x20);
+    #
+    #        the email address of the message sender (as obtained from the
+    #        message envelope or other authoritative source), conformant
+    #        with the "addr-spec" syntax from RFC 2822;
+    #
+    #        a single Space character;
+    #
+    #        a timestamp indicating the UTC date and time when the message
+    #        was originally received, conformant with the syntax of the
+    #        traditional UNIX 'ctime' output sans timezone (note that the
+    #        use of UTC precludes the need for a timezone indicator);
+    #        Thu Nov 24 18:22:48 1986
+    #
+    #        an end-of-line marker.
+    rule primary
+      addr_spec ctime_date
+    end
+    
+    rule ctime_date
+      day_name " "+ month_name " "+ day " " time_of_day " " year
+    end
+    
+  end
+end

data/lib/mail/parsers/message_ids.rb

@@ -0,0 +1,42 @@
+# Autogenerated from a Treetop grammar. Edits may be lost.
+
+
+module Mail
+  module MessageIds
+    include Treetop::Runtime
+
+    def root
+      @root || :primary
+    end
+
+    include RFC2822
+
+    module Primary0
+      def message_ids
+        [first_msg_id] + other_msg_ids.elements.map { |o| o.msg_id_value }
+      end
+    end
+
+    def _nt_primary
+      start_index = index
+      if node_cache[:primary].has_key?(index)
+        cached = node_cache[:primary][index]
+        @index = cached.interval.end if cached
+        return cached
+      end
+
+      r0 = _nt_message_ids
+      r0.extend(Primary0)
+
+      node_cache[:primary][start_index] = r0
+
+      r0
+    end
+
+  end
+
+  class MessageIdsParser < Treetop::Runtime::CompiledParser
+    include MessageIds
+  end
+
+end