package zb

import (
	"context"
	"encoding/json"
	"errors"
	"fmt"
	"net/http"
	"net/url"
	"strconv"
	"strings"
	"time"

	"github.com/thrasher-corp/gocryptotrader/common/convert"
	"github.com/thrasher-corp/gocryptotrader/common/crypto"
	"github.com/thrasher-corp/gocryptotrader/currency"
	exchange "github.com/thrasher-corp/gocryptotrader/exchanges"
	"github.com/thrasher-corp/gocryptotrader/exchanges/request"
)

const (
	zbTradeURL                        = "https://api.zb.com"
	zbMarketURL                       = "https://trade.zb.com/api"
	zbAPIVersion                      = "v1"
	zbData                            = "data"
	zbAccountInfo                     = "getAccountInfo"
	zbMarkets                         = "markets"
	zbKline                           = "kline"
	zbOrder                           = "order"
	zbCancelOrder                     = "cancelOrder"
	zbTicker                          = "ticker"
	zbTrades                          = "trades"
	zbTickers                         = "allTicker"
	zbDepth                           = "depth"
	zbUnfinishedOrdersIgnoreTradeType = "getUnfinishedOrdersIgnoreTradeType"
	zbGetOrdersGet                    = "getOrders"
	zbWithdraw                        = "withdraw"
	zbDepositAddress                  = "getUserAddress"
	zbMultiChainDepositAddress        = "getPayinAddress"
)

// ZB is the overarching type across this package
// 47.91.169.147 api.zb.com
// 47.52.55.212 trade.zb.com
type ZB struct {
	exchange.Base
}

// SpotNewOrder submits an order to ZB
func (z *ZB) SpotNewOrder(ctx context.Context, arg SpotNewOrderRequestParams) (int64, error) {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return 0, err
	}

	var result SpotNewOrderResponse

	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("method", "order")
	vals.Set("amount", strconv.FormatFloat(arg.Amount, 'f', -1, 64))
	vals.Set("currency", arg.Symbol)
	vals.Set("price", strconv.FormatFloat(arg.Price, 'f', -1, 64))
	vals.Set("tradeType", string(arg.Type))

	err = z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &result, request.Auth)
	if err != nil {
		return 0, err
	}
	if result.Code != 1000 {
		return 0, fmt.Errorf("unsuccessful new order, message: %s code: %d", result.Message, result.Code)
	}
	newOrderID, err := strconv.ParseInt(result.ID, 10, 64)
	if err != nil {
		return 0, err
	}
	return newOrderID, nil
}

// CancelExistingOrder cancels an order
func (z *ZB) CancelExistingOrder(ctx context.Context, orderID int64, symbol string) error {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return err
	}

	type response struct {
		Code    int    `json:"code"`    // Result code
		Message string `json:"message"` // Result Message
	}

	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("method", "cancelOrder")
	vals.Set("id", strconv.FormatInt(orderID, 10))
	vals.Set("currency", symbol)

	var result response
	err = z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &result, request.Auth)
	if err != nil {
		return err
	}

	if result.Code != 1000 {
		return errors.New(result.Message)
	}
	return nil
}

// GetAccountInformation returns account information including coin information
// and pricing
func (z *ZB) GetAccountInformation(ctx context.Context) (AccountsResponse, error) {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return AccountsResponse{}, err
	}

	var result AccountsResponse
	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("method", "getAccountInfo")

	return result, z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &result, request.Auth)
}

// GetUnfinishedOrdersIgnoreTradeType returns unfinished orders
func (z *ZB) GetUnfinishedOrdersIgnoreTradeType(ctx context.Context, currency string, pageindex, pagesize int64) ([]Order, error) {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return nil, err
	}
	var result []Order
	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("method", zbUnfinishedOrdersIgnoreTradeType)
	vals.Set("currency", currency)
	vals.Set("pageIndex", strconv.FormatInt(pageindex, 10))
	vals.Set("pageSize", strconv.FormatInt(pagesize, 10))

	err = z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &result, request.Auth)
	return result, err
}

// GetOrders returns finished orders
func (z *ZB) GetOrders(ctx context.Context, currency string, pageindex, side int64) ([]Order, error) {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return nil, err
	}
	var response []Order
	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("method", zbGetOrdersGet)
	vals.Set("currency", currency)
	vals.Set("pageIndex", strconv.FormatInt(pageindex, 10))
	vals.Set("tradeType", strconv.FormatInt(side, 10))
	return response, z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &response, request.Auth)
}

