mail 2.6.4 → 2.9.0

data/lib/mail/parsers/message_ids_parser.rl

@@ -0,0 +1,97 @@
+# frozen_string_literal: true
+require 'mail/utilities'
+require 'mail/parser_tools'
+
+begin
+  original_verbose, $VERBOSE = $VERBOSE, nil
+
+%%{
+  # RFC 5322 Section 3.6.4: Identification Fields
+  # https://tools.ietf.org/html/rfc5322#section-3.6.4
+  machine message_ids;
+  alphtype int;
+
+  # Message Ids
+  action msg_id_s { msg_id_s = p }
+  action msg_id_e {
+    id = chars(data, msg_id_s, p-1)
+    id = $1 if id =~ /.*<(.*)>.*/
+    message_ids.message_ids << id
+  }
+
+  # No-op actions
+  action angle_addr_s {}
+  action address_s {}
+  action address_e {}
+  action comment_e {}
+  action comment_s {}
+  action domain_e {}
+  action domain_s {}
+  action local_dot_atom_e {}
+  action local_dot_atom_pre_comment_e {}
+  action local_dot_atom_pre_comment_s {}
+  action local_dot_atom_s {}
+  action phrase_s {}
+  action phrase_e {}
+  action qstr_e {}
+  action qstr_s {}
+  action ctime_date_s {}
+  action ctime_date_e {}
+  action date_s {}
+  action date_e {}
+  action time_s {}
+  action time_e {}
+  action local_quoted_string_s {}
+  action local_quoted_string_e {}
+  action obs_domain_list_s {}
+  action obs_domain_list_e {}
+  action group_name_s {}
+  action group_name_e {}
+  action received_tokens_s {}
+  action received_tokens_e {}
+
+  include rfc5322 "rfc5322.rl";
+  main := message_ids;
+}%%
+
+module Mail::Parsers
+  module MessageIdsParser
+    extend Mail::ParserTools
+
+    MessageIdsStruct = Struct.new(:message_ids, :error)
+
+    %%write data noprefix;
+
+    def self.parse(data)
+      data = data.dup.force_encoding(Encoding::ASCII_8BIT) if data.respond_to?(:force_encoding)
+
+      raise Mail::Field::NilParseError.new(Mail::MessageIdsElement) if data.nil?
+
+      # Parser state
+      message_ids = MessageIdsStruct.new([])
+      msg_id_s = nil
+
+      # 5.1 Variables Used by Ragel
+      p = 0
+      eof = pe = data.length
+      stack = []
+
+      %%write init;
+      %%write exec;
+
+      if false
+        testEof
+      end
+
+      if p != eof || cs < %%{ write first_final; }%%
+        raise Mail::Field::IncompleteParseError.new(Mail::MessageIdsElement, data, p)
+      end
+
+      message_ids
+    end
+  end
+end
+
+ensure
+  $VERBOSE = original_verbose
+end

data/lib/mail/parsers/mime_version_parser.rb

@@ -1,42 +1,516 @@
 # frozen_string_literal: true
-module Mail::Parsers
-  class MimeVersionParser
-    include Mail::Utilities
+require "mail/utilities"
+require "mail/parser_tools"
 
