# frozen_string_literal: true

module Expo
  module Push
    ##
    # A single receipt for a single notification.
    #
    # - In case of an #ok? receipt, no action need be taken
    # - In case of an #error? receipt, holds the #message, #explain
    #
    # Some failed receipts may expose which push token is not or no longer
    # valid. This is exposed via #original_push_token.
    #
    class Receipt
      attr_reader :data, :receipt_id

      def initialize(data:, receipt_id:)
        self.data = data
        self.receipt_id = receipt_id
      end

      def original_push_token
        return nil if ok?

        if message.include?('PushToken[')
          return /Expo(?:nent)?PushToken\[(?:[^\]]+?)\]/.match(message) { |match| match[0] }
        end

        /\A[a-z\d]{8}-[a-z\d]{4}-[a-z\d]{4}-[a-z\d]{4}-[a-z\d]{12}\z/i.match(message) { |match| match[0] }
      end

      def message
        data.fetch('message')
      end

      def explain
        Expo::Push::Error.explain((data['details'] || {})['error'])
      end

      def ok?
        data['status'] == 'ok'
      end

      def error?
        data['status'] == 'error'
      end

      private

      attr_writer :data, :receipt_id
    end

    ##
    # Receipts represent a single call to the receipts endpoint. It holds both
    # the successfully retrieved receipts, as well as the still unresolved IDs.
    #
    # You MUST iterate #each_error and first check if its an Error, which would
    # be the case if the entire call failed. Otherwise, it will iterate through
    # each receipt that indicates a failed push.
    #
    # Keep calling the receipts endpoint until #unresolved_ids is empty, or a
    # day has passed at least.
    #
    # @see Receipt
    #
    class Receipts
      def initialize(results:, requested_ids:)
        self.results = results
        self.requested_ids = requested_ids
      end

      def each
        receipts.each do |receipt|
          next unless receipt.ok?

          yield receipt
        end
      end

      def each_error
        results.each do |receipt|
          next yield receipt if receipt.is_a?(Error)
          next unless receipt.error?

          yield receipt
        end
      end

      def unresolved_ids
        requested_ids - results.keys
      end

      private

      attr_accessor :results, :requested_ids
    end
  end
end