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)

  	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(self.owner.TaskType.AdvPass, {id = self.chapterId})

  
  		-- 冒险队等级升一下子
  		local advL = self.owner:getProperty("advL")
  		advL[2] = (advL[2] or 0) + 1
  		for level = ((advL[1] or 0) + 1), #csvdb["adv_rankCsv"] do
  			local ldata = csvdb["adv_rankCsv"][level]
  			if ldata.unlock >= advL[2] then
  				advL[1] = level
  				self.owner:award(ldata.reward)
  			end
  		end
  		self.owner:updateProperty("advL", advL)
  

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

  	end

  	self:clear()

  	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 = level % chapterData.limitlevel
  		if level == 0 then
  			level = chapterData.limitlevel
  		end
  	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 nums <= 0 then
  			items = items:delk(itemId)
  			nums = 0
  		else
  			items = items:incrv(itemId, count)
  		end
  	end

  	self.owner:updateProperty({field = "advItems", value = items, notNotify = params.notNotify})
  	return tgift
  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)
  			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,

  	}

  	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]})

  	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) + reward[item[2]]
  			end
  			self:backReward(self:award(reward, {}))
  		end,
  	}
  	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,

  }
  
  --点击处理 roomId, blockId 
  --params 某些事件需要的客户端传递的参数
  function Adv:clickBlock(roomId, blockId, params)

  	local map = self:getCurMap()
  	local room = self:getRoom(roomId)
  	local block = self:getBlock(roomId, blockId)

  	if not block then return end
  

  	local status = false

  	local clickEvent = false

  	if not block.isOpen then

  		local canOpen = false  --如果未开放是否可以开放
  		local hadMonster = false -- 周围是否有解锁的怪未击败

  		for _, one in ipairs(map:getAroundBlocks(room, block)) do

  			local _room, _block = one[1], one[2]
  			if _block.isOpen then canOpen = true end

  			if _block.isOpen and _block:isMonster() then 

  				hadMonster = true 
  			end
  		end

  		if canOpen and not hadMonster then --开放

  			room:openBlock(block)

  			status = true
  		end
  	else

  		clickEvent = true

  		--点了空地
  		if not block.event then
  			return 
  		end
  		--可点击的事件

  		if not room.isBossRoom or block:isBoss() then

  			if eventCallFunc[block.event.etype] then

  				status = eventCallFunc[block:getEventType()](self, room, block, params)

  			end
  		end
  	end

  	local needChange = true

  	if clickEvent and block.event then

  		if block:getEventType() == AdvEventType.Out then

  			needChange = false
  		end

  	end
  	if status and needChange then  --出去了就不计算回合了

  		self:backBlockChange(roomId, blockId)
  		self:afterRound()
  	end

  	self:saveDB()

  	return status
  end
  

  --使用道具产生效果
  function Adv:useItem(itemId, count, target)
  	count = count or 1
  	local itemData = csvdb["adv_itemCsv"][itemId] 
  	if not itemData then return end
  	--重置数量 
  	if itemData["function"] == 0 or itemData["function"] == 2 then count = 1 end
  	if not self:cost({[itemId] = count}, {}, true) then return true end
  	--消耗
  	if itemData["function"] == 0 or itemData["function"] == 1 then 
  		self:cost({[itemId] = count}, {})
  	end
  	--生效
  	if itemData.type == 1 or itemData.type == 0 then --技能

  		self.battle.player:releaseSkill(itemData.effect, target)

  	elseif itemData.type == 2 then	--掉落
  		local item = csvdb["event_dropCsv"][itemData.effect]["range"]:randWeight(true)
  		self:backReward(self:award({[item[1]] = item[2]}, {}))
  	else
  		return
  	end
  

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

  	self:afterRound()

  	self:saveDB()

  	return true
  end
  

  --使用技能
  function Adv:usePotion(potionId, potionLevel, target)
  	--  cost
  	local potionData = csvdb["adv_potionCsv"][potionId][potionLevel]

  	local enemy = self.battle:getEnemy(target.roomId, target.blockId)
  	if not enemy then return end
  	--生效
  	if potionData.type == 1 or potionData.type == 0 then --技能
  		self.battle.player:releaseSkill(potionData.effect, enemy)
  	elseif potionData.type == 2 then	--掉落
  		local item = csvdb["event_dropCsv"][potionData.effect]["range"]:randWeight(true)
  		self:backReward(self:award({[item[1]] = item[2]}, {}))