-    def parse(s)
-      if Mail::Utilities.blank?(s)
-        return MimeVersionStruct.new("", nil)
+begin
+  original_verbose, $VERBOSE = $VERBOSE, nil
+
+  module Mail::Parsers
+    module MimeVersionParser
+      extend Mail::ParserTools
+
+      MimeVersionStruct = Struct.new(:major, :minor, :error)
+
+      class << self
+        attr_accessor :_trans_keys
+        private :_trans_keys, :_trans_keys=
+      end
+      self._trans_keys = [
+        0, 0, 9, 57, 10, 10,
+        9, 32, 9, 57, 40,
+        57, 46, 46, 40, 57,
+        48, 57, 10, 10, 9, 32,
+        1, 244, 1, 244, 10,
+        10, 9, 32, 0, 244,
+        128, 191, 160, 191, 128, 191,
+        128, 159, 144, 191, 128,
+        191, 128, 143, 9, 57,
+        9, 40, 9, 40, 0, 0,
+        0,
+      ]
+
+      class << self
+        attr_accessor :_key_spans
+        private :_key_spans, :_key_spans=
+      end
+      self._key_spans = [
+        0, 49, 1, 24, 49, 18, 1, 18,
+        10, 1, 24, 244, 244, 1, 24, 245,
+        64, 32, 64, 32, 48, 64, 16, 49,
+        32, 32, 0,
+      ]
+
+      class << self
+        attr_accessor :_index_offsets
+        private :_index_offsets, :_index_offsets=
+      end
+      self._index_offsets = [
+        0, 0, 50, 52, 77, 127, 146, 148,
+        167, 178, 180, 205, 450, 695, 697, 722,
+        968, 1033, 1066, 1131, 1164, 1213, 1278, 1295,
+        1345, 1378, 1411,
+      ]
+
+      class << self
+        attr_accessor :_indicies
+        private :_indicies, :_indicies=
+      end
+      self._indicies = [
+        0, 1, 1, 1, 2, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 0,
+        1, 1, 1, 1, 1, 1, 1, 3,
+        1, 1, 1, 1, 1, 1, 1, 4,
+        4, 4, 4, 4, 4, 4, 4, 4,
+        4, 1, 5, 1, 0, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 0, 1, 6, 1, 1,
+        1, 7, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 6, 1, 1, 1,
+        1, 1, 1, 1, 8, 1, 1, 1,
+        1, 1, 1, 1, 9, 9, 9, 9,
+        9, 9, 9, 9, 9, 9, 1, 10,
+        1, 1, 1, 1, 1, 11, 1, 12,
+        12, 12, 12, 12, 12, 12, 12, 12,
+        12, 1, 13, 1, 14, 1, 1, 1,
+        1, 1, 1, 1, 15, 15, 15, 15,
+        15, 15, 15, 15, 15, 15, 1, 16,
+        16, 16, 16, 16, 16, 16, 16, 16,
+        16, 1, 17, 1, 18, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 18, 1, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 1, 19,
+        19, 20, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 21, 22, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        23, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 19, 19, 19, 19,
+        19, 19, 19, 19, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 24, 24,
+        24, 24, 24, 24, 24, 24, 24, 24,
+        24, 24, 24, 24, 24, 24, 24, 24,
+        24, 24, 24, 24, 24, 24, 24, 24,
+        24, 24, 24, 24, 25, 26, 26, 26,
+        26, 26, 26, 26, 26, 26, 26, 26,
+        26, 27, 26, 26, 28, 29, 29, 29,
+        30, 1, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 1, 31, 31, 32, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 33, 34, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 35, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 37, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 39, 38,
+        38, 40, 41, 41, 41, 42, 1, 43,
+        1, 31, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        31, 1, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 37, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 39,
+        38, 38, 40, 41, 41, 41, 42, 1,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        31, 31, 31, 31, 31, 31, 31, 31,
+        1, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 1, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 1, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 36, 36, 36, 36, 36,
+        36, 36, 36, 1, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 1, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 1, 38, 38,
+        38, 38, 38, 38, 38, 38, 38, 38,
+        38, 38, 38, 38, 38, 38, 1, 44,
+        1, 1, 1, 45, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 44, 1,
+        1, 1, 1, 1, 1, 1, 46, 1,
+        1, 1, 1, 1, 1, 1, 47, 47,
+        47, 47, 47, 47, 47, 47, 47, 47,
+        1, 18, 1, 1, 1, 48, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        18, 1, 1, 1, 1, 1, 1, 1,
+        49, 1, 50, 1, 1, 1, 51, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 1, 1, 1, 1, 1, 1, 1,
+        1, 50, 1, 1, 1, 1, 1, 1,
+        1, 52, 1, 1, 0,
+      ]
+
+      class << self
+        attr_accessor :_trans_targs
+        private :_trans_targs, :_trans_targs=
+      end
+      self._trans_targs = [
+        1, 0, 2, 4, 5, 3, 1, 2,
+        4, 5, 6, 7, 5, 7, 8, 23,
+        23, 10, 24, 12, 13, 12, 26, 15,
+        16, 17, 18, 19, 20, 21, 22, 12,
+        13, 12, 26, 15, 16, 17, 18, 19,
+        20, 21, 22, 14, 24, 9, 25, 23,
+        9, 25, 24, 9, 25,
+      ]
+
+      class << self
+        attr_accessor :_trans_actions
+        private :_trans_actions, :_trans_actions=
       end
