package user

import (
	"context"
	"time"

	"github.com/perfect-panel/server/internal/model/user"
	"github.com/perfect-panel/server/internal/svc"
	"github.com/perfect-panel/server/internal/types"
	"github.com/perfect-panel/server/pkg/constant"
	"github.com/perfect-panel/server/pkg/logger"
	"github.com/perfect-panel/server/pkg/xerr"
	"github.com/pkg/errors"
	"gorm.io/gorm"
)

type BindInviteCodeLogic struct {
	logger.Logger
	ctx    context.Context
	svcCtx *svc.ServiceContext
}

// Bind Invite Code
func NewBindInviteCodeLogic(ctx context.Context, svcCtx *svc.ServiceContext) *BindInviteCodeLogic {
	return &BindInviteCodeLogic{
		Logger: logger.WithContext(ctx),
		ctx:    ctx,
		svcCtx: svcCtx,
	}
}

func (l *BindInviteCodeLogic) BindInviteCode(req *types.BindInviteCodeRequest) error {
	// 获取当前用户
	currentUser, ok := l.ctx.Value(constant.CtxKeyUser).(*user.User)
	if !ok {
		logger.Error("current user is not found in context")
		return errors.Wrapf(xerr.NewErrCode(xerr.InvalidAccess), "Invalid Access")
	}

	// 检查用户是否已经绑定过邀请码
	if currentUser.RefererId != 0 {
		return errors.Wrapf(xerr.NewErrCode(xerr.UserExist), "user already bound invite code")
	}

	// 查找邀请人
	referrer, err := l.svcCtx.UserModel.FindOneByReferCode(l.ctx, req.InviteCode)
	if err != nil {
		if errors.Is(err, gorm.ErrRecordNotFound) {
			return errors.Wrapf(xerr.NewErrCode(xerr.UserNotExist), "invite code not found")
		}
		logger.WithContext(l.ctx).Error(err)
		return errors.Wrapf(xerr.NewErrCode(xerr.DatabaseQueryError), "query referrer failed: %v", err.Error())
	}

	// 检查是否是自己的邀请码
	if referrer.Id == currentUser.Id {
		return errors.Wrapf(xerr.NewErrCodeMsg(xerr.InviteCodeError, "不允许绑定自己"), "cannot bind your own invite code")
	}

	// 更新用户的RefererId
	currentUser.RefererId = referrer.Id
	err = l.svcCtx.UserModel.Update(l.ctx, currentUser)
	if err != nil {
		logger.WithContext(l.ctx).Error(err)
		return errors.Wrapf(xerr.NewErrCode(xerr.DatabaseUpdateError), "update referrer id failed: %v", err.Error())
	}

	// 给双方赠送天数
	err = l.grantGiftDaysToBothParties(currentUser, referrer)
	if err != nil {
		logger.WithContext(l.ctx).Error(err)
		return errors.Wrapf(xerr.NewErrCode(xerr.DatabaseUpdateError), "grant gift days failed: %v", err.Error())
	}

	return nil
}

// grantGiftDaysToBothParties 给双方赠送天数
func (l *BindInviteCodeLogic) grantGiftDaysToBothParties(referee *user.User, referrer *user.User) error {
	giftDays := l.svcCtx.Config.Invite.GiftDays

	// 给被邀请人赠送天数
	err := l.grantGiftDays(referee, int(giftDays))
	if err != nil {
		return err
	}

	// 给邀请人赠送天数
	err = l.grantGiftDays(referrer, int(giftDays))
	if err != nil {
		return err
	}

	return nil
}

// grantGiftDays 给用户赠送天数
func (l *BindInviteCodeLogic) grantGiftDays(user *user.User, days int) error {
	// 查找用户的活跃订阅
	activeSubscribe, err := l.svcCtx.UserModel.FindActiveSubscribe(l.ctx, user.Id)
	if err != nil {
		if errors.Is(err, gorm.ErrRecordNotFound) {
			// 用户没有活跃订阅，跳过赠送
			logger.WithContext(l.ctx).Infof("user %d has no active subscription, skip gift days", user.Id)
			return nil
		}
		return err
	}

	// 延长订阅时间
	newExpiredAt := activeSubscribe.ExpireTime.Add(time.Duration(days) * 24 * time.Hour)
	activeSubscribe.ExpireTime = newExpiredAt
	err = l.svcCtx.UserModel.UpdateSubscribe(l.ctx, activeSubscribe)
	if err != nil {
		return err
	}

	logger.WithContext(l.ctx).Infof("granted %d days to user %d, new expired at: %v", days, user.Id, newExpiredAt)
	return nil
}