package main

import (
	"context"
	"encoding/json"
	"errors"
	"log"
	"strconv"
	"time"
)

// 检测key是否存在，是否超出每分钟请求次数
func checkKeyAndTimeCount(key string) (int, error) {
	var timeOut = 60 * time.Second
	var timeCount = 30
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	log.Printf("用户信息 %s", userInfoStr)
	if err != nil {
		//用户不存在
		return 401, errors.New("40003")
	}
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	if err != nil {
		//用户状态异常
		return 401, errors.New("40004")
	}
	count, err := Redis.Incr(context.Background(), "user:count:"+key).Result()
	log.Printf("用户请求次数 %d", count)
	if err != nil {
		log.Printf("系统计数器设置异常 %s", err.Error())
		return 500, errors.New("系统计数器设置异常")
	}
	if count == 1 {
		_, err := Redis.Expire(context.Background(), "user:count:"+key, timeOut).Result()
		if err != nil {
			log.Printf("系统计数器异常 %s", err.Error())
			return 500, errors.New("系统计数器异常")
		}
	}
	// 如果请求次数超出限制，则中断请求
	if count > int64(timeCount) {
		//您的账户请求次数过多，超过分钟配额
		return 429, errors.New("42901")
	}
	return 200, nil
}

func queryBlance(key string) (float64, error) {
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", 0).Result()
	if err != nil {
		return 0, errors.New("余额计算失败")
	}
	return balance, nil
}

// 余额查询
func checkBlance(key string, model string) (ServerInfo, error) {
	var serverInfo ServerInfo

	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return serverInfo, errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return serverInfo, errors.New("模型信息解析失败")
	}

	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	//获取服务器信息
	serverInfoStr, err := Redis.Get(context.Background(), "server:"+strconv.Itoa(modelInfo.ServerId)).Result()
	if err != nil {
		return serverInfo, errors.New("服务器信息不存在")
	}
	err = json.Unmarshal([]byte(serverInfoStr), &serverInfo)
	if err != nil {
		return serverInfo, errors.New("服务器信息解析失败")
	}

	//计算余额-先扣除指定金额
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", -(float64(modelInfo.ModelPrepayment) * modelInfo.ModelPrice)).Result()
	if err != nil {
		return serverInfo, errors.New("余额计算失败")
	}
	log.Printf("用户余额 %f key: %v 预扣了：%f", balance, key, (float64(modelInfo.ModelPrepayment) * modelInfo.ModelPrice))
	if balance < 0 {
		Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", float64(modelInfo.ModelPrepayment)*modelInfo.ModelPrice).Result()
		return serverInfo, errors.New("用户余额不足")
	}

	return serverInfo, nil
}

// 余额查询 for images
func checkBlanceForImages(key string, model string, n int) (ServerInfo, error) {
	var serverInfo ServerInfo

	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return serverInfo, errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return serverInfo, errors.New("模型信息解析失败")
	}

	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	//获取服务器信息
	serverInfoStr, err := Redis.Get(context.Background(), "server:"+strconv.Itoa(modelInfo.ServerId)).Result()
	if err != nil {
		return serverInfo, errors.New("服务器信息不存在")
	}
	err = json.Unmarshal([]byte(serverInfoStr), &serverInfo)
	if err != nil {
		return serverInfo, errors.New("服务器信息解析失败")
	}

	//计算余额-先扣除指定金额
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", -(float64(modelInfo.ModelPrepayment*n) * modelInfo.ModelPrice)).Result()
	if err != nil {
		return serverInfo, errors.New("余额计算失败")
	}
	log.Printf("用户余额 %f key: %v 预扣了：%f", balance, key, (float64(modelInfo.ModelPrepayment*n) * modelInfo.ModelPrice))
	if balance < 0 {
		Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", float64(modelInfo.ModelPrepayment*n)*modelInfo.ModelPrice).Result()
		return serverInfo, errors.New("用户余额不足")
	}

	return serverInfo, nil
}

// 预扣返还
func checkBlanceReturn(key string, model string) error {
	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)

	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return errors.New("模型信息解析失败")
	}
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", (float64(modelInfo.ModelPrepayment) * modelInfo.ModelPrice)).Result()
	log.Printf("用户余额 %f key: %v 返还预扣：%f", balance, key, (float64(modelInfo.ModelPrepayment) * modelInfo.ModelPrice))
	return nil
}

// 预扣返还 for images
func checkBlanceReturnForImages(key string, model string, n int) error {
	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return errors.New("模型信息解析失败")
	}
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", (float64(modelInfo.ModelPrepayment*n) * modelInfo.ModelPrice)).Result()
	log.Printf("用户余额 %f key: %v 返还预扣：%f", balance, key, (float64(modelInfo.ModelPrepayment*n) * modelInfo.ModelPrice))
	return nil
}

// 余额消费
func consumption(key string, model string, prompt_tokens int, completion_tokens int, total_tokens int, msg_id string) (string, error) {
	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	if err != nil {
		return "", errors.New("用户信息不存在")
	}
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	if err != nil {
		return "", errors.New("用户信息解析失败")
	}
	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return "", errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return "", errors.New("模型信息解析失败")
	}
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", float64(modelInfo.ModelPrepayment)*modelInfo.ModelPrice-(float64(prompt_tokens)*modelInfo.ModelPrice+float64(completion_tokens)*modelInfo.ModelPrice2)).Result()

	// 余额消费日志请求
	result, err := balanceConsumption(key, model, prompt_tokens, completion_tokens, total_tokens, msg_id)
	log.Printf("用户余额：%f 扣费KEY: %s 扣费token数: %d 扣费：%f 扣费日志发送结果 %s", balance, key, total_tokens, float64(modelInfo.ModelPrepayment)*modelInfo.ModelPrice-(float64(prompt_tokens)*modelInfo.ModelPrice+float64(completion_tokens)*modelInfo.ModelPrice2), result)
	if err != nil {
		log.Printf("%s 余额消费日志请求失败 %v", key, err)
		return "", err
	}
	return result, nil
}

// 余额消费 for images
func consumptionForImages(key string, model string, n int, dataNum int, msg_id string) (string, error) {
	//获取用户信息
	userInfoStr, err := Redis.Get(context.Background(), "user:"+key).Result()
	if err != nil {
		return "", errors.New("用户信息不存在")
	}
	var userInfo UserInfo
	err = json.Unmarshal([]byte(userInfoStr), &userInfo)
	if err != nil {
		return "", errors.New("用户信息解析失败")
	}
	//获取模型价格
	modelPriceStr, err := Redis.Get(context.Background(), "model:"+model).Result()
	if err != nil {
		return "", errors.New("模型信息不存在")
	}
	var modelInfo ModelInfo
	err = json.Unmarshal([]byte(modelPriceStr), &modelInfo)
	if err != nil {
		return "", errors.New("模型信息解析失败")
	}
	balance, err := Redis.IncrByFloat(context.Background(), "user:"+userInfo.UID+":balance", float64(modelInfo.ModelPrepayment*n)*modelInfo.ModelPrice-(float64(1000*dataNum)*modelInfo.ModelPrice)).Result()

	// 余额消费日志请求
	result, err := balanceConsumption(key, model, 0, 1000*dataNum, 1000*dataNum, msg_id)
	log.Printf("用户余额：%f 扣费KEY: %s 扣费token数: %d 扣费：%f 扣费日志发送结果 %s", balance, key, 1000*dataNum, float64(1000*dataNum)*modelInfo.ModelPrice, result)
	if err != nil {
		log.Printf("%s 余额消费日志请求失败 %v", key, err)
		return "", err
	}
	return result, nil
}