local httpc = require("http.httpc")
  local md5 = require "md5"
  local cjson = require "shared.json"

  local mysqlproxy = require "shared.mysqlproxy"

  local serverId = tonumber(skynet.getenv("servId"))

  local RolePlugin = {}
  
  function RolePlugin.bind(Role)
  

  	function Role:loadAll()

  		self:loadDaily()

  		self:loadEquips()
  		self:loadRunes()

  		self:loadHeros()

  		self:loadDiner()

  		self:loadActivity()

  		self:loadStoreInfo()

  		--self:loadRoleIncre()

  		self:loadFriends()

  		self:loadSparks()

  	end
  
  	function Role:reloadWhenLogin()

  	end
  

  	function Role:SendPacket(...)
  		SendPacket(...)
  	end
  

  	function Role:onOfflineEvent()

  		-- 设置最新的登录时间
  		self:setProperty("ltime", skynet.timex())

  	end

  	local function checkItemCount(self, itemId, count)
  		local itemData = csvdb["itemCsv"][itemId]
  		-- 种类 类型数量限制
  		local page = globalCsv.store_type[itemData.type]
  		local limit = self:getProperty("bagLimit")[page]
  		if limit and self:getItemCount(itemId) == 0 then
  			local curCount = 0
  			local items = self:getProperty("items"):toNumMap()

  			for id ,_ in pairs(items) do
  				local tempData = csvdb["itemCsv"][id]

  				if tempData then
  					if globalCsv.store_type[tempData.type] == page then
  						curCount = curCount + 1
  						if curCount >= limit then
  							count = 0
  							break
  						end

  					end
  				end
  			end
  		end

  		return count
  	end

  
  	local function _award(self, itemId, count, params)

  		local count = math.floor(count)

  		local pms = clone(params)

  		local itemData = csvdb["itemCsv"][itemId]

  		if not itemData then  -- 加一层保护
  			return 0, {}
  		end

  		local curType = itemData.type
  		local change = {} -- 奖励被转化为了其他奖励 id = count
  

  		local itemIdAward = {
  			[ItemId.PlayerExp] = function()

  				self:addPlayExp(count, pms)

  			end,

  			[ItemId.AdvPower] = function()
  				self:changeAdvCount(-count)
  			end,

  		}
  

  		local itemTypeAward = {
  			[ItemType.Hero] = function()

  				pms.type = itemId - ItemStartId.Hero

  				local status = self:addHero(pms)
  				local gcount = 1
  				if not status then
  					gcount = 0
  				end
  				if count - gcount > 0 then
  					local heroData = csvdb["unitCsv"][pms.type]
  					change[pms.type] = (change[pms.type] or 0) + (count - gcount) * globalCsv.draw_unit_tofragment[heroData.rare]

  				end

  				count = gcount

  			end,

  			[ItemType.EquipBase] = function()
  				local typ = math.floor((itemId-7000)/100)
      			local lv = (itemId-7000)%100

  				self:addEquip(typ, lv, count ,pms)

  				local equipCsv = (csvdb["equipCsv"][typ] or {})[lv]
  				self:checkTaskEnter("AddEquip", {equipId = itemId, rarity = equipCsv.rarity}, pms.notNotify)

  			end,
  			[ItemType.Rune] = function()

  				local typ =  math.floor((itemId-10000)/1000)

  				for _= 1, count do

  					self:addRune({type = typ,id = itemId, notNotify = pms.notNotify, log = pms.log})

  				end
  			end,

  			[ItemType.Spark] = function()
  				for _= 1, count do
  					self:addSpark({id = itemId, notNotify = pms.notNotify, log = pms.log})
  				end
  			end,

  			[ItemType.AdvItem] = function()  --冒险道具不会进入 玩家仓库
  				count = 0
  			end,

  			[ItemType.FuncOpen] = function()

  				self:funcOpen(itemId, count, pms)

  			end,

  			[ItemType.HeroFCommon] = function()
  				if itemData.use_type == 2 then
  					local randomData = csvdb["item_randomCsv"][tonumber(itemData.use_effect)]
  					for _i = 1, count do
  						for i = 1, 10 do
  							local num = randomData["num" .. i] 
  							local gift = randomData["gift" .. i]
  							if num and gift and num > 0 and gift ~= "" then
  								local pool = {}
  								for _, temp in ipairs(gift:toArray()) do
  									table.insert(pool, temp:toArray(true, "="))
  								end
  								local needCount = math.min(#pool, num)
  								for j = 1, needCount do
  									local idx = math.randWeight(pool, 3)
  									change[pool[idx][1]] = (change[pool[idx][1]] or 0) + pool[idx][2]
  									table.remove(pool, idx)
  								end
  							end
  						end
  					end
  					change[0] = nil
  					count = 0
  				else
  					pms.itemId = itemId
  					pms.count = count
  					self:addItem(pms)
  				end
  			end,

  			[ItemType.Potion] = function ()
  				self:addPotion({id = itemId, count = count, notNotify = pms.notNotify, log = pms.log})
  			end,

  			[ItemType.BossTicket] = function ()

  				local isOpen, actId = self.activity:isOpen("ChallengeLevel")
  				if not isOpen then return end
  				self.activity:getBattleTicket(actId)

  				local actData = self.activity:getActData("ChallengeLevel")
  				actData["ticket"] = (actData["ticket"] or 0) + count
  				self.activity:updateActData("ChallengeLevel", actData)
  			end,

  		}

  
  		if count > 0 then
  			local itemCfg = csvdb["itemCsv"][itemId]
  			local itemType = 0
  			if itemCfg then
  				itemType = itemCfg.type
  			end
  			self:checkTaskEnter("AddItem", {id = itemId, count = count, type = itemType})
  		end

  		-- 对数量筛查

  		count = checkItemCount(self, itemId, count)

  		if count ~= 0 then

  			if itemIdAward[itemId] then
  				itemIdAward[itemId]()
  			elseif itemTypeAward[curType] then

  				itemTypeAward[curType]()
  			else

  				pms.itemId = itemId
  				pms.count = count
  				self:addItem(pms)

  			end

  		end
  

  		return count, change --  count 实际发放的奖励个数 change 物品实际奖励与当前id 不符 就发生转换 而不实际发奖

  	end
  
  
  	-- 发奖功能入口  award string id=count or {[id] = count}
  	function Role: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 reward, allChange = {}, {}
  

  		for itemId, rcount in pairs(tgift) do
  			local count, change = _award(self, itemId, rcount, params)
  			if count > 0 then
  				reward[itemId] = (reward[itemId] or 0) + count
  			end

  			if next(change) then

  				local cr, _ = self:award(change, params) -- 内部转换忽略 防止死循环
  				if next(cr) then
  					for _id, _ct in pairs(cr) do
  						reward[_id] = (reward[_id] or 0) + _ct
  					end
  					table.insert(allChange, {form = {[itemId] = rcount - count}, to = cr})

  				end

  			end
  		end

  		if not next(allChange) then allChange = nil end

  		return reward, allChange --实际获得的奖励 和 最高级奖励转化过程
  	end
  

  
  	function Role:packReward(reward, change)
  		if not reward then return nil end
  		return {reward = reward, change = change}
  	end
  

  	function Role:awardExpireItem(expireTime, gift, params)
  		if expireTime <= skynet.timex() then
  			return 
  		end
  		local reward = self:award(gift, params)
  		local expireItem = self:getProperty("expireItem")
  		for itemId, _ in pairs(reward) do
  			expireItem[itemId] = expireTime
  		end
  		self:setProperty("expireItem", expireItem)
  	end
  
  	function Role:checkExpireItem(notNotify)
  		local expireItem = self:getProperty("expireItem")
  		local now = skynet.timex()
  		for itemId, expireTime in pairs(expireItem) do
  			if expireTime <= now then
  				expireItem[itemId] = nil
  				local itemCount = self:getItemCount(itemId)
  				if itemCount > 0 then
  					-- 过期物品删掉
  					self:addItem({itemId = itemId, count = -itemCount, log = {desc = "expire"}, notNotify = notNotify}) --过期
  
  					local itemData = csvdb["itemCsv"][itemId]
  					if itemData then
  						if itemData.type == ItemType.Head then
  							-- 检查头像是不是在穿戴
  							if self:getProperty("headId") == itemId then
  								self:changeHead(globalCsv.defaultHead, notNotify)
  
  								local headData = csvdb["player_iconCsv"][itemId]
  								-- pvp 跨服竞技场奖励
  								if headData and headData.path == 2 then

  									--mysqlproxy:insertEmail({roleId = self:getProperty("id"), emailId = 19})
  									self:sendMail(19)

  								end
  							end
  						end
  					end
  				end
  			end
  		end
  		self:setProperty("expireItem", expireItem)
  	end
  
  	function Role:changeHead(id, notNotify)
  		self:updateProperty({field = "headId" ,value = id, notNotify = notNotify})
  		self:changeCrossServerPvpSelfInfo("headId")

  		self:mylog("role_action", {desc = "changeHead", int1 = id})

  	end
  

  	function Role:addPlayExp(addExp, params)

  		local level = self:getProperty("level")

  		local oldLevel = level

  		if not csvdb["player_expCsv"][level + 1] then
  			return
  		end

  		local exp = self:getProperty("exp")
  		local newExp = exp + addExp
  		while newExp >= csvdb["player_expCsv"][level].exp do
  			if csvdb["player_expCsv"][level + 1] then -- 有下一级
  				newExp = newExp - csvdb["player_expCsv"][level].exp
  				level = level + 1

  				self:checkTaskEnter("RoleLevelUp", {level = level})

  			else
  				newExp = csvdb["player_expCsv"][level].exp - 1 -- 没有下一级了 经验溢出太多 扣除
  			end
  		end

  		if level > oldLevel then

  			if params.log then
  				local log = params.log
  				self:log("setLevel", {
  					level_before = oldLevel, 
  					level_changemain = log.desc,

  					level_changedetail = log.int1 or 0,

  					level_reward = {},

  				})
  			else
  				print("addPlayExp no log ", debug.traceback())
  			end

  		end
  
  		if params.log then

  			local log = clone(params.log)

  			if log["cint1"] or log["cint2"] then
  				print("addPlayExp error log have cint1 or cint2  or cint3", debug.traceback())
  			end

  
  			log["cint1"] = addExp
  			log["cint2"] = newExp
  			log["cint3"] = level
  
  			self:mylog("player_exp", log)
  		else
  			print("addPlayExp no log ", debug.traceback())

  		end
  

  		self:updateProperties({level = level, exp = newExp}, params.notNotify)

  		self:changeCrossServerPvpSelfInfo("level")

  	end
  

  	function Role:addPotion(params)

  		local pId = globalCsv.adv_item_potion[params.id]
  		local potionBag = self:getProperty("potionBag")
  		local origin = potionBag[pId] or 0
  		local nums = origin + params.count
  		potionBag[pId] = nums
  
  		self:logItems(params.id, origin, nums, params.log)
  		if params.log then
  			local log = clone(params.log)
  			if log["cint1"] or log["cint2"] then
  				print("addItem error log have cint1 or cint2  ", debug.traceback())
  			end
  			log["cint1"] = params.id
  			log["cint2"] = math.abs(params.count)

  			log["cint3"] = nums
  			log["long1"] = origin

  			if params.count <= 0 then
  				self:mylog("out_item", log)
  			else
  				self:mylog("in_item", log)
  			end
  		else
  			print("addItem no log ", debug.traceback())
  		end
  
  		self:updateProperty({field = "potionBag", value = potionBag})
  		if not params.notNotify then
  			SendPacket(actionCodes.Role_updateItems, MsgPack.pack({[params.id] = params.count}))
  		end
  	end
  

  	function Role:addItem(params)
  		params = params or {}

  		params.count = math.floor(params.count or 0)

  		if params.itemId ==  ItemId.Diamond then
  			self:gainDiamond(params)
  			return
  		end

  		local items = self:getProperty("items")
  		local origin = items:getv(params.itemId, 0)
  		local nums = origin+params.count
  		if nums <= 0 then
  			items = items:delk(params.itemId)
  			nums = 0
  		else
  			items = items:incrv(params.itemId, params.count)
  		end

  		self:logItems(params.itemId, origin, nums, params.log)

  		if params.log then

  			local log = clone(params.log)

  			if log["cint1"] or log["cint2"] then
  				print("addItem error log have cint1 or cint2  ", debug.traceback())
  			end
  			log["cint1"] = params.itemId
  			log["cint2"] = math.abs(params.count)

  			log["cint3"] = nums
  			log["long1"] = origin

  			if params.count <= 0 then
  				self:mylog("out_item", log)
  			else
  				self:mylog("in_item", log)
  			end
  		else
  			print("addItem no log ", debug.traceback())
  		end

  		self:setProperty("items", items)
  		if not params.notNotify then
  			SendPacket(actionCodes.Role_updateItems, MsgPack.pack({[params.itemId] = nums}))
  		end

  	end
  
  	function Role:checkItemEnough(itemCountT)
  		local less = {}

  		if not next(itemCountT) then

  			return true, less

  		end

  		for itemId, count in pairs(itemCountT) do

  			--if count <= 0 then
  			--	-- 判断物品数量值不应该小于等于0
  			--	less[itemId] = 0
              --else
              if count > 0 then

  				local last = self:getItemCount(itemId) - count
  				if last < 0 then
  					less[itemId] = -last
  				end

  			end
  		end
  		return (not next(less)), less -- 是否足够，，缺什么缺多少
  	end
  
  	function Role:costItems(itemCountT, params)

  		local pms = clone(params or {})

  		if itemCountT[ItemId.Diamond] then  --优先扣除钻石

  			pms.count = itemCountT[ItemId.Diamond]
  			if not self:costDiamond(pms) then
  				return
  			end

  		end

  		for itemId, count in pairs(itemCountT) do

  			if itemId ~= ItemId.Diamond then
  				pms.itemId = itemId
  				pms.count = - count
  				self:addItem(pms)
  				self:itemDeltaEvent(pms)
  			end

  		end

  		return true

  	end
  

  	function Role:itemDeltaEvent(pms)
  		self:eventBoxL(pms)
  	end
  
  	-- 拆解室的生产线启动
  	function Role:eventBoxL(pms)
  		local limit = globalCsv.box_key_max[pms.itemId]
  		if not limit then return end
  
  		local update = false
  		local boxL = self:getProperty("boxL") or {}
  		for slot, data in pairs(boxL) do
  			if data.time == 0 and data.id == pms.itemId and self:getItemCount(pms.itemId) < limit then
  				update = true
  				data.time = skynet.timex()
  			end
  		end
  
  		if update then

  			self:updateProperty({field = "boxL", value = boxL, notNotify = pms.notNotify})

  		end
  	end
  

  	function Role:getItemCount(itemId)

  		if itemId == ItemId.Diamond then

  			return self:getAllDiamond()
  		end

  		return self:getProperty("items"):getv(itemId, 0)
  	end
  

  	function Role:getAllDiamond()

  		local diamond = self:getProperty("sid") == IOS_SID and self:getProperty("reDiamondIos") or self:getProperty("reDiamond")

  		--return self:getProperty("diamond") + diamond
  		return diamond

  	end
  
  	function Role:gainDiamond(params)
  		if not params or type(params) ~= "table" then return false end
  		local count = tonum(params.count)
  		if isnan(count) then
  			return false
  		end

  		local origind = 0 -- self:getProperty("diamond")

  		local originr = self:getProperty("sid") == IOS_SID and self:getProperty("reDiamondIos") or self:getProperty("reDiamond")

  		local origin = origind + originr

  		--if params.isRecharge then

  			if params.sid == IOS_SID then
  				self:incrProperty("reDiamondIos", count)
  			else
  				self:incrProperty("reDiamond", count)
  			end

  		--else
  			--self:incrProperty("diamond", count)
  		--end

  		self:logItems(ItemId.Diamond, origin, count, params.log)

  		if params.log then

  			local log = clone(params.log)

  			if log["cint1"] or log["cint2"] or log["cint3"] then
  				print("costDiamond error log have cint1 or cint2 or cint3 ", debug.traceback())
  			end
  			log["cint1"] = origin
  			log["cint2"] = count

  			log["cint3"] = origin + count

  			self:mylog("in_diamond", log)
  		else
  			print("gainDiamond no log ", debug.traceback())
  		end
  

  		self:notifyUpdateProperty("diamond", self:getAllDiamond())
  		return true
  	end
  

  	function Role:costDiamond(params)
  		if not params or type(params) ~= "table" then return false end
  		local count = tonum(params.count)
  		if isnan(count) then
  			return false
  		end
  		if count <= 0 then
  			return false
  		end

  		local isIos = self:getProperty("sid") == IOS_SID

  		local origind = 0 -- self:getProperty("diamond")

  		local originr = isIos and self:getProperty("reDiamondIos") or self:getProperty("reDiamond")

  		local origin = origind + originr
  
  		if origin < 0 then
  			return false
  		end
  		if origin < count then
  			return false
  		end

  		local diamondKey = isIos and "reDiamondIos" or "reDiamond"
  		self:incrProperty(diamondKey, -count)
  		--local last = count
  		--local costFirst = isIos and {"diamond", "reDiamondIos"} or {"diamond", "reDiamond"}
  		--if params.isRecharge then
  		--	costFirst = isIos and {"reDiamondIos", "diamond"} or {"reDiamond", "diamond"}
  		--end
  		--last  = math.max(last - self:getProperty(costFirst[1]), 0)
  		--if last < count then
  		--	self:incrProperty(costFirst[1], last - count)
  		--end
  		--if last > 0 then
  		--	self:incrProperty(costFirst[2], -last)
  		--end

  
  		self:logItems(ItemId.Diamond, origin, count, params.log)

  		if params.log then

  			local log = clone(params.log)

  			if log["cint1"] or log["cint2"] or log["cint3"] then
  				print("costDiamond error log have cint1 or cint2 or cint3 ", debug.traceback())
  			end
  			log["cint1"] = origin
  			log["cint2"] = count

  			log["cint3"] = origin - count

  			self:mylog("out_diamond", log)
  		else
  			print("costDiamond no log ", debug.traceback())
  		end

  		self:notifyUpdateProperty("diamond", self:getAllDiamond())

  
  		self:checkTaskEnter("CostDiamond", {count = count})

  		return true
  	end
  

  	function Role:increBy(field, val)
  		local roleIncre = self:getProperty("roleIncre")
  		local curId = roleIncre[field] or 0
  		roleIncre[field] = curId + val
  		self:setProperty("roleIncre", roleIncre)
  		return curId + val
  	end
  

  	function Role:addHero(params)
  		local roleId = self:getProperty("id")

  		local heroType = params.type

  		if self:isHaveHero(heroType) then return end

  		local unitData = csvdb["unitCsv"][heroType] 
  		if not unitData then return false end

  		local heroId = self:increBy("heroId" , 1)

  		local heroInfo = {

  			key = string.format("%d",roleId * MAX_HERO_NUM + heroId),
  			id 	= roleId * MAX_HERO_NUM + heroId,
  			roleid = roleId,

  			type= heroType,

  			wakeL = globalCsv.unit_wake_initLevel[unitData.rare],

  		}

  		if heroInfo.wakeL == 3 then

  			self:checkTaskEnter("WakeCG", {heroType = heroType})

  		end

  		local newHero = require("models.Hero").new(heroInfo)
  		newHero:create()
  		newHero.owner = self

  		newHero:saveBattleValue()

  		self.heros[heroId] = newHero

  		local ssrCount = 0
  		if unitData.rare == HeroQuality.SSR then
  			ssrCount = self:getSSRHeroCount()
  		end
  		self:checkTaskEnter("AddHero", {heroType = heroType, wakeL = newHero:getProperty("wakeL"), camp = unitData.camp, job = unitData.job, ssrCount = ssrCount}, params.notNotify)

  		self:checkTaskEnter("HeroQualityCollect", {})

  		if not params.notNotify then
  			local heroResponse = {}
  			table.insert(heroResponse, newHero:data())
  			local bin = MsgPack.pack(heroResponse)
  			SendPacket(actionCodes.Hero_loadInfos, bin)
  		end

          self:updateProperty({field = "heroCnt", value = #self.heros})

  		self:logItems(heroType + ItemStartId.Hero, 0, 1, params.log)
  

  		if params.log then

  			local log = clone(params.log)

  			if log["cint1"] or log["cint2"] or log["cint3"] then
  				print("addHero error log have cint1 or cint2 or cint3 ", debug.traceback())
  			end
  			log["cint1"] = heroId
  			log["cint2"] = heroType
  			self:mylog("in_hero", log)
  		else
  			print("addHero no log ", debug.traceback())
  		end

  		return true, newHero

  	end
  
  	function Role:isHaveHero(heroType)
  		if not csvdb["unitCsv"][heroType] then return false end
  		for _, hero in pairs(self.heros) do
  			if hero:getProperty("type") == heroType then

  				return hero

  			end
  		end

  	end
  

  	function Role:getSSRHeroCount()
  		local count = 0
  		for _, hero in pairs(self.heros) do
  			if hero:getRare() == HeroQuality.SSR then
  				count = count + 1
  			end
  		end
  		return count
  	end
  

  	function Role:getHeroByID(heroId)
  		for id, hero in pairs(self.heros) do
  			if id == heroId then
  				return hero
  			end
  		end
  		return nil
  	end
  

  	function Role:loadHeros()
  		local roleId = self:getProperty("id")

  		local res = mysqlproxy:query(string.format("SELECT * FROM `Hero` WHERE `roleid` = %s", roleId))
  		for _, data in ipairs(res) do
  			local hero = require("models.Hero").new({key = string.format("%d",data.id), id=data.id})
  			if hero:load(data) then

  				hero.owner = self

  				self.heros[hero:getSimpleHeroId()] = hero

  			end
  		end
  	end
  

  	function Role:loadFriends()
  		local roleId = self:getProperty("id")
  		local res = mysqlproxy:query(string.format("SELECT * FROM `Friend` WHERE `roleid` = %s", roleId))
  		for _, data in ipairs(res) do
  			local friend = require("models.Friend").new({key = string.format("%d",data.id), id = data.id})
  			if friend:load(data) then
  				self.friends[friend:getProperty("fid")] = friend

  			end
  		end
  	end
  

  	function Role:loadDaily()
  		local roleId = self:getProperty("id")

  		local dataKey = string.format("%d", roleId)
  		self.dailyData = require("models.Daily").new({key = dataKey, id = roleId})

  		self.dailyData.owner = self

  		if not self.dailyData:checkKeyExists(dataKey) then

  			self.dailyData:create()
  		else
  			self.dailyData:load()
  		end
  	end

  	function Role:loadActivity()
  		local roleId = self:getProperty("id")

  		local dataKey = string.format("%d", roleId)
  		self.activity = require("models.Activity").new({key = dataKey, id = roleId})

  		self.activity.owner = self

  		if not self.activity:checkKeyExists(dataKey) then

  			self.activity:create()
  		else
  			self.activity:load()
  		end
  	end
  

  	function Role:loadDiner()
  		local roleId = self:getProperty("id")

  		local dataKey = string.format("%d", roleId)
  		self.dinerData = require("models.Diner").new({key = dataKey, id = roleId})

  		self.dinerData.owner = self

  		if not self.dinerData:checkKeyExists(dataKey) then

  			self.dinerData:create()
  		else
  			self.dinerData:load()
  		end
  	end