HomeServer/lualib-src/Server-main/AllServer/GameServer/Friend.lua

local skynet = require "skynet"
local oo = require "Class"
local log = require "Log"
local pb = require "pb"
local dataType = require "DataType"
local errorInfo = require "ErrorInfo"
local Friend = oo.class()

Friend.UserType_AI = 1                --AI
Friend.UserType_Player= 2          --用户

Friend.MsgStatus_Start = 1          --消息开始 
Friend.MsgStatus_End = 2          --消息结束

Friend.MsgType_Detail = 0;                        --文本消息
Friend.MsgType_Friend = 1;                       --推荐好友消息
Friend.MsgType_Scene = 2;                       --场景邀请消息
Friend.MsgType_Gift = 3;                           --赠送礼物消息

Friend.NewsTriggerType_Dialogue = 1             --对话ID
Friend.NewsTriggerType_Favorable = 2             --好感值
Friend.NewsTriggerType_Level = 3             --等级

Friend.MsgStaus_No = 1                             --无状态
Friend.MsgStaus_NoClick = 2                     --未点击（推荐好友、赠送礼物、场景邀请三个消息会有该状态
Friend.MsgStaus_AlreadyClick = 3              --已点击（推荐好友、赠送礼物、场景邀请点击后的状态）

Friend.Unlock_FavorabilityLevel = 1           --好感等级
Friend.Unlock_Level = 2                             --玩家等级
Friend.Unlock_FinishFunc = 3                    --完成某功能

function Friend:Init()

end

