<?php

declare(strict_types=1);

namespace app\common\library\game;

use InvalidArgumentException;

/**
 * 移动端支付/收款展示（game_config.finance_cashier，含 channels 充值渠道）
 *
 * 货币列表每行含：
 * - deposit_coins_per_fiat：充值参考，每支付 1 单位该货币到账的平台币数量
 * - withdraw_coins_per_fiat：提现换算，每兑换 1 单位该货币所需平台币数量
 */
final class FinanceCashierConfig
{
    public const CONFIG_KEY = 'finance_cashier';

    /**
     * @return array<string, mixed>
     */
    public static function defaultPayload(): array
    {
        return [
            'platform_coin' => [
                'label_zh' => '钻石',
                'label_en' => 'Diamonds',
            ],
            'currencies' => [
                [
                    'code'                    => 'MYR',
                    'label_zh'                => '马来西亚林吉特',
                    'label_en'                => 'Malaysian Ringgit',
                    'sort'                    => 10,
                    'deposit_coins_per_fiat'  => '100',
                    'withdraw_coins_per_fiat' => '100',
                ],
                [
                    'code'                    => 'VND',
                    'label_zh'                => '越南盾',
                    'label_en'                => 'Vietnamese Dong',
                    'sort'                    => 20,
                    'deposit_coins_per_fiat'  => '10',
                    'withdraw_coins_per_fiat' => '10',
                ],
                [
                    'code'                    => 'USDT',
                    'label_zh'                => 'USDT',
                    'label_en'                => 'USDT',
                    'sort'                    => 30,
                    'deposit_coins_per_fiat'  => '1',
                    'withdraw_coins_per_fiat' => '1',
                ],
            ],
            'withdraw_banks' => [
                ['code' => 'agrobank', 'name_zh' => 'Agrobank', 'name_en' => 'Agrobank', 'sort' => 10],
            ],
            'withdraw_limits' => [
                'min_ewallet' => '10',
                'min_bank' => '10',
            ],
            'withdraw_copy' => [
                'rate_hint_zh' => '汇率为参考价格，实际以提现时为准。',
                'rate_hint_en' => 'Exchange rates are for reference only; the actual rate at withdrawal time prevails.',
                'processing_zh' => '9秒即可到账',
                'processing_en' => 'Arrives in seconds',
                'fee_note_zh' => '注意：RM 10 — RM 99.99 之间的交易将收取最低 RM 1 的提现手续费。',
                'fee_note_en' => 'A minimum RM 1 handling fee may apply for withdrawals between RM 10 and RM 99.99.',
                'rate_mode' => 'fixed',
            ],
            'withdraw_fields' => [
                'require_cardholder' => true,
                'require_bank_account' => true,
                'require_email' => true,
                'require_mobile' => true,
            ],
            'channels' => [],
        ];
    }

    /**
     * @return array<string, mixed>
     */
    public static function parseFromConfigValue(mixed $raw): array
    {
        $out = self::defaultPayload();
        if (!is_string($raw) || trim($raw) === '') {
            return self::normalizePayload($out, []);
        }
        $decoded = json_decode($raw, true);
        if (!is_array($decoded)) {
            return self::normalizePayload($out, []);
        }
        if (isset($decoded['platform_coin']) && is_array($decoded['platform_coin'])) {
            $out['platform_coin'] = array_replace($out['platform_coin'], array_intersect_key($decoded['platform_coin'], $out['platform_coin']));
        }
        $legacyRates = [];
        if (isset($decoded['rates']) && is_array($decoded['rates'])) {
            $legacyRates = array_values($decoded['rates']);
        }
        foreach (['currencies', 'withdraw_banks', 'channels'] as $listKey) {
            if (isset($decoded[$listKey]) && is_array($decoded[$listKey])) {
                $out[$listKey] = array_values($decoded[$listKey]);
            }
        }
        if (isset($decoded['withdraw_limits']) && is_array($decoded['withdraw_limits'])) {
            $out['withdraw_limits'] = array_replace($out['withdraw_limits'], array_intersect_key($decoded['withdraw_limits'], $out['withdraw_limits']));
        }
        if (isset($decoded['withdraw_copy']) && is_array($decoded['withdraw_copy'])) {
            $out['withdraw_copy'] = array_replace($out['withdraw_copy'], array_intersect_key($decoded['withdraw_copy'], $out['withdraw_copy']));
        }
        if (isset($decoded['withdraw_fields']) && is_array($decoded['withdraw_fields'])) {
            $out['withdraw_fields'] = array_replace($out['withdraw_fields'], array_intersect_key($decoded['withdraw_fields'], $out['withdraw_fields']));
        }

        return self::normalizePayload($out, $legacyRates);
    }

