class ACL::ACLEntry

def dot_pat(str)
  /\A#{dot_pat_str(str)}\z/
end

def dot_pat_str(str)
  list = str.split('.').collect { |s|
    (s == '*') ? '.+' : s
  }
  list.join("\\.")
end

def initialize(str)
  if str == '*' or str == 'all'
    @pat = [:all]
  elsif str.include?('*')
    @pat = [:name, dot_pat(str)]
  else
    begin
      @pat = [:ip, IPAddr.new(str)]
    rescue IPAddr::InvalidPrefixError
      # In this case, `str` shouldn't be a host name pattern
      # because it contains a slash.
      raise
    rescue ArgumentError
      @pat = [:name, dot_pat(str)]
    end
  end
end

def match(addr)
  case @pat[0]
  when :all
    true
  when :ip
    begin
      ipaddr = IPAddr.new(addr[3])
      ipaddr = ipaddr.ipv4_mapped if @pat[1].ipv6? && ipaddr.ipv4?
    rescue ArgumentError
      return false
    end
    (@pat[1].include?(ipaddr)) ? true : false
  when :name
    (@pat[1] =~ addr[2]) ? true : false
  else
    false
  end
end