module Mail::Parsers::ContentLocationParser

def self.parse(data)
  data = data.dup.force_encoding(Encoding::ASCII_8BIT) if data.respond_to?(:force_encoding)
  content_location = ContentLocationStruct.new(nil)
  return content_location if Mail::Utilities.blank?(data)
  # Parser state
  disp_type_s = param_attr_s = param_attr = qstr_s = qstr = param_val_s = nil
  # 5.1 Variables Used by Ragel
  p = 0
  eof = pe = data.length
  stack = []
  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 13
            begin
              qstr_s = p
            end
          when 3
            begin
              content_location.location = chars(data, qstr_s, p - 1)
            end
          when 1
            begin
              token_string_s = p
            end
          when 11
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
          when 4
            begin
            end
          when 7
            begin
            end
          when 2
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _goto_level = _again
                next
              end
            end
          when 10
            begin
              begin
                top -= 1
                cs = stack[top]
                _goto_level = _again
                next
              end
            end
          when 15
            begin
              qstr_s = p
            end
            begin
              content_location.location = chars(data, qstr_s, p - 1)
            end
          when 14
            begin
              qstr_s = p
            end
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
          when 12
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _goto_level = _again
                next
              end
            end
          when 5
            begin
            end
            begin
              token_string_s = p
            end
          when 6
            begin
            end
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _goto_level = _again
                next
              end
            end
          when 8
            begin
            end
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _goto_level = _again
                next
              end
            end
          when 9
            begin
            end
            begin
              begin
                top -= 1
                cs = stack[top]
                _goto_level = _again
                next
              end
            end
          when 17
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _goto_level = _again
                next
              end
            end
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
          when 16
            begin
              qstr_s = p
            end
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
            begin
              begin
                stack[top] = cs
                top += 1
                cs = 20
                _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 11
            begin
              content_location.location = chars(data, token_string_s, p - 1)
            end
          when 4
            begin
            end
          end
        end
      end
      if _goto_level <= _out
        break
      end
    end
  end
  if p != eof || cs < 32
    raise Mail::Field::IncompleteParseError.new(Mail::ContentLocationElement, data, p)
  end
  content_location
end