require("Game.View.ResultView")

local EXClearingView = {}

local M = EXClearingView

function EXClearingView.new(blur_view)
	setmetatable(M, {__index = ResultView})
	local self = setmetatable({}, {__index = M})
	self._full = true
	ResultView.init(self, "ui://Main_Majiang/clearing")

	self._currenIndex = 0
	self._blur_view = blur_view
	self._close_zone = false
	self.xiPaiCtr=self._view:GetController("xipai")
								
								
	return self
end

function M:InitData(over, room, result, total_result, callback)
	self._callback = callback
	local _overCtr = self._view:GetController("over")
	local btn_confirm = self._view:GetChild("btn_confirm")
	local btn_result = self._view:GetChild("btn_showResult")
	local btn_close = self._view:GetChild("big_result"):GetChild("btn_close")
	local _btnCtr = self._view:GetController("button")
	local _sdkCtr = self._view:GetController("sdk")
	local ctr_type = self._view:GetController("type")
	self._view:GetChild("tex_roominfo").text = string.format("房号%s 局%s/%s %s", room.room_id, room.curren_round, room.room_config.round, os.date("%Y-%m-%d %H:%M:%S", os.time()))
	self._view:GetChild("tex_gameinfo").text = string.gsub(room.room_config:GetDes(), "\r", "")

	local paixingxiangqing=self._view:GetChild("btn_detal")
	paixingxiangqing.visible=false
	
	local fanhuipaixing=self._view:GetChild("btn_fanhuipaixing")
	fanhuipaixing.visible=false
	
	local xpconfig=DataManager.CurrenRoom.room_config.config.xi_pai
	if xpconfig then
		self.xiPaiCtr.selectedIndex=1
	else
		self.xiPaiCtr.selectedIndex=0
	end
	
	if over ~= 2 then
		local xipai=self._view:GetChild("btn_xipai")
		xipai.touchable=true
		xipai.onClick:Add(function()
					local xiPaiCallBack=function ()
						xipai.touchable=false
						self.xiPaiCtr.selectedIndex=0
						ViewUtil.ErrorTip(1000000,"申请洗牌成功")
					end
					local _gamectr = ControllerManager.GetController(GameController)
					_gamectr:SendXiPaiAction(xiPaiCallBack)
				end)
		if result and result.xipai_score then
			xipai.text="洗牌 积分x"..result.xipai_score
		end
		
		if result.liuju then
			ctr_type.selectedIndex = 3
		else
			local info_list = result.info_list
			for i = 1, #info_list do
				local is_win = info_list[i].is_win
				if is_win then
					if info_list[i].seat == room.self_player.seat then
						ctr_type.selectedIndex = 1
					else
						ctr_type.selectedIndex = 2
					end
				end
			end
		end
		if over == 0 then
			_btnCtr.selectedIndex = 0
			_sdkCtr.selectedIndex = 1
			btn_confirm.onClick:Add(function()
				local _gamectr = ControllerManager.GetController(GameController)
				_gamectr:PlayerReady()
				self:DestroyWithCallback()
			end)
			self:AddClearItem(room, result.info_list, nil, over, result.niao, result.active_player)
		elseif over == 1 then
			self.xiPaiCtr.selectedIndex=0
			_btnCtr.selectedIndex = 1
			_sdkCtr.selectedIndex = 1
			btn_result.onClick:Add(function()
				_overCtr.selectedIndex = 1
				_btnCtr.selectedIndex = 0
				_sdkCtr.selectedIndex = 0
				if self._qsinfo_view then
					self._qsinfo_view:Dispose()
				end
			end)
			btn_close.onClick:Add(function()
				ViewManager.ChangeView(ViewManager.View_Lobby)
			end)
			self:AddClearItem(room, result.info_list, total_result.info_list, over, result.niao, result.active_player)
		end
	else
		_overCtr.selectedIndex = 1
		self.xiPaiCtr.selectedIndex=0
		btn_close.onClick:Add(function()
			ViewManager.ChangeView(ViewManager.View_Lobby)
		end)
		self:AddClearItem(room, nil, total_result.info_list, over)
	end
end