// GetMarkets returns market information including pricing, symbols and
// each symbols decimal precision
func (z *ZB) GetMarkets(ctx context.Context) (map[string]MarketResponseItem, error) {
	endpoint := fmt.Sprintf("/%s/%s/%s", zbData, zbAPIVersion, zbMarkets)

	var res map[string]MarketResponseItem
	err := z.SendHTTPRequest(ctx, exchange.RestSpot, endpoint, &res, request.UnAuth)
	if err != nil {
		return nil, err
	}

	return res, nil
}

// GetLatestSpotPrice returns latest spot price of symbol
//
// symbol: string of currency pair
// 获取最新价格
func (z *ZB) GetLatestSpotPrice(ctx context.Context, symbol string) (float64, error) {
	res, err := z.GetTicker(ctx, symbol)
	if err != nil {
		return 0, err
	}

	return res.Ticker.Last, nil
}

// GetTicker returns a ticker for a given symbol
func (z *ZB) GetTicker(ctx context.Context, symbol string) (TickerResponse, error) {
	urlPath := fmt.Sprintf("/%s/%s/%s?market=%s", zbData, zbAPIVersion, zbTicker, symbol)
	var res TickerResponse
	err := z.SendHTTPRequest(ctx, exchange.RestSpot, urlPath, &res, request.UnAuth)
	return res, err
}

// GetTrades returns trades for a given symbol
func (z *ZB) GetTrades(ctx context.Context, symbol string) (TradeHistory, error) {
	urlPath := fmt.Sprintf("/%s/%s/%s?market=%s", zbData, zbAPIVersion, zbTrades, symbol)
	var res TradeHistory
	err := z.SendHTTPRequest(ctx, exchange.RestSpot, urlPath, &res, request.UnAuth)
	return res, err
}

// GetTickers returns ticker data for all supported symbols
func (z *ZB) GetTickers(ctx context.Context) (map[string]TickerChildResponse, error) {
	urlPath := fmt.Sprintf("/%s/%s/%s", zbData, zbAPIVersion, zbTickers)
	resp := make(map[string]TickerChildResponse)
	err := z.SendHTTPRequest(ctx, exchange.RestSpot, urlPath, &resp, request.UnAuth)
	return resp, err
}

// GetOrderbook returns the orderbook for a given symbol
func (z *ZB) GetOrderbook(ctx context.Context, symbol string) (*OrderbookResponse, error) {
	urlPath := fmt.Sprintf("/%s/%s/%s?market=%s", zbData, zbAPIVersion, zbDepth, symbol)
	var res OrderbookResponse

	err := z.SendHTTPRequest(ctx, exchange.RestSpot, urlPath, &res, request.UnAuth)
	if err != nil {
		return nil, err
	}

	if len(res.Asks) == 0 {
		return nil, errors.New("ZB GetOrderbook asks is empty")
	}

	if len(res.Bids) == 0 {
		return nil, errors.New("ZB GetOrderbook bids is empty")
	}

	// reverse asks data
	eLen := len(res.Asks)
	var target int
	for i := eLen/2 - 1; i >= 0; i-- {
		target = eLen - 1 - i
		(res.Asks)[i], (res.Asks)[target] = (res.Asks)[target], (res.Asks)[i]
	}
	return &res, nil
}

// GetSpotKline returns Kline data
func (z *ZB) GetSpotKline(ctx context.Context, arg KlinesRequestParams) (KLineResponse, error) {
	vals := url.Values{}
	vals.Set("type", arg.Type)
	vals.Set("market", arg.Symbol)
	if arg.Since > 0 {
		vals.Set("since", strconv.FormatInt(arg.Since, 10))
	}
	if arg.Size != 0 {
		vals.Set("size", fmt.Sprintf("%d", arg.Size))
	}

	urlPath := fmt.Sprintf("/%s/%s/%s?%s", zbData, zbAPIVersion, zbKline, vals.Encode())

	var res KLineResponse
	resp := struct {
		Data      [][]float64 `json:"data"`
		MoneyType string      `json:"moneyType"`
		Symbol    string      `json:"symbol"`
	}{}
	err := z.SendHTTPRequest(ctx, exchange.RestSpot, urlPath, &resp, klineFunc)
	if err != nil {
		return res, err
	}
	if resp.Data == nil || resp.Symbol == "" || resp.MoneyType == "" {
		return res, errors.New("GetSpotKline received empty data")
	}
	res.MoneyType = resp.MoneyType
	res.Symbol = resp.Symbol

	for x := range resp.Data {
		if len(resp.Data[x]) < 6 {
			return res, errors.New("unexpected kline data length")
		}

		timestamp, err := convert.TimeFromUnixTimestampFloat(resp.Data[x][0])
		if err != nil {
			return res, err
		}
		res.Data = append(res.Data, &KLineResponseData{
			KlineTime: timestamp,
			Open:      resp.Data[x][1],
			High:      resp.Data[x][2],
			Low:       resp.Data[x][3],
			Close:     resp.Data[x][4],
			Volume:    resp.Data[x][5],
		})
	}
	return res, nil
}

