# frozen_string_literal: true

require_relative "expiring_lock"

class BillPlanCommand
	def self.for(customer)
		return ForUnregistered.new(customer) unless customer.registered?

		unless customer.balance >= customer.monthly_price
			return ForLowBalance.new(customer)
		end

		new(customer)
	end

	def initialize(customer)
		@customer = customer
	end

	def reload_customer(db)
		@customer = Command.execution.customer_repo.with(db: db)
			.find(customer_id).sync
	end

	def call
		ExpiringLock.new("jmp_customer_bill_plan-#{customer_id}").with {
			@customer.bill_plan(note: note) { |db|
				reload_customer(db).balance > @customer.monthly_price
			}
		}.then do |billed|
			Command.reply do |reply|
				reply.note_type = billed ? :info : :error
				reply.note_text = "#{customer_id}#{billed ? '' : ' not'} billed"
			end
		end
	end

protected

	def note
		"Renew account plan for #{@customer.registered?.phone}"
	end

	def customer_id
		@customer.customer_id
	end

	class ForLowBalance
		def initialize(customer)
			@customer = customer
		end

		def call
			LowBalance.for(@customer).then(&:notify!).then do |amount|
				next command_for(amount).call if amount&.positive?

				notify_failure
				Command.reply do |reply|
					reply.note_type = :error
					reply.note_text = "#{@customer.customer_id} balance is too low"
				end
			end
		end

	protected

		def notify_failure
			m = Blather::Stanza::Message.new
			m.from = CONFIG[:notify_from]
			m.xhtml =
				"Failed to renew account for #{@customer.registered?.phone}. " \
				"To keep your number, please " \
				"<a href='xmpp:cheogram.com?command'>buy more credit soon</a>."
			m.body = m.xhtml_node.text
			@customer.stanza_to(m)
		end

		def command_for(amount)
			BillPlanCommand.for(
				@customer.with_balance(@customer.balance + amount)
			)
		end
	end

	class ForUnregistered
		def initialize(customer)
			@customer = customer
		end

		def call
			Command.reply do |reply|
				reply.note_type = :error
				reply.note_text = "#{@customer.customer_id} is not registered"
			end
		end
	end
end
