require 'erubis'

module Dovecot
  module Conf

    def self.value(v, default = nil)
      if v.nil?
        default.to_s
      elsif v === true
        'yes'
      elsif v === false
        'no'
      elsif v.kind_of?(Array)
        v.join(' ')
      else
        v.to_s
      end
    end

    def self.attribute(conf, k, default = nil)
      v = conf[k]
      if v.nil?
        "##{k} = #{value(default)}"
      else
        "#{k} = #{value(v)}"
      end
    end

    def self.protocols(conf)
      # dovecot: config: Fatal: Error in configuration file /etc/dovecot/dovecot.conf: protocols: Unknown protocol: lda
      ignore_protos = [ 'lda' ]
      protos = Dovecot::Protocols.list(conf) - ignore_protos
      protos.empty? ? 'none' : protos.join(' ')
    end

    def self.authdb(driver, type, conf)

      template =
'<% confs = @conf.kind_of?(Array)? @conf : [ @conf ]
    confs.each do |conf| -%>
<%=   @type %> {
  <%  unless conf.has_key?("driver") -%>
  driver = <%=   @driver %>
  <%  end -%>
  <%  conf.sort.each do |key, value|
        unless value.nil?
  -%>
  <%=     key %> = <%= @Dovecot_Conf.value(value) %>
  <%    end
      end
    end -%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :driver => driver,
        :type => type,
        :conf => conf,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

    def self.plugin(name, conf)

      template =
'plugin {
  <% @conf.sort.each do |key, value|
       unless value.nil?
  -%>
  <%=    key %> = <%= @Dovecot_Conf.value(value) %>
  <%   end
     end -%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :conf => conf,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

    def self.namespace(ns)

      template =
'namespace <%= @ns["name"] %> {
<%   @ns.sort.each do |key, value|
       if key != "name"
  -%>
  <%=    key %> = <%= @Dovecot_Conf.value(value) %>
  <%   end
     end
-%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :ns => ns,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

    def self.protocol(name, conf)

      template =
'protocol <%= @name %> {
  <% @conf.sort.each do |key, value| -%>
  <%=  key %> = <%= @Dovecot_Conf.value(value) %>
  <% end -%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :name => name,
        :conf => conf,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

    def self.service(name, conf)

      template =
'service <%= @name %> {
  <% if @conf["listeners"].kind_of?(Array) or @conf["listeners"].kind_of?(Hash)
      listeners = @conf["listeners"].kind_of?(Array) ? @conf["listeners"] : [ @conf["listeners"] ]
      listeners.each do |listener|
        listener.sort.each do |service, values|
          service_proto = service.split(":")[0]
          service_name = service.split(":")[1]
  -%>
  <%=     service_proto %>_listener <%= service_name %> {
  <%        values.sort.each do |key, value|-%>
    <%=       key %> = <%= @Dovecot_Conf.value(value) %>
  <%        end -%>
  }
  <%     end -%>
  <%   end -%>
  <% end -%>
  <% @conf.sort.each do |key, value|
       if key != "listeners"
  -%>
  <%=    key %> = <%= @Dovecot_Conf.value(value) %>
  <%   end -%>
  <% end -%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :name => name,
        :conf => conf,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

    def self.map(map)

    template =
'map {
<%     @map.sort.each do |k, v|
         if v.kind_of?(Hash)
-%>
  <%=      k %> {
<%
           v.sort.each do |k2, v2|
-%>
    <%=      k2 %> = <%= @Dovecot_Conf.value(v2) %>
<%         end -%>
  }
<%       else -%>
  <%=      k %> = <%= @Dovecot_Conf.value(v) %>
<%       end
       end
-%>
}'

      eruby = Erubis::Eruby.new(template)
      eruby.evaluate(
        :map => map,
        :Dovecot_Conf => Dovecot::Conf
      )
    end

  end
end