// GetCryptoAddress fetches and returns the deposit address
// NOTE - PLEASE BE AWARE THAT YOU NEED TO GENERATE A DEPOSIT ADDRESS VIA
// LOGGING IN AND NOT BY USING THIS ENDPOINT OTHERWISE THIS WILL GIVE YOU A
// GENERAL ERROR RESPONSE.
func (z *ZB) GetCryptoAddress(ctx context.Context, currency currency.Code) (*UserAddress, error) {
	var resp UserAddress

	vals := url.Values{}
	vals.Set("method", zbDepositAddress)
	vals.Set("currency", currency.Lower().String())

	if err := z.SendAuthenticatedHTTPRequest(ctx,
		exchange.RestSpotSupplementary,
		http.MethodGet,
		vals,
		&resp,
		request.Auth); err != nil {
		return nil, err
	}

	if !resp.Message.IsSuccessful {
		return nil, errors.New(resp.Message.Description)
	}

	if strings.Contains(resp.Message.Data.Address, "_") {
		splitter := strings.Split(resp.Message.Data.Address, "_")
		resp.Message.Data.Address, resp.Message.Data.Tag = splitter[0], splitter[1]
	}

	return &resp, nil
}

// GetMultiChainDepositAddress returns deposit addresses for a given currency
func (z *ZB) GetMultiChainDepositAddress(ctx context.Context, currency currency.Code) ([]MultiChainDepositAddress, error) {
	var resp MultiChainDepositAddressResponse

	vals := url.Values{}
	vals.Set("method", zbMultiChainDepositAddress)
	vals.Set("currency", currency.Lower().String())

	if err := z.SendAuthenticatedHTTPRequest(ctx,
		exchange.RestSpotSupplementary,
		http.MethodGet,
		vals,
		&resp,
		request.Auth); err != nil {
		return nil, err
	}

	if !resp.Message.IsSuccessful {
		return nil, errors.New(resp.Message.Description)
	}
	return resp.Message.Data, nil
}

// SendHTTPRequest sends an unauthenticated HTTP request
func (z *ZB) SendHTTPRequest(ctx context.Context, ep exchange.URL, path string, result interface{}, f request.EndpointLimit) error {
	endpoint, err := z.API.Endpoints.GetURL(ep)
	if err != nil {
		return err
	}

	item := &request.Item{
		Method:        http.MethodGet,
		Path:          endpoint + path,
		Result:        result,
		Verbose:       z.Verbose,
		HTTPDebugging: z.HTTPDebugging,
		HTTPRecording: z.HTTPRecording,
	}

	return z.SendPayload(ctx, f, func() (*request.Item, error) {
		return item, nil
	})
}

// SendAuthenticatedHTTPRequest sends authenticated requests to the zb API
func (z *ZB) SendAuthenticatedHTTPRequest(ctx context.Context, ep exchange.URL, httpMethod string, params url.Values, result interface{}, f request.EndpointLimit) error {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return err
	}
	endpoint, err := z.API.Endpoints.GetURL(ep)
	if err != nil {
		return err
	}
	params.Set("accesskey", creds.Key)

	hex, err := crypto.Sha1ToHex(creds.Secret)
	if err != nil {
		return err
	}

	hmac, err := crypto.GetHMAC(crypto.HashMD5,
		[]byte(params.Encode()),
		[]byte(hex))
	if err != nil {
		return err
	}

	var intermediary json.RawMessage
	newRequest := func() (*request.Item, error) {
		params.Set("reqTime", strconv.FormatInt(time.Now().UnixMilli(), 10))
		params.Set("sign", fmt.Sprintf("%x", hmac))

		urlPath := fmt.Sprintf("%s/%s?%s",
			endpoint,
			params.Get("method"),
			params.Encode())

		return &request.Item{
			Method:        httpMethod,
			Path:          urlPath,
			Result:        &intermediary,
			AuthRequest:   true,
			Verbose:       z.Verbose,
			HTTPDebugging: z.HTTPDebugging,
			HTTPRecording: z.HTTPRecording,
		}, nil
	}

	err = z.SendPayload(ctx, f, newRequest)
	if err != nil {
		return err
	}

	errCap := struct {
		Code    int64  `json:"code"`
		Message string `json:"message"`
	}{}

	err = json.Unmarshal(intermediary, &errCap)
	if err == nil {
		if errCap.Code > 1000 {
			return fmt.Errorf("error code: %d error code message: %s error message: %s",
				errCap.Code,
				errorCode[errCap.Code],
				errCap.Message)
		}
	}

	return json.Unmarshal(intermediary, result)
}