function M:AddClearItem(room, data, total_data,over, niao, active_player)
	local n = over + 1
	local list_view1 = self._view:GetChild("player_list_1")
	local list_view2 = self._view:GetChild("player_list_2")
	if 0 == over or 1 == over then
		table.sort(data, function(a,b) return a.seat > b.seat end)
		list_view1:RemoveChildrenToPool()
		for i=1,#data do
			local item = list_view1:AddItemFromPool()
			self:FillItemData(room, data[i], item, active_player, niao)
		end
	    if #data == 3 then
			list_view1.lineGap = 54
		elseif #data == 2 then
			list_view1.lineGap = 108
		end
		if 1 == over then 
			self:FillItemData2(room, total_data, list_view2)
		end
	elseif 2 == over then
		self:FillItemData2(room, total_data, list_view2)
	end
end

function M:FillItemData(room, data, item, active_player, niao)
	local _gamectr = ControllerManager.GetController(GameController)
	local p = room:GetPlayerBySeat(data["seat"])
	item:GetChild("playerName").text = p.self_user.nick_name

	-- 手牌
	local hand_cards = data["hand_card"]
	table.sort( hand_cards, ViewUtil.HandCardSort)
	local hand_list_view = item:GetChild("hand_card_list")
	hand_list_view:RemoveChildrenToPool()
	for i=1,#hand_cards do
		local card = hand_list_view:AddItemFromPool()
		card.icon = "ui://Main_Majiang/b202_"..hand_cards[i]
	end
	hand_list_view.width = 52 * #hand_cards

	local fz_card = p.fz_list
	local fz_card_list = item:GetChild("fz_card_list")
	fz_card_list.width = 157 * #fz_card * 0.8
	fz_card_list:RemoveChildrenToPool()
	for i=1,#fz_card do
		if fz_card[i].type == FZType.Peng then
			local item = fz_card_list:AddItemFromPool("ui://Main_Majiang/clearing_fz_3")
			for j=1,3 do
				local card = item:GetChild("card_" .. j)
				card.icon = "ui://Main_Majiang/b202_"..fz_card[i].card
			end
		elseif fz_card[i].type == FZType.Gang or fz_card[i].type == FZType.Gang_An or fz_card[i].type == FZType.Gang_Peng then
			local item = fz_card_list:AddItemFromPool("ui://Main_Majiang/clearing_fz_4")
			for j=1,4 do
				local card = item:GetChild("card_" .. j)
				if fz_card[i].type == FZType.Gang_An and j == 4 then
					card.icon = "ui://Main_Majiang/b202_00"
				else
					card.icon = "ui://Main_Majiang/b202_"..fz_card[i].card
				end
			end
		end
	end

	local huadd = data["hu_score"]
	local gangadd = data["gang_score"]
	local birdadd = data["niao_score"]
	local total = data["round_score"]
	local sp = "  "
	local str = "胡:"..huadd.."分"
	str = str..sp.."杠:"..gangadd.."分"
	str = str..sp.."扎鸟:"..birdadd.."分"
	if data["piao_niao_score"] then
		str = str..sp.."飘鸟:"..data["piao_niao_score"].."分"
	end
	item:GetChild("score1").text = str
	-- local total_score = data["total_score"]
	if total >= 0 then
		item:GetChild("score2").text = "+"..total
		item:GetChild("score2").grayed = false
	else
		item:GetChild("score2").text = total
		item:GetChild("score2").grayed = true
	end

	local hp_nonnegative = room:checkHpNonnegative()
	item:GetController("nonnegative").selectedIndex = hp_nonnegative and 1 or 0
	if hp_nonnegative then
		local hp_info = data.hp_info
		local ctr_hp_limit = item:GetController("hp_limit")
		local hp = d2ad(hp_info.round_actual_hp)
		if hp >= 0 then hp = "+" .. tostring(hp) end
		item:GetChild("tex_hp").text = hp
		ctr_hp_limit.selectedIndex = hp_info.upper_limit and 1 or 0
	end

	local is_win = data["is_win"] or false
	item:GetController("win").selectedIndex = is_win and 0 or 1
	if p.self_user.account_id == active_player and is_win == false and total < 0 then 
		item:GetController("win").selectedIndex = 2 
	end
	local win_card = item:GetChild("win_card")
	if is_win then 
		win_card.icon = "ui://Main_Majiang/b202_"..data["win_card"]
		local lst_niao = item:GetChild("list_niao")
		lst_niao:RemoveChildrenToPool()
		for i = 1, #niao do
			if niao[i].score > 0 then
				local card_niao = lst_niao:AddItemFromPool()
				card_niao.icon = "ui://Main_Majiang/b202_" .. niao[i].card	
			end		
		end
	end
	if p.seat == room.banker_seat then
		item:GetController("bank").selectedIndex = 1
	end
