package service

import (
	"app.yhyue.com/moapp/MessageCenter/util"
	"context"
	"database/sql"
	"encoding/json"
	"fmt"
	"go.etcd.io/etcd/client/v3/concurrency"
	"log"
	"strconv"
	"strings"
	"time"

	"app.yhyue.com/moapp/MessageCenter/entity"
	"app.yhyue.com/moapp/MessageCenter/rpc/message"
)

// 类型的顺序
const order = "1,4"
const EtcdCount = "Count.%s.%s" //etcd 消息未读数量 Count.用户id.消息类型=数量

func SendMsg(this message.SendMsgRequest) (int64, string) {
	//orm := entity.Engine.NewSession()
	//defer orm.Close()
	//err := orm.Begin()
	//fmt.Println(err)
	//count := entity.Mysql11.Query("conversation", map[string]interface{}{"receive_id": this.ReceiveUserId, "send_id": this.SendUserId})

	r, err := entity.Mysql11.Query("select count(*) as c from conversation where receive_id = ? and send_id = ? ", this.ReceiveUserId, this.SendUserId)
	c := 0
	log.Println("查询结果", r)
	for r.Next() {
		err := r.Scan(&c)
		if err != nil {
			panic(err.Error())
		}
	}

	log.Println("查询数量：", c)

	sql3 := `INSERT INTO message(appid,receive_userid,receive_name,send_userid,send_name,title,content,msg_type,link,cite_id,createtime,isRead,isdel)
		values ("%s",'%s','%s','%s','%s','%s','%s','%d','%s',0,'%s',0,1);`
	sql3 = fmt.Sprintf(sql3, this.Appid, this.ReceiveUserId, this.ReceiveName, this.SendUserId, this.SendName, this.Title, this.Content, this.MsgType, this.Link, time.Now().Format("2006-01-02 15:04:05"))
	if c < 1 {
		sql1 := `INSERT INTO conversation(appid,` + "`key`" + `,user_id,receive_id,receive_name,send_id,send_name,sort,createtime) 
		values ('%s','','%s','%s','%s','%s','%s',0,'%s');`
		sql1 = fmt.Sprintf(sql1, this.Appid, this.SendUserId, this.ReceiveUserId, this.ReceiveName, this.SendUserId, this.SendName, time.Now().Format("2006-01-02 15:04:05"))
		ok := entity.Mysql.ExecTx("发送消息事务", func(tx *sql.Tx) bool {
			//插入会话表
			_, err := entity.Mysql11.Exec(sql1)

			sql2 := `INSERT INTO conversation(appid,` + "`key`" + `,user_id,receive_id,receive_name,send_id,send_name,sort,createtime) 
		values ('%s','','%s','%s','%s','%s','%s',0,'%s');`
			sql2 = fmt.Sprintf(sql2, this.Appid, this.ReceiveUserId, this.SendUserId, this.SendName, this.ReceiveUserId, this.ReceiveName, time.Now().Format("2006-01-02 15:04:05"))
			_, err = entity.Mysql11.Exec(sql2)
			//插入消息表
			_, err = entity.Mysql11.Exec(sql3)
			if err != nil {
				return false
			}
			return true
		})
		if ok {
			return 1, "消息发送成功"
		}
	}
	_, err = entity.Mysql11.Exec(sql3)
	if err == nil {
		go EtcdCountAdd(this.ReceiveUserId, strconv.Itoa(int(this.MsgType)))
		return 1, "消息发送成功"
	}
	return 0, "消息发送失败"
}

