class ASF::Mail

# File lib/whimsy/asf/mail.rb, line 208
def self._autosubid(dom, list)
  return "#{list}@#{dom}"
end

# File lib/whimsy/asf/mail.rb, line 52
def self._cannot_sub
  self._load_auto()
  @auto[:disallowed] + @auto[:intrinsic]
end

# File lib/whimsy/asf/mail.rb, line 57
def self._cannot_unsub
  self._load_auto()
  @auto[:intrinsic]
end

# File lib/whimsy/asf/mail.rb, line 67
def self._chairs_allowed
  self._load_auto()
  @auto[:chairs]
end

# File lib/whimsy/asf/mail.rb, line 62
def self._committers_allowed
  self._load_auto()
  @auto[:committers]
end

# File lib/whimsy/asf/mail.rb, line 47
def self._deprecated
  self._load_auto()
  @auto[:deprecated]
end

# File lib/whimsy/asf/mail.rb, line 72
def self._members_allowed
  self._load_auto()
  @auto[:members] + @auto[:chairs]
end

# File lib/whimsy/asf/mail.rb, line 199
def self.archivelistid(dom, list)
  return "apachecon-#{list}" if dom == 'apachecon.com'
  return list if dom == 'apache.org'

  dom.sub(".apache.org", '-') + list
end

# File lib/whimsy/asf/mail.rb, line 133
def self.canmod(ldap_pmcs, lidonly = true)
  allowed = []
  parse_flags do |dom, list, _|
    autoid = _autosubid(dom, list)
    next if self._deprecated.include? autoid
    next if self._cannot_sub.include? autoid
    lid = archivelistid(dom, list)

    if ldap_pmcs.include? dom.sub('.apache.org', '')
      if lidonly
        allowed << lid
      else
        allowed << [dom, list, lid]
      end
    end
  end
  allowed
end

# File lib/whimsy/asf/mail.rb, line 91
def self.cansub(member, pmc_chair, ldap_pmcs, lidonly = true)
  allowed = []
  parse_flags do |dom, list, f|
    autoid = _autosubid(dom, list)
    next if self._deprecated.include? autoid
    next if self._cannot_sub.include? autoid
    lid = archivelistid(dom, list)

    cansub = false
    modsub = isModSub?(f)
    if not modsub # subs not moderated; allow all
      cansub = true
    elsif self._committers_allowed().include?(autoid) # always allowed
      cansub = true
    else # subs are moderated
      if member
        if list == 'private' or self._members_allowed.include?(autoid)
          cansub = true
        end
      elsif ldap_pmcs and list == 'private' and ldap_pmcs.include? dom.sub('.apache.org', '')
        cansub = true
      end
      if pmc_chair and self._chairs_allowed.include? autoid
        cansub = true
      end
    end
    if cansub
      if lidonly
        allowed << lid
      else
        allowed << [dom, list, lid]
      end
    end
  end
  allowed
end

# File lib/whimsy/asf/mail.rb, line 156
def self.configure
  # fetch overrides
  sendmail = ASF::Config.get(:sendmail)

  if sendmail
    # convert string keys to symbols
    options = Hash[sendmail.map {|key, value| [key.to_sym, value]}]

    # extract delivery method
    method = options.delete(:delivery_method).to_sym
  else
    # provide defaults that work on whimsy-vm* infrastructure.  Since
    # procmail is configured with a self-signed certificate, verification
    # isn't a possibility
    method = :smtp
    options = {openssl_verify_mode: 'none'}
  end

  ::Mail.defaults do
    delivery_method method, options
  end
end

# File lib/whimsy/asf/mail.rb, line 8
def self.list
  begin
    return @list.to_h if @list
  rescue NoMethodError, WeakRef::RefError
  end

  list = {}

  # load info from LDAP
  people = ASF::Person.preload(['mail', 'asf-altEmail'])
  people.each do |person|
    (person.mail + person.alt_email).each do |mail|
      list[mail.downcase] = person
    end
  end

  # load all member emails in one pass
  ASF::Member.each do |id, text|
    Member.emails(text).each do |mail|
      list[mail.downcase] ||= Person.find(id)
    end
  end

  # load all ICLA emails in one pass
  ASF::ICLA.each do |icla|
    person = Person.find(icla.id)
    icla.emails.each do |email|
      list[email.downcase] ||= person
    end
    next if icla.noId?

    list["#{icla.id.downcase}@apache.org"] ||= person
  end

  @list = WeakRef.new(list)
  list
end

# File lib/whimsy/asf/mail.rb, line 193
def self.listdom2listkey(listdom)
  list, dom = listdom.split('@')
  self.archivelistid(dom, list)
end

# File lib/whimsy/asf/mail.rb, line 180
def self.qmail_ids
  return [] unless File.exist? '/srv/subscriptions/qmail.ids'

  File.read('/srv/subscriptions/qmail.ids').split
end

# File lib/whimsy/asf/mail.rb, line 188
def self.taken?(id)
  self.qmail_ids.include? id
end

# File lib/whimsy/asf/mail.rb, line 221
def self.to_canonical(email)
  parts = email.split('@')
  if parts.length == 2
    name, dom = parts
    return email if name.empty? || dom.empty?

    dom.downcase!
    dom = 'gmail.com' if dom == 'googlemail.com' # same mailbox
    if dom == 'gmail.com'
      return name.sub(/\+.*/, '').gsub('.', '').downcase + '@' + dom
    else
      # Effectively the same:
      dom = 'apache.org' if dom == 'minotaur.apache.org'
      # only downcase the domain (done above)
      return name + '@' + dom
    end
  end
  # Invalid; return input rather than failing
  return email
end

# File lib/whimsy/asf/mail.rb, line 80
def self.unsubbable?(listid)
  !self._cannot_unsub.include? listid
end