    public static function encodeForDb(array $payload): string
    {
        $legacyRates = [];
        if (isset($payload['rates']) && is_array($payload['rates'])) {
            $legacyRates = array_values($payload['rates']);
        }
        $normalized = self::normalizePayload($payload, $legacyRates);
        $normalized['channels'] = DepositChannel::prepareOverridesForSave(
            DepositChannel::expandRowsForAdmin($normalized['channels'] ?? [])
        );
        self::validate($normalized);

        return json_encode($normalized, JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES);
    }

    /**
     * @param array<string, mixed> $p
     * @param list<array<string, mixed>> $legacyRates
     *
     * @return array<string, mixed>
     */
    private static function normalizePayload(array $p, array $legacyRates): array
    {
        $defaults = self::defaultPayload();
        $out = array_replace($defaults, $p);
        unset($out['rates'], $out['fx_pairs']);

        $withdrawFromLegacyRates = [];
        foreach ($legacyRates as $r) {
            if (!is_array($r)) {
                continue;
            }
            $cur = isset($r['currency']) && is_string($r['currency']) ? strtoupper(trim($r['currency'])) : '';
            $ratio = self::ratioStringFromRow($r, 'diamonds_per_fiat_unit');
            if ($cur !== '' && $ratio !== '') {
                $withdrawFromLegacyRates[$cur] = $ratio;
            }
        }

        if (isset($out['platform_coin']) && is_array($out['platform_coin'])) {
            $out['platform_coin'] = array_replace($defaults['platform_coin'], $out['platform_coin']);
        }
        if (isset($out['currencies']) && is_array($out['currencies'])) {
            foreach ($out['currencies'] as $i => $row) {
                if (!is_array($row)) {
                    unset($out['currencies'][$i]);
                    continue;
                }
                $code = isset($row['code']) && is_string($row['code']) ? strtoupper(trim($row['code'])) : '';
                $dep = self::ratioStringFromRow($row, 'deposit_coins_per_fiat');
                $wdr = self::ratioStringFromRow($row, 'withdraw_coins_per_fiat');
                if ($wdr === '') {
                    $wdr = self::ratioStringFromRow($row, 'diamonds_per_fiat_unit');
                }
                if ($wdr === '' && $code !== '' && isset($withdrawFromLegacyRates[$code])) {
                    $wdr = $withdrawFromLegacyRates[$code];
                }
                if ($dep === '' && $wdr !== '') {
                    $dep = $wdr;
                }
                if ($wdr === '' && $dep !== '') {
                    $wdr = $dep;
                }
                if ($code !== '' && $dep === '' && $wdr === '') {
                    $dep = '100';
                    $wdr = '100';
                }
                $out['currencies'][$i] = [
                    'code'                    => $code,
                    'label_zh'                => isset($row['label_zh']) && is_string($row['label_zh']) ? trim($row['label_zh']) : '',
                    'label_en'                => isset($row['label_en']) && is_string($row['label_en']) ? trim($row['label_en']) : '',
                    'sort'                    => self::normalizeSort($row['sort'] ?? 0),
                    'deposit_coins_per_fiat'  => $dep,
                    'withdraw_coins_per_fiat' => $wdr,
                ];
            }
            $out['currencies'] = array_values(array_filter($out['currencies'], static fn ($r) => is_array($r) && $r['code'] !== ''));
        }

        usort($out['currencies'], static function (array $a, array $b): int {
            $sa = $a['sort'] ?? 0;
            $sb = $b['sort'] ?? 0;
            if ($sa !== $sb) {
                return $sa <=> $sb;
            }
            $ca = $a['code'] ?? '';
            $cb = $b['code'] ?? '';

            return strcmp($ca, $cb);
        });

        if (isset($out['withdraw_banks']) && is_array($out['withdraw_banks'])) {
            foreach ($out['withdraw_banks'] as $i => $row) {
                if (!is_array($row)) {
                    unset($out['withdraw_banks'][$i]);
                    continue;
                }
                $code = isset($row['code']) && is_string($row['code']) ? strtolower(trim($row['code'])) : '';
                $out['withdraw_banks'][$i] = [
                    'code'     => $code,
                    'name_zh'  => isset($row['name_zh']) && is_string($row['name_zh']) ? trim($row['name_zh']) : '',
                    'name_en'  => isset($row['name_en']) && is_string($row['name_en']) ? trim($row['name_en']) : '',
                    'sort'     => self::normalizeSort($row['sort'] ?? 0),
                ];
            }
            $out['withdraw_banks'] = array_values(array_filter($out['withdraw_banks'], static fn ($r) => is_array($r) && $r['code'] !== ''));
            usort($out['withdraw_banks'], static function (array $a, array $b): int {
                $sa = $a['sort'] ?? 0;
                $sb = $b['sort'] ?? 0;
                if ($sa !== $sb) {
                    return $sa <=> $sb;
                }
                $ca = $a['code'] ?? '';
                $cb = $b['code'] ?? '';

                return strcmp($ca, $cb);
            });
        }
        if (isset($out['withdraw_limits']) && is_array($out['withdraw_limits'])) {
            $wl = array_replace($defaults['withdraw_limits'], $out['withdraw_limits']);
            foreach (['min_ewallet', 'min_bank'] as $k) {
                if (isset($wl[$k]) && is_numeric($wl[$k]) && !is_string($wl[$k])) {
                    $wl[$k] = strval($wl[$k]);
                }
                if (!isset($wl[$k]) || !is_string($wl[$k])) {
                    $wl[$k] = $defaults['withdraw_limits'][$k];
                }
            }
            $out['withdraw_limits'] = $wl;
        }
        if (isset($out['withdraw_copy']) && is_array($out['withdraw_copy'])) {
            $out['withdraw_copy'] = array_replace($defaults['withdraw_copy'], array_intersect_key($out['withdraw_copy'], $defaults['withdraw_copy']));
            $mode = isset($out['withdraw_copy']['rate_mode']) && is_string($out['withdraw_copy']['rate_mode'])
                ? strtolower(trim($out['withdraw_copy']['rate_mode']))
                : 'fixed';
            if (!in_array($mode, ['fixed', 'live'], true)) {
                $mode = 'fixed';
            }
            $out['withdraw_copy']['rate_mode'] = $mode;
        }
        if (isset($out['withdraw_fields']) && is_array($out['withdraw_fields'])) {
            $wf = array_replace($defaults['withdraw_fields'], array_intersect_key($out['withdraw_fields'], $defaults['withdraw_fields']));
            foreach (array_keys($defaults['withdraw_fields']) as $fk) {
                $wf[$fk] = !empty($wf[$fk]);
            }
            $out['withdraw_fields'] = $wf;
        }
        if (isset($out['channels']) && is_array($out['channels'])) {
            $out['channels'] = DepositChannel::normalizeOverrides(array_values($out['channels']));
        } else {
            $out['channels'] = [];
        }
        usort($out['channels'], static function (array $a, array $b): int {
            $sa = $a['sort'] ?? 0;
            $sb = $b['sort'] ?? 0;
            if ($sa !== $sb) {
                return $sa <=> $sb;
            }

            return strcmp($a['code'] ?? '', $b['code'] ?? '');
        });

        unset($out['fx_pairs']);

        return $out;
    }