func FindUserMsg(this message.FindUserMsgReq) message.FindUserMsgRes {
	//orm := entity.Engine
	//var messages []*entity.Message
	var err error
	var count int64
	cquery := map[string]interface{}{
		"receive_userid": this.UserId,
		"isdel":          1,
		"appid":          this.Appid,
	}
	if this.MsgType != -1 {
		cquery["msg_type"] = this.MsgType
	}
	if this.Read != -1 {
		cquery["isRead"] = this.Read
	}
	count = entity.Mysql.Count("message", cquery)
	//count, err = orm.Table("message").Where("((receive_userid = ? and send_userid = ?) or (receive_userid = ? and send_userid = ?)) and isdel = ? and appid = ?"+q, this.UserId, this.ReceiveUserId, this.ReceiveUserId, this.UserId, 1, this.Appid).Count()
	data := message.FindUserMsgRes{}
	if count > 0 {
		/*err = orm.Table("message").Select("*").Where("((receive_userid = ? and send_userid = ?) or (receive_userid = ? and send_userid = ?)) and isdel = ? and appid = ?"+q, this.UserId, this.ReceiveUserId, this.ReceiveUserId, this.UserId, 1, this.Appid).
		OrderBy("createtime desc").
		Limit(int(this.PageSize), (int(this.OffSet)-1)*int(this.PageSize)).
		Find(&messages)*/
		res := entity.Mysql.Find("message", cquery, "", "createtime desc", (int(this.OffSet)-1)*int(this.PageSize), int(this.PageSize))
		log.Println("数据：", res)
		if res != nil && len(*res) > 0 {
			for _, v := range *res {
				_id := util.Int64All(v["id"])
				id := strconv.FormatInt(_id, 10)
				data.Data = append(data.Data, &message.Messages{
					Id:            id,
					Appid:         util.ObjToString(v["appId"]),
					ReceiveUserId: util.ObjToString(v["receive_userid"]),
					ReceiveName:   util.ObjToString(v["receive_name"]),
					SendUserId:    util.ObjToString(v["send_userid"]),
					SendName:      util.ObjToString(v["send_name"]),
					Createtime:    util.ObjToString(v["createtime"]),
					Title:         util.ObjToString(v["title"]),
					MsgType:       int64(util.IntAll(v["msg_type"])),
					Link:          util.ObjToString(v["link"]),
					CiteId:        util.Int64All(v["cite_id"]),
					Content:       util.ObjToString(v["content"]),
					IsRead:        util.Int64All(v["isRead"]),
				})
			}
		}
	}
	data.Count = count
	if err != nil {
		data.Code = 0
		data.Message = "查询失败"
	} else {
		data.Code = 1
		data.Message = "查询成功"
	}
	return data
}

// 指定分类未读消息合计
func ClassCountUnread(msgType int, userId string, appId string) (int64, string, int64) {
	//orm := entity.Engine
	//count, err := orm.Table("message").Where("msg_type=? and receive_userid=? and isdel=1 and appid=? and isRead=0", msgType, userId, appId).Count()
	query := map[string]interface{}{
		"msg_type":       msgType,
		"receive_userid": userId,
		"isdel":          1,
		"appid":          appId,
		"isRead":         0,
	}
	count := entity.Mysql.Count("message", query)
	return 1, "查询指定分类未读消息成功", count
}

// etcd数量加1
func EtcdCountAdd(userId, msgType string) {
	s1, err := concurrency.NewSession(entity.EtcdCli)
	if err != nil {
		log.Fatal(err)
	}
	defer s1.Close()
	keyString := fmt.Sprintf(EtcdCount, userId, msgType)
	m1 := concurrency.NewMutex(s1, keyString)
	// 会话s1获取锁
	if err := m1.Lock(context.TODO()); err != nil {
		log.Fatal("获取锁失败", err)
	}
	// 操作数量
	ctx, cancel := context.WithTimeout(context.Background(), time.Second)
	resp, err := s1.Client().Get(ctx, keyString)
	cancel()
	if err != nil {
		fmt.Printf("get from etcd failed, err:%v\n", err)

		// 释放锁
		if err := m1.Unlock(context.TODO()); err != nil {
			log.Fatal("释放锁失败", err)
		}
		return
	}
	var count int
	for _, ev := range resp.Kvs {
		if ev.Value != nil {
			err := json.Unmarshal([]byte(ev.Value), &count)
			if err != nil {
				log.Println("etcd get err:", err)
			} else {
				break
			}
		}

	}
	ctx, cancel = context.WithTimeout(context.Background(), time.Second)
	_, err = s1.Client().Put(ctx, keyString, strconv.Itoa(count+1))
	cancel()
	if err != nil {
		fmt.Printf("put to etcd failed, err:%v\n", err)
		// 释放锁
		if err := m1.Unlock(context.TODO()); err != nil {
			log.Fatal("释放锁失败", err)
		}
		return
	}

	// 释放锁
	if err := m1.Unlock(context.TODO()); err != nil {
		log.Fatal("释放锁失败", err)
	}
}

//单条消息，-1
func EtcdCountMinusOne(userId, msgType string) {
	s1, err := concurrency.NewSession(entity.EtcdCli)
	if err != nil {
		log.Fatal(err)
	}
	defer s1.Close()
	keyString := fmt.Sprintf(EtcdCount, userId, msgType)
	m1 := concurrency.NewMutex(s1, keyString)
	// 会话s1获取锁
	if err := m1.Lock(context.TODO()); err != nil {
		log.Fatal("获取锁失败", err)
	}
	// 操作数量
	ctx, cancel := context.WithTimeout(context.Background(), time.Second)
	resp, err := s1.Client().Get(ctx, keyString)
	cancel()
	if err != nil {
		fmt.Printf("get from etcd failed, err:%v\n", err)

		// 释放锁
		if err := m1.Unlock(context.TODO()); err != nil {
			log.Fatal("释放锁失败", err)
		}
		return
	}
	var count int
	for _, ev := range resp.Kvs {
		if ev.Value != nil {
			err := json.Unmarshal([]byte(ev.Value), &count)
			if err != nil {
				log.Println("etcd get err:", err)
			} else {
				break
			}
		}

	}
	ctx, cancel = context.WithTimeout(context.Background(), time.Second)
	var fin string
	if count > 0 {
		fin = strconv.Itoa(count - 1)
	} else {
		fin = "0"
	}
	_, err = s1.Client().Put(ctx, keyString, fin)
	cancel()
	if err != nil {
		fmt.Printf("put to etcd failed, err:%v\n", err)
		// 释放锁
		if err := m1.Unlock(context.TODO()); err != nil {
			log.Fatal("释放锁失败", err)
		}
		return
	}

	// 释放锁
	if err := m1.Unlock(context.TODO()); err != nil {
		log.Fatal("释放锁失败", err)
	}
}

