class Mysql::Packet

# File lib/mysql/packet.rb, line 7
def self.lcb(num)
  return "\xfb" if num.nil?
  return [num].pack("C") if num < 251
  return [252, num].pack("Cv") if num < 65536
  return [253, num&0xffff, num>>16].pack("CvC") if num < 16777216
  return [254, num&0xffffffff, num>>32].pack("CVV")
end

# File lib/mysql/packet.rb, line 16
def self.lcs(str)
  str = Charset.to_binary str.dup
  lcb(str.length)+str
end

# File lib/mysql/packet.rb, line 21
def initialize(data)
  @data = data
end

# File lib/mysql/packet.rb, line 71
def eof?
  @data[0] == ?\xfe && @data.length == 5
end

# File lib/mysql/packet.rb, line 25
def lcb
  return nil if @data.empty?
  case v = utiny
  when 0xfb
    return nil
  when 0xfc
    return ushort
  when 0xfd
    c, v = utiny, ushort
    return (v << 8)+c
  when 0xfe
    v1, v2 = ulong, ulong
    return (v2 << 32)+v1
  else
    return v
  end
end

# File lib/mysql/packet.rb, line 43
def lcs
  len = self.lcb
  return nil unless len
  @data.slice!(0, len)
end

# File lib/mysql/packet.rb, line 49
def read(len)
  @data.slice!(0, len)
end

# File lib/mysql/packet.rb, line 53
def string
  str = @data.unpack1('Z*')
  @data.slice!(0, str.length+1)
  str
end

# File lib/mysql/packet.rb, line 75
def to_s
  @data
end

# File lib/mysql/packet.rb, line 67
def ulong
  @data.slice!(0, 4).unpack1('V')
end

# File lib/mysql/packet.rb, line 63
def ushort
  @data.slice!(0, 2).unpack1('v')
end

# File lib/mysql/packet.rb, line 59
def utiny
  @data.slice!(0, 1).unpack1('C')
end