require 'emaildirect'
require 'json'

module EmailDirect
  # Represents a list and associated functionality
  class List
    class << self
      def all(options = {})
        response = EmailDirect.get '/Lists', :query => options
        Hashie::Mash.new(response)
      end

      def create(name, options = {})
        options.merge! :Name => name
        response = EmailDirect.post '/Lists', :body => options.to_json
        Hashie::Mash.new(response)
      end
    end

    attr_reader :list_id

    def initialize(list_id)
      @list_id = list_id
    end

    def details
      response = get
      Hashie::Mash.new(response)
    end

    def members
      response = get 'Members'
      Hashie::Mash.new(response)
    end

    def update(name, options)
      options.merge! :Name => name
      response = EmailDirect.put uri_for, :body => options.to_json
      Hashie::Mash.new(response)
    end

    def delete
      response = EmailDirect.delete uri_for, {}
      Hashie::Mash.new(response)
    end

    def add_emails(email_addresses)
      options = { :EmailAddresses => Array(email_addresses) }
      response = post 'AddEmails', :body => options.to_json
      Hashie::Mash.new(response)
    end

    def remove_emails(email_addresses)
      options = { :EmailAddresses => Array(email_addresses) }
      response = post 'RemoveEmails', :body => options.to_json
      Hashie::Mash.new(response)
    end

    private

    def post(action, options)
      EmailDirect.post uri_for(action), options
    end

    def get(action = nil)
      EmailDirect.get uri_for(action)
    end

    def uri_for(action = nil)
      action = "/#{action}" if action
      "/Lists/#{list_id}#{action}"
    end
  end
end