// 消息类别置0
func EtcdSetCountZero(userId, msgType string) {
	log.Println(" 消息类别置0", userId, msgType)
	s1, err := concurrency.NewSession(entity.EtcdCli)
	if err != nil {
		log.Fatal(err)
	}
	defer s1.Close()
	keyString := fmt.Sprintf(EtcdCount, userId, msgType)
	m1 := concurrency.NewMutex(s1, keyString)
	// 会话s1获取锁
	if err := m1.Lock(context.TODO()); err != nil {
		log.Fatal("获取锁失败", err)
	}
	// 操作数量

	ctx, cancel := context.WithTimeout(context.Background(), time.Second)
	_, err = s1.Client().Put(ctx, keyString, "0")
	cancel()
	if err != nil {
		fmt.Printf("put to etcd failed, err:%v\n", err)
		// 释放锁
		if err := m1.Unlock(context.TODO()); err != nil {
			log.Fatal("释放锁失败", err)
		}
		return
	}

	// 释放锁
	if err := m1.Unlock(context.TODO()); err != nil {
		log.Fatal("释放锁失败", err)
	}
}

func MultSave(this message.MultipleSaveMsgReq) (int64, string) {
	userIdArr := strings.Split(this.UserIds, ",")
	userNameArr := strings.Split(this.UserNames, ",")
	log.Println(len(userIdArr), len(userNameArr))
	if len(userIdArr) > 0 {
		var errCount int64
		for k, v := range userIdArr {
			log.Println("k--------", k, v)
			if v == "" {
				return 0, "调用结束"
			}
			userName := userNameArr[k]
			//消息数组
			c := entity.Mysql.Count("conversation", map[string]interface{}{"receive_id": v, "send_id": this.SendUserId})
			log.Println("查询数量：", c)
			sql3 := `INSERT INTO message(appid,receive_userid,receive_name,send_userid,send_name,title,content,msg_type,link,cite_id,createtime,isRead,isdel) values ("%s",'%s','%s','%s','%s','%s','%s','%d','%s',0,'%s',0,1);`
			sql3 = fmt.Sprintf(sql3, this.Appid, v, userName, this.SendUserId, this.SendName, this.Title, this.Content, this.MsgType, this.Link, time.Now().Format("2006-01-02 15:04:05"))
			if c < 1 {
				sql1 := `INSERT INTO conversation(appid,` + "`key`" + `,user_id,receive_id,receive_name,send_id,send_name,sort,createtime) values ('%s','','%s','%s','%s','%s','%s',0,'%s');`
				sql1 = fmt.Sprintf(sql1, this.Appid, this.SendUserId, v, userName, this.SendUserId, this.SendName, time.Now().Format("2006-01-02 15:04:05"))
				ok := entity.Mysql.ExecTx("发送消息事务", func(tx *sql.Tx) bool {
					//插入会话表
					bT := time.Now() //开始时间
					_, err := entity.Mysql.DB.Exec(sql1)
					log.Println("**********1", err)
					sql2 := `INSERT INTO conversation(appid,` + "`key`" + `,user_id,receive_id,receive_name,send_id,send_name,sort,createtime) values ('%s','','%s','%s','%s','%s','%s',0,'%s');`
					sql2 = fmt.Sprintf(sql2, this.Appid, v, this.SendUserId, this.SendName, v, userName, time.Now().Format("2006-01-02 15:04:05"))
					_, err = entity.Mysql.DB.Exec(sql2)
					log.Println("**********2", err)
					//插入消息表
					_, err = entity.Mysql.DB.Exec(sql3)
					eT := time.Since(bT) // 从开始到当前所消耗的时间
					log.Println("存储耗时：", eT)
					if err != nil {
						return false
					}
					return true
				})
				if !ok {
					errCount++
					continue
				}
				go EtcdCountAdd(v, strconv.Itoa(int(this.MsgType)))

			} else {
				_, err := entity.Mysql.DB.Exec(sql3)
				if err == nil {
					go EtcdCountAdd(v, strconv.Itoa(int(this.MsgType)))
				} else {
					errCount++
				}
			}
		}
		return errCount, "发送成功"
	}
	return 0, "没有要发送的用户"
}