package services

import (
	"context"
	"fmt"
	"go_dreamfactory/comm"
	"go_dreamfactory/pb"
	"reflect"
	"runtime"
	"sync"
	"time"

	"go_dreamfactory/lego/base"
	"go_dreamfactory/lego/core"
	"go_dreamfactory/lego/core/cbase"
	"go_dreamfactory/lego/sys/event"
	"go_dreamfactory/lego/sys/log"
	"go_dreamfactory/lego/utils/mapstructure"

	"google.golang.org/protobuf/proto"
	"google.golang.org/protobuf/types/known/anypb"
)

//用户协议处理函数注册的反射对象
type msghandle struct {
	rcvr    reflect.Value
	msgType reflect.Type   //消息请求类型
	handle  reflect.Method //处理函数
}

//组件参数
type CompOptions struct {
	Debug bool
}

func (this *CompOptions) LoadConfig(settings map[string]interface{}) (err error) {
	if settings != nil {
		err = mapstructure.Decode(settings, this)
	}
	return
}

/*
	服务网关组件 用于接收网关服务发送过来的消息
*/

func NewGateRouteComp() comm.ISC_GateRouteComp {
	comp := new(SCompGateRoute)
	return comp
}

//服务网关组件
type SCompGateRoute struct {
	cbase.ServiceCompBase
	options    *CompOptions
	service    base.IRPCXService     //rpc服务对象 通过这个对象可以发布服务和调用其他服务的接口
	mrlock     sync.RWMutex          //msghandles 对象的锁
	msghandles map[string]*msghandle //处理函数的管理对象
	pools      sync.Pool
}

//设置服务组件名称 方便业务模块中获取此组件对象
func (this *SCompGateRoute) GetName() core.S_Comps {
	return comm.SC_ServiceGateRouteComp
}

func (this *SCompGateRoute) NewOptions() (options core.ICompOptions) {
	return new(CompOptions)
}

//组件初始化函数
func (this *SCompGateRoute) Init(service core.IService, comp core.IServiceComp, options core.ICompOptions) (err error) {
	err = this.ServiceCompBase.Init(service, comp, options)
	this.options = options.(*CompOptions)
	this.service = service.(base.IRPCXService)
	this.msghandles = make(map[string]*msghandle)
	this.pools = sync.Pool{
		New: func() interface{} {
			s := comm.NewUserSessionByPools(this.service)
			return s
		},
	}
	return err
} //

//组件启动时注册rpc服务监听
func (this *SCompGateRoute) Start() (err error) {
	this.service.RegisterFunctionName(string(comm.Rpc_GatewayRoute), this.ReceiveMsg)         //注册网关路由接收接口
	this.service.RegisterFunctionName(string(comm.Rpc_NoticeUserClose), this.NoticeUserClose) //注册用户离线通知
	err = this.ServiceCompBase.Start()
	return
}

//业务模块注册用户消息处理路由
func (this *SCompGateRoute) RegisterRoute(methodName string, comp reflect.Value, msg reflect.Type, handele reflect.Method) {
	//log.Debugf("注册用户路由【%s】", methodName)
	this.mrlock.RLock()
	_, ok := this.msghandles[methodName]
	this.mrlock.RUnlock()
	if ok {
		log.Errorf("重复 注册网关消息【%s】", methodName)
		return
	}
	this.mrlock.Lock()
	this.msghandles[methodName] = &msghandle{
		rcvr:    comp,
		msgType: msg,
		handle:  handele,
	}
	this.mrlock.Unlock()
}

//Rpc_GatewayRoute服务接口的接收函数
func (this *SCompGateRoute) ReceiveMsg(ctx context.Context, args *pb.AgentMessage, reply *pb.RPCMessageReply) (err error) {
	defer func() { //程序异常 收集异常信息传递给前端显示
		if r := recover(); r != nil {
			buf := make([]byte, 4096)
			l := runtime.Stack(buf, false)
			reply.Code = pb.ErrorCode_Exception
			reply.ErrorMessage = fmt.Sprintf("%v: %s", r, buf[:l])
			log.Errorf("[Handle Api]:[%s-%s] err:%s", args.MainType, args.SubType, reply.ErrorMessage)
		}
	}()
	method := fmt.Sprintf("%s.%s", args.MainType, args.SubType)
	//获取用户消息处理函数
	this.mrlock.RLock()
	msghandle, ok := this.msghandles[method]
	this.mrlock.RUnlock()
	if ok {
		session := this.pools.Get().(comm.IUserSession)
		session.SetSession(args.Ip, args.UserSessionId, args.GatewayServiceId, args.UserId)

		defer func() { //回收
			session.Reset()
			this.pools.Put(session)
		}()

		//序列化用户消息对象
		var msg proto.Message
		if msg, err = args.Message.UnmarshalNew(); err != nil {
			log.Errorf("[Handle Api] UserMessage:%s Unmarshal err:%v", method, err)
			return err
		}

		//执行处理流
		stime := time.Now()
		handlereturn := msghandle.handle.Func.Call([]reflect.Value{msghandle.rcvr, reflect.ValueOf(session), reflect.ValueOf(msg)})
		errcode := pb.ErrorCode(handlereturn[0].Int())
		errdata := handlereturn[1].Interface()
		if errcode != pb.ErrorCode_Success { //处理返货错误码 返回用户错误信息
			log.Errorf("[Handle Api] method:%s msg:%v code:%d", method, msg, errcode)
			reply.Code = errcode
			reply.ErrorMessage = pb.GetErrorCodeMsg(errcode)
			if errdata != nil {
				data, _ := anypb.New(errdata.(proto.Message))
				reply.ErrorData = data
			}
		} else {
			reply.Reply = session.Polls()
			if this.options.Debug {
				log.Debugf("[Handle Api] consumetime:%v method:%s uid:%s msg:%v reply:%#v", time.Since(stime), method, args.UserId, msg, reply)
			}
		}
	} else { //未找到消息处理函数
		log.Errorf("[Handle Api] no found handle %s", method)
		reply.Code = pb.ErrorCode_ReqParameterError
	}
	return nil
}

//RPC_NoticeUserClose 接收用户离线通知
func (this *SCompGateRoute) NoticeUserClose(ctx context.Context, args *pb.NoticeUserCloseReq, reply *pb.RPCMessageReply) error {
	event.TriggerEvent(comm.EventUserOffline, args.UserId)
	return nil
}

//获取用户的会话对象
func (this *SCompGateRoute) GetUserSession(udata *pb.CacheUser) (session comm.IUserSession) {
	session = this.pools.Get().(comm.IUserSession)
	session.SetSession("", udata.SessionId, udata.GatewayServiceId, udata.Uid)
	return
}

//获取用户的会话对象
func (this *SCompGateRoute) PutUserSession(session comm.IUserSession) {
	this.pools.Put(session)
	return
}