    /**
     * @param array<string, mixed> $row
     */
    private static function ratioStringFromRow(array $row, string $key): string
    {
        if (!isset($row[$key])) {
            return '';
        }
        if (is_string($row[$key])) {
            return trim($row[$key]);
        }
        if (is_numeric($row[$key])) {
            return strval($row[$key]);
        }

        return '';
    }

    private static function normalizeSort(mixed $v): int
    {
        $opt = filter_var($v, FILTER_VALIDATE_INT, ['options' => ['min_range' => 0, 'max_range' => 99999]]);
        if ($opt !== false) {
            return $opt;
        }
        if (is_numeric($v)) {
            $f = filter_var($v, FILTER_VALIDATE_FLOAT);
            if ($f !== false) {
                $rounded = round($f);
                $opt2 = filter_var($rounded, FILTER_VALIDATE_INT, ['options' => ['min_range' => 0, 'max_range' => 99999]]);
                if ($opt2 !== false) {
                    return $opt2;
                }
            }
        }

        return 0;
    }

    /**
     * @param array<string, mixed> $p
     */
    private static function validate(array $p): void
    {
        if (!isset($p['platform_coin']) || !is_array($p['platform_coin'])) {
            throw new InvalidArgumentException('platform_coin 格式错误');
        }
        $lz = $p['platform_coin']['label_zh'] ?? '';
        $le = $p['platform_coin']['label_en'] ?? '';
        if (!is_string($lz) || trim($lz) === '' || !is_string($le) || trim($le) === '') {
            throw new InvalidArgumentException('请填写平台币中英文名称');
        }
        if (!isset($p['currencies']) || !is_array($p['currencies']) || $p['currencies'] === []) {
            throw new InvalidArgumentException('至少保留一条货币');
        }
        $seenCodes = [];
        foreach ($p['currencies'] as $idx => $row) {
            if (!is_array($row)) {
                throw new InvalidArgumentException('货币列表第 ' . ($idx + 1) . ' 行格式错误');
            }
            $code = $row['code'] ?? '';
            if (!is_string($code) || !preg_match('/^[A-Z0-9]{2,12}$/', $code)) {
                throw new InvalidArgumentException('货币代码非法：' . (is_string($code) ? $code : ''));
            }
            if (isset($seenCodes[$code])) {
                throw new InvalidArgumentException('货币代码不能重复：' . $code);
            }
            $seenCodes[$code] = true;
            $dep = $row['deposit_coins_per_fiat'] ?? '';
            $wdr = $row['withdraw_coins_per_fiat'] ?? '';
            if (!is_string($dep) || $dep === '' || !is_numeric($dep) || bccomp($dep, '0', 8) <= 0) {
                throw new InvalidArgumentException('第 ' . ($idx + 1) . ' 行：充值汇率须为大于 0 的数字');
            }
            if (!is_string($wdr) || $wdr === '' || !is_numeric($wdr) || bccomp($wdr, '0', 8) <= 0) {
                throw new InvalidArgumentException('第 ' . ($idx + 1) . ' 行：提现汇率须为大于 0 的数字');
            }
        }
        if (isset($p['withdraw_banks']) && is_array($p['withdraw_banks'])) {
            $seen = [];
            foreach ($p['withdraw_banks'] as $idx => $row) {
                if (!is_array($row)) {
                    throw new InvalidArgumentException('银行第 ' . ($idx + 1) . ' 行格式错误');
                }
                $code = $row['code'] ?? '';
                if (!is_string($code) || !preg_match('/^[a-z0-9][a-z0-9_\-]{0,31}$/', $code)) {
                    throw new InvalidArgumentException('银行代码非法');
                }
                if (isset($seen[$code])) {
                    throw new InvalidArgumentException('银行代码重复：' . $code);
                }
                $seen[$code] = true;
            }
        }
        if (isset($p['withdraw_limits']) && is_array($p['withdraw_limits'])) {
            foreach (['min_ewallet', 'min_bank'] as $k) {
                $v = $p['withdraw_limits'][$k] ?? '0';
                if (!is_string($v) || !is_numeric($v) || bccomp($v, '0', 4) < 0) {
                    throw new InvalidArgumentException('提现最低限额须为不小于 0 的数字');
                }
            }
        }
        $reg = DepositChannel::codeRegistry();
        if ($reg !== [] && (!isset($p['channels']) || !is_array($p['channels']) || $p['channels'] === [])) {
            throw new InvalidArgumentException('请配置充值渠道');
        }
    }
}