local XUiShopItem = XLuaUiManager.Register(XLuaUi, "UiShopItem")
local MAX_COUNT = CS.XGame.Config:GetInt("ShopBuyGoodsCountLimit")
local ColorRed = CS.XGame.ClientConfig:GetString("ShopCanNotBuyColor")
local ColorBlack = CS.XGame.ClientConfig:GetString("ShopCanBuyColor")
local Interval = 100
local SpeedBaseNumber = 150
local CountBaseNumber = 100
local Application = CS.UnityEngine.Application
local Platform = Application.platform
local RuntimePlatform = CS.UnityEngine.RuntimePlatform
function XUiShopItem:OnStart(parent, data, cb, shopCanBuyColor)
    if data then
        self.Data = data
    else
        return
    end
    if cb then
        self.CallBack = cb
    end
    self.Parent = parent
    self.ShopCanBuyColor = shopCanBuyColor or ColorBlack

    self:AutoAddListener()
    self:SetSelectTextData()
    self.Grid = XUiGridCommon.New(self, self.GridBuyCommon)
    self.Price = {}
    table.insert(self.Price, self.PanelCostItem1)
    table.insert(self.Price, self.PanelCostItem2)
    table.insert(self.Price, self.PanelCostItem3)

    self.WgtBtnAddSelect = self.BtnAddSelect.gameObject:GetComponent("XUiPointer")
    self.WgtBtnMinusSelect = self.BtnMinusSelect.gameObject:GetComponent("XUiPointer")

    XUiButtonLongClick.New(self.WgtBtnAddSelect, Interval, self, nil, self.BtnAddSelectLongClickCallback, nil, true)
    XUiButtonLongClick.New(self.WgtBtnMinusSelect, Interval, self, nil, self.BtnMinusSelectLongClickCallback, nil, true)

    self:InitPanel()
end

function XUiShopItem:InitPanel()

    self.MinCount = 1
    self.Count = 1
    self.Consumes = {}
    self.BuyConsumes = {}

    XTool.LoopMap(self.Data.ConsumeList, function(_, consume)
        local buyitem = {}
        buyitem.Id = consume.Id
        buyitem.Count = consume.Count
        table.insert(self.Consumes, buyitem)
        local consumes = {}
        consumes.Id = consume.Id
        consumes.Count = 0
        table.insert(self.BuyConsumes, consumes)
    end)

    self:RefreshCommon()
    self:RefreshPrice()
    self:GetSalesInfo()
    self:GetMaxCount()
    self:RefreshConsumes()
    self:SetCanBuyCount()
    self:JudgeBuy()
    self:HaveItem()
    self:SetCanAddOrMinusBtn()
    if #self.BuyConsumes == 1 and self.BuyConsumes[1].Id == 200006 then --海外修改，当前消耗物品是赛利卡研发券是显示弹窗链接
        self:ShowSpecialRegulationForJP()
    end
    self.TxtSelect.text = self.Count
end

function XUiShopItem:ShowSpecialRegulationForJP() --海外修改
    local isShow = CS.XGame.ClientConfig:GetInt("ShowRegulationEnable")
    if isShow and isShow == 1 then
        local url = CS.XGame.ClientConfig:GetString("RegulationPrefabUrl")
        if url then
            self.PanelInfo = self.GameObject.transform:Find("SafeAreaContentPane/PanelInfo")
            local obj = self.PanelInfo:LoadPrefab(url)
            local data = {type = 1,consumeId = 200006}
            self.ShowSpecialRegBtn = obj.transform:GetComponent("XHtmlText")
            self.ShowSpecialRegBtn.text = CS.XTextManager.GetText("JPBusinessLawsDetailsEnter")
            self.ShowSpecialRegBtn.HrefUnderLineColor = CS.UnityEngine.Color(1, 45 / 255, 45 / 255, 1)
            self.ShowSpecialRegBtn.transform.localPosition = CS.UnityEngine.Vector3(0, -330, 0)
            self.ShowSpecialRegBtn.fontSize = 30
            self.ShowSpecialRegBtn.HrefListener = function(link)
                XLuaUiManager.Open("UiSpecialRegulationShow",data)
            end
        end
    end
end