--朋友圈消息列表
function Friend:MsgList( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgList", c2sData.data ))
    local data ={}
    --self:CheckAddFriend( player )
    data.msgList = self:GetMsgList( player )
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgList")
    s2cData.data = assert(pb.encode("S2CFriendMsgList", data))
end

--朋友圈消息详情
function Friend:MsgDetail( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgDetail", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId

    if not npcId then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        data = self:GetMsgDetail( player , npcId )
    end

    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgDetail")
    s2cData.data = assert(pb.encode("S2CFriendMsgDetail", data))
end

--朋友圈客户端发送消息
function Friend:MsgClient( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgClient", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId
    local userType =  c2sData.data.userType or 0
    local msgId =  c2sData.data.msgId
    local msgBranch =  c2sData.data.msgBranch
    log.info(string.format("玩家 %d 通用朋友圈客户端发送消息 参数 " , player.basicInfo.userID ), npcId , userType ,msgId ,msgBranch)    
    
    local curNpc = player.gameData.friend[ npcId ]
    if not npcId or not msgId or not userType or not curNpc then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local isExistMsgId = false          --是否存在消息ID
        local segIndex = 0
        local isOver = false                    --消息是否结束
        --验证消息ID合法性
        isExistMsgId , segIndex ,isOver = self:IsVaildMsg( npcId , userType , msgId )
        if not isExistMsgId then
            s2cData.code = errorInfo.ErrorCode.ErrRequestParam
        else
            self:CheckNews( player , npcId , segIndex )

            --检查这个ID是否存在,可能新一轮还没开始
            local isExist = false
            for k1, v1 in pairs( curNpc.msgDetail ) do
                if segIndex == v1.detail.segIndex  then
                    for k2, v2 in pairs( v1.detail.record ) do
                        if userType == v2.userType and msgId == v2.msgId then
                            isExist = true
                        end
                    end
                end
            end

            --不存在这个ID，就插入进去
            if not isExist then
                for k, v in pairs( curNpc.msgDetail ) do
                    if segIndex == v.detail.segIndex and #v.detail.record <= 10 then
                        --把玩家的对话加入记录中
                        local msgStatus = self.MsgStaus_No
                        local cfgNpcDialog = skynet.server.gameConfig:GetCurCfg( "NPCDialog" , msgId )
                        if cfgNpcDialog and 0 ~= cfgNpcDialog.notifyType then
                            msgStatus = self.MsgStaus_NoClick
                        end
                        --是否能解锁
                        --self:CheckUnlock( player , msgId )

                        table.insert( v.detail.record , { userType = userType , msgType = cfgNpcDialog.notifyType ,  msgId = msgId , msgBranch = msgBranch , msgStatus = msgStatus } )
                        log.info(string.format("玩家 %d 朋友圈客户端发送消息  用户类型 %d 消息ID %d 消息分支 %d " , player.userId , userType ,msgId ,msgBranch ))    
                        curNpc.lastUserType = userType
                        curNpc.lastMsgId = msgId
                        curNpc.msgCount = curNpc.msgCount  - 1
                        --玩家发送了消息后，计算下后面AI还有多少条数据
                        if self.UserType_Player == userType then
                            local cfgPlayerDialog = skynet.server.gameConfig:GetCurCfg("PlayerDialog",msgId)
                            if 1 == cfgPlayerDialog.unlockHouse then
                                curNpc.isUnlockHouse = true
                                log.info(string.format("玩家 %d 朋友圈 解锁NPC %d 的房间 " , player.userId , npcId))    
                            end
                            curNpc.msgCount = self:GetEndMsgCount( player , npcId , msgBranch)
                            log.info(string.format("玩家 %d 朋友圈客户端发送消息 玩家发送 计算AI剩余条数 %d " , player.userId ,curNpc.msgCount))    
                        end

                        --星级+1
                        if isOver then
                            v.detail.isOver = isOver
                            curNpc.starLevel = curNpc.starLevel + 1
                            curNpc.lastUserType = self.UserType_AI
                            curNpc.lastMsgId = msgId
                            curNpc.msgCount = self:GetStartMsgCount( player , npcId )
                            log.info(string.format("玩家 %d 朋友圈客户端发送消息 一轮对话结束 下一轮星级 %d 下一轮AI消息ID  %d 下一轮AI消息数量 %d" , player.basicInfo.userID ,curNpc.starLevel ,
                            curNpc.lastMsgId ,  curNpc.msgCount))    

                            skynet.server.levelTask:Modify( player , 36 , 1 )
                            skynet.server.achieveTask:Modify( player , 36 , 1)
                            --计算最新的TIPS数量
                            self:GetMsgTipsCount( player )
                        end
                        break
                    end      
                end
            else
                s2cData.code = errorInfo.ErrorCode.ErrRequestParam
            end
        end
    end
    data = self:GetMsgDetail( player , npcId )
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgClient")
    s2cData.data = assert(pb.encode("S2CFriendMsgClient", data))
end

--朋友圈消息添加好友
function Friend:AddFriend( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgAddFriend", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId
    local addNpcId =  c2sData.data.addNpcId
    local msgId =  c2sData.data.msgId

    if not npcId or not msgId then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local npcInfo = player.gameData.friend[ npcId ] 

        local isExistMsg = false
        for k1, v1 in pairs( npcInfo.msgDetail ) do
            --找到对应的消息
            for k2, v2 in pairs( v1.detail.record ) do
                if msgId == v2.msgId and self.MsgType_Friend == v2.msgType and self.MsgStaus_NoClick == v2.msgStatus then
                    isExistMsg = true
                    v2.msgStatus = self.MsgStaus_AlreadyClick
                    --添加好友
                    self:InitNpc( player , addNpcId )
                    data = self:GetMsgDetail( player , npcId )
                    data.msgId = msgId
                    data.addNpcId = addNpcId
                    log.info(string.format("玩家 %d 朋友圈 添加好友成功 参数 %d %d %d" , player.userId , npcId, addNpcId , msgId ))    
                    break
                end
            end

            if isExistMsg then
                break
            end
        end

        if not isExistMsg then
            s2cData.code = errorInfo.ErrorCode.NoExistFriendMsg  
        end
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgAddFriend")
    s2cData.data = assert(pb.encode("S2CFriendMsgAddFriend", data))
end

--朋友圈消息获取礼物
function Friend:GetGift( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgGetGift", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId
    local msgIndex =  c2sData.data.msgIndex
    local msgId =  c2sData.data.msgId

    if not npcId or not msgIndex or not msgId then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local npcInfo = player.gameData.friend[ npcId ] 
        local isExistMsg = false
        for k1, v1 in pairs( npcInfo.msgDetail ) do
            --找到对应的消息
            --if msgIndex == v1.detail.segIndex then
                for k2, v2 in pairs( v1.detail.record ) do
                    if msgId == v2.msgId and self.MsgType_Gift == v2.msgType and self.MsgStaus_NoClick == v2.msgStatus then
                        isExistMsg = true
                        v2.msgStatus = self.MsgStaus_AlreadyClick
                        --赠送礼物
                        local cfgNpcDialog = skynet.server.gameConfig:GetCurCfg( "NPCDialog" , msgId )
                        local rewardId = cfgNpcDialog.notifyValue
                        if rewardId > 0 then
                            player:GiveReward( rewardId )
                        end
                        skynet.server.achieveTask:Modify( player , 57 , 1 )
                        data = self:GetMsgDetail( player , npcId )
                        data.msgId = msgId
                        break
                    end
                end
            --end
            if isExistMsg then
                break
            end
        end

        if not isExistMsg then
            s2cData.code = errorInfo.ErrorCode.NoExistFriendMsg  
        end
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgGetGift")
    s2cData.data = assert(pb.encode("S2CFriendMsgGetGift", data))
end

--朋友圈消息进入场景
function Friend:EnterScene( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgEnterScene", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId

    if not npcId then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        data.npcId = npcId
        data.friend = self:GetFriendDetail( player , npcId )
        local npcInfo = player.gameData.friend[ npcId ] 
        npcInfo.scene.enterCount = npcInfo.scene.enterCount + 1      --场景进入次数
        npcInfo.scene.enterTime = skynet.GetTime()                                          --场景进入时间
        skynet.server.levelTask:Modify( player , 50 , 1 )
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgEnterScene")
    s2cData.data = assert(pb.encode("S2CFriendMsgEnterScene", data))
end

--朋友圈消息离开场景
function Friend:LeaveScene( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendMsgLeaveScene", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId

    if not npcId or not player.gameData.friend[ npcId ] then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local npcInfo = player.gameData.friend[ npcId ] 
        npcInfo.scene.enterCount = npcInfo.scene.enterCount + 1      --场景进入次数
        if 0 ~= npcInfo.scene.enterTime then
            --计算停留时间
            local stayTime = skynet.GetTime() - npcInfo.scene.enterTime
            npcInfo.scene.stayTime = npcInfo.scene.stayTime + stayTime
            npcInfo.scene.enterTime = 0
        end    
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendMsgLeaveScene")
    s2cData.data = assert(pb.encode("S2CFriendMsgLeaveScene", data))
end

--好友列表展示
function Friend:ListShow( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendListShow", c2sData.data ))
    local data ={}
    data.friends = {}
    for k, v in pairs( player.gameData.friend ) do
        table.insert( data.friends , self:GetFriendDetail( player , v.npcId ))
    end
    skynet.server.msgTips:Reduce( player , 42 )
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendListShow")
    s2cData.data = assert(pb.encode("S2CFriendListShow", data))
end

--礼物背包
function Friend:GiftBag( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendGiftBag", c2sData.data ))
    local data ={}
    local npcId = c2sData.data.npcId
    local goodsType = c2sData.data.goodsType
    if not npcId or not goodsType then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam     
    else

        local bagItem = {}
        local allGoods = {}
        local curNpc = player.gameData.friend[ npcId ]

        local isGiveGoods = function( goodsType , goodsId )
            for k, v in pairs( curNpc.giftGoods ) do
                if v.goodsType == goodsType and v.goodsId == goodsId then
                    return true
                end
            end
            return false
        end

        --是否存在商品
        local isExistGoods = function( goodsId )
            goodsId = skynet.server.gameConfig:RestoreGeneralID( goodsId )
            for k, v in pairs( allGoods ) do
                if goodsId == v.id then
                    return true
                end
            end
            return false
        end

        if dataType.GoodsType_Furniture == goodsType then 
            self:GetFeatureGoods( player ,npcId ,goodsType , allGoods )     --获取满足特征的商品
            local unUsedBag = skynet.server.bag:GetUnusedGoodsInfo( player , goodsType )        --找到未使用的才能赠送
            for k, v in pairs( unUsedBag ) do
                if v.count > 0 then
                    --未赠送过并且满足条件的商品才加入
                    if not isGiveGoods( v.type , v.id ) and isExistGoods( v.id ) then
                        --符合特征的商品才去查看
                        local maxCount = skynet.server.house:GetCurFurnitureMaxCount( player , v.type , v.id )
                        maxCount = v.count - maxCount
                        table.insert( bagItem , { type = v.type , id = v.id , count = maxCount > 0 and maxCount or 0 , gainTime = v.gainTime })
                    end
                end
            end
        elseif dataType.GoodsType_Plant == goodsType then 
            for k, v in pairs( player.gameData.bag ) do
                if goodsType == v.type and not isGiveGoods( v.type , v.id ) then
                    table.insert( bagItem , { type = v.type , id = v.id , count = v.count , gainTime = v.gainTime })
                end
            end
        end

        data.npcId = npcId
        data.goodsType = goodsType
        data.bagItem = bagItem
    end

    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendGiftBag")
    s2cData.data = assert(pb.encode("S2CFriendGiftBag", data))
end

--赠送礼物
function Friend:GiftGive( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendGiftGive", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId
    local goodsInfo =  c2sData.data.goodsInfo

    if not npcId or not goodsInfo then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local goodsType = goodsInfo.goodsType
        local goodsId = goodsInfo.goodsId

        --检查礼物是否合法
        local cfgNpc = skynet.server.gameConfig:GetCurCfg( "NPC" , npcId )
        local cfgGoods = {}

        if not cfgNpc then
            s2cData.code = errorInfo.ErrorCode.NoExistCfg
        else
            local featureCount = 0       --特征满足次数
            local favorabilityValue = 0
            local cfgSValue = skynet.server.gameConfig.SValue

            --根据商品类型获取配置
            if dataType.GoodsType_Furniture == goodsType then
                local tmpGoodsId = skynet.server.gameConfig:RestoreGeneralID( goodsId )
                cfgGoods = skynet.server.gameConfig:GetCurCfg( "Furniture" , tmpGoodsId )
                for k1, v1 in pairs( cfgNpc.featureTag ) do
                    for k2, v2 in pairs( cfgGoods.featureTag ) do
                        if v1 == v2 then
                            featureCount = featureCount + 1
                        end
                    end
                end
                favorabilityValue = featureCount * cfgSValue.relationValueTagGift 
            elseif dataType.GoodsType_Plant == goodsType then
                favorabilityValue = cfgSValue.relationValuePlantGift 
                featureCount = 1
            end

            if 0 == featureCount then
                s2cData.code = errorInfo.ErrorCode.NoSameFeatureGoods
            else
                local removeCount = 1      
                local isSuc = skynet.server.bag:IsRemoveGoods( player , goodsType , goodsId , removeCount )
                if not isSuc then
                    s2cData.code = errorInfo.ErrorCode.NoEnoughGoods
                else
                    --这里开是合法的商品
                    local curNpc = player.gameData.friend[ npcId ]

                    --增加好感度
                    self:AddFavorability( player, curNpc , favorabilityValue)
                    table.insert( curNpc.giftGoods , { goodsType = goodsType , goodsId = goodsId })

                    self:CheckNewMsg( player )

                    --扣除商品
                    skynet.server.bag:RemoveGoods( player , goodsType , goodsId , removeCount )
                    skynet.server.levelTask:Modify( player , dataType.GeneralTaskType_GiveNpcFriendGift , 1 )
                    skynet.server.dailyTask:Modify( player , 17 , 1)
                    skynet.server.achieveTask:Modify( player , 17 , 1 )
                    skynet.server.passCheck:Modify( player , 20 , 1 )  
                    data.npcId = npcId
                    data.goodsInfo = {}
                    data.goodsInfo.goodsType = goodsType
                    data.goodsInfo.goodsId = goodsId
                    data.goodsInfo.goodsCount = 1
                    data.friends = self:GetFriendDetail( player , npcId )
                end
            end
        end

    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendGiftGive")
    s2cData.data = assert(pb.encode("S2CFriendGiftGive", data))
end

--友圈动态
function Friend:NewsShow( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendNewsShow", c2sData.data ))
    local data ={}
    data.news = {}

    for k1, v1 in pairs( player.gameData.friend ) do
        for k2, v2 in pairs( v1.news ) do
            table.insert( data.news , { npcId = v1.npcId , newsId = v2.id , isLike = v2.isLike , updateTime = v2.updateTime})
        end
    end

    --降序
    table.sort(data.news,function (a,b)
        return a.updateTime > b.updateTime
    end)

    skynet.server.msgTips:Reduce( player , 43 )
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendNewsShow")
    s2cData.data = assert(pb.encode("S2CFriendNewsShow", data))
end

--友圈点赞
function Friend:LikeNews( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendLikeNews", c2sData.data ))
    local data ={}
    data.news ={}
    local news =  c2sData.data.news
    if not news then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local curNpc = player.gameData.friend[ news.npcId ]
        if not curNpc then
            s2cData.code = errorInfo.ErrorCode.ErrRequestParam
        else
            local isExist = false
            for k, v in pairs( curNpc.news ) do
                if news.newsId == v.id then
                    --v.isLike = news.isLike
                    if v.isLike then
                        v.isLike = false
                    else
                        v.isLike = true
                    end
                    data.news.npcId = news.npcId
                    data.news.newsId = news.newsId
                    data.news.isLike = v.isLike
                    isExist = true
                    break
                end
            end

            if not isExist then
                s2cData.code = errorInfo.ErrorCode.ErrRequestParam
            end
        end
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendLikeNews")
    s2cData.data = assert(pb.encode("S2CFriendLikeNews", data))
end

--友圈互动
function Friend:Interact( player ,  c2sData , s2cData )
    c2sData.data = assert(pb.decode("C2SFriendInteract", c2sData.data ))
    local data ={}
    local npcId =  c2sData.data.npcId
    if not npcId  then
        s2cData.code = errorInfo.ErrorCode.ErrRequestParam
    else
        local curNpc = player.gameData.friend[ npcId ]
        if not curNpc then
            s2cData.code = errorInfo.ErrorCode.ErrRequestParam
        else
            if not curNpc.isInteract then
                curNpc.isInteract = true
                --增加好感度
                self:AddFavorability( player,  curNpc , 1 )
            end
            data.friend = self:GetFriendDetail( player , npcId )
        end
    end
    s2cData.cmd = pb.enum("MsgType","CMD_S2C_FriendInteract")
    s2cData.data = assert(pb.encode("S2CFriendInteract", data))
end

--检查是否有新消息                                                                                
function Friend:CheckNewMsg( player )
    local cfgPlayerDialog = skynet.server.gameConfig.PlayerDialog
    for k, v in pairs( cfgPlayerDialog ) do
        local npcId = v.NPCId
        local curNpc = player.gameData.friend[ npcId ]
        
        local limitLevel = 0
        if 1 == npcId then
            limitLevel = 13
        end
        
        if curNpc and not self:IsExistDialog( player , npcId , v.segIndex ) and v.segIndex >= limitLevel and self:IsUnlockDialog( player , v , v.segIndex ) then
            local detail = { segIndex = v.segIndex  , isOver = false , record = {} } 
            table.insert( curNpc.msgDetail , { msgType = self.MsgType_Detail , msgIndex = curNpc.curMsgIndex , detail = detail} )
            skynet.server.msgTips:Add( player , 15 )  
        end
    end
end

--初始化新NPC
function Friend:InitNpc( player , npcId )
    if not player.gameData.friend[ npcId ] then
        local cfgSValue = skynet.server.gameConfig.SValue
        player.gameData.friend[ npcId ] = {}
        local curNpc = player.gameData.friend[ npcId ]
        curNpc.npcId = npcId

        curNpc.starLevel = 0                --星级
        curNpc.msgCount = self:GetStartMsgCount( player , npcId )
        curNpc.lastUserType = self.UserType_AI
        curNpc.lastMsgId = self:GetLastInitMsgID( player , npcId )
        curNpc.isMsgTips = false
        curNpc.msgDetail = {}                               --消息
        curNpc.isUnlockHouse = false         --是否解锁房间
        curNpc.isInteract = false

        curNpc.favorabilityLevel = 0            --好感等级
        curNpc.favorabilityValue = 0           --好感值
        curNpc.giftGoods = {}                      --玩家赠与过的家具

        curNpc.scene = {}                             --场景信息
        curNpc.scene.enterCount = 0          --场景进入次数
        curNpc.scene.enterTime = 0            --进入时间
        curNpc.scene.stayTime = 0              --场景停留时间

        curNpc.news = {}

        self:CheckNewMsg( player )

        skynet.server.msgTips:Reset( player , 42 )  
        skynet.server.msgTips:Add( player , 42 )  
        log.info(string.format("玩家 %d 朋友圈 初始化NPC %d" , player.userId , npcId ))
    end
end

--新消息生成
function Friend:NewMsg(  npcId , segIndex )
    local record = {}
    local lastMsgId = 0
    local cfgNPCDialog = skynet.server.gameConfig.NPCDialog
    for k, v in pairs( cfgNPCDialog ) do
        if npcId == v.NPCId and segIndex == v.segIndex then
            table.insert( record , { userType = self.UserType_AI , msgId = v.id } )
            if 1 == v.triggerId then
                lastMsgId = v.id
                break
            end
        end
    end
    return record,lastMsgId
end 

--是否存在对话
function Friend:IsExistDialog( player , npcId , segIndex )
    local npcInfo = player.gameData.friend[ npcId ]
    if npcInfo then
        for npcId, v in pairs( npcInfo.msgDetail ) do
            if self.MsgType_Detail == v.msgType and segIndex == v.detail.segIndex then
                return true
            end
        end
    end 
    return false
end

--是否有消息提示
function Friend:IsExistMsgTips( player , npcId )
    local npcInfo = player.gameData.friend[ npcId ]
    if npcInfo then
        for k, v in pairs( npcInfo.msgDetail ) do
            --有消息没有结束
            if self.MsgType_Detail == v.msgType and false == v.detail.isOver then
                return true
            end
        end
    end  
    return false
end

--获取朋友圈消息列表
function Friend:GetMsgList( player )
    local data = {}
    for k, v in pairs( player.gameData.friend ) do
        table.insert( data , { npcId = k , starLevel = v.favorabilityLevel , msgCount = v.msgCount ,lastUserType = v.lastUserType , lastMsgId = v.lastMsgId , isMsgTips = self:IsExistMsgTips( player , k)})
    end
    return data
end

--获取朋友圈消息详情
function Friend:GetMsgDetail( player , npcId )
    local data = {}
    data.npcId = npcId
    data.msgDetail = {}

    local count = 0             --没有结束的只能有一条发给客户端
    --local segIndex =player.gameData.friend[ npcId ].curMsgIndex
    local npcInfo = player.gameData.friend[ npcId ]
    if npcInfo then
        for k, v in pairs(npcInfo.msgDetail) do
            --if self.MsgType_Detail == v.msgType and v.detail.segIndex <= segIndex then
            if self.MsgType_Detail == v.msgType and count < 1 then                
                table.insert( data.msgDetail , v.detail)
                if not v.detail.isOver then
                    count = count+ 1
                end
            end
        end
    end
    return data
end

--获取初始化的消息ID
function Friend:GetLastInitMsgID( player , npcId  )
    --local segIndex =player.gameData.friend[ npcId ].curMsgIndex
    local startSegIndex = 1
    if 1 == npcId then
        startSegIndex = 13
    end
    local cfgNPCDialog = skynet.server.gameConfig.NPCDialog
    for k, v in pairs( cfgNPCDialog ) do
        --if npcId == v.NPCId and segIndex == v.segIndex and 1 == v.beginOrEnd  then
        if npcId == v.NPCId and 1 == v.beginOrEnd and startSegIndex == v.segIndex then            
            return v.id
        end
    end
end

--获取最新的消息ID
function Friend:GetStartMsgCount( player , npcId  )
    local id1,id2 =0,0
    local startSegIndex = 1
    if 1 == npcId then
        startSegIndex = 13
    end
    --local segIndex =player.gameData.friend[ npcId ].curMsgIndex
    local cfgNPCDialog = skynet.server.gameConfig.NPCDialog
    for k, v in pairs( cfgNPCDialog ) do
        --if npcId == v.NPCId and segIndex == v.segIndex then
        if npcId == v.NPCId and startSegIndex == v.segIndex then
            if 1 == v.beginOrEnd then
                id1 = v.id  
            end

            if 1 == v.triggerId then
                id2 = v.id  
            end
        end
    end
    return (id2 - id1) + 1
end

--获取最新的消息ID
function Friend:GetEndMsgCount( player , npcId ,  msgBranch  )
    local count = 0
    local segIndex =player.gameData.friend[ npcId ].starLevel  + 1
    local cfgNPCDialog = skynet.server.gameConfig.NPCDialog
    for k, v in pairs( cfgNPCDialog ) do
        if npcId == v.NPCId and segIndex == v.segIndex and msgBranch == v.branch then
            count = count + 1
        end
    end
    return count
end

--是否有效的消息
function Friend:IsVaildMsg( npcId , userType , msgId )
    local isExistMsgId = false          --是否存在消息ID
    local segIndex = 0
    local isOver = false                    --消息是否结束

    if self.UserType_AI == userType then
        local cfgNPCDialog = skynet.server.gameConfig.NPCDialog
        for k, v in pairs( cfgNPCDialog ) do
            if npcId == v.NPCId and msgId == v.id then
                isExistMsgId = true
                segIndex = v.segIndex

                if v.beginOrEnd == self.MsgStatus_End then
                    isOver = true
                end
            end
        end
    elseif self.UserType_Player == userType then
        local cfgPlayerDialog = skynet.server.gameConfig.PlayerDialog
        for k, v in pairs( cfgPlayerDialog ) do
            if npcId == v.NPCId and msgId == v.id then
                isExistMsgId = true
                segIndex = v.segIndex
            end
        end
    end   
    return isExistMsgId ,segIndex ,isOver
end

--获取消息提示数量
function Friend:GetMsgTipsCount( player )
    skynet.server.msgTips:Reset( player , 15 )
    for k1, v1 in pairs( player.gameData.friend ) do
        local isTips = false
        if self.MsgType_Detail == v1.msgType then
            for k2, v2 in pairs( v1.detail ) do
                if false == v2.isOver then
                    isTips = true
                    break
                end
            end
            if isTips then
                skynet.server.msgTips:Add( player , 15 )  
            end
        end
    end
end

--检查是不是有新的朋友圈消息
function Friend:CheckNews( player , npcId , segIndex )
    local cfgNpcNews = skynet.server.gameConfig.NpcNews
    for k, v in pairs( cfgNpcNews ) do
        if npcId == v.npcId and segIndex == v.typeValue then
            if self.NewsTriggerType_Dialogue == v.type then
                self:AddNews( player , npcId , v.id)
            elseif self.NewsTriggerType_Favorable == v.type then        
            elseif self.NewsTriggerType_Level == v.type then
            end
        end
    end
end

--新增朋友圈消息
function Friend:AddNews( player , npcId , newsId )
    local curNews = player.gameData.friend[ npcId ].news
    local isExist = false
    for k, v in pairs( curNews ) do
        if newsId == v.id then
            isExist = true
            break
        end
    end

    if not isExist then
        table.insert( curNews , { id = newsId , isLike = false , updateTime = skynet.GetTime()})
        skynet.server.msgTips:Reset( player , 43 )  
        skynet.server.msgTips:Add( player , 43 )  
    end
end

--获取特征商品
function Friend:GetFeatureGoods( player , npcId , goodsType , allGoods)
    local cfgNpc = skynet.server.gameConfig:GetCurCfg( "NPC" , npcId )
    local cfgGoods = {}             --符合当前NPC的商品
    --根据商品类型获取配置
    if dataType.GoodsType_Furniture == goodsType then
        cfgGoods = skynet.server.gameConfig.Furniture
    end

    --从配置中查找符合特征的商品
    for k1, v1 in pairs( cfgNpc.featureTag ) do             --当前NPC特征
        for k2, v2 in pairs( cfgGoods ) do
            for k3, v3 in pairs( v2.featureTag ) do
                if v1 == v3 then
                    table.insert( allGoods , { id = v2.id })
                    break
                end
            end
        end
    end   
end

--获取朋友详情
function Friend:GetFriendDetail( player , npcId )
    local friends = {}
    for k1, v1 in pairs( player.gameData.friend ) do
        if npcId == v1.npcId then
            friends.id = npcId
            friends.favorabilityLevel = v1.favorabilityLevel
            friends.favorabilityValue = v1.favorabilityValue
            friends.isUnlockHouse = v1.isUnlockHouse
            friends.furnitures = {}
            friends.isInteract = v1.isInteract
            for k2, v2 in pairs(v1.giftGoods) do
                if dataType.GoodsType_Furniture == v2.type then
                    table.insert(friends.furnitures  , v2.id)
                end
            end
            break
        end
    end
    return friends
end

--增加好感度
function Friend:AddFavorability( player, curNpc , count )
    local data = {}
    data.preFriend = self:GetFriendDetail( player , curNpc.npcId )         --改变前
    --11级后就不再增加好感度
    if curNpc.favorabilityLevel >= 11 then
        return
    end

    local cfgNPCFavorability = skynet.server.gameConfig.NPCFavorability
    local cfgOne = nil
    for k, v in pairs( cfgNPCFavorability ) do
        if curNpc.favorabilityLevel == v.relationLevel then
            cfgOne = v
            break
        end
    end

    if not cfgOne then
        return
    end

    --增加好感值
    curNpc.favorabilityValue = curNpc.favorabilityValue +  count 
    --好感度升级
    if curNpc.favorabilityValue >= cfgOne.targetValue then
        curNpc.favorabilityLevel  = curNpc.favorabilityLevel  + 1
        curNpc.favorabilityValue = curNpc.favorabilityValue - cfgOne.targetValue

        --最大只有11级
        if curNpc.favorabilityLevel >= 11 then
            curNpc.favorabilityLevel = 11
            --curNpc.favorabilityValue = cfgOne.targetValue
        end

        if 4 == curNpc.npcId then --and curNpc.favorabilityLevel >= 2 
            skynet.server.levelTask:Modify( player , 51 , 1 )
        elseif 5 == curNpc.npcId then
            skynet.server.levelTask:Modify( player , 55 , 1 )
        end
    end

    --与某一个NPC好感等级达到
    if curNpc.favorabilityLevel >= 4 then
        skynet.server.levelTask:Modify( player , 56 , 1 )
    end

    data.friend = self:GetFriendDetail( player , curNpc.npcId )               --改变后
    skynet.server.gameServer:SendMsgToUser( player.userId , "CMD_S2C_FriendFavorabilityChange" , data )
end

--检查是不是有好友没有添加
function Friend:CheckAddFriend( player )
    for k1, v1 in pairs( player.gameData.friend ) do
        for k2, v2 in pairs( v1.msgDetail ) do
            for k3, v3 in pairs( v2.detail.record ) do
                if self.MsgType_Friend == v3.msgType and self.MsgStaus_NoClick == v3.msgStatus then
                    v3.msgStatus = self.MsgStaus_AlreadyClick
                    local cfgNpcDialog = skynet.server.gameConfig:GetCurCfg( "NPCDialog" , v3.msgId )
                    local addNpcId = cfgNpcDialog.notifyValue
                    --添加好友
                    self:InitNpc( player , addNpcId )
                    log.info(string.format("玩家 %d 朋友圈 自动添加好友 %d 成功" , player.userId , addNpcId  ))    
                    break
                end
            end
        end
    end
end

--检查是不是能解锁
function Friend:CheckUnlock( player , msgId )
    --[[
    local cfgNpcDialog = skynet.server.gameConfig:GetCurCfg( "NPCDialog" , msgId )
    if cfgNpcDialog then
        if self.Unlock_FinishFunc == cfgNpcDialog.unlockType and 2 == cfgNpcDialog.unlockValue then
            player:AddUnlockSystem( dataType.UnlockSystem_FlowerShop)
        elseif self.Unlock_FinishFunc == cfgNpcDialog.unlockType and 3 == cfgNpcDialog.unlockValue then
            player:AddUnlockSystem( dataType.UnlockSystem_Ye)
        end
    end
    ]]
end

--是否解锁对话
function Friend:IsUnlockDialog( player , cfgOnePlayerDialog  , segIndex )
    local npcId = cfgOnePlayerDialog.NPCId
    if 0 == cfgOnePlayerDialog.unlockType then
        return false
    end

    local level = player.gameData.level
    local curNpc = player.gameData.friend[ npcId ]
    local isAdd = false
    if curNpc then
        --到达指定等级就解锁对话
        if 1 == cfgOnePlayerDialog.unlockType and cfgOnePlayerDialog.unlockValue == curNpc.favorabilityLevel then
            isAdd = true
        elseif 2 == cfgOnePlayerDialog.unlockType and cfgOnePlayerDialog.unlockValue <= level then
            isAdd = true
        elseif 3 == cfgOnePlayerDialog.unlockType then
            local cfgSValue = skynet.server.gameConfig.SValue
            local count = 0

            if 1 == cfgOnePlayerDialog.unlockValue  then                                                         --在植物小铺出售n次植物
                count = cfgSValue.flowerShopSell    
                local shopType =  dataType.ShopType_Plant
                local sellCount = player.gameData.shop[ shopType ].sellCount
                if sellCount >= count then
                    isAdd = true
                end
            elseif 2 == cfgOnePlayerDialog.unlockValue  then                                                     --地图花店解锁
                if skynet.server.map:IsUnlock( player , 2) then
                    isAdd = true 
                end
            elseif 3 == cfgOnePlayerDialog.unlockValue  then                                                         --言叶小屋解锁
                count = cfgSValue.npcYYHouseUnlockLvl   
                local shopType =  dataType.ShopType_Flower
                if player.gameData.shop[ shopType ] then
                    local consumeCoin = player.gameData.shop[ shopType ].consumeCoin
                    if consumeCoin >= count then
                        isAdd = true
                    end 
                end
            elseif 4 == cfgOnePlayerDialog.unlockValue  then                                                         --玩家在咖啡店完成n次材料合成
                count = cfgSValue.coffeeMaterialMerge
                local shopType =  dataType.ShopType_Coffee
                local mergeCount = player.gameData.shop[ shopType ].mergeCount
                if mergeCount >= count then
                    isAdd = true
                end
            elseif 5 == cfgOnePlayerDialog.unlockValue  then                                                         --玩家在咖啡店收集n种新咖啡
                count = cfgSValue.coffeeNewComplete
                local shopType =  dataType.ShopType_Coffee
                local coffeesCount = #player.gameData.shop[ shopType ].coffees
                if coffeesCount >= count then
                    isAdd = true
                end
            elseif 6 == cfgOnePlayerDialog.unlockValue  then                                                         --玩家在造型室完成n次阶段设计
                count = cfgSValue.styleProgressComplete
                local shopType =  dataType.ShopType_Style
                local attemptCount = player.gameData.shop[ shopType ].attemptCount
                if attemptCount >= count then
                    isAdd = true
                end
            end
        end
    else
        return false
    end

    return isAdd
end

--检查解锁NPC
function Friend:CheckUnlockNpc( player )
    local level = player.gameData.level
    for k, v in pairs( skynet.server.gameConfig.NPC ) do
        if 1 == v.unlockType and level == v.unlockValue then
            self:InitNpc( player , v.id )    
        end
    end
end

skynet.server.friend = Friend
return Friend