// Copyright (C) 2020 Storj Labs, Inc.
// See LICENSE for copying information.

package main

import (
	"context"
	"time"

	"github.com/spf13/cobra"
	"github.com/zeebo/errs"
	"go.uber.org/zap"

	"storj.io/common/uuid"
	"storj.io/private/process"
	"storj.io/storj/satellite"
	"storj.io/storj/satellite/payments/stripecoinpayments"
	"storj.io/storj/satellite/satellitedb"
)

func runBillingCmd(ctx context.Context, cmdFunc func(context.Context, *stripecoinpayments.Service, satellite.DB) error) error {
	// Open SatelliteDB for the Payment Service
	logger := zap.L()
	db, err := satellitedb.Open(ctx, logger.Named("db"), runCfg.Database, satellitedb.Options{ApplicationName: "satellite-billing"})
	if err != nil {
		return errs.New("error connecting to master database on satellite: %+v", err)
	}
	defer func() {
		err = errs.Combine(err, db.Close())
	}()

	payments, err := setupPayments(logger, db)
	if err != nil {
		return err
	}

	return cmdFunc(ctx, payments, db)
}

func setupPayments(log *zap.Logger, db satellite.DB) (*stripecoinpayments.Service, error) {
	pc := runCfg.Payments

	var stripeClient stripecoinpayments.StripeClient
	switch pc.Provider {
	case "": // just new mock, only used in testing binaries
		stripeClient = stripecoinpayments.NewStripeMock(
			db.StripeCoinPayments().Customers(),
			db.Console().Users(),
		)
	case "stripecoinpayments":
		stripeClient = stripecoinpayments.NewStripeClient(log, pc.StripeCoinPayments)
	default:
		return nil, errs.New("invalid stripe coin payments provider %q", pc.Provider)
	}

	prices, err := pc.UsagePrice.ToModel()
	if err != nil {
		return nil, err
	}

	priceOverrides, err := pc.UsagePriceOverrides.ToModels()
	if err != nil {
		return nil, err
	}

	return stripecoinpayments.NewService(
		log.Named("payments.stripe:service"),
		stripeClient,
		pc.StripeCoinPayments,
		db.StripeCoinPayments(),
		db.Wallets(),
		db.Billing(),
		db.Console().Projects(),
		db.Console().Users(),
		db.ProjectAccounting(),
		prices,
		priceOverrides,
		pc.PackagePlans.Packages,
		pc.BonusRate)
}

// parseYearMonth parses year and month from the provided string and returns a corresponding time.Time for the first day
// of the month. The input year and month should be iso8601 format (yyyy-mm).
func parseYearMonth(yearMonth string) (time.Time, error) {
	// parse using iso8601 yyyy-mm
	t, err := time.Parse("2006-01", yearMonth)
	if err != nil {
		return time.Time{}, errs.New("invalid date specified. accepted format is yyyy-mm: %v", err)
	}
	return time.Date(t.Year(), t.Month(), 1, 0, 0, 0, 0, time.UTC), nil
}

// userData contains the uuid and email of a satellite user.
type userData struct {
	ID              uuid.UUID
	Email           string
	SignupPromoCode string
}

// generateStripeCustomers creates missing stripe-customers for users in our database.
func generateStripeCustomers(ctx context.Context) (err error) {
	return runBillingCmd(ctx, func(ctx context.Context, payments *stripecoinpayments.Service, db satellite.DB) error {
		accounts := payments.Accounts()

		cusDB := db.StripeCoinPayments().Customers().Raw()

		rows, err := cusDB.Query(ctx, "SELECT id, email, signup_promo_code FROM users WHERE id NOT IN (SELECT user_id FROM stripe_customers) AND users.status=1")
		if err != nil {
			return err
		}
		defer func() {
			err = errs.Combine(err, rows.Close())
		}()

		var n int64
		for rows.Next() {
			n++
			var user userData
			err := rows.Scan(&user.ID, &user.Email)
			if err != nil {
				return err
			}

			_, err = accounts.Setup(ctx, user.ID, user.Email, user.SignupPromoCode)
			if err != nil {
				return err
			}

		}

		zap.L().Info("Ensured Stripe-Customer", zap.Int64("created", n))

		return err
	})
}

func cmdApplyFreeTierCoupons(cmd *cobra.Command, args []string) (err error) {
	ctx, _ := process.Ctx(cmd)

	return runBillingCmd(ctx, func(ctx context.Context, payments *stripecoinpayments.Service, _ satellite.DB) error {
		return payments.ApplyFreeTierCoupons(ctx)
	})
}