function XUiShopItem:AutoAddListener()

    self.BtnMax.CallBack = function()
        self:OnBtnMaxClick()
    end

    self.BtnUse.CallBack = function()
        self:OnBtnUseClick()
    end

    self.BtnAddSelect.CallBack = function()
        self:OnBtnAddSelectClick()
    end

    self.BtnMinusSelect.CallBack = function()
        self:OnBtnMinusSelectClick()
    end

    self.TxtSelect.onValueChanged:AddListener(function()
        self:OnSelectTextChange()
    end)

    self.TxtSelect.onEndEdit:AddListener(function()
        self:OnSelectTextInputEnd()
    end)

    self.BtnTanchuangClose.CallBack = function()
        self:OnBtnBlockClick()
    end
end

function XUiShopItem:SetSelectTextData()
    self.TxtSelect.characterLimit = 4
    self.TxtSelect.contentType = CS.UnityEngine.UI.InputField.ContentType.IntegerNumber
end

-- auto
function XUiShopItem:OnBtnBlockClick()
    self:Close()
end

function XUiShopItem:RemoveUI()
    XLuaUiManager.Remove("UiShopItem")
end

function XUiShopItem:OnBtnAddSelectClick()
    if self.Count + 1 > self.MaxCount then
        XDataCenter.EquipManager.ShowBoxOverLimitText()
        return
    end
    self.Count = self.Count + 1
    self:RefreshConsumes()
    self:JudgeBuy()
    self.TxtSelect.text = self.Count
    self:SetCanAddOrMinusBtn()
end

function XUiShopItem:OnBtnMinusSelectClick()
    if self.Count - 1 < self.MinCount then
        return
    end
    self.Count = self.Count - 1
    self:RefreshConsumes()
    self:JudgeBuy()
    self.TxtSelect.text = self.Count
    self:SetCanAddOrMinusBtn()
end

function XUiShopItem:BtnAddSelectLongClickCallback(time)
    if self.Count + 1 > self.MaxCount then
        XDataCenter.EquipManager.ShowBoxOverLimitText()
        return
    end

    local delta = math.max(0, math.floor(time / SpeedBaseNumber))
    self.Count = self.Count + delta
    if self.MaxCount and self.Count >= self.MaxCount then
        self.Count = self.MaxCount
    end

    self:RefreshConsumes()
    self:JudgeBuy()
    self.TxtSelect.text = self.Count
    self:SetCanAddOrMinusBtn()
end

function XUiShopItem:BtnMinusSelectLongClickCallback(time)
    if self.Count - 1 < self.MinCount then
        return
    end
    local delta = math.max(0, math.floor(time / SpeedBaseNumber))
    self.Count = self.Count - delta
    if self.Count <= 0 then
        self.Count = 0
    end
    self:RefreshConsumes()
    self:JudgeBuy()
    self.TxtSelect.text = self.Count
    self:SetCanAddOrMinusBtn()
end

function XUiShopItem:OnBtnMaxClick()
    self.Count = math.min(self.MaxCount, self.CanBuyCount)
    self:RefreshConsumes()
    self:JudgeBuy()
    self.TxtSelect.text = self.Count
    self:SetCanAddOrMinusBtn()
end

function XUiShopItem:OnSelectTextChange()
    if self.TxtSelect.text == nil or self.TxtSelect.text == "" then
        return
    end
    if self.TxtSelect.text == "0" then
        self.TxtSelect.text = 1
    end
    local tmp = tonumber(self.TxtSelect.text)
    local tmpMax = math.max(math.min(MAX_COUNT, self.MaxCount), 1)
    if tmp > tmpMax then
        tmp = tmpMax
        self.TxtSelect.text = tmp
    end
    self.Count = tmp
    self:RefreshConsumes()
    self:JudgeBuy()
end

function XUiShopItem:OnSelectTextInputEnd()
    if self.TxtSelect.text == nil or self.TxtSelect.text == "" then
        self.TxtSelect.text = 1
        local tmp = tonumber(self.TxtSelect.text)
        self.Count = tmp
        self:RefreshConsumes()
        self:JudgeBuy()
    end
end

function XUiShopItem:SetCanAddOrMinusBtn()
    self.BtnMinusSelect.interactable = self.Count > self.MinCount
    self.BtnAddSelect.interactable = self.MaxCount > self.Count

    if self.BtnMax then
        self.BtnMax:SetDisable(self.MaxCount <= 1)
    end

    if self.PanelTxt then
        self.PanelTxt.gameObject:SetActiveEx(self.MaxCount < MAX_COUNT)
    end

    if self.TxtCanBuy then
        self.TxtCanBuy.text = self.MaxCount
    end
end