// GetFee returns an estimate of fee based on type of transaction
func (z *ZB) GetFee(feeBuilder *exchange.FeeBuilder) (float64, error) {
	var fee float64
	switch feeBuilder.FeeType {
	case exchange.CryptocurrencyTradeFee:
		fee = calculateTradingFee(feeBuilder.PurchasePrice, feeBuilder.Amount)
	case exchange.CryptocurrencyWithdrawalFee:
		fee = getWithdrawalFee(feeBuilder.Pair.Base)
	case exchange.OfflineTradeFee:
		fee = getOfflineTradeFee(feeBuilder.PurchasePrice, feeBuilder.Amount)
	}
	if fee < 0 {
		fee = 0
	}

	return fee, nil
}

// getOfflineTradeFee calculates the worst case-scenario trading fee
func getOfflineTradeFee(price, amount float64) float64 {
	return 0.002 * price * amount
}

func calculateTradingFee(purchasePrice, amount float64) (fee float64) {
	fee = 0.002
	return fee * amount * purchasePrice
}

func getWithdrawalFee(c currency.Code) float64 {
	return WithdrawalFees[c]
}

var errorCode = map[int64]string{
	1000: "Successful call",
	1001: "General error message",
	1002: "internal error",
	1003: "Verification failed",
	1004: "Financial security password lock",
	1005: "The fund security password is incorrect. Please confirm and re-enter.",
	1006: "Real-name certification is awaiting review or review",
	1009: "This interface is being maintained",
	1010: "Not open yet",
	1012: "Insufficient permissions",
	1013: "Can not trade, if you have any questions, please contact online customer service",
	1014: "Cannot be sold during the pre-sale period",
	2002: "Insufficient balance in Bitcoin account",
	2003: "Insufficient balance of Litecoin account",
	2005: "Insufficient balance in Ethereum account",
	2006: "Insufficient balance in ETC currency account",
	2007: "Insufficient balance of BTS currency account",
	2009: "Insufficient account balance",
	3001: "Pending order not found",
	3002: "Invalid amount",
	3003: "Invalid quantity",
	3004: "User does not exist",
	3005: "Invalid parameter",
	3006: "Invalid IP or inconsistent with the bound IP",
	3007: "Request time has expired",
	3008: "Transaction history not found",
	4001: "API interface is locked",
	4002: "Request too frequently",
}

// Withdraw transfers funds
func (z *ZB) Withdraw(ctx context.Context, currency, address, safepassword string, amount, fees float64, itransfer bool) (string, error) {
	creds, err := z.GetCredentials(ctx)
	if err != nil {
		return "", err
	}

	type response struct {
		Code    int    `json:"code"`    // Result code
		Message string `json:"message"` // Result Message
		ID      string `json:"id"`      // Withdrawal ID
	}

	vals := url.Values{}
	vals.Set("accesskey", creds.Key)
	vals.Set("amount", strconv.FormatFloat(amount, 'f', -1, 64))
	vals.Set("currency", currency)
	vals.Set("fees", strconv.FormatFloat(fees, 'f', -1, 64))
	vals.Set("itransfer", strconv.FormatBool(itransfer))
	vals.Set("method", "withdraw")
	vals.Set("receiveAddr", address)
	vals.Set("safePwd", safepassword)

	var resp response
	err = z.SendAuthenticatedHTTPRequest(ctx, exchange.RestSpotSupplementary, http.MethodGet, vals, &resp, request.Auth)
	if err != nil {
		return "", err
	}
	if resp.Code != 1000 {
		return "", errors.New(resp.Message)
	}

	return resp.ID, nil
}