467 lines
18 KiB
Lua
Executable File
467 lines
18 KiB
Lua
Executable File
module("NewCdkey", package.seeall)
|
||
--[[
|
||
游戏猫激活码功能
|
||
|
||
个人数据：NewCdKeyData
|
||
{
|
||
lastTime,上次使用时间
|
||
codeTimes =
|
||
{
|
||
[id1], 礼包id1的使用次数
|
||
[id2],
|
||
}
|
||
}
|
||
]]--
|
||
|
||
local CODE_SUCCESS = 0 -- 成功
|
||
local CODE_INVALID = 1 -- 已被使用
|
||
local CODE_NOTEXIST = 2 -- 不存在
|
||
local CODE_USED = 3 -- 已使用过同类型
|
||
local CODE_ERR = 4 -- SQL查询错误
|
||
local CODE_TIME = 5 -- 未到使用时间
|
||
local CODE_TIMEEXPIRE = 6 -- 礼包码过期了
|
||
local CODE_HTTP = 11 -- HTTP接口错误
|
||
local CODE_PF = 12 -- 非本平台礼包码
|
||
local CODE_LIMIT = 13 -- 使用次数超过限制
|
||
|
||
--local NewCdkeyServiceConf={
|
||
-- PfId = "1",
|
||
-- host = "fgtest.bigrnet.com",--这里不能带http://
|
||
-- port = "80",
|
||
-- url = "/H5CQ/develop/Service/CheckGiftCodeYXM.php",
|
||
--}
|
||
|
||
--NewCdkeyAwards = {{type=0,id=261,count=5},{type=0,id=269,count=1},{type=7,id=7,count=20},{type=2,id=2,count=100000},}
|
||
|
||
local PfId = System.getPfId()
|
||
local SrvId = System.getServerId()
|
||
|
||
local ServiceConf = AutoCdkeyServiceConfig[PfId]
|
||
--local ServiceConf = NewCdkeyServiceConf
|
||
|
||
--配置的服务检测
|
||
function OnCheckCanPlatform()
|
||
print("[DEBUG] OnCheckCanPlatform")
|
||
-- 平台验证
|
||
if not PfId then
|
||
print("[ERR][CdKey YXM]1 load AutoCdkeyServiceConfig error! ")
|
||
return false
|
||
end
|
||
if ServiceConf == nil then
|
||
print("[ERR][CdKey YXM]2 load AutoCdkeyServiceConfig error! ")
|
||
return false
|
||
end
|
||
if ServiceConf.host == nil then
|
||
print("[ERR][CdKey YXM]3 load AutoCdkeyServiceConfig error! ")
|
||
return false
|
||
end
|
||
if ServiceConf.port == nil then
|
||
print("[ERR][CdKey YXM]4 load AutoCdkeyServiceConfig error! ")
|
||
return false
|
||
end
|
||
if ServiceConf.url == nil then
|
||
print("[ERR][CdKey YXM]5 load AutoCdkeyServiceConfig error! ")
|
||
return false
|
||
end
|
||
return true
|
||
end
|
||
|
||
-- 根据 CDKey 获取礼包码id
|
||
local function getCodeId(code)
|
||
local len = string.byte(string.sub(code, -1)) - 97
|
||
local pos = string.byte(string.sub(code, -2,-2)) - 97
|
||
local str = string.sub(code, pos + 1, pos + len)
|
||
|
||
--print("gift code len :"..tostring(len))
|
||
---print("gift code pos :"..tostring(pos))
|
||
--print("gift code str :"..tostring(str))
|
||
|
||
local id = 0
|
||
for i=1, string.len(str) do
|
||
id = id * 10 + (math.abs(string.byte(string.sub(str, i, i)) - 97))
|
||
end
|
||
return id
|
||
end
|
||
|
||
-- 检测平台号
|
||
local function checkPfid(code)
|
||
local pos = string.byte(string.sub(code, -2,-2)) - 97
|
||
local str = string.sub(code, 1, pos)
|
||
return str == PfId
|
||
end
|
||
|
||
--[[
|
||
-- 获取玩家的 CDKey 数据
|
||
local function getActorData(pActor)
|
||
if Actor.getEntityType(pActor) ~= enActor then
|
||
assert(false)
|
||
end
|
||
local var = Actor.getStaticVar(pActor);
|
||
if var.CdKeyData == nil then
|
||
var.CdKeyData = {}
|
||
end
|
||
|
||
if not var.CdKeyData.codeTimes then
|
||
var.CdKeyData.codeTimes = {}
|
||
end
|
||
|
||
return var.CdKeyData
|
||
end
|
||
|
||
-- 获取玩家的 CDKey 数据
|
||
function getActorCdkData(pActor)
|
||
if Actor.getEntityType(pActor) ~= enActor then
|
||
assert(false)
|
||
end
|
||
local var = Actor.getStaticVar(pActor);
|
||
if var.CdKeyData == nil then
|
||
var.CdKeyData = {}
|
||
end
|
||
|
||
if not var.CdKeyData.codeTimes then
|
||
var.CdKeyData.codeTimes = {}
|
||
end
|
||
if not var.CdKeyData.codeTypeTimes then
|
||
var.CdKeyData.codeTypeTimes = {}
|
||
end
|
||
|
||
return var.CdKeyData
|
||
end
|
||
--]]
|
||
-- 检测完CDKey后的回调
|
||
local function AfterCheckCDkeyNew(paramPack, content, result)
|
||
print("[DEBUG][CdKey YXM]1 AfterCheckCDkeyNew -------------------------content:"..tostring(content).."result:"..tostring(result))
|
||
local res = CODE_SUCCESS
|
||
local actid = 0
|
||
if (result == 0) then --有反馈
|
||
--for mu_id in string.gmatch(content, "(%w+),*") do
|
||
-- print('mu_id='..mu_id);
|
||
--end
|
||
|
||
local resPattern = "^(.*)(return_code%s*:%s)([^,]*)(.*)$"
|
||
strCapture1, strCapture2, res, strCapture3, strCapture4 = string.match(content, resPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(res).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
local aidPattern = "^(.*)(aid%s*:%s)([^,]*)(.*)$"
|
||
strCapture1, strCapture2, actid, strCapture3, strCapture4 = string.match(content, aidPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(actid).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
local cdkPattern = "^(.*)(cdk%s*:%s*)([^,]*)(.*)$"
|
||
strCapture1, strCapture2, cdk, strCapture3, strCapture4 = string.match(content, cdkPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(cdk).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
|
||
if (res == "0") then --新key
|
||
|
||
--邮件明不需要传了
|
||
--local mailtitlePattern = "^(.*)(mailtitle%s*:%s*)([^,]*)(.*)$"
|
||
--strCapture1, strCapture2, mailtitle, strCapture3, strCapture4 = string.match(content, mailtitlePattern)
|
||
--print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(mailtitle).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
|
||
local mailtlistPattern = "^(.*)(maillist%s*:%s*[)([^]]*)(.*)$"
|
||
strCapture1, strCapture2, maillist, strCapture3, strCapture4 = string.match(content, mailtlistPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(maillist).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
|
||
local Awards = {}
|
||
local mailcount = 0
|
||
for kid, kcount, ktype in string.gmatch(maillist, "{\"id\":\"(%d+)\",\"count\":(%d+),\"type\":(%d+)}") do
|
||
local item = {}
|
||
item.type = ktype
|
||
item.id = kid
|
||
item.count = kcount
|
||
table.insert(Awards, item)
|
||
print("[CdKey YXM]kid, kcount, ktype param1:"..tostring(ktype).."|param2:"..tostring(kid).."|param3:"..tostring(kcount))
|
||
mailcount = mailcount + 1
|
||
end
|
||
|
||
if mailcount == 0 then
|
||
print("[TIP][CdKey YXM]AfterCheckCDkeyNew load mailconfig error! ---content is:"..tostring(content))
|
||
return
|
||
end
|
||
|
||
-- 获取结果
|
||
--res,actid,cdk,mailtitle = string.match(content, "(%d+),(%d+),(%a+),(%a+) ")
|
||
print("[CdKey YXM]1 AfterCheckCDkeyNew param-------------------------res:"..tostring(res).."|actid:"..tostring(actid).."|cdk:"..tostring(cdk).."|mailtitle:"..tostring(mailtitle)..":maillist:"..tostring(maillist))
|
||
res = tonumber(res)
|
||
actid = tonumber(actid)
|
||
if res ~= nil then
|
||
if res == CODE_SUCCESS then
|
||
-- 发派奖励
|
||
--local conf = CDKeyConf[id]
|
||
--SendMail(aid, mailtitle or "兑换码", conf.mailcontent or "兑换码兑换成功！", conf.awards)
|
||
SendMail(actid, "系统邮件", "尊敬的玩家：感谢您的支持，请查收您的礼包奖励。", Awards)-- NewCdkeyAwards)
|
||
-- 记录使用
|
||
--local data = getActorData(pActor)
|
||
--data.codeTimes[id] = (data.codeTimes[id] or 0) + 1
|
||
--data.codeTypeTimes[giftid] = (data.codeTypeTimes[giftid] or 0) + 1
|
||
end
|
||
else
|
||
res = CODE_HTTP
|
||
print("[TIP] AfterCheckCDkeyNew : res("..res.."), content: "..content)
|
||
end
|
||
elseif(res == "10") then
|
||
cdkPattern = "^(.*)(cdk%s*:%s*)([^}]*)(.*)$"
|
||
strCapture1, strCapture2, cdk, strCapture3, strCapture4 = string.match(content, cdkPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(cdk).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
|
||
-- 发派奖励
|
||
local id = getCodeId(cdk)
|
||
print("[TIP]1022 check old UseCDKey : id = " .. id)
|
||
local conf = CDKeyConf[id]
|
||
if conf == nil then
|
||
return
|
||
end
|
||
SendMail(actid, "系统邮件", "尊敬的玩家：感谢您的支持，请查收您的礼包奖励。", conf.awards)
|
||
elseif(res == "20") then-- 通码
|
||
--print("测试111")
|
||
cdkPattern = "^(.*)(cdk%s*:%s*)([^}]*)(.*)$"
|
||
strCapture1, strCapture2, cdk, strCapture3, strCapture4 = string.match(content, cdkPattern)
|
||
print("[CdKey YXM]1 -------------------------param1:"..tostring(strCapture1).."|param2:"..tostring(strCapture2).."|param3:"..tostring(cdk).."|param4:"..tostring(strCapture3).."|param5:"..tostring(strCapture4))
|
||
|
||
-- 发派奖励
|
||
local conf = CommonCDKeyConf[cdk]
|
||
if conf == nil then
|
||
return
|
||
end
|
||
SendMail(actid, "系统邮件", "尊敬的玩家：感谢您的支持，请查收您的礼包奖励。", conf.awards)
|
||
|
||
elseif(res == "7") then
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey已经使用超过使用范围, content: "..content)
|
||
elseif(res == "8") then
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey不存在, content: "..content)
|
||
|
||
elseif(res == "9") then
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey数量不够, content: "..content)
|
||
|
||
elseif(res == "2") then
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey不存在, content: "..content)
|
||
elseif(res == "1") then
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey已经使用, content: "..content)
|
||
elseif(res == "11") then
|
||
print("[TIP] AfterCheckCDkeyNew : 危险账号，短时间访问, content: "..content)
|
||
else
|
||
print("[TIP] AfterCheckCDkeyNew : cdkey不存在, content: "..content)
|
||
end
|
||
else
|
||
res = CODE_HTTP
|
||
print("[ERROR] AfterCheckCDkeyNew : result("..result.."), content: "..content)
|
||
end
|
||
|
||
-- 回复使用结果
|
||
--local npack = DataPack.allocPacket(pActor, enMiscSystemID, sUseCdkey)
|
||
--if npack then
|
||
-- DataPack.writeByte(npack, res)
|
||
-- DataPack.flush(npack)
|
||
--end
|
||
end
|
||
|
||
--使用激活码
|
||
function UseCDKey(pActor, code)
|
||
print("[DEBUG] UseCDKey, code="..code)
|
||
|
||
local id = getCodeId(code)
|
||
if CDKeyConf[id] == nil then
|
||
print("[ERR][YXM] getCodeId error : code = " .. code.." name="..Actor.getName(pActor))
|
||
return 0
|
||
end
|
||
|
||
local limit = CDKeyConf[id].limits or 1 --礼包码限制数量
|
||
return limit
|
||
end
|
||
|
||
--使用通码
|
||
function UseCommonCDKey(code, actorId)
|
||
print("[DEBUG] UseCommonCDKey, code="..code)
|
||
|
||
local conf = CommonCDKeyConf[code]
|
||
if conf == nil then
|
||
print("[ERR][YXM] UseCommonCDKey:getCodeId error : code = " .. code)
|
||
return
|
||
end
|
||
|
||
local limit = 1 --礼包码限制数量 通码只能使用一次
|
||
|
||
return limit
|
||
--local pActor = Actor.getActorById(actorId)
|
||
--if pActor == nil then
|
||
-- return
|
||
--end
|
||
|
||
--local data = getActorData(pActor)
|
||
--local time = System.getCurrMiniTime()
|
||
--if data.lastTime and data.lastTime >= time then
|
||
-- Actor.sendTipmsg(pActor,"请求过快！")
|
||
-- return
|
||
--end
|
||
|
||
-- 使用次数超过限制
|
||
--if data.codeTimes[code] then
|
||
-- if data.codeTimes[code] >= 1 then
|
||
-- local npack = DataPack.allocPacket(pActor, enMiscSystemID, sUseCdkey)
|
||
-- if npack then
|
||
-- DataPack.writeByte(npack, CODE_LIMIT)
|
||
-- DataPack.flush(npack)
|
||
-- end
|
||
-- return
|
||
-- end
|
||
--end
|
||
|
||
-- 发派奖励
|
||
-- local conf = CommonCDKeyConf[code]
|
||
-- local aid = Actor.getActorId(pActor)
|
||
|
||
-- SendMail(aid, conf.mailtitle or "兑换码", conf.mailcontent or "兑换码兑换成功！", conf.awards)
|
||
|
||
-- 记录使用次数
|
||
-- local data = getActorData(pActor)
|
||
-- data.codeTimes[code] = (data.codeTimes[code] or 0) + 1
|
||
end
|
||
|
||
--是否是通码
|
||
function isCommonKey(code)
|
||
if CommonCDKeyConf and CommonCDKeyConf[code] then
|
||
return true
|
||
end
|
||
return false
|
||
end
|
||
|
||
-- 老的 客户端请求使用使用激活码
|
||
function OnUseOldCDKey(code, actorId)
|
||
print("[DEBUG][Tip]2 check old UseCDKey : code = " .. code)
|
||
|
||
local limit = 0
|
||
if isCommonKey(code) then
|
||
limit = 1 --礼包码限制数量 通码只能使用一次
|
||
return limit
|
||
else
|
||
if checkPfid(code) == false then --检测平台号
|
||
print("[TIP][YXM] UseCDKey: 不是老码 code = " .. code)
|
||
--Actor.sendTipmsg(pActor,"非本平台的礼包码！")
|
||
return limit
|
||
end
|
||
|
||
local id = getCodeId(code)
|
||
if CDKeyConf[id] == nil then
|
||
print("[ERR][YXM] getCodeId error : code = " .. code.." name="..Actor.getName(pActor))
|
||
return limit
|
||
end
|
||
limit = CDKeyConf[id].limits or 1 --礼包码限制数量
|
||
return limit
|
||
end
|
||
|
||
return limit
|
||
end
|
||
|
||
function OnCheckOldCDKey(code, actorId)
|
||
print("[Tip]1 check old UseCDKey : code = " .. code)
|
||
|
||
if isCommonKey(code) then
|
||
print("[Tip]1 check old111 isCommonKey : code = " .. code)
|
||
return 2
|
||
else
|
||
print("[Tip]1 check old112 isCommonKey : code = " .. code)
|
||
if checkPfid(code) == false then --检测平台号
|
||
return 0
|
||
end
|
||
|
||
local id = getCodeId(code)
|
||
print("[Tip]1022 check old UseCDKey : id = " .. id)
|
||
if CDKeyConf[id] == nil then
|
||
return 0
|
||
end
|
||
return 1
|
||
end
|
||
|
||
return 0
|
||
end
|
||
|
||
--------------------------------------------------------------------
|
||
-- CPP回调
|
||
--------------------------------------------------------------------
|
||
function OnCMDBackStageCdKey(packet)
|
||
if OnCheckCanPlatform() == false then
|
||
return
|
||
end
|
||
|
||
local SrvId = DataPack.readInt(packet)
|
||
local actorId = DataPack.readInt(packet)
|
||
local sUseCdkey = DataPack.readString(packet)
|
||
local sMailTitle = DataPack.readString(packet)
|
||
print("[CdKey YXM] OnCMDBackStageCdKey() -------------------------------------"..tostring(actorId).."|"..tostring(SrvId).."|"..sUseCdkey)
|
||
|
||
local ServiceConf = AutoCdkeyServiceConfig[PfId]
|
||
--local ServiceConf = NewCdkeyServiceConf
|
||
|
||
--配置的服务检测
|
||
if ServiceConf == nil then
|
||
print("[ERR][CdKey YXM]load AutoCdkeyServiceConfig error! ")
|
||
return
|
||
end
|
||
if ServiceConf.host == nil then
|
||
print("[ERR][CdKey YXM]load AutoCdkeyServiceConfig error! ")
|
||
return
|
||
end
|
||
if ServiceConf.port == nil then
|
||
print("[ERR][CdKey YXM]load AutoCdkeyServiceConfig error! ")
|
||
return
|
||
end
|
||
if ServiceConf.url == nil then
|
||
print("[ERR][CdKey YXM]load AutoCdkeyServiceConfig error! ")
|
||
return
|
||
end
|
||
local ServiceHost = ServiceConf.host
|
||
local ServicePort = ServiceConf.port
|
||
local ServiceUrl = ServiceConf.url
|
||
|
||
--local pActor = Actor.getActorById(actorId)
|
||
--print("[CdKey YXM] OnCMDBackStageCdKey() -------------------------------------"..Actor.getName(pActor))
|
||
|
||
local isOld = 0
|
||
local limit = 0
|
||
|
||
local keyType = OnCheckOldCDKey(sUseCdkey, actorId)
|
||
if keyType == 2 then
|
||
limit = 1
|
||
isOld = 2
|
||
elseif keyType == 1 then
|
||
limit = OnUseOldCDKey(sUseCdkey, actorId)
|
||
isOld = 1
|
||
print("[TIP][CdKey YXM]load OldCDKey Suc! ".. limit)
|
||
end
|
||
|
||
---local data = getActorData(pActor)
|
||
--local time = System.getCurrMiniTime()
|
||
--if data.lastTime and data.lastTime >= time then
|
||
-- print("[CdKey YXM] 请求过快！ "..tostring(actorId).."|"..tostring(SrvId).."|"..sUseCdkey)
|
||
-- return
|
||
--end
|
||
|
||
--local req = ServiceUrl..'?pfid='..PfId..'&cdkey='..sUseCdkey..'&aid='..actorId..'&sid='..SrvId..'&mailtitle='..sMailTitle..'&limit='..limit..'&isOld='..isOld
|
||
local req = ServiceUrl..'?pfid='..PfId..'&cdkey='..sUseCdkey..'&aid='..actorId..'&sid='..SrvId..'&limit='..limit..'&isOld='..isOld
|
||
print("[CdKey YXM] GetHttpContent -------------------------ServiceHost:"..tostring(ServiceHost))
|
||
print("[CdKey YXM] GetHttpContent -------------------------ServicePort:"..tostring(ServicePort))
|
||
print("[CdKey YXM] GetHttpContent -------------------------req:"..tostring(req))
|
||
|
||
--加入异步工作
|
||
AsyncWorkDispatcher.Add(
|
||
{'GetHttpContent', ServiceHost, ServicePort, req},
|
||
AfterCheckCDkeyNew,
|
||
{SrvId, actorId}
|
||
)
|
||
|
||
--[[
|
||
local url111 = "/H5CQ/develop/Service/CheckGiftCodeLimit.php"
|
||
ServiceUrl = url111
|
||
local req = ServiceUrl..'?pfid='..'wyi2'..'&cdkey='..sUseCdkey..'&aid='..actorId..'&sid='..SrvId..'&account=111'..'&limit='..2
|
||
print("[CdKey YXM] GetHttpContent -------------------------ServiceHost:"..tostring(ServiceHost))
|
||
print("[CdKey YXM] GetHttpContent -------------------------ServicePort:"..tostring(ServicePort))
|
||
print("[CdKey YXM] GetHttpContent -------------------------req:"..tostring(req))
|
||
|
||
--加入异步工作
|
||
AsyncWorkDispatcher.Add(
|
||
{'GetHttpContent', ServiceHost, ServicePort, req},
|
||
AfterCheckCDkeyNew,
|
||
{SrvId, actorId}
|
||
)
|
||
-- ]]
|
||
end
|
||
|
||
--NetmsgDispatcher.Reg(enMiscSystemID, cUseNewCdkey, OnUseCDKey)
|