class SavedSearch < ActiveRecord::Base
  module ListbooruMethods
    extend ActiveSupport::Concern

    module ClassMethods
      def refresh_listbooru(user_id, name)
        return unless Danbooru.config.listbooru_auth_key
        params = {
          :user_id => user_id,
          :name => name,
          :key => Danbooru.config.listbooru_auth_key
        }
        uri = URI.parse("#{Danbooru.config.listbooru_server}/users")
        uri.query = URI.encode_www_form(params)
        Net::HTTP.get_response(uri)
      end

      def update_listbooru_on_create(user_id, name, query)
        return unless Danbooru.config.listbooru_auth_key
        uri = URI.parse("#{Danbooru.config.listbooru_server}/searches")
        Net::HTTP.post_form(uri, {"user_id" => user_id, "name" => name.try(:downcase), "query" => query, "key" => Danbooru.config.listbooru_auth_key})
      end

      def update_listbooru_on_destroy(user_id, name, query)
        return unless Danbooru.config.listbooru_auth_key
        uri = URI.parse("#{Danbooru.config.listbooru_server}/searches")
        Net::HTTP.start(uri.host, uri.port) do |http|
          req = Net::HTTP::Delete.new("/searches")
          req.set_form_data("user_id" => user_id, "name" => name.try(:downcase), "query" => query, "key" => Danbooru.config.listbooru_auth_key)
          http.request(req)
        end
      end
    end

    def update_listbooru_on_create
      return unless Danbooru.config.listbooru_auth_key
      SavedSearch.delay(:queue => "default").update_listbooru_on_create(user_id, category, tag_query)
    end

    def update_listbooru_on_destroy
      return unless Danbooru.config.listbooru_auth_key
      SavedSearch.delay(:queue => "default").update_listbooru_on_destroy(user_id, category, tag_query)
    end
  end

  include ListbooruMethods

  belongs_to :user
  validates :tag_query, :presence => true
  validate :validate_count
  attr_accessible :tag_query, :category
  before_create :update_user_on_create
  after_destroy :update_user_on_destroy
  after_create :update_listbooru_on_create
  after_destroy :update_listbooru_on_destroy
  validates_uniqueness_of :tag_query, :scope => :user_id
  before_validation :normalize

  def self.tagged(tags)
    where(:tag_query => SavedSearch.normalize(tags)).first
  end

  def self.normalize(tag_query)
    Tag.scan_query(tag_query).join(" ")
  end

  def normalize
    self.tag_query = SavedSearch.normalize(tag_query)
  end

  def validate_count
    if user.saved_searches.count + 1 > user.max_saved_searches
      self.errors[:user] << "can only have up to #{user.max_saved_searches} " + "saved search".pluralize(user.max_saved_searches)
    end
  end

  def update_user_on_create
    if !user.has_saved_searches?
      user.update_attribute(:has_saved_searches, true)
    end
  end

  def update_user_on_destroy
    if user.saved_searches.count == 0
      user.update_attribute(:has_saved_searches, false)
    end
  end

end