require 'backburner/job'

module Backburner
  #
  # @abstract Subclass and override {#process_tube_names}, {#prepare} and {#start} to implement
  #   a custom Worker class.
  #
  class Worker
    include Backburner::Helpers
    include Backburner::Logger

    # Backburner::Worker.known_queue_classes
    # List of known_queue_classes
    class << self
      attr_writer :known_queue_classes

      def known_queue_classes
        @known_queue_classes ||= []
      end
    end

    # Enqueues a job to be processed later by a worker.
    # Options: `pri` (priority), `delay` (delay in secs), `ttr` (time to respond), `queue` (queue name)
    #
    # @raise [Beaneater::NotConnected] If beanstalk fails to connect.
    # @example
    #   Backburner::Worker.enqueue NewsletterSender, [self.id, user.id], :ttr => 1000
    #
    def self.enqueue(job_class, args = [], opts = {})
      # Invoke Procs if they are sent
      opts.each_key do |k|
        opts[k] = opts[k].call job_class, args if opts[k].instance_of?(Proc)
      end

      opts[:shard_key] = opts[:shard_key].nil? ? 'X' : opts[:shard_key].to_s
      pri   = resolve_priority(opts[:pri] || job_class)
      delay = [0, opts[:delay].to_i].max
      ttr   = resolve_respond_timeout(opts[:ttr] || job_class)
      res   = Backburner::Hooks.invoke_hook_events(job_class, :before_enqueue, *args)

      return nil unless res # stop if hook is false

      data = { class: job_class.name, args: args, ttr: ttr }
      queue = opts[:queue] && (opts[:queue].is_a?(Proc) ? opts[:queue].call(job_class) : opts[:queue])

      begin
        response = nil
        connection = Backburner::Connection.new(Backburner.configuration.allq_url)
        connection.retryable do
          tube_name = expand_tube_name(queue || job_class)
          serialized_data = Backburner.configuration.job_serializer_proc.call(data)
          send_data = {
            pri: pri,
            delay: delay,
            ttr: ttr
          }
          opts.merge!(send_data)
          response = connection.put(tube_name, serialized_data, opts)
        end
        return nil unless Backburner::Hooks.invoke_hook_events(job_class, :after_enqueue, *args)
      ensure
        connection.close if connection
      end

      response
    end

    # Starts processing jobs with the specified tube_names.
    #
    # @example
    #   Backburner::Worker.start(["foo.tube.name"])
    #
    def self.start(tube_names = nil)
      new(tube_names).start
    rescue SystemExit
      # do nothing
    end

    # List of tube names to be watched and processed
    attr_accessor :tube_names, :connection

    # Constructs a new worker for processing jobs within specified tubes.
    #
    # @example
    #   Worker.new(['test.job'])
    def initialize(tube_names = nil)
      @connection = new_connection
      @tube_names = process_tube_names(tube_names)
      register_signal_handlers!
    end

    # Starts processing ready jobs indefinitely.
    # Primary way to consume and process jobs in specified tubes.
    #
    # @example
    #   @worker.start
    #
    def start
      raise NotImplementedError
    end

    # Used to prepare the job queues before job processing is initiated.
    #
    # @raise [Beaneater::NotConnected] If beanstalk fails to connect.
    # @example
    #   @worker.prepare
    #
    # @abstract Define this in your worker subclass
    # to be run once before processing. Recommended to watch tubes
    # or print a message to the logs with 'log_info'
    #
    def prepare
      raise NotImplementedError
    end

    # Triggers this worker to shutdown
    def shutdown
      Thread.new do
        log_info 'Worker exiting...'
      end
      Kernel.exit
    end

    # Processes tube_names given tube_names array.
    # Should return normalized tube_names as an array of strings.
    #
    # @example
    #   process_tube_names([['foo'], ['bar']])
    #   => ['foo', 'bar', 'baz']
    #
    # @note This method can be overridden in inherited workers
    # to add more complex tube name processing.
    def process_tube_names(tube_names)
      compact_tube_names(tube_names)
    end

    # Performs a job by reserving a job from beanstalk and processing it
    #
    # @example
    #   @worker.work_one_job
    # @raise [Beaneater::NotConnected] If beanstalk fails to connect multiple times.
    def work_one_job(conn = connection, tube_name = nil)
      if tube_name.nil?
        log_error 'Sampling tube, this is bad practice for Allq'
        tube_name = @tube_names.sample
      end

      begin
        job = reserve_job(conn, tube_name)
      rescue Exception => e
        log_error "Exception: #{e.full_message}"
        sleep(rand * 3)
        return
      end

      if job && job.body
        begin
          log_job_begin(job.name, job.args)
          job.process
          log_job_end(job.name)
        rescue Backburner::Job::JobFormatInvalid => e
          log_error exception_message(e)
        rescue StandardError => e # Error occurred processing job
          log_error "Exception during process"
          log_error exception_message(e) unless e.is_a?(Backburner::Job::RetryJob)

          unless job
            log_error 'Error occurred before we were able to assign a job. Giving up without retrying!'
            return
          end

          handle_failure_for_job(job)

          handle_error(e, job.name, job.args, job)
        end
      else
        sleep(rand * 3)
      end
      job
    end


    def handle_failure_for_job(job)
      log_error "Handle failure for job"

      num_retries = job.task.releases
      max_job_retries = resolve_max_job_retries(job.job_class)

      retry_status = "failed: attempt #{num_retries+1} of #{max_job_retries+1}"

      if num_retries < max_job_retries # retry again
        retry_delay = resolve_retry_delay(job.job_class)
        delay = resolve_retry_delay_proc(job.job_class).call(retry_delay, num_retries) rescue retry_delay
