347 lines
16 KiB
PHP
347 lines
16 KiB
PHP
<?php
|
||
/**
|
||
* 收银台订单前缀 / 订单号生成 —— 统一读配置的公共小工具（2026-10-06 创建，2026-10-07 改读 pay.md）
|
||
*
|
||
* 背景：平台 MySQL 的 pay_order 是多商户共用表，创单与三个补单脚本此前都把前缀
|
||
* 写死在各自代码里。生产服 / 测试服共用一个前缀就会互相捡单 —— 测试服
|
||
* 补单器把生产服的已支付单补进测试库，反过来也一样（2026-10-06 串数据的根因）。
|
||
*
|
||
* ★ 2026-10-07 订单号规则改读站点根目录 pay.md（配置+文档二合一文件）：
|
||
* - 只认「### 以下是配置区域：」后第一个 ```json``` 块，其余说明区全部忽略；
|
||
* - 「前缀码」= 完整订单前缀（创单与补单永远一致），payOrderPrefix() 的第一来源；
|
||
* - 「是否固定订单号格式」= true → 用「订单号格式」模板：[]去掉、纯数字的 0 换随机；
|
||
* 模板非纯数字（或为空）→ 回退保底 6 位递增序列 000001/000002…（计数器持久化在
|
||
* db/pay_order_seq.txt，flock 防并发撞单）；
|
||
* - = false → 按「当前配置」组合规则生成（+/- 连接符不进订单号，验证码位数读
|
||
* 「订单验证码长度」字段而非文本里的数字）；
|
||
* - pay.md 缺失 / 解析失败 → 一律回退旧版逻辑（前缀+时间+4码+玩家名），行为与改造前一致。
|
||
*
|
||
* 前缀兼容（防串单，2026-10-06 事故修复的延续）：
|
||
* - payOrderPrefix() 第一来源 pay.md「前缀码」→ 回退 config.php 的 PAY_ORDER_PREFIX
|
||
* → 回退 'RE'，只保留字母数字（要拼进 SQL LIKE，与平台侧约定一致）；
|
||
* - payOrderIsOurs() 认「当前前缀 + 历史前缀(PAY_ORDER_PREFIX)」任一，改前缀后
|
||
* 历史在途单仍被补单器/查询接口认领；
|
||
* - payOrderPrefixLikeAny() 给补单器用的双前缀 SQL 条件（poller_online /
|
||
* recharge_orders_api / pay_poller），扫描范围与 payOrderIsOurs 一致。
|
||
*
|
||
* ★ 本文件不依赖 core.php，任何脚本（含自包含的 poller）都能直接 require。
|
||
* ★ 可用 define('PAY_MD_PATH', '/path/pay.md') 覆盖 pay.md 路径（仅测试用）。
|
||
* ★ 债券换算（estimateBonds）不在本文件：金额→债券由后台「充值商店配置」
|
||
* (shop_configs.bond_reward) 决定，代码不干预比例。
|
||
*/
|
||
|
||
if (!function_exists('payMdOrderConfig')) {
|
||
/**
|
||
* 读 pay.md「### 以下是配置区域：」之后的第一个 ```json``` 块。
|
||
* 二合一文件里说明区的表格 / 文本一律忽略。
|
||
*
|
||
* @return array|null 解析成功返回关联数组；缺失/损坏返回 null（调用方回退旧逻辑）
|
||
*/
|
||
function payMdOrderConfig() {
|
||
$path = defined('PAY_MD_PATH') ? PAY_MD_PATH : dirname(__DIR__) . '/pay.md';
|
||
if (!is_file($path)) return null;
|
||
$md = @file_get_contents($path);
|
||
if (!is_string($md) || $md === '') return null;
|
||
$pos = strpos($md, '以下是配置区域');
|
||
if ($pos === false) return null;
|
||
if (!preg_match('/```(?:json|JSON)?\s*(.*?)```/s', substr($md, $pos), $m)) return null;
|
||
$cfg = json_decode(trim($m[1]), true);
|
||
return is_array($cfg) ? $cfg : null;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderPrefix')) {
|
||
/**
|
||
* 订单号前缀（永不返回空串）—— 第一来源 pay.md「前缀码」。
|
||
* pay.md 缺失/未配/解析失败时回退 config.php 的 PAY_ORDER_PREFIX，再回退 'RE'
|
||
* （与 2026-10-06 改造前的行为完全一致，线上老配置零变化）。
|
||
* 只保留字母数字：它要拼进 SQL 的 LIKE '前缀%'，也与平台侧约定一致。
|
||
*/
|
||
function payOrderPrefix() {
|
||
$p = '';
|
||
$cfg = payMdOrderConfig();
|
||
if (is_array($cfg) && isset($cfg['前缀码'])) {
|
||
$p = trim((string)$cfg['前缀码']);
|
||
}
|
||
if ($p === '') {
|
||
$p = defined('PAY_ORDER_PREFIX') ? trim((string)PAY_ORDER_PREFIX) : '';
|
||
}
|
||
if ($p === '') return 'RE';
|
||
$p = preg_replace('/[^A-Za-z0-9]/', '', $p);
|
||
return $p === '' ? 'RE' : $p;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderPrefixes')) {
|
||
/**
|
||
* 本端全部有效前缀 = [当前前缀(pay.md), 历史前缀(PAY_ORDER_PREFIX，不同时才带上)]。
|
||
* 用于「认旧单」：改前缀后，改动前已生成、尚未补单的订单仍能被本端认领。
|
||
* @return string[]
|
||
*/
|
||
function payOrderPrefixes() {
|
||
$list = array(payOrderPrefix());
|
||
$legacy = defined('PAY_ORDER_PREFIX') ? preg_replace('/[^A-Za-z0-9]/', '', trim((string)PAY_ORDER_PREFIX)) : '';
|
||
if ($legacy !== '' && !in_array($legacy, $list, true)) {
|
||
$list[] = $legacy;
|
||
}
|
||
return $list;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderPrefixLen')) {
|
||
/** 前缀长度（strncmp 用） */
|
||
function payOrderPrefixLen() {
|
||
return strlen(payOrderPrefix());
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderIsOurs')) {
|
||
/**
|
||
* 判断一个 out_trade_no 是否本端订单（补单器/查询接口的兜底校验）
|
||
* 当前前缀与历史前缀命中其一即算本端单。
|
||
* @param string $outNo
|
||
* @return bool
|
||
*/
|
||
function payOrderIsOurs($outNo) {
|
||
foreach (payOrderPrefixes() as $p) {
|
||
if (strncmp((string)$outNo, $p, strlen($p)) === 0) return true;
|
||
}
|
||
return false;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderPrefixLike')) {
|
||
/** SQL 片段：out_trade_no LIKE '当前前缀%'（单前缀，向后兼容保留） */
|
||
function payOrderPrefixLike() {
|
||
return payOrderPrefix() . '%';
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payOrderPrefixLikeAny')) {
|
||
/**
|
||
* SQL 条件片段：out_trade_no LIKE '当前前缀%' OR out_trade_no LIKE '历史前缀%'。
|
||
* 补单器扫描用，与 payOrderIsOurs 的认定范围一致；前缀均已净化为字母数字，无需转义。
|
||
* 用法：WHERE (".payOrderPrefixLikeAny().") AND status IN (1,2)
|
||
* @return string
|
||
*/
|
||
function payOrderPrefixLikeAny() {
|
||
$conds = array();
|
||
foreach (payOrderPrefixes() as $p) {
|
||
$conds[] = "out_trade_no LIKE '" . $p . "%'";
|
||
}
|
||
return implode(' OR ', $conds);
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payRandomCode')) {
|
||
/**
|
||
* 随机校验码：长度 1~32，去掉易混的 I/O/0/1
|
||
* @param int $len
|
||
* @return string
|
||
*/
|
||
function payRandomCode($len) {
|
||
$len = (int)$len;
|
||
if ($len < 1) $len = 4;
|
||
if ($len > 32) $len = 32;
|
||
$cs = 'ABCDEFGHJKLMNPQRSTUVWXYZ23456789';
|
||
$out = '';
|
||
for ($i = 0; $i < $len; $i++) {
|
||
$out .= $cs[mt_rand(0, strlen($cs) - 1)];
|
||
}
|
||
return $out;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payComposeOrderNo')) {
|
||
/**
|
||
* 按「当前配置」组合规则拼订单号。连接符（+/-/＋/－）只作分隔，不进订单号。
|
||
* 变量映射（中文变量名与说明区英文别名都认）：
|
||
* 剦缀码/front → 当前前缀；当前时间/下单时间/timeis → YmdHis；
|
||
* 订单验证码/校验码/ordcode → 随机码（长度读「订单验证码长度」，不读文本里的"N位"）；
|
||
* 玩家名字/用户名/username → 净化后的玩家名；未知变量忽略。
|
||
*
|
||
* @param string $tpl 「当前配置」原文，如 剦缀码+当前时间+4位订单验证码+玩家名字
|
||
* @param int $codeLen 验证码长度
|
||
* @param string $name 已净化的玩家名
|
||
* @return array|null [前段, 后段, 是否含玩家名]（订单号=前段.玩家名.后段）；无有效段返回 null
|
||
*/
|
||
function payComposeOrderNo($tpl, $codeLen, $name) {
|
||
$tokens = preg_split('/[+\-\x{FF0B}\x{FF0D}]/u', (string)$tpl);
|
||
if (!is_array($tokens) || count($tokens) === 0) return null;
|
||
$pre = ''; // 玩家名之前的段落
|
||
$post = ''; // 玩家名之后的段落
|
||
$withName = false; // 组合里含玩家名变量（payGuardLen 据此裁剪）
|
||
$afterName = false; // 已越过玩家名位置
|
||
$valid = false;
|
||
foreach ($tokens as $t) {
|
||
$t = trim($t);
|
||
if ($t === '') continue;
|
||
$tl = strtolower($t);
|
||
if (strpos($t, '前缀') !== false || $tl === 'front') {
|
||
$seg = payOrderPrefix();
|
||
} elseif (strpos($t, '时间') !== false || strpos($t, '日期') !== false || $tl === 'timeis') {
|
||
$seg = date('YmdHis');
|
||
} elseif (strpos($t, '验证码') !== false || strpos($t, '校验码') !== false || $tl === 'ordcode') {
|
||
$seg = payRandomCode($codeLen);
|
||
} elseif (!$afterName && !$withName
|
||
&& (strpos($t, '玩家') !== false || strpos($t, '用户') !== false || $tl === 'username')) {
|
||
// 玩家名段：本身由 payGuardLen 统一拼装，这里只切换分段状态（重复的玩家名变量忽略）
|
||
$withName = true;
|
||
$afterName = true;
|
||
$valid = true;
|
||
continue;
|
||
} else {
|
||
continue; // 未知变量忽略
|
||
}
|
||
if ($afterName) $post .= $seg; else $pre .= $seg;
|
||
$valid = true;
|
||
}
|
||
if (!$valid) return null;
|
||
return array($pre, $post, $withName);
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payMakeFixedOrderNo')) {
|
||
/**
|
||
* 固定订单号格式分支：前缀码 + 订单号格式模板。
|
||
* 模板 [] 去掉；
|
||
* - 纯数字（如 00000000）→ 按【模板位数】递增序列：00000001、00000002…
|
||
* （计数器持久化在 db/pay_order_seq.txt，flock 防撞单；当前无订单则从 1 开始）；
|
||
* - 非纯数字或为空 → 保底 6 位递增序列 000001、000002…。
|
||
* @param array $cfg pay.md 配置区
|
||
* @return string
|
||
*/
|
||
function payMakeFixedOrderNo($cfg) {
|
||
$p = payOrderPrefix();
|
||
$tpl = isset($cfg['订单号格式']) ? (string)$cfg['订单号格式'] : '';
|
||
$tpl = str_replace(array('[', ']', "\u{FF3B}", "\u{FF3D}", ' ', "\t"), '', $tpl);
|
||
if ($tpl !== '' && ctype_digit($tpl)) {
|
||
// ★ 纯数字模板：按模板位数递增序列（00000000 → CYZJ00000001, CYZJ00000002…）
|
||
$no = payMakeSequentialOrderNo($tpl);
|
||
} else {
|
||
// 非纯数字模板（或空）→ 保底 6 位递增序列
|
||
$no = payMakeSequentialOrderNo('000000');
|
||
}
|
||
$max = defined('PAY_ORDER_MAX_LEN') ? (int)PAY_ORDER_MAX_LEN : 64;
|
||
if ($max > 0 && strlen($no) > $max) $no = substr($no, 0, $max);
|
||
return $no;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payMakeSequentialOrderNo')) {
|
||
/**
|
||
* 递增序列订单号：前缀 + 模板位数的序列（000001、000002…，默认 6 位）。
|
||
* 计数器持久化在 db/pay_order_seq.txt（flock 排他锁读写改，防并发撞单）；
|
||
* 计数器不可写时退化为「前缀+日期时间+3位随机」，保底不与历史单撞号。
|
||
*
|
||
* @param string $tpl 位数模板（纯数字，如 '00000000'），决定序列补零位数
|
||
* @return string
|
||
*/
|
||
function payMakeSequentialOrderNo($tpl = '000000') {
|
||
$p = payOrderPrefix();
|
||
$width = strlen(ctype_digit($tpl) ? $tpl : '000000');
|
||
$dir = dirname(__DIR__) . '/db';
|
||
if (!is_dir($dir)) @mkdir($dir, 0755, true);
|
||
$file = $dir . '/pay_order_seq.txt';
|
||
$n = 0;
|
||
$fp = @fopen($file, 'c+');
|
||
if ($fp !== false) {
|
||
if (flock($fp, LOCK_EX)) {
|
||
$raw = trim((string)stream_get_contents($fp));
|
||
$n = (is_numeric($raw) && (int)$raw > 0) ? (int)$raw : 0;
|
||
$n++;
|
||
ftruncate($fp, 0);
|
||
rewind($fp);
|
||
fwrite($fp, (string)$n);
|
||
fflush($fp);
|
||
flock($fp, LOCK_UN);
|
||
}
|
||
fclose($fp);
|
||
}
|
||
if ($n <= 0) {
|
||
return $p . date('ymdHis') . str_pad((string)mt_rand(0, 999), 3, '0', STR_PAD_LEFT);
|
||
}
|
||
return $p . str_pad((string)$n, $width, '0', STR_PAD_LEFT);
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payGuardLen')) {
|
||
/**
|
||
* 长度护栏：平台 out_trade_no 默认 varchar(64)。
|
||
* 订单号 = $pre . 玩家名 . $post（$withName=false 时玩家名不参与）。
|
||
* 超长时先裁玩家名段，其次整体裁尾（前缀在头部绝不被裁 —— 前缀一旦被截，
|
||
* 补单器就再也认不出这单了）。
|
||
*
|
||
* @return string
|
||
*/
|
||
function payGuardLen($pre, $post, $name, $withName) {
|
||
$max = defined('PAY_ORDER_MAX_LEN') ? (int)PAY_ORDER_MAX_LEN : 64;
|
||
if ($max <= 0) return $withName ? $pre . $name . $post : $pre . $post;
|
||
if (!$withName || $name === '') {
|
||
$no = $pre . $post;
|
||
return strlen($no) > $max ? substr($no, 0, $max) : $no;
|
||
}
|
||
$fixed = strlen($pre) + strlen($post);
|
||
$allow = $max - $fixed;
|
||
if ($allow >= strlen($name)) {
|
||
return $pre . $name . $post;
|
||
}
|
||
if ($allow > 0) {
|
||
return $pre . substr($name, 0, $allow) . $post;
|
||
}
|
||
// 极端情况（前缀配得极长）：先退回不含玩家名的形态，仍超长则整体裁尾保前缀
|
||
$no = $pre . $post;
|
||
return strlen($no) > $max ? substr($no, 0, $max) : $no;
|
||
}
|
||
}
|
||
|
||
if (!function_exists('payMakeOrderNo')) {
|
||
/**
|
||
* 生成本端订单号（2026-10-07 改读 pay.md 配置区）
|
||
*
|
||
* 分支：
|
||
* 1) 「是否固定订单号格式」= true → payMakeFixedOrderNo（模板纯数字0换随机 /
|
||
* 非纯数字回退 6 位递增序列），不再读组合规则；
|
||
* 2) = false（或 pay.md 缺失/解析失败）→ 按「当前配置」组合；组合规则缺失时
|
||
* 回退旧版默认（前缀 + 年月日时分秒 + 4位随机校验码 + 玩家名，
|
||
* 例：CYZJ20261006171418Q101youpaishidifu），行为与改造前完全一致。
|
||
*
|
||
* 玩家名只保留 [A-Za-z0-9_]（Minecraft 用户名规则），其余字符剔除；
|
||
* 剔除后为空则整段省略，保证前缀/时间戳/校验码绝不被破坏。
|
||
*
|
||
* @param string $playerName 下单玩家名
|
||
* @return string
|
||
*/
|
||
function payMakeOrderNo($playerName = '') {
|
||
$cfg = payMdOrderConfig();
|
||
|
||
// 玩家名净化：只留字母数字下划线
|
||
$name = preg_replace('/[^A-Za-z0-9_]/', '', (string)$playerName);
|
||
if ($name === '') $name = '';
|
||
|
||
// —— 分支 1：固定订单号格式 ——
|
||
if (is_array($cfg) && !empty($cfg['是否固定订单号格式'])) {
|
||
return payMakeFixedOrderNo($cfg);
|
||
}
|
||
|
||
// —— 分支 2：按「当前配置」组合规则 ——
|
||
if (is_array($cfg) && isset($cfg['当前配置']) && trim((string)$cfg['当前配置']) !== '') {
|
||
$codeLen = 4;
|
||
if (isset($cfg['订单验证码长度'])) {
|
||
$l = (int)$cfg['订单验证码长度'];
|
||
if ($l >= 1 && $l <= 32) $codeLen = $l;
|
||
}
|
||
$r = payComposeOrderNo(trim((string)$cfg['当前配置']), $codeLen, $name);
|
||
if ($r !== null && ($r[0] . $r[1]) !== '') {
|
||
return payGuardLen($r[0], $r[1], $name, $r[2]);
|
||
}
|
||
}
|
||
|
||
// —— 回退：旧版默认组合（pay.md 缺失/解析失败/无有效规则）——
|
||
$p = payOrderPrefix();
|
||
$stamp = date('YmdHis'); // 14位：20261006171418
|
||
$code = payRandomCode(4); // 4位校验码（去掉易混的 I/O/0/1）
|
||
return payGuardLen($p . $stamp . $code, '', $name, true);
|
||
}
|
||
}
|