local Luan = require "luan:Luan.luan"
local error = Luan.error
local pairs = Luan.pairs or error()
local stringify = Luan.stringify or error()
local Table = require "luan:Table.luan"
local table_copy = Table.copy or error()
local Parsers = require "luan:Parsers.luan"
local json_string = Parsers.json_string or error()
local Time = require "luan:Time.luan"
local parse_time = Time.parse or error()
local Order = require "site:/lib/Order.luan"
local Shared = require "site:/lib/Shared.luan"
local time_format = Shared.time_format or error()
local Logging = require "luan:logging/Logging.luan"
local logger = Logging.logger "After"


local After = {}

function After.create_orders(request,rtn_orders)
	local orders = request.orders
	request = table_copy(request)
	for key, response in pairs(rtn_orders) do
		if response.okay then
			local request_order = orders[key]
			request.orders = { [key] = request_order }
			local order = Order.new{
				target = request.target
				shipper = request_order.shipper
				order_id = response.orderId
				request = json_string(request)
				label = response.label
			}
			order.save()
		end
	end
end

After.create_returns = After.create_orders

function After.get_tracking(request,rtn_orders)
	local orders = request.orders
	for key, response in pairs(rtn_orders) do
		if not response.okay then
			continue
		end
		local request_order = orders[key]
		local order_id = request_order.orderId or error()
		local shipper = request_order.shipper or error()
		local order = Order.get(shipper,order_id)
		if order == nil then
			continue
		end
		if order.status=="warning" then
			response.warning = order.warning or error()
		end
		if response.usps ~= order.usps then
			order = order.set("usps",response.usps)
		end
		local shipped = response.shippedTime
		if shipped == nil then
			continue
		end
		shipped = parse_time(time_format,shipped);
		if response.delivered and order.status==nil then
			order.delete()
		elseif shipped ~= order.shipped then
			order = order.set("shipped",shipped)
		end
	end
end

return After