log_error("Delay should be #{delay}")
        job.retry(num_retries + 1, delay)
        log_job_end(job.name, "#{retry_status}, retrying in #{delay}s") if job_started_at
      else # retries failed, bury
        job.bury
        log_job_end(job.name, "#{retry_status}, burying") if job_started_at
      end

    end

    protected

    # Return a new connection instance
    def new_connection
      Connection.new(Backburner.configuration.allq_url) { |conn| Backburner::Hooks.invoke_hook_events(self, :on_reconnect, conn) }
    end

    # Reserve a job from the watched queues
    def reserve_job(conn, tube_name, _reserve_timeout = Backburner.configuration.reserve_timeout)
      job = conn.get(tube_name)
      return nil if job.nil? || job.body == nil?

      Backburner::Job.new(job)
    end

    # Returns a list of all tubes known within the system
    # Filtered for tubes that match the known prefix
    def all_existing_queues
      known_queues    = Backburner::Worker.known_queue_classes.map(&:queue)
      existing_tubes  = connection.tubes.all.map(&:name).select { |tube| tube =~ /^#{queue_config.tube_namespace}/ }
      existing_tubes + known_queues + [queue_config.primary_queue]
    end

    # Handles an error according to custom definition
    # Used when processing a job that errors out
    def handle_error(e, name, args, job)
      if error_handler = Backburner.configuration.on_error
        if error_handler.arity == 1
          error_handler.call(e)
        elsif error_handler.arity == 3
          error_handler.call(e, name, args)
        else
          error_handler.call(e, name, args, job)
        end
      end
    end

    # Normalizes tube names given array of tube_names
    # Compacts nil items, flattens arrays, sets tubes to nil if no valid names
    # Loads default tubes when no tubes given.
    def compact_tube_names(tube_names)
      tube_names = tube_names.first if tube_names && tube_names.size == 1 && tube_names.first.is_a?(Array)
      tube_names = Array(tube_names).compact if tube_names && Array(tube_names).compact.size > 0
      tube_names = nil if tube_names && tube_names.compact.empty?
      tube_names ||= Backburner.default_queues.any? ? Backburner.default_queues : all_existing_queues
      Array(tube_names).uniq
    end

    # Registers signal handlers TERM and INT to trigger
    def register_signal_handlers!
      trap('TERM') { shutdown  }
      trap('INT')  { shutdown  }
    end
  end # Worker
end # Backburner