function XUiShopItem:OnBtnUseClick()
    if self.HaveNotBuyCount then
        if not XDataCenter.EquipManager.ShowBoxOverLimitText() then
            XUiManager.TipText("ShopHaveNotBuyCount")
        end
        return
    end

    for k, v in pairs(self.NotEnough or {}) do
        if v.ItemId == XDataCenter.ItemManager.ItemId.PaidGem then
            local result = XDataCenter.ItemManager.CheckItemCountById(v.ItemId, v.UseItemCount)
            if not result then
                XUiManager.TipText("ShopItemPaidGemNotEnough")
                XLuaUiManager.Open("UiPurchase", XPurchaseConfigs.TabsConfig.HK)
                return
            end
        elseif v.ItemId == XDataCenter.ItemManager.ItemId.HongKa then
            local result = XDataCenter.ItemManager.CheckItemCountById(v.ItemId, v.UseItemCount)
            if not result then
                XUiManager.TipText("ShopItemHongKaNotEnough")
                XLuaUiManager.Open("UiPurchase", XPurchaseConfigs.TabsConfig.Pay)
                return
            end
        else
            if not XDataCenter.ItemManager.DoNotEnoughBuyAsset(v.ItemId,
            v.UseItemCount,
            1,
            function()
                self:OnBtnUseClick()
            end,
            "BuyNeedItemInsufficient") then
                return
            end
            self.NotEnough[k] = nil
        end
    end

    local func = function()
        if self.Data.PayKeySuffix then
            local key = XPayConfigs.GetProductKey(self.Data.PayKeySuffix)
            XDataCenter.PayManager.Pay(key, 2, { self.Parent:GetCurShopId(), self.Data.Id }, self.Data.Id, function()
                    self:RemoveUI()
                end)
        else
            XShopManager.BuyShop(self.Parent:GetCurShopId(), self.Data.Id, self.Count, function ()
                    self.CallBack(self.Count)
                    XUiManager.TipText("BuySuccess")
                    self.Parent:RefreshBuy(true)
                    self:RemoveUI()
                end)
        end
    end

    self:CheckBuyItemTypeOfWeaponFashion(func)
end

function XUiShopItem:HaveItem()
    if XArrangeConfigs.GetType(self.Data.RewardGoods.TemplateId) == XArrangeConfigs.Types.Furniture then
        self.TxtOwnCount.gameObject:SetActiveEx(false)
    else
        local count = XGoodsCommonManager.GetGoodsCurrentCount(self.Data.RewardGoods.TemplateId)
        self.TxtOwnCount.text = CS.XTextManager.GetText("CurrentlyHas", count)
        self.TxtOwnCount.gameObject:SetActiveEx(true)
    end
end

function XUiShopItem:RefreshCommon()
    self.RImgType.gameObject:SetActiveEx(false)

    local rewardGoods = self.Data.RewardGoods
    self.Grid:Refresh(rewardGoods, nil, true)
    self.Grid:ShowCount(true)
end

function XUiShopItem:RefreshPrice()
    if #self.Consumes ~= 0 then
        self.PanelPrice.gameObject:SetActiveEx(true)
        for i = 1, #self.Price do
            if i <= #self.Consumes then
                self.Price[i].gameObject:SetActiveEx(true)
            else
                self.Price[i].gameObject:SetActiveEx(false)
            end
        end
    else
        self.PanelPrice.gameObject:SetActiveEx(false)
    end
end

function XUiShopItem:RefreshOnSales(buyCount)
    self.OnSales = {}
    XTool.LoopMap(self.Data.OnSales, function(k, sales)
        self.OnSales[k] = sales
    end)
    local sumbuy = buyCount + self.Data.TotalBuyTimes
    if #self.OnSales ~= 0 then
        local curLevel = 0
        for k, v in pairs(self.OnSales) do
            if sumbuy >= k and k > curLevel then
                self.Sales = v
                curLevel = k
            end
        end
    else
        self.Sales = 100
    end
end

function XUiShopItem:RefreshConsumes()
    for i = 1, #self.BuyConsumes do
        self.BuyConsumes[i].Count = 0
    end
    for k, v in pairs(self.Consumes) do
        self.BuyConsumes[k].Id = v.Id
        self.BuyConsumes[k].Count = math.floor(v.Count * self.Sales / CountBaseNumber) * self.Count
    end
    for i = 1, #self.Consumes do
        self["RImgCostIcon" .. i]:SetRawImage(XDataCenter.ItemManager.GetItemBigIcon(self.BuyConsumes[i].Id))
        self["TxtCostCount" .. i].text = math.floor(self.BuyConsumes[i].Count)
    end
end