+      self._trans_actions = [
+        0, 0, 0, 1, 2, 0, 3, 3,
+        4, 5, 6, 7, 0, 3, 1, 8,
+        9, 0, 0, 10, 10, 11, 12, 10,
+        10, 10, 10, 10, 10, 10, 10, 0,
+        0, 1, 13, 0, 0, 0, 0, 0,
+        0, 0, 0, 0, 14, 14, 15, 0,
+        0, 1, 3, 3, 4,
+      ]
 
-      mime_version = MimeVersionStruct.new
+      class << self
+        attr_accessor :_eof_actions
+        private :_eof_actions, :_eof_actions=
+      end
+      self._eof_actions = [
+        0, 0, 0, 0, 0, 0, 0, 0,
+        0, 0, 0, 0, 0, 0, 0, 0,
+        0, 0, 0, 0, 0, 0, 0, 14,
+        0, 3, 0,
+      ]
 
-      actions, error = Ragel.parse(:mime_version, s)
-      if error
-        raise Mail::Field::ParseError.new(Mail::MimeVersionElement, s, error)
+      class << self
+        attr_accessor :start
+      end
+      self.start = 1
+      class << self
+        attr_accessor :first_final
       end
+      self.first_final = 23
+      class << self
+        attr_accessor :error
+      end
+      self.error = 0
 
-      major_digits_s = minor_digits_s = nil
-      actions.each_slice(2) do |action_id, p|
-        action = Mail::Parsers::Ragel::ACTIONS[action_id]
-        case action
+      class << self
+        attr_accessor :en_comment_tail
+      end
+      self.en_comment_tail = 11
+      class << self
+        attr_accessor :en_main
+      end
+      self.en_main = 1
+
+      def self.parse(data)
+        data = data.dup.force_encoding(Encoding::ASCII_8BIT) if data.respond_to?(:force_encoding)
 
-        # Major Digits
-        when :major_digits_s then major_digits_s = p
-        when :major_digits_e
-          mime_version.major = s[major_digits_s..(p-1)]
+        return MimeVersionStruct.new("", nil) if Mail::Utilities.blank?(data)
 
-        # Minor Digits
-        when :minor_digits_s then minor_digits_s = p
-        when :minor_digits_e
-          mime_version.minor = s[minor_digits_s..(p-1)]
+        # Parser state
+        mime_version = MimeVersionStruct.new
+        major_digits_s = minor_digits_s = nil
 
-        when :comment_e, :comment_s then nil
+        # 5.1 Variables Used by Ragel
+        p = 0
+        eof = pe = data.length
+        stack = []
 
-        else
-          raise Mail::Field::ParseError.new(Mail::MimeVersionElement, s, "Failed to process unknown action: #{action}")
+        begin
+          p ||= 0
+          pe ||= data.length
+          cs = start
+          top = 0
         end
