# frozen_string_literal: true

require "test_helper"
require "customer_info"
require "trust_level_repo"
require "trust_level"

CustomerPlan::DB = Minitest::Mock.new
CustomerPlan::REDIS = Minitest::Mock.new
CustomerUsage::DB = Minitest::Mock.new
PlanInfo::DB = FakeDB.new(
	["test"] => [
		{
			"start_date" => Time.parse("2020-01-01"),
			"activation_date" => Time.parse("2021-01-01")
		}
	]
)
Subaccount::DB = Minitest::Mock.new
TrivialBackendSgxRepo::REDIS = Minitest::Mock.new

class CustomerInfoTest < Minitest::Test
	def test_info_does_not_crash
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.to_d }),
			[String, "test"]
		)

		cust = customer(sgx: sgx, plan_name: "test_usd")

		assert CustomerInfo.for(cust).sync.form
		assert_mock sgx
		assert_mock CustomerUsage::DB
	end
	em :test_info_does_not_crash

	def test_info_has_remaining_included_calling_credit
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.044.to_d }),
			[String, "test"]
		)

		cust = customer(sgx: sgx, plan_name: "test_usd")

		assert_equal(
			"$1.0000",
			CustomerInfo.for(cust).sync.form
				.field("remaining_included_calling_credit").value
		)
		assert_mock sgx
		assert_mock CustomerUsage::DB
	end
	em :test_info_has_remaining_included_calling_credit

	def test_info_out_of_remaining_included_calling_credit
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 10.to_d }),
			[String, "test"]
		)

		cust = customer(sgx: sgx, plan_name: "test_usd")

		assert_equal(
			"$0.0000",
			CustomerInfo.for(cust).sync.form
				.field("remaining_included_calling_credit").value
		)
		assert_mock sgx
		assert_mock CustomerUsage::DB
	end
	em :test_info_out_of_remaining_included_calling_credit

	def test_admin_info_does_not_crash
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)
		fwd = CustomerFwd.for(uri: "tel:+12223334444", timeout: 15)
		sgx.expect(:fwd, fwd)
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.to_d }),
			[String, "test"]
		)

		Subaccount::DB.expect(
			:query_defer,
			EMPromise.resolve({}),
			[String, ["test"]]
		)

		TrivialBackendSgxRepo::REDIS.expect(
			:get,
			EMPromise.resolve(nil),
			["jmp_customer_backend_sgx-test"]
		)
		cust = customer(sgx: sgx, plan_name: "test_usd")

		trust_repo = Minitest::Mock.new
		trust_repo.expect(:find, TrustLevel::Basement, [cust])

		assert AdminInfo.for(cust, trust_level_repo: trust_repo).sync.form
		assert_mock sgx
		assert_mock trust_repo
		assert_mock CustomerUsage::DB
		assert_mock Subaccount::DB
		assert_mock TrivialBackendSgxRepo::REDIS
	end
	em :test_admin_info_does_not_crash

	def test_admin_info_with_tel_does_not_crash
		registered = Struct.new(:phone).new("+12223334444")
		fwd = CustomerFwd.for(uri: "tel:+12223334444", timeout: 15)
		sgx = Struct.new(:registered?, :fwd).new(registered, fwd)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.to_d }),
			[String, "test"]
		)

		Subaccount::DB.expect(
			:query_defer,
			EMPromise.resolve([]),
			[String, ["test"]]
		)

		TrivialBackendSgxRepo::REDIS.expect(
			:get,
			EMPromise.resolve(nil),
			["jmp_customer_backend_sgx-test"]
		)

		cust = customer(sgx: sgx, plan_name: "test_usd")

		call_attempt_repo = Minitest::Mock.new
		call_attempt_repo.expect(
			:find_outbound,
			CallAttempt::Unsupported.new(direction: :outbound),
			[cust, "+1"], call_id: "dry_run"
		)

		trust_repo = Minitest::Mock.new
		trust_repo.expect(:find, TrustLevel::Basement, [cust])

		assert AdminInfo.for(
			cust,
			trust_level_repo: trust_repo,
			call_attempt_repo: call_attempt_repo
		).sync.form
		assert_mock call_attempt_repo
		assert_mock trust_repo
		assert_mock CustomerUsage::DB
		assert_mock Subaccount::DB
		assert_mock TrivialBackendSgxRepo::REDIS
	end
	em :test_admin_info_with_tel_does_not_crash

	def test_inactive_info_does_not_crash
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)

		plan = CustomerPlan.new("test", plan: nil, expires_at: nil)
		cust = Customer.new(
			"test",
			Blather::JID.new("test@example.net"),
			plan: plan,
			sgx: sgx
		)
		assert CustomerInfo.for(cust).sync.form
		assert_mock sgx
	end
	em :test_inactive_info_does_not_crash

	def test_inactive_admin_info_does_not_crash
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)
		sgx.expect(:registered?, false)
		sgx.expect(:fwd, CustomerFwd::None.new(uri: nil, timeout: nil))

		Subaccount::DB.expect(
			:query_defer,
			EMPromise.resolve([]),
			[String, ["test"]]
		)

		TrivialBackendSgxRepo::REDIS.expect(
			:get,
			EMPromise.resolve(nil),
			["jmp_customer_backend_sgx-test"]
		)

		plan = CustomerPlan.new("test", plan: nil, expires_at: nil)
		cust = Customer.new(
			"test",
			Blather::JID.new("test@example.net"),
			plan: plan,
			sgx: sgx
		)

		trust_repo = Minitest::Mock.new
		trust_repo.expect(:find, TrustLevel::Basement, [cust])

		assert AdminInfo.for(cust, trust_level_repo: trust_repo).sync.form
		assert_mock sgx
		assert_mock trust_repo
		assert_mock Subaccount::DB
		assert_mock TrivialBackendSgxRepo::REDIS
	end
	em :test_inactive_admin_info_does_not_crash

	def test_admin_info_subaccount_does_not_crash
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)
		fwd = CustomerFwd.for(uri: "tel:+12223334444", timeout: 15)
		sgx.expect(:fwd, fwd)
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.to_d }),
			[String, "test"]
		)

		Subaccount::DB.expect(
			:query_defer,
			EMPromise.resolve([]),
			[String, ["parent"]]
		)

		TrivialBackendSgxRepo::REDIS.expect(
			:get,
			EMPromise.resolve(nil),
			["jmp_customer_backend_sgx-test"]
		)

		cust = customer(
			sgx: sgx,
			plan_name: "test_usd",
			parent_customer_id: "parent"
		)

		trust_repo = Minitest::Mock.new
		trust_repo.expect(:find, TrustLevel::Basement, [cust])

		assert AdminInfo.for(cust, trust_level_repo: trust_repo).sync.form
		assert_mock sgx
		assert_mock trust_repo
		assert_mock CustomerUsage::DB
		assert_mock Subaccount::DB
		assert_mock TrivialBackendSgxRepo::REDIS
	end
	em :test_admin_info_subaccount_does_not_crash

	def test_admin_info_includes_route
		sgx = Minitest::Mock.new
		sgx.expect(:registered?, false)
		fwd = CustomerFwd.for(uri: "tel:+12223334444", timeout: 15)
		sgx.expect(:fwd, fwd)
		sgx.expect(:registered?, false)

		CustomerPlan::DB.expect(
			:query_one,
			EMPromise.resolve({ start_date: Time.now }),
			[String, "test"]
		)

		CustomerUsage::DB.expect(
			:query_one,
			EMPromise.resolve({ charges: 0.to_d }),
			[String, "test"]
		)

		Subaccount::DB.expect(
			:query_defer,
			EMPromise.resolve({}),
			[String, ["test"]]
		)

		TrivialBackendSgxRepo::REDIS.expect(
			:get,
			EMPromise.resolve("route_value"),
			["jmp_customer_backend_sgx-test"]
		)

		cust = customer(sgx: sgx, plan_name: "test_usd")

		trust_repo = Minitest::Mock.new
		trust_repo.expect(:find, TrustLevel::Basement, [cust])

		admin_info = AdminInfo.for(cust, trust_level_repo: trust_repo).sync.form

		assert admin_info
		assert admin_info.field("route").value == "route_value"
		assert_mock sgx
		assert_mock trust_repo
		assert_mock CustomerUsage::DB
		assert_mock Subaccount::DB
		assert_mock TrivialBackendSgxRepo::REDIS
	end
	em :test_admin_info_includes_route
end
