local Player, Enemy, Build = table.unpack(require "adv.AdvPlayer")

  local Buff = require "adv.AdvBuff"

  local Passive = require "adv.AdvPassive"

  local Battle = class("Battle")

  function Battle:ctor(adv)
  	self.adv = adv
  	self.player = nil --玩家

  	self.isNewPlayer = false

  	self.enemys = {} --怪

  	self.builds = {} -- 建筑

  	self.auras = {} -- 光环

  	self.cachePassiveEvent = {}

  	self:initPlayer()
  	self:initEnemys()
  	self:initAfter()

  	if self.isNewPlayer then
  		self.player:triggerPassive(Passive.BORN_ONCE)

  	end

  end
  

  function Battle:initAfter(mapIdx)
  	if not mapIdx then
  		self.player:initAfter(self.adv.owner:getProperty("advTeam").player)
  	end

  	for idx, mapEnemys in pairs(self.enemys) do

  		if not mapIdx or idx == mapIdx then
  			for _, enemy in ipairs(mapEnemys) do
  				enemy:initAfter(self.adv:getBlock(enemy.roomId, enemy.blockId, idx).event.enemy)
  			end

  		end

  	end	
  	for idx, mapBuilds in pairs(self.builds) do

  		if not mapIdx or idx == mapIdx then
  			for _, build in ipairs(mapBuilds) do
  				build:initAfter(self.adv:getBlock(build.roomId, build.blockId, idx).event.build)
  			end

  		end

  	end

  end

  --[[
  队伍总属性 = 基础属性 + 等级 × 成长率 	
  	基础属性：	固定属性，与章节、队伍够成、养成无关，由策划给出	
  	等级：	根据进入时的关卡，获得一个【初始等级】；消灭怪物获得经验后，累计N点会提升等级	
  	羁绊加成：	加成条件与“战斗”相同，加成目标改为【冒险队】	
  			
  	成长率：	由【队伍总生存力】决定	
  			成长率 =（总生存力 / 80）^0.52 + INT（总角色等级 / 50）* 1
  --]]

  local function getAdvLvAttrUp(upAttrs, attrName, baseAttr)
  	-- 1=冒险队属性;1=点数/百分比=属性枚举=参数;属性枚举(1=生命上限/2=魔法上限/3=攻击/4=防御);点数/百分比(0=点数/1=百分比)
  	local Enem = {
  		hp = 1,
  		sp = 2,
  		atk = 3,
  		def = 4,
  	}
  	if not Enem[attrName] then return baseAttr end
  	return baseAttr + (upAttrs[Enem[attrName]] or 0)
  end
  

  function Battle:initPlayer()

  	local advTeam = self.adv.owner:getProperty("advTeam")

  	if not advTeam.heros or not next(advTeam.heros) then return end

  	local leaderPassive = {}

  	local player = advTeam.player
  	if not player then

  		local advAddAttrs = self.adv.owner:getAdvLvAddAttrs()

  		player = {}

  		-- player.level = 1
  		-- if self.adv.level ~= 1 then
  		-- 	local relayData = self.adv:isHaveRelay()
  		-- 	if relayData then
  		-- 		player.level = relayData.level
  		-- 	end
  		-- end
  		-- player.exp = 0

  		player.sp = getAdvLvAttrUp(advAddAttrs, "sp", 100)

  		player.spMax = player.sp

  		-- player.growth = {}

  		player.passives = {}

  		for slot, heroId in pairs(advTeam.heros) do

  			if heroId == advTeam.leader or heroId == advTeam.leader2 then
  				local hero = self.adv.owner.heros[heroId]
  				if hero then
  					local unit = csvdb["unitCsv"][self.adv.owner.heros[heroId]:getProperty("type")]
  					if unit.advCaptain ~= 0 then
  						table.insert(player.passives, {id = unit.advCaptain, level = 1})
  					end

  				end
  			end
  		end

  
  		local attrs = self.adv.owner:getTeamBattleInfo(advTeam).heros

  		for _, hero in pairs(attrs) do
  			--根据系数计算拾荒属性
  			self.adv.owner:checkPlayerAttr(hero)

  			for attrName, _ in pairs(AdvAttsEnum) do
  				player[attrName] =  (player[attrName] or 0) + hero[attrName]

  			end

  		end

  		player.hpMax = player.hp or 0

  		self.isNewPlayer = true

  		advTeam.player = player

  	end

  	self.player = Player.new(self, player)

  end
  
  function Battle:initEnemys()

  	for idx, map in pairs(self.adv.maps) do
  		self:initMapEnemys(idx)
  	end
  end
  

  -- after 是否是 后创建的夹层
  function Battle:initMapEnemys(mapIdx, after)

  	self.enemys[mapIdx] = {}

  	self.builds[mapIdx] = {}

  	local map = self.adv.maps[mapIdx]
  	if map then
  		for _, room in pairs(map.rooms) do
  			for _, block in pairs(room.blocks) do

  				self:addEnemy(room, block, mapIdx, true)	

  			end
  		end
  	end

  	if after then
  		self:initAfter(mapIdx)
  	end

  	if self.cachePassiveEvent[mapIdx] then
  		for _, passiveC in ipairs(self.cachePassiveEvent or {}) do
  			for _, enemy in ipairs(self.enemys[mapIdx]) do
  				enemy:triggerPassive(passiveC[1], passiveC[2])
  			end

  
  			for _, build in ipairs(self.builds[mapIdx]) do
  				build:triggerPassive(passiveC[1], passiveC[2])
  			end

  		end
  	end

  	self.cachePassiveEvent[mapIdx] = nil

  end
  

  function Battle:addEnemy(room, block, mapIdx, init)

  	mapIdx = mapIdx or self.adv:getCurMapIdx()
  

  	local isNew, player, data

  	if block:isMonster() then

  		if not block.event.enemy then
  			local enemyCsv = csvdb["event_monsterCsv"][block.event.id]
  			local enemy = {}

  			local curFloorData = self.adv:getCurFloorData() or {}
  			for attrName, _ in pairs(AdvAttsEnum) do
  				enemy[attrName] = enemyCsv[attrName] * curFloorData[attrName]
  			end

  			enemy.passives = {}

  			for _, id in ipairs(enemyCsv.mapPassive:toArray(true, "=")) do

  				table.insert(enemy.passives, {id = id})
  			end
  			block.event.enemy = enemy

  			isNew = true

  		end

  		if not block.event.mId then
  			block.event.mId = self.adv.lastEnemyId
  			self.adv.lastEnemyId = self.adv.lastEnemyId + 1
  		end

  		data = block.event.enemy
  		player = Enemy.new(self, block.event.mId, block.event.id, room.roomId, block.blockId, not block.isOpen, block.event.enemy, mapIdx)

  		table.insert(self.enemys[mapIdx], player)

  	elseif block:isBuild() then
  		if not block.event.build then

  			local buildCsv = csvdb["event_buildingCsv"][block.event.id]

  			local build = {}
  			build.passives = {}
  			for _, id in ipairs(buildCsv.passive:toArray(true, "=")) do
  				table.insert(build.passives, {id = id})
  			end
  			block.event.build = build

  			isNew = true

  		end

  		data = block.event.build
  		player = Build.new(self, block.event.id, room.roomId, block.blockId, not block.isOpen, block.event.build, mapIdx)

  		table.insert(self.builds[mapIdx], player)

  	end 

  	if not init then
  		player:initAfter(data)
  
  		-- 游戏中新创建的 加上地图 floor 效果
  		if isNew then
  			local passives, buffs = self:getMapEffect(2, true, mapIdx)
  			for _, passive in ipairs(passives) do
  				player:addPassive({id = passive})
  			end
  
  			for _, buff in ipairs(buffs) do

  				player:addBuff(buff)

  			end

  			-- 新生成的怪 加上 已有的光环buff
  			player:checkAuraBuff(self:checkDiffAuraBuff({}, self:getAurasByMap()))

  		end
  	end
  	return player

  end
  

  function Battle:getEnemy(roomId, blockId, mapIdx)
  	mapIdx = mapIdx or self.adv:getCurMapIdx()
  	for _, enemy in ipairs(self.enemys[mapIdx] or {}) do

  		if enemy.roomId == roomId and enemy.blockId == blockId then

  			return enemy
  		end
  	end
  end
  

  function Battle:getBuild(roomId, blockId, mapIdx)
  	mapIdx = mapIdx or self.adv:getCurMapIdx()
  	for _, build in ipairs(self.builds[mapIdx] or {}) do
  		if build.roomId == roomId and build.blockId == blockId then
  			return build
  		end
  	end

  end

  function Battle:getEnemyById(id)

  	for idx, mapEnemys in pairs(self.enemys) do
  		for _, enemy in ipairs(mapEnemys) do
  			if enemy.id == id then
  				return enemy
  			end

  		end
  	end
  end

  
  function Battle:getRBByEnemyId(enemyId)
  	local enemy = self:getEnemyById(enemyId)

  	return enemy.roomId, enemy.blockId, enemy.mapIdx

  end
  

  --触发全员被动技能

  function Battle:triggerPassive(condType, params, mapIdx)
  	mapIdx = mapIdx or self.adv:getCurMapIdx()

  	self.player:triggerPassive(condType, params)

  	if not self.enemys[mapIdx] then
  		-- 缓存一下
  		self.cachePassiveEvent[mapIdx] = self.cachePassiveEvent[mapIdx] or {}
  		table.insert(self.cachePassiveEvent[mapIdx], {condType, params})
  	else
  		for _, enemy in ipairs(self.enemys[mapIdx]) do
  			enemy:triggerPassive(condType, params)
  		end

  		for _, build in ipairs(self.builds[mapIdx]) do
  			build:triggerPassive(condType, params)
  		end

  	end

  end
  

  -- 只是从战斗中移除  从地图中移除 在外面操作
  function Battle:removeEnemyById(id)
  	local mapIdx = self.adv:getCurMapIdx()
  	for i = #self.enemys[mapIdx], 1, -1 do
  		if self.enemys[mapIdx][i].id == id then
  			local enemy = table.remove(self.enemys[mapIdx], i)
  			enemy:clear()
  			break
  		end
  	end
  end

  -- 只是从战斗中移除  从地图中移除 在外面操作
  function Battle:removeBuildByPos(roomId, blockId)
  	local mapIdx = self.adv:getCurMapIdx()
  	for i = #self.builds[mapIdx], 1, -1 do
  		if self.builds[mapIdx][i].roomId == roomId and self.builds[mapIdx][i].blockId == blockId then
  			local build = table.remove(self.builds[mapIdx], i)
  			build:clear()
  			break
  		end
  	end
  end

  --回合
  function Battle:afterRound()

  	local mapIdx = self.adv:getCurMapIdx()

  	table.sort(self.enemys[mapIdx], function(e1, e2)

  		return e1.id < e2.id
  	end)

  
  	self.player:afterRound("buffBefore")
  	for _, enemy in ipairs(self.enemys[mapIdx]) do
  		enemy:afterRound("buffBefore")
  	end
  	for _, build in ipairs(self.builds[mapIdx]) do
  		build:afterRound("buffBefore")
  	end
  

  	self.player:afterRound("passive")

  	for _, enemy in ipairs(self.enemys[mapIdx]) do

  		enemy:afterRound("passive")

  	end

  	for _, build in ipairs(self.builds[mapIdx]) do

  		build:afterRound("passive")
  	end
  

  	self.player:afterRound("buffAfter")

  	for _, enemy in ipairs(self.enemys[mapIdx]) do

  		enemy:afterRound("buffAfter")

  	end

  	for _, build in ipairs(self.builds[mapIdx]) do

  		build:afterRound("buffAfter")

  	end
  

  	self.player:triggerPassive(Passive.AFTER_ROUND)
  
  	self:checkAura()

  	self:clearRound()
  
  	if self.player.isDead then
  		self.adv:over(false, nil, -2)
  	end
  end

  function Battle:clearRound()
  	local mapIdx = self.adv:getCurMapIdx()

  	self.player:clearRound()

  	for _, enemy in ipairs(self.enemys[mapIdx]) do

  		enemy:clearRound()
  	end

  	for _, build in ipairs(self.builds[mapIdx]) do
  		build:clearRound()
  	end

  	for i = #self.enemys[mapIdx], 1, -1 do
  		if self.enemys[mapIdx][i].isDead then

  			local enemy = table.remove(self.enemys[mapIdx], i)

  			self.adv:enemyDead(enemy, enemy.isDead == 1)
  			enemy:clear()

  		end
  	end

  	for i = #self.builds[mapIdx], 1, -1 do
  		if self.builds[mapIdx][i].isDead then
  			local build = table.remove(self.builds[mapIdx], i)

  			
  			local room = self.adv:getCurMap().rooms[build.roomId]
  			if room then
  				local block = room.blocks[build.blockId]
  				if block then
  					block:clear()
  					self.adv:backBlockChange(build.roomId, build.blockId)
  				end
  			end

  			build:clear()
  		end
  	end

  end
  

  function Battle:battleBegin(roomId, blockId, params)
  	local enemy = self:getEnemy(roomId, blockId)
  	if not enemy then return end
  	local player = params.player

  	if not player then return end

  	local penemy = params.enemy or {hp = 0}

  	if player.hp ~= 0 then
  		if penemy.hp <= 0 then
  			enemy:kill()
  			self.adv.owner:checkTaskEnter("AdvBattleWin", {id = self.adv.chapterId})
  		else
  			-- 处理一下怪物
  			if penemy.hp > enemy.hp then
  				enemy:recover(penemy.hp - enemy.hp)
  			else
  				enemy:hurt(math.max(0, math.ceil(enemy.hp - penemy.hp)), self.player, {hurtType = 5}) --战斗血量只会变少
  			end
  			if penemy.escape and penemy.escape == 0 then
  				enemy.isDead = 1
  			end
  		end
  	end

  	-- 玩家没死就是怪死了
  	if player.hp > 0 then

  		self.player:effectBattleBuff()

  		if params.bySkill then
  			self.player:triggerPassive(Passive.SKILL_KILL)
  		end

  	end

  	if player.hp > self.player.hp then

  		self.player:recover(player.hp - self.player.hp)

  	else
  		self.player:hurt(math.max(0, math.ceil(self.player.hp - player.hp)), enemy, {hurtType = 5}) --战斗血量只会变少
  	end
  	
  	self.player:changeSp(math.floor(player.sp - self.player.sp) , 0) --战斗魔力只会变少

  end
  
  

  function Battle:getMapEffect(ctype, ilayer, mapIdx)
  	mapIdx = mapIdx or self.adv:getCurMapIdx()
  	local mapData = self.adv.maps[mapIdx]:getMapInfoCsv() or {}
  	local floorData = self.adv:getCurFloorData() or {}
  
  	local passives = {}
  	local buffs = {}
  
  	for _type, temp in ipairs({mapData, floorData}) do
  		for _, one in ipairs((temp.passive or ""):toTableArray(true)) do
  			passives[one[1]] = passives[one[1]] or {}
  			if ilayer and one[1] == 1 and _type == 2 then
  			else
  				table.insert(passives[one[1]], one[2])
  			end
  		end
  		for _, one in ipairs((temp.buff or ""):toTableArray(true)) do
  			buffs[one[1]] = buffs[one[1]] or {}
  			if ilayer and one[1] == 1 and _type == 2 then
  			else
  				table.insert(buffs[one[1]], one[2])
  			end
  		end
  	end
  	if ctype then
  		passives = passives[ctype] or {}
  		buffs = buffs[ctype] or {}
  	end
  	return passives, buffs
  end
  -- 夹层玩家 不重复加 floor
  function Battle:initMapEffect(ilayer)
  	local passives, buffs = self:getMapEffect(nil, ilayer)
  	local mapIdx = self.adv:getCurMapIdx()
  
  	for _, passive in ipairs(passives[1] or {}) do
  		self.player:addPassive({id = passive})
  	end
  
  	for _, passive in ipairs(passives[2] or {}) do
  		for _, enemy in ipairs(self.enemys[mapIdx]) do
  			enemy:addPassive({id = passive})
  		end
  	end
  
  	for _, buff in ipairs(buffs[1] or {}) do

  		self.player:addBuff(buff)

  	end
  
  	for _, buff in ipairs(buffs[2] or {}) do
  		for _, enemy in ipairs(self.enemys[mapIdx]) do
  			enemy:addBuff(buff)
  		end
  	end
  end
  
  

  -- 夹层 进入退出 接口 清理玩家身上的老光环 添加新的光环
  function Battle:iLayerChange(oldMapIdx)
  	local auras = self:getActiveAuras()
  	local playerBuffs = self:checkDiffAuraBuff(self:getAurasByMap(oldMapIdx), auras)
  	local enemyBuffs = self:checkDiffAuraBuff(self:getAurasByMap(), auras)
  	self.player:checkAuraBuff(playerBuffs)

  	for _, enemy in ipairs(self.enemys[self.adv:getCurMapIdx()]) do

  		enemy:checkAuraBuff(enemyBuffs)
  	end
  	self:setMapAuras(auras)

  	self:clearRound()

  end
  
  -- 新的 关卡 关闭旧的战斗模块 清理 玩家身上的光环效果
  function Battle:overBattle()
  	local buffs = self:checkDiffAuraBuff(self:getAurasByMap(), {})
  	self.player:checkAuraBuff(buffs)

  	self:clearRound()

  	self.adv.owner:getProperty("advTeam").player = self.player:getDB()  -- 临时缓存住 battle 的player
  end
  
  -- 初始化 新的 关卡
  function Battle:newBattle()
  	local auras = self:getActiveAuras()
  	local buffs = self:checkDiffAuraBuff({}, auras)

  	self.player:checkAuraBuff(buffs)

  	for _, enemy in ipairs(self.enemys[self.adv:getCurMapIdx()]) do

  		enemy:checkAuraBuff(buffs)
  	end

  	self:setMapAuras(auras)
  end
  

  function Battle:loadBattle(info)
  	self.auras = info.auras or {}
  end
  

  -- 过了回合 检查光环
  function Battle:checkAura()
  	local auras = self:getActiveAuras()
  	local buffs = self:checkDiffAuraBuff(self:getAurasByMap(), auras)
  	self.player:checkAuraBuff(buffs)
  	for _, enemy in pairs(self.player:getTeam(2)) do
  		enemy:checkAuraBuff(buffs)
  	end
  	self:setMapAuras(auras)
  end
  
  -- 查找差异buff
  function Battle:checkDiffAuraBuff(oldAuras, newAuras)
  	local auras = {}
  	for aurasId , count in pairs(oldAuras) do
  		auras[aurasId] = -count
  	end
  	for aurasId , count in pairs(newAuras) do
  		auras[aurasId] = (auras[aurasId] or 0) + count
  	end

  	local buffs = {}
  	for aurasId , count in pairs(auras) do
  		local auraData = csvdb["adv_map_haloCsv"][aurasId]
  		if auraData then
  			for _, effect in ipairs(auraData.effect:toTableArray(true)) do
  				temp = buffs
  				for i = 1, #effect do
  					temp[effect[i]] = temp[effect[i]] or {}
  					temp = temp[effect[i]]
  				end
  				temp.count = (temp.count or 0) + count
  				if newAuras[aurasId] then
  					-- 加上 未消失标记
  					temp.exist = true
  				end
  			end
  		end
  	end
  	return buffs
  end
  
  -- 获取所有生效的 光环
  function Battle:getActiveAuras()
  	local auras = {}
  	for _, one in pairs(self.player:getAuras()) do
  		auras[one] = (auras[one] or 0) + 1
  	end
  	for _, enemy in pairs(self.player:getTeam(2)) do
  		for _, one in pairs(enemy:getAuras()) do
  			auras[one] = (auras[one] or 0) + 1
  		end
  	end
  	for _, build in pairs(self:getBuilds()) do
  		for _, one in pairs(build:getAuras()) do
  			auras[one] = (auras[one] or 0) + 1
  		end
  	end
  	return auras
  end
  
  function Battle:setMapAuras(auras)
  	 self.auras[self.adv:getCurMapIdx()] = auras
  end
  
  function Battle:getAurasByMap(mapIdx)
  	mapIdx = mapIdx or self.adv:getCurMapIdx()
  	local auras = self.auras[mapIdx] or {}
  	return auras
  end
  
  function Battle:getBuilds()
  	local team = {}
  	for _, build in pairs(self.builds[self.adv:getCurMapIdx()]) do
  		if not build.isDead and not build.lock then -- 已经翻开的
  			table.insert(team, build)
  		end
  	end
  	return team
  end
  
  

  --写入数据

  function Battle:saveDB(advInfo)

  	for idx, mapEnemys in pairs(self.enemys) do
  		for _, enemy in ipairs(mapEnemys) do
  			local block = self.adv:getBlock(enemy.roomId, enemy.blockId, idx)
  			if block and block:isMonster() then
  				block.event.enemy = enemy:getDB()
  			end
  		end

  	end

  	for idx, mapBuilds in pairs(self.builds) do
  		for _, build in ipairs(mapBuilds) do
  			local block = self.adv:getBlock(build.roomId, build.blockId, idx)
  			if block and block:isBuild() then
  				block.event.build = build:getDB()
  			end
  		end
  	end

  	advInfo.auras = self.auras

  end
  

  return Battle