+
+        begin
+          testEof = false
+          _slen, _trans, _keys, _inds, _acts, _nacts = nil
+          _goto_level = 0
+          _resume = 10
+          _eof_trans = 15
+          _again = 20
+          _test_eof = 30
+          _out = 40
+          while true
+            if _goto_level <= 0
+              if p == pe
+                _goto_level = _test_eof
+                next
+              end
+              if cs == 0
+                _goto_level = _out
+                next
+              end
+            end
+            if _goto_level <= _resume
+              _keys = cs << 1
+              _inds = _index_offsets[cs]
+              _slen = _key_spans[cs]
+              _wide = data[p].ord
+              _trans = if (_slen > 0 &&
+                           _trans_keys[_keys] <= _wide &&
+                           _wide <= _trans_keys[_keys + 1])
+                  _indicies[_inds + _wide - _trans_keys[_keys]]
+                else
+                  _indicies[_inds + _slen]
+                end
+              cs = _trans_targs[_trans]
+              if _trans_actions[_trans] != 0
+                case _trans_actions[_trans]
+                when 2
+                  begin
+                    major_digits_s = p
+                  end
+                when 7
+                  begin
+                    mime_version.major = chars(data, major_digits_s, p - 1)
+                  end
+                when 8
+                  begin
+                    minor_digits_s = p
+                  end
+                when 14
+                  begin
+                    mime_version.minor = chars(data, minor_digits_s, p - 1)
+                  end
+                when 10
+                  begin
+                  end
+                when 3
+                  begin
+                  end
+                when 1
+                  begin
+                    begin
+                      stack[top] = cs
+                      top += 1
+                      cs = 11
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 13
+                  begin
+                    begin
+                      top -= 1
+                      cs = stack[top]
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 6
+                  begin
+                    mime_version.major = chars(data, major_digits_s, p - 1)
+                  end
+                  begin
+                    begin
+                      stack[top] = cs
+                      top += 1
+                      cs = 11
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 15
+                  begin
+                    mime_version.minor = chars(data, minor_digits_s, p - 1)
+                  end
+                  begin
+                    begin
+                      stack[top] = cs
+                      top += 1
+                      cs = 11
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 11
+                  begin
+                  end
+                  begin
+                    begin
+                      stack[top] = cs
+                      top += 1
+                      cs = 11
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 12
+                  begin
+                  end
+                  begin
+                    begin
+                      top -= 1
+                      cs = stack[top]
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                when 5
+                  begin
+                  end
+                  begin
+                    major_digits_s = p
+                  end
+                when 9
+                  begin
+                  end
+                  begin
+                    minor_digits_s = p
+                  end
+                when 4
+                  begin
+                  end
+                  begin
+                    begin
+                      stack[top] = cs
+                      top += 1
+                      cs = 11
+                      _goto_level = _again
+                      next
+                    end
+                  end
+                end
+              end
+            end
+            if _goto_level <= _again
+              if cs == 0
+                _goto_level = _out
+                next
+              end
+              p += 1
+              if p != pe
+                _goto_level = _resume
+                next
+              end
+            end
+            if _goto_level <= _test_eof
+              if p == eof
+                case _eof_actions[cs]
+                when 14
+                  begin
+                    mime_version.minor = chars(data, minor_digits_s, p - 1)
+                  end
+                when 3
+                  begin
+                  end
+                end
+              end
+            end
+            if _goto_level <= _out
+              break
+            end
+          end
+        end
+
+        if false
+          testEof
+        end
+
+        if p != eof || cs < 23
+          raise Mail::Field::IncompleteParseError.new(Mail::MimeVersionElement, data, p)
+        end
+
+        mime_version
       end
-      mime_version
     end
   end
+ensure
+  $VERBOSE = original_verbose
 end

data/lib/mail/parsers/mime_version_parser.rl

@@ -0,0 +1,72 @@
+# frozen_string_literal: true
+require 'mail/utilities'
+require 'mail/parser_tools'
+
+begin
+  original_verbose, $VERBOSE = $VERBOSE, nil
+
+%%{
+  machine mime_version;
+  alphtype int;
+
+  # Major Digits
+  action major_digits_s { major_digits_s = p }
+  action major_digits_e { mime_version.major = chars(data, major_digits_s, p-1) }
+
+  # Minor Digits
+  action minor_digits_s { minor_digits_s = p }
+  action minor_digits_e { mime_version.minor = chars(data, minor_digits_s, p-1) }
+
+  # No-op actions
+  action comment_s {}
+  action comment_e {}
+  action qstr_s {}
+  action qstr_e {}
+  action phrase_s {}
+  action phrase_e {}
+
+  include rfc2045_mime "rfc2045_mime.rl";
+  main := mime_version;
+}%%
+
+module Mail::Parsers
+  module MimeVersionParser
+    extend Mail::ParserTools
+
+    MimeVersionStruct = Struct.new(:major, :minor, :error)
+
+    %%write data noprefix;
+
+    def self.parse(data)
+      data = data.dup.force_encoding(Encoding::ASCII_8BIT) if data.respond_to?(:force_encoding)
+
+      return MimeVersionStruct.new('', nil) if Mail::Utilities.blank?(data)
+
+      # Parser state
+      mime_version = MimeVersionStruct.new
+      major_digits_s = minor_digits_s = nil
+
+      # 5.1 Variables Used by Ragel
+      p = 0
+      eof = pe = data.length
+      stack = []
+
+      %%write init;
+      %%write exec;
+
+      if false
+        testEof
+      end
+
+      if p != eof || cs < %%{ write first_final; }%%
+        raise Mail::Field::IncompleteParseError.new(Mail::MimeVersionElement, data, p)
+      end
+
+      mime_version
+    end
+  end
+end
+
+ensure
+  $VERBOSE = original_verbose
+end