local Passive = require "adv.AdvPassive"
  

  local AdvCommon = require "adv.AdvCommon"
  local AdvMap = require "adv.AdvMap"

  local Buff = require "adv.AdvBuff"

  local Adv = class("Adv")

  local AdvTask = import(".AdvTask")  --任务相关数据搞出去
  AdvTask.bind(Adv)
  

  function Adv:ctor(owner)
  	assert(owner, "Adv instance must have owner(role)")
  	self.owner = owner
  	self.maps = {}
  	self.battle = nil
  	self.backEvents = {} --发给客户端的事件组

  
  	self.advTask = self.owner:getProperty("advTask")
  	self.advMTask = self.owner:getProperty("advMTask")
  	self.advTaskChange = false -- 任务改变才更新
  

  	self:initByInfo(self.owner:getProperty("advInfo"))

  end
  

  --初始化adv 信息
  function Adv:initByInfo(advInfo)
  	if not next(advInfo) then return end --还没有 开始新地图
  
  	self.chapterId = advInfo.chapterId
  	self.level = advInfo.level or 1

  	self.round = advInfo.round or 0

  	self.score = advInfo.score or {}
  	self.lastEnemyId = advInfo.lastEId or 1
  	self.mapStack = advInfo.mstack or {}

  	self.lchoose = advInfo.lch or {}

  	self.maps = {}
  	for id, map in ipairs(advInfo.maps or {}) do
  		self.maps[id] = AdvMap.new(self, id, map)

  	end

  
  	self:initBattle()

  end
  

  -- 随机新的地图
  function Adv:initByChapter(chapterId, level, isToNext, notNotify)

  	if not self.chapterId then -- 开始新的章节
  		self.chapterId = chapterId
  		self:checkAchievement(Adv.AchievType.StartBattle, 1)
  	elseif chapterId ~= self.chapterId then  -- 正常不会出现
  		return 
  	end
  	

  	self.level = level or 1

  	self.round = 0

  	self.score = self.score or {}
  	self.lastEnemyId = 1
  	self.mapStack = {1} -- 最后一个为当前的地图

  	self.lchoose = self.lchoose or {}

  	self.owner._advWheelSurfCount = nil -- 抽奖进行次数
  

  	-- 随机出地图
  	local mapId = self:randomMapId(chapterId, level)
  	self.maps = {}
  	self.maps[1] = AdvMap.new(self, 1, mapId)

  	if isToNext then
  		self:scoreChange(AdvScoreType.Level) --增加层级加分

  	end

  	self:initBattle()
  

  	self:initLayerTask()
  
  	self:checkTask(Adv.TaskType.Arrive)

  	if not notNotify then
  		self:saveDB(notNotify)

  	end

  end

  function Adv:clear()
  	self.chapterId = nil
  	self.level = nil
  	self.score = {}

  	self.round = 0

  	self.lastEnemyId = 1
  	self.mapStack = {}

  	self.lchoose = {}

  	self.maps = {}
  	self.battle = nil
  end

  function Adv:saveDB(notNotify)
  	local advInfo,  advTeam = {}, self.owner:getProperty("advTeam")
  	if self.chapterId then

  		advInfo.chapterId = self.chapterId
  		advInfo.level = self.level

  		advInfo.round = self.round

  		advInfo.score = self.score
  		advInfo.lastEId = self.lastEnemyId
  		advInfo.mstack = self.mapStack

  		advInfo.lch = self.lchoose

  		advInfo.maps = {}

  		self.battle:saveDB()

  		for id , map in ipairs(self.maps) do
  			advInfo.maps[id] = map:getDB()

  		end

  		advTeam.player = self.battle.player:getDB()

  	else
  		advTeam.player = nil

  	end

  
  	self:updateTask(notNotify)

  	self:updateAchievement(notNotify)

  	self.owner:updateProperties({advInfo = advInfo, advTeam = advTeam}, notNotify)

  end
  

  function Adv:initBattle()
  	self.battle = require("adv.AdvBattle").new(self)
  	for _, passiveC in ipairs(self.cachePassiveEvent or {}) do
  		self.battle:triggerPassive(passiveC[1], passiveC[2])

  	end

  	self.cachePassiveEvent = {}

  end
  

  function Adv:triggerPassive(condType, params)
  	self.cachePassiveEvent = self.cachePassiveEvent or {}
  	if not self.battle then
  		table.insert(self.cachePassiveEvent, {condType, params})
  	else
  		self.battle:triggerPassive(condType, params)
  	end

  end
  

  function Adv:getCurMap()
  	return self.maps[self.mapStack[#self.mapStack]]

  end
  

  function Adv:getCurMapIdx()
  	return self.mapStack[#self.mapStack]

  end
  

  function Adv:getRoom(roomId, mapIdx)
  	mapIdx = mapIdx or self:getCurMapIdx()
  	local map = self.maps[mapIdx]
  	if map then
  		return map.rooms[roomId]

  	end

  end
  

  function Adv:getBlock(roomId, blockId, mapIdx)
  	local room = self:getRoom(roomId, mapIdx)
  	if room then
  		return room.blocks[blockId]

  	end

  end
  
  
  

  --关卡通关，非层 score < 0 失败

  function Adv:over(success, isAllPass)

  	local score = self:getScore()

  	local scoreInfo = self.score

  	local reward

  	if success then

  		reward = self.owner:award(self.owner:getProperty("advItems"):toNumMap())

  		self.owner:checkTaskEnter("AdvPass", {id = self.chapterId, level = self.level, score = score})
  		if isAllPass then
  			self.owner:checkTaskEnter("AdvAllPass", {id = self.chapterId})
  		end

  
  		-- 冒险队等级升一下子

  		self.owner:checkAdvLvByAddWin()

  		if self.owner:isFuncOpen(FuncOpenType.AdvWheelSurf) then
  			self.owner._advWheelSurfCount = 0 -- 抽奖进行次数
  		end

  	end

  	self:clear()

  	self.owner:checkTaskEnter("AdvScore", {score = score})

  	self.owner:updateProperty({field = "advItems", value = ""})

  	self:backEnd(success, score, scoreInfo, reward)

  end
  

  function Adv:exit()

  	self:over(false)

  	self:saveDB()
  end
  

  function Adv:randomMapId(chapterId, level)
  	local chapterData = csvdb["adv_chapterCsv"][chapterId]
  	if not chapterData then 
  		error("chapterId " .. chapterId .. " dont exist!")
  		return 

  	end

  	if AdvCommon.isEndless(chapterId) then

  		level = AdvCommon.getEndlessDataLv(chapterId, level)

  	else
  		if level > chapterData.limitlevel then 
  			error("level overflow!")
  			return 
  		end

  	end

  	--随出地图Id
  	local raw_pool = chapterData.mapid:toArray(true, "=")

  	local lastMapIds = {}
  	for id, map in ipairs(self.maps or {}) do
  		lastMapIds[map.mapId] = 1

  	end

  	local pool = {}

  	for _, mapId in ipairs(raw_pool) do
  		local temp = csvdb["mapCsv"][mapId]
  		if temp and not lastMapIds[mapId] then
  			if AdvCommon.checkIsIn(level, temp.leveltype, temp.levellimit) then
  				table.insert(pool, mapId)

  			end
  		end
  	end

  	if not next(pool) then 
  		error("mapIds is empty!")
  		return 

  	end

  	return pool[math.randomInt(1, #pool)]

  end
  

  -- 在冒险中获得的物品都发放在冒险背包内
  function Adv:award(gift, params)

  	params = params or {}

  	local tgift = {}
  	if type(gift) == "string" then
  		for _, one in pairs(gift:toTableArray(true)) do
  			tgift[one[1]] = (tgift[one[1]] or 0) + one[2]
  		end
  	else
  		tgift = gift
  	end
  	local items = self.owner:getProperty("advItems")
  	for itemId, count in pairs(tgift) do

  		if count > 0 then
  			self:scoreChange(AdvScoreType.Item, {itemId, count})

  			self:checkTask(Adv.TaskType.Item, count, itemId)

  			self:checkAchievement(Adv.AchievType.GetItem, count, itemId)

  		end

  		local origin = items:getv(itemId, 0)
  		local nums = origin + count

  		if csvdb["adv_artifactCsv"][itemId] then
  			nums = self:checkArtifact(itemId, origin, count, nums)
  		end

  		if nums <= 0 then
  			items = items:delk(itemId)
  			nums = 0
  		else

  			items = items:setv(itemId, nums)

  		end
  	end

  	self.owner:updateProperty({field = "advItems", value = items, notNotify = params.notNotify})
  	return tgift
  end
  

  
  function Adv:delArtifactEffect(effectType, effects)
  	if effectType == 1 then
  		for _, id in ipairs(effects:toArray(true, "=")) do
  			self.battle.player:delPassiveById(id)
  		end
  	elseif effectType == 2 then
  		for _, id in ipairs(effects:toArray(true, "=")) do
  			self.battle.player:delBuffById(id)
  		end
  	end
  end
  
  function Adv:addArtifactEffect(effectType, effects)
  	if effectType == 1 then
  		for _, id in ipairs(effects:toArray(true, "=")) do
  			self.battle.player:addPassive({id = id})
  		end
  	elseif effectType == 2 then
  		for _, id in ipairs(effects:toArray(true, "=")) do
  			self.battle.player:addBuff(id)
  		end
  	end
  end
  -- 检查神器
  function Adv:checkArtifact(itemId, origin, count, nums)
  	local artifactData = csvdb["adv_artifactCsv"][itemId]
  	if count == 0 or not artifactData then return nums end
  	local advItems = self.owner:getProperty("advItems")
  	if count < 0 then --删除
  		nums = 0
  		local curData = artifactData[origin]
  		if curData then
  			-- 删除自己的效果
  			self:delArtifactEffect(curData.type, curData.effect)
  
  			--删除组合效果
  			if curData.comboId ~= 0 then
  				local comboLv = advItems:getv(curData.comboId, 0)
  				if comboLv ~= 0 then
  					--删除自己的组合效果
  					if curData.comboType == 1 or curData.comboType == 2 then
  						self:delArtifactEffect(curData.comboType, curData.comboEffect)
  					elseif curData.comboType == 3 then
  						self:delArtifactEffect(curData.type, curData.comboEffect)
  					end
  
  					-- 删除组合的组合效果
  					local comboData = (csvdb["adv_artifactCsv"][curData.comboId] or {})[comboLv]
  					if comboData then
  						if comboData.comboType == 1 or comboData.comboType == 2 then
  							self:delArtifactEffect(comboData.comboType, comboData.comboEffect)
  						elseif comboData.comboType == 3 then
  							self:delArtifactEffect(comboData.type, comboData.comboEffect)
  							self:addArtifactEffect(comboData.type, comboData.effect)
  						end
  					end
  				end
  			end
  		end
  	else
  		nums = math.max(0, math.min(nums, #artifactData))
  		if nums == origin then return nums end
  		if origin == 0 then --初始获得
  			local curData = artifactData[nums]
  			local addSelfEffect = true
  			--查看是否有组合
  			if curData.comboId ~= 0 then
  				local comboLv = advItems:getv(curData.comboId, 0)
  				if comboLv ~= 0 then
  					--自己的组合效果
  					if curData.comboType == 1 or curData.comboType == 2 then
  						self:addArtifactEffect(curData.comboType, curData.comboEffect)
  					elseif curData.comboType == 3 then
  						self:addArtifactEffect(curData.type, curData.comboEffect)
  						addSelfEffect = false
  					end
  
  					--对方的组合效果
  					local comboData = (csvdb["adv_artifactCsv"][curData.comboId] or {})[comboLv]
  					if comboData then
  						if comboData.comboType == 1 or comboData.comboType == 2 then
  							self:addArtifactEffect(comboData.comboType, comboData.comboEffect)
  						elseif comboData.comboType == 3 then
  							self:delArtifactEffect(comboData.type, comboData.effect)
  							self:addArtifactEffect(comboData.type, comboData.comboEffect)
  						end
  					end
  				end
  			end
  			if addSelfEffect then
  				self:addArtifactEffect(curData.type, curData.effect)
  			end
  		else --升级
  			local originData = artifactData[origin]
  			local curData = artifactData[nums]
  
  			if originData then
  				self:delArtifactEffect(originData.type, originData.effect)
  			end
  
  			if curData then 
  				self:addArtifactEffect(curData.type, curData.effect)
  			end
  		end
  	end
  	return nums
  end
  
  

  -- 消耗物品 优先冒险背包  --check 只是检查够不够
  function Adv:cost(item, params, check)
  	local items = self.owner:getProperty("advItems")
  	local less = {}
  	local advCost = {}
  	for itemId, count in pairs(item) do
  		advCost[itemId] = - math.min(items:getv(itemId, 0), count)
  		if advCost[itemId] == 0 then
  			advCost[itemId] = nil
  		end
  
  		local last = items:getv(itemId, 0) - count
  		if last < 0 then
  			less[itemId] = -last
  		end
  
  	end
  	if next(less) and not self.owner:checkItemEnough(less) then return end --不够
  	if check then return true end
  	self:award(advCost, params)
  	self.owner:costItems(less, params)
  	return true
  end
  
  --事件点击处理
  local function clickOut(self, room, block, params)

  	if self:getCurMap():checkOver() then --检查是否可以出去了
  		if #self.mapStack > 1 then -- 处于夹层中
  			table.remove(self.mapStack) --退出夹层
  			self:backLayer()
  		else --处于底层

  
  			local advPass = self.owner:getProperty("advPass")

  			if AdvCommon.isEndless(self.chapterId) then
  				-- 刷新最高层
  				if self.owner:getProperty("advElM") < self.level then
  					self.owner:updateProperty({field = "advElM", value = self.level})
  				end
  			else
  				if self.level > (advPass[self.chapterId] or 0) then
  					self.owner:changeUpdates({{type = "advPass", field = self.chapterId, value = self.level}})
  				end

  			end
  			if params.relay then

  				if self.level % globalCsv.adv_can_out_layer_pre ~= 0  or not self.owner:isFuncOpen(FuncOpenType.AdvRelay) then return end

  			end

  			
  			self:checkAchievement(Adv.AchievType.OverWin, 1, self.level)

  			local levellimit = csvdb["adv_chapterCsv"][self.chapterId].limitlevel

  			if params.relay or (not AdvCommon.isEndless(self.chapterId) and (self.level >= levellimit or not self.owner:advChapterIsOpen(self.chapterId, self.level + 1))) then --关卡结束

  				self:over(true, not AdvCommon.isEndless(self.chapterId) and self.level >= levellimit)

  			else
  				self:initByChapter(self.chapterId, self.level + 1, true, true)
  				self:backNext() --下一关
  			end

  		end

  		return true
  	end
  end
  
  --战斗 普通攻击
  local function clickMonster(self, room, block, params)

  	self.battle:battleBegin(room.roomId, block.blockId, params)

  	return true
  end
  

  local function chooseCommon(self, room, block, chooseData, choose)

  	if not chooseData or not chooseData["button".. choose .."cond"] then return end
  
  	local cond = chooseData["button".. choose .."cond"]:toArray(true, "=")
  	local checkCond = {

  		-- 没有条件
  		[0] = function()
  			return true
  		end,

  		-- 拥有道具
  		[1] = function()
  			if self:cost({[cond[2]] = cond[3]}, {}, true) then
  				return true
  			end
  		end,
  		-- xx角色（todo 队长）
  		[2] = function()

  			local hero = self.owner.heros[self.owner:getProperty("advTeam").leader]
  			if hero and hero:getProperty("type") == cond[2] then
  				return true

  			end
  		end,
  		--消灭所有怪
  		[3] = function()

  			for _, room in pairs(self:getCurMap().rooms) do

  				for _, block in pairs(room.blocks) do

  					if block:isMonster() then

  						return
  					end
  				end
  			end
  			return true
  		end,

  		--制定属性 

  		[4] = function()

  			if (self.battle.player[AttsEnumEx[cond[2]]] or 0) >= cond[3] then

  				return true
  			end
  		end,

  		-- 提交一个物品
  		[5] = function ()
  			if self:cost({[cond[2]] = cond[3]}, {}) then
  				return true
  			end
  		end,

  		-- sp 到达指定值
  		[6] = function()
  			if self.battle.player.sp >= cond[2] then
  				return true
  			end
  		end,

  	}

  	assert(not cond[1] or checkCond[cond[1]], "error cond, event_[link]chooseCsv id :" .. block.event.id)
  

  	if cond[1] and not checkCond[cond[1]]() then return end

  	local clearBlock = chooseData.keep ~= 1

  	local effects = chooseData["button".. choose .."effect"]:toTableArray(true)
  	for _, effect in ipairs(effects) do
  		if effect[1] == 1 then
  			local reward = csvdb["event_dropCsv"][effect[2]]["range"]:randWeight(true)
  			effect[2] = reward[1]
  			effect[3] = reward[2]

  		end

  
  		local doEffect = {
  			[1] = function() -- 获得某道具N个
  				self:backReward(self:award({[effect[2]] = effect[3]}, {}))
  			end,
  			[2] = function() --获得冒险buff
  				self.battle.player:addBuff(effect[2])
  			end,
  			[3] = function() --发现怪物

  				self:getCurMap():addNewMonsterRand(effect[2], {room, block})

  				clearBlock = false
  			end,
  			[4] = function() --无事发生
  			end
  		}

  		assert(doEffect[effect[1]], "error effect, event_[link]chooseCsv id :" .. block.event.id)

  		doEffect[effect[1]]()
  	end

  	self:checkTask(Adv.TaskType.Choose, 1, block.event.id)

  	self:checkAchievement(Adv.AchievType.Choose, 1, block.event.id)

  	return true, clearBlock
  end
  
  local function clickChoose(self, room, block, params)
  	local choose = params.choose
  	local chooseData = csvdb["event_chooseCsv"][block.event.id]
  	local status, clearBlock = chooseCommon(self, room, block, chooseData, choose)
  	if not status then return end
  
  	if clearBlock then
  		block:clear()
  	end
  	return true
  end
  
  local function clickLinkChoose(self, room, block, params)
  	local choose = params.choose
  	local chooseData = csvdb["event_linkchooseCsv"][block.event.id]
  	local status, clearBlock = chooseCommon(self, room, block, chooseData, choose)
  	if not status then return end
  
  	-- 完成统计次数
  	local idx = block.event.id % 10
  	if idx == 9 or not csvdb["event_linkchooseCsv"][block.event.id + 1] then --全部完成
  		local startId = math.floor(block.event.id / 10) * 10 + 1
  		self.lchoose[startId] = (self.lchoose[startId] or 0) + 1

  		self:checkAchievement(Adv.AchievType.LinkChoose, 1, startId)

  	else
  		self.lchoose.ing = block.event.id + 1  --后面会出现后继事件
  	end

  	if clearBlock then

  		block:clear()

  	end

  	return true
  end
  
  local function clickDrop(self, room, block, params)
  	local reward = {}
  	if not block.event.item then return end

  	local reward = self:award({[block.event.item[1]] = block.event.item[2]})

  	-- local reward = self:award({[5801] = 1})

  	block:clear()

  	self:backReward(reward)
  	return true
  end
  
  local function clickTrader(self, room, block, params)
  	local buyId = params.id
  	local traderData = csvdb["event_traderCsv"][block.event.id]
  	if not traderData then return end -- 偷偷改表了
  
  	if not block.event.shop or not block.event.shop[buyId] then return end
  	if (block.event.status or ""):getv(buyId, 0) == 1 then return end -- 买过了
  

  	if not self:cost({[traderData.type] = block.event.shop[buyId][3]}, {}) then return end --不够

  	local reward = self:award({[block.event.shop[buyId][1]] = block.event.shop[buyId][2]})

  	block.event.status = block.event.status:setv(buyId, 1)

  	self:checkTask(Adv.TaskType.Shop, 1, block.event.id)

  	self:checkAchievement(Adv.AchievType.Shop, 1, block.event.id)

  	self:backReward(reward)
  	return true
  end
  
  local function clickBuild(self, room, block, params)
  	local buildData = csvdb["event_buildingCsv"][block.event.id]
  	if not buildData then return end-- 偷偷改表了
  	if not block.event.effect then return end -- 没有效果 气人不

  	local clearBlock = true

  	local effect = block.event.effect
  	--todo 效果生效
  	local doEffect = {
  		[1] = function() -- 获得某道具N个
  			self:backReward(self:award({[effect[2]] = effect[3]}, {}))
  		end,
  		[2] = function() --获得冒险buff
  			self.battle.player:addBuff(effect[2])
  		end,
  		[3] = function() --发现怪物

  			self:getCurMap():addNewMonsterRand(effect[2], {room, block})

  			clearBlock = false

  		end,
  		[4] = function() --无事发生
  		end
  	}
  	assert(doEffect[effect[1]], "error effect, event_buildingCsv id :" .. block.event.id)

  	if not self:cost(buildData.required:toNumMap(), {}) then return end

  	doEffect[effect[1]]()

  	self:checkTask(Adv.TaskType.Build, 1, block.event.id)

  	self:checkAchievement(Adv.AchievType.Build, 1, block.event.id)

  	if clearBlock then

  		block:clear()

  	end

  	return true
  end
  

  local function clickClick(self, room, block, params)
  	local clickData = csvdb["event_clickCsv"][block.event.id]
  	if not clickData then return end
  	local clearBlock = true
  	local doEffect = {
  		[1] = function() -- 技能
  			for _, skillId in ipairs(clickData.effect:toArray(true, "=")) do
  				self.battle.player:releaseSkill(skillId)
  			end
  		end,
  		[2] = function() -- dropId
  			local reward = {}
  			for _, dropId in ipairs(clickData.effect:toArray(true, "=")) do
  				local item = csvdb["event_dropCsv"][dropId]["range"]:randWeight(true)

  				reward[item[1]] = (reward[item[1]] or 0) + item[2]

  			end
  			self:backReward(self:award(reward, {}))
  		end,
  	}

  	assert(doEffect[clickData.type], "error effect, event_clickCsv id :" .. block.event.id)
  	doEffect[clickData.type]()

  	if clearBlock then

  		block:clear()

  	end

  	return true

  end
  

  local function clickLayer(self, room, block, params)
  	if block.event.mapIdx then
  		table.insert(self.mapStack, block.event.mapIdx) --进入夹层
  	else
  		--生成夹层
  		local mapId = csvdb["event_layerCsv"][block.event.id].effect
  		local mapIdx = #self.maps + 1
  		block.event.mapIdx = mapIdx
  		table.insert(self.mapStack, mapIdx)
  
  		self.maps[mapIdx] = AdvMap.new(self, mapIdx, mapId)
  		self.battle:initMapEnemys(mapIdx)

  		self:checkAchievement(Adv.AchievType.EnterILayer, 1, mapId)

  	end
  	self:backLayer()
  	return true
  end
  

  local function clickTask(self, room, block, params)
  	if self:addTask(block.event.id) then --增加任务
  		block:clear()
  		return true
  	end
  end
  

  local eventCallFunc = {
  	[AdvEventType.Out] = clickOut,
  	[AdvEventType.BOSS] = clickMonster,
  	[AdvEventType.Monster] = clickMonster,
  	[AdvEventType.Choose] = clickChoose,

  	[AdvEventType.LinkChoose] = clickLinkChoose,

  	[AdvEventType.Drop] = clickDrop,
  	[AdvEventType.Trader] = clickTrader,
  	[AdvEventType.Build] = clickBuild,

  	[AdvEventType.Click] = clickClick,

  	[AdvEventType.Layer] = clickLayer,

  	[AdvEventType.Task] = clickTask,