end

function M:FillItemData2(room, data, list)
    -- 赋值result_info，聊天室分享需要
    local player_list = {}
    for i = 1, #data do
        player_list[i] = {}
        local user = room:GetPlayerBySeat(data[i].seat).self_user
        player_list[i].id = user.account_id
        player_list[i].hp_info = data[i].hp_info
        player_list[i].score = data[i].total_score
        player_list[i].house = room.owner_id == player_list[i].id and 1 or 0
        player_list[i].nick = user.nick_name
        player_list[i].head_url = user.head_url

        local settle_log = data[i].settle_log
        player_list[i].param = {}
        player_list[i].param[1]={}
        player_list[i].param[1].key = "自摸次数："
        player_list[i].param[1].value = tostring(data[i].settle_log.zimo)
        player_list[i].param[2]={}
        player_list[i].param[2].key = "接炮次数："
        player_list[i].param[2].value = tostring(data[i].settle_log.jie_pao)        
        player_list[i].param[3]={}
        player_list[i].param[3].key = "点炮次数："
        player_list[i].param[3].value = tostring(data[i].settle_log.dian_pao)        
        player_list[i].param[4]={}
        player_list[i].param[4].key = "暗杠次数："
        player_list[i].param[4].value = tostring(data[i].settle_log.an_kong)        
        player_list[i].param[5]={}
        player_list[i].param[5].key = "明杠次数："
        player_list[i].param[5].value = tostring(data[i].settle_log.ming_kong)   
    end
    local round = room.room_config.round
    self:GenerateRoomResultInfo(round, room.room_config:GetGameName(), room.room_id, room.create_time, player_list)
	local big_result = self._view:GetChild("big_result")
	big_result:GetChild("txt_room_info").text = string.format("%s 房号%s 局%s/%s",  os.date("%Y/%m/%d", os.time()), room.room_id, room.curren_round, room.room_config.round)
    local lst_p = big_result:GetChild("player_list")
    if #player_list == 3 then
		lst_p.columnGap = 108
	elseif #player_list == 2 then
		lst_p.columnGap = 208
	end
    self:InitBigResult(room, 30)
	local show_detail = room.hpOnOff == 1
    for i = 1, lst_p.numChildren do
    	local com_p = lst_p:GetChildAt(i - 1)
    	local list_param = com_p:GetChild("list_param")
    	for j = 1, list_param.numChildren do
    		local tem = list_param:GetChildAt(j - 1)
    		tem:GetChild("txt_value").textFormat.size = 30
    	end
    	if show_detail then
    		local score = 0
    		if com_p:GetController("pn").selectedIndex == 0 then
    			score = com_p:GetChild("txt_navigate").text
    		else
    			score = com_p:GetChild("txt_positive").text
    		end
    		score = score / room.score_times
    		com_p:GetChild("tex_detail_score").text = string.format("%s × %s倍", score, room.score_times)
    	end
    end
    if room.group_id ~= 0 then
    	big_result:GetController("group").selectedIndex = 1
    end
    DataManager.CurrenRoom = nil
end

function M:LoadHead(p, room)
	local btn_head = self._view:GetChild("btn_head")
	for i = 1, #room.player_list do
		local player = room.player_list[i]
		if p.seat == player.seat and player.self_user.head_url ~= "" then
			ImageLoad.Load(player.self_user.head_url, btn_head.icon)
		end
	end
end

function M:DestroyWithCallback() 
	if self._callback then
		self._callback()
	end
	self:Destroy()
end

return M