function XUiShopItem:GetSalesInfo()
    self.OnSales = {}
    XTool.LoopMap(self.Data.OnSales, function(k, sales)
        self.OnSales[k] = sales
    end)
end

function XUiShopItem:GetMaxCount()
    self.Sales = 100
    local sortedKeys = {}
    for k, _ in pairs(self.OnSales) do
        table.insert(sortedKeys, k)
    end
    table.sort(sortedKeys)

    local leftSalesGoods = MAX_COUNT

    for i = 1, #sortedKeys do
        if self.Data.TotalBuyTimes >= sortedKeys[i] - 1 then
            self.Sales = self.OnSales[sortedKeys[i]]
        else
            leftSalesGoods = sortedKeys[i] - self.Data.TotalBuyTimes - 1
            break
        end
    end

    local leftShopTimes = XShopManager.GetShopLeftBuyTimes(self.Parent:GetCurShopId())
    if not leftShopTimes then
        leftShopTimes = MAX_COUNT
    end

    local leftGoodsTimes = MAX_COUNT
    if self.Data.BuyTimesLimit and self.Data.BuyTimesLimit > 0 then
        local buyCount = self.Data.TotalBuyTimes and self.Data.TotalBuyTimes or 0
        leftGoodsTimes = self.Data.BuyTimesLimit - buyCount
    end
    local tmpMaxCount = math.min(leftGoodsTimes, math.min(leftShopTimes, leftSalesGoods))
    self.MaxCount = tmpMaxCount
    self.MaxCount = XDataCenter.EquipManager.GetMaxCountOfBoxOverLimit(self.Data.RewardGoods.TemplateId, self.MaxCount, self.Data.RewardGoods.Count)

    if self.MaxCount < tmpMaxCount then
        self.BuyHintText.text = CS.XTextManager.GetText("MaxCanBuyText")
    else
        self.BuyHintText.text = CS.XTextManager.GetText("CanBuyText")
    end
end

function XUiShopItem:SetCanBuyCount()
    local canBuyCount = self.MaxCount
    for _, v in pairs(self.BuyConsumes) do
        local itemCount = XDataCenter.ItemManager.GetCount(v.Id)
        local buyCount = math.floor(itemCount / v.Count)
        canBuyCount = math.min(buyCount, canBuyCount)
    end
    canBuyCount = math.max(self.MinCount, canBuyCount)
    self.CanBuyCount = canBuyCount
end

function XUiShopItem:JudgeBuy()
    self.HaveNotBuyCount = self.Count > self.MaxCount or self.Count == 0
    if self.HaveNotBuyCount then
        return
    end

    local index = 1
    local enoughIndex = {}
    self.NotEnough = {}

    for _, v in pairs(self.BuyConsumes) do
        local itemCount = XDataCenter.ItemManager.GetCount(v.Id)
        if v.Count > itemCount then
            self:ChangeCostColor(false, index)
            if not self.NotEnough[index] then self.NotEnough[index] = {} end
            self.NotEnough[index].ItemId = v.Id
            self.NotEnough[index].UseItemCount = v.Count
        else
            table.insert(enoughIndex, index)
        end
        index = index + 1
    end

    for _, v in pairs(enoughIndex) do
        self:ChangeCostColor(true, v)
    end
end

function XUiShopItem:ChangeCostColor(bool, index)
    if bool then
        self["TxtCostCount" .. index].color = XUiHelper.Hexcolor2Color(self.ShopCanBuyColor)
    else
        self["TxtCostCount" .. index].color = XUiHelper.Hexcolor2Color(ColorRed)
    end
end

function XUiShopItem:CheckBuyItemTypeOfWeaponFashion(cb)
    local templateId = self.Data.RewardGoods.TemplateId
    if XDataCenter.ItemManager.IsWeaponFashion(templateId) then
        local fashionId = XDataCenter.ItemManager.GetWeaponFashionId(templateId)
        if XDataCenter.WeaponFashionManager.CheckHasFashion(fashionId) then
            if XDataCenter.ItemManager.IsWeaponFashionTimeLimit(templateId) then
                self:TipDialog(nil, cb, "BuyWeaponFashionIsTimeLimit")
            else
                self:TipDialog(nil, cb, "BuyWeaponFashionIsNotTimeLimit")
            end
            return
        end
    end
    cb()
end

function XUiShopItem:TipDialog(cancelCb, confirmCb, TextKey)
    XLuaUiManager.Open("UiDialog", CS.XTextManager.GetText("TipTitle"), CS.XTextManager.GetText(TextKey), XUiManager.DialogType.Normal, cancelCb, confirmCb)
end