# frozen_string_literal: true

require "value_semantics/monkey_patched"
require "lazy_object"

require_relative "call_attempt"
require_relative "trust_level_repo"

class CallAttemptRepo
	value_semantics do
		db    Anything(), default: LazyObject.new { DB }
		redis Anything(), default: LazyObject.new { REDIS }
	end

	def find_outbound(customer, to, **kwargs)
		find(
			customer,
			to,
			direction: :outbound,
			from: customer.registered?.phone,
			to: to,
			**kwargs
		)
	end

	def find_inbound(customer, from, **kwargs)
		find(
			customer,
			from,
			direction: :inbound,
			from: from,
			to: customer.registered?.phone,
			**kwargs
		)
	end

	def starting_call(customer, call_id)
		redis.sadd(
			"jmp_customer_ongoing_calls-#{customer.customer_id}",
			call_id
		).then do
			redis.expire(
				"jmp_customer_ongoing_calls-#{customer.customer_id}",
				60 * 60
			)
		end
	end

	def ending_call(customer_id, call_id)
		redis.srem(
			"jmp_customer_ongoing_calls-#{customer_id}",
			call_id
		)
	end

protected

	def find(customer, other_tel, direction:, **kwargs)
		find_all(customer, other_tel, direction).then do |(rate, usage, tl, c)|
			CallAttempt.for(
				customer: customer, rate: rate, usage: usage,
				supported:
					rate &&
					tl.support_call?(rate, c || 0) &&
					other_tel !~ /\A\+?1?[94]11/,
				direction: direction, **kwargs
			)
		end
	end

	def find_all(customer, other_tel, direction)
		EMPromise.all([
			find_rate(customer.plan_name, other_tel, direction),
			find_usage(customer.customer_id),
			TrustLevelRepo.new(db: db, redis: redis).find(customer),
			redis.scard("jmp_customer_ongoing_calls-#{customer.customer_id}")
		])
	end

	def find_usage(customer_id)
		db.query_one(<<~SQL, customer_id, default: { a: 0 }).then { |r| r[:a] }
			SELECT COALESCE(SUM(charge), 0) AS a FROM cdr_with_charge
			WHERE
				customer_id=$1 AND
				start > DATE_TRUNC('month', LOCALTIMESTAMP)
		SQL
	end

	def find_rate(plan_name, other_tel, direction)
		# || CAD temporary for transitional accounts
		promise = db.query_one(<<~SQL, plan_name || "CAD", other_tel, direction)
			SELECT rate FROM call_rates
			WHERE
				plan_name=$1 AND
				$2 LIKE prefix || '%' AND
				direction=$3
			ORDER BY prefix DESC
			LIMIT 1
		SQL
		promise.then { |row| row&.dig(:rate) }
	end
end