#!/bin/bash

# ========================================================
# V.ps 全球数据中心 TCP 80 端口延迟测试 (双栈直连域名版)
# ========================================================

TCPING_EXE="tcping"

# ---------- 安装检测与全平台自动修复 ----------
if ! command -v tcping &>/dev/null && [ ! -f "./tcping" ]; then
    echo "未检测到系统 tcping，正在尝试智能安装..."
    if [ "$(uname -s)" = "Darwin" ]; then
        command -v brew &>/dev/null && brew install tcping
    else
        if command -v apt-get &>/dev/null; then
            sudo apt-get update -y && sudo apt-get install -y tcping 2>/dev/null
        elif command -v yum &>/dev/null; then
            sudo yum install -y tcping 2>/dev/null
        fi
        
        if ! command -v tcping &>/dev/null; then
            echo "提示: 官方软件源未找到 tcping，正在从 GitHub 下载独立二进制版..."
            ARCH=$(uname -m)
            URL="https://github.com/cloverstd/tcping/releases/download/v0.1.1/tcping-linux-amd64-v0.1.1.tar.gz"
            if [ "$ARCH" = "aarch64" ] || [ "$ARCH" = "arm64" ]; then
                URL="https://github.com/cloverstd/tcping/releases/download/v0.1.1/tcping-linux-arm64-v0.1.1.tar.gz"
            fi
            
            if command -v curl &>/dev/null; then
                curl -L "$URL" -o tcping.tar.gz
            elif command -v wget &>/dev/null; then
                wget -O tcping.tar.gz "$URL"
            fi
            
            if [ -f "tcping.tar.gz" ]; then
                tar -zxf tcping.tar.gz
                mv tcping-linux-* tcping 2>/dev/null
                chmod +x tcping
                rm -f tcping.tar.gz
                echo "独立版 tcping 下载并配置成功！"
            fi
        fi
    fi
fi

if command -v tcping &>/dev/null; then
    TCPING_EXE="tcping"
elif [ -f "./tcping" ]; then
    TCPING_EXE="././tcping"
fi

# ---------- 探测 tcping 支持的限次参数 ----------
TCPING_STYLE="unknown"
TCPING_CMD=""
_help=$( { "$TCPING_EXE" --help 2>&1; "$TCPING_EXE" -h 2>&1; } | head -60 )

if echo "$_help" | grep -qE '\-c[[:space:],]|--count'; then
    TCPING_CMD="$TCPING_EXE -c 3"
    TCPING_STYLE="linux"
elif echo "$_help" | grep -qE '\-n[[:space:],]|--number|-t[[:space:]]'; then
    TCPING_CMD="$TCPING_EXE -n 3"
    TCPING_STYLE="win"
else
    TCPING_CMD=""
    TCPING_STYLE="fallback"
fi

echo "检测到 tcping 风格: $TCPING_STYLE  命令: ${TCPING_CMD:-<使用nc兜底>}"

# ---------- 颜色 ----------
GREEN='\033[0;32m'; YELLOW='\033[0;33m'; PURPLE='\033[0;35m'; RED='\033[0;31m'; NC='\033[0m'

# ---------- 菜单选择 ----------
echo "----------------------------------------"
echo -e "请选择 V.ps 测试的网络类型:"
echo -e "  [${GREEN}1${NC}] 测试 IPv4"
echo -e "  [${GREEN}2${NC}] 测试 IPv6"
echo "----------------------------------------"
read -p "请输入数字 (1-2, 默认 1): " NET_CHOICE
[ -z "$NET_CHOICE" ] && NET_CHOICE="1"

if [ "$NET_CHOICE" = "2" ]; then
    IS_V6=1
    NET_TEXT="IPv6"
else
    IS_V6=0
    NET_TEXT="IPv4"
fi

# ---------- V.ps 区域域名数据表 ----------
declare -A domains=(
    ["NL-Amsterdam"]="ams.lg.v.ps"
    ["DE-Dusseldorf"]="dus.lg.v.ps"
    ["JP-Osaka"]="kix.lg.v.ps"
    ["GB-London"]="lon.lg.v.ps"
    ["JP-Tokyo"]="nrt.lg.v.ps"
    ["US-NewYork"]="nyc.lg.v.ps"
    ["US-Seattle-1"]="sea.lg.v.ps"
    ["US-Seattle-2"]="sea2.lg.v.ps"
    ["US-SiliconValley"]="sjc.lg.v.ps"
    ["AU-Sydney"]="syd.lg.v.ps"
    ["EE-Tallinn"]="tll.lg.v.ps"
)

declare -A names=(
    ["NL-Amsterdam"]="荷兰阿姆斯特丹"
    ["DE-Dusseldorf"]="德国杜塞尔多夫"
    ["JP-Osaka"]="日本大阪"
    ["GB-London"]="英国伦敦"
    ["JP-Tokyo"]="日本东京"
    ["US-NewYork"]="美国纽约 (美东)"
    ["US-Seattle-1"]="美国西雅图 (节点1)"
    ["US-Seattle-2"]="美国西雅图 (节点2)"
    ["US-SiliconValley"]="美国圣何塞 (美西)"
    ["AU-Sydney"]="澳大利亚悉尼"
    ["EE-Tallinn"]="爱沙尼亚塔林"
)

RESULT_FILE=$(mktemp 2>/dev/null || mktemp -t 'vps_tcping')
PROBE_COUNT=3
NC_TIMEOUT=4      # nc 兜底时的超时秒数

# ========================================================
# 从 tcping 原始输出中提取平均延迟（ms，纯数字）
# ========================================================
_extract_avg() {
    local raw="$1"
    local avg=""

    avg=$(echo "$raw" | grep -iE 'min/avg/max' \
          | grep -oE '[0-9]+\.?[0-9]*/[0-9]+\.?[0-9]*/[0-9]+\.?[0-9]*' \
          | awk -F'/' '{print $2}' | head -n1)
    [ -n "$avg" ] && { echo "$avg"; return; }

    avg=$(echo "$raw" | grep -iE 'average\s*=\s*[0-9]|avg\s*=\s*[0-9]' \
          | grep -oE '(average|avg)\s*=\s*[0-9]+\.?[0-9]*' \
          | grep -oE '[0-9]+\.?[0-9]*$' | head -n1)
    [ -n "$avg" ] && { echo "$avg"; return; }

    local vals
    vals=$(echo "$raw" | grep -oE 'time=[0-9]+\.?[0-9]*' | grep -oE '[0-9]+\.?[0-9]*')
    if [ -n "$vals" ]; then
        avg=$(echo "$vals" | awk '{s+=$1; c++} END{if(c>0) printf "%.2f", s/c}')
        [ -n "$avg" ] && { echo "$avg"; return; }
    fi
    echo ""
}

# ========================================================
# nc 兜底测速
# ========================================================
_nc_avg_ms() {
    local host=$1 port=$2
    local sum=0 ok=0 i
    local nc_opts="-z -w $NC_TIMEOUT"
    
    [ "$IS_V6" -eq 1 ] && nc_opts="$nc_opts -6"

    local use_ns=0
    date +%s%N 2>/dev/null | grep -qE '^[0-9]{16,}$' && use_ns=1

    for (( i=0; i<PROBE_COUNT; i++ )); do
        local t0 t1 ms
        if [ $use_ns -eq 1 ]; then
            t0=$(date +%s%N)
            nc $nc_opts "$host" "$port" 2>/dev/null
            local rc=$?
            t1=$(date +%s%N)
            [ $rc -ne 0 ] && continue
            ms=$(( (t1 - t0) / 1000000 ))
        else
            t0=$(date +%s)
            nc $nc_opts "$host" "$port" 2>/dev/null
            local rc=$?
            t1=$(date +%s)
            [ $rc -ne 0 ] && continue
            ms=$(( (t1 - t0) * 1000 ))
        fi
        [ "$ms" -lt 1 ] && ms=1
        sum=$(( sum + ms )); ok=$(( ok + 1 ))
        [ $i -lt $(( PROBE_COUNT-1 )) ] && sleep 0.15
    done

    [ $ok -eq 0 ] && { echo ""; return; }
    echo $(( sum / ok ))
}

# ========================================================
# 探测单节点主函数
# ========================================================
tcping_node() {
    local id=$1 name=$2 domain=$3
    local port=80
    local avg=""
    local extra_opts=""

    # 如果是 tcping 且选择了 v6，某些编译版本的 tcping 允许直连或需要增加参数，
    # 这里直接让域名由 tcping 自身底层库选择解析协议。
    if [ "$TCPING_STYLE" != "fallback" ] && [ -n "$TCPING_CMD" ]; then
        local raw
        raw=$( $TCPING_CMD "$domain" "$port" 2>&1 )
        avg=$(_extract_avg "$raw")
    fi

    if [ -z "$avg" ]; then
        avg=$(_nc_avg_ms "$domain" "$port")
    fi

    if echo "$avg" | grep -qE '^[0-9]+(\.[0-9]+)?$' && \
       awk -v v="$avg" 'BEGIN{exit !(v > 0 && v < 9000)}'; then
        local sort_key
        sort_key=$(printf "%07d" "$(echo "$avg" | awk '{printf "%d", int($1+0.5)}')")
        printf "%s | %-24s | %-20s | %s ms\n" "$sort_key" "$name" "$domain" "$avg" >> "$RESULT_FILE"
    else
        printf "9999999 | %-24s | %-20s | 端口关闭/超时(或本地缺少对应网络)\n" "$name" "$domain" >> "$RESULT_FILE"
    fi
}

# ---------- 主流程 ----------
echo "========================================================="
echo "   V.ps 全球数据中心 TCP 80 端口延迟测试中..."
echo "   每节点探测 ${PROBE_COUNT} 次 | 超时 ${NC_TIMEOUT}s | 协议: ${NET_TEXT}"
echo "========================================================="

for id in "${!domains[@]}"; do
    tcping_node "$id" "${names[$id]}" "${domains[$id]}" &
done

total=${#domains[@]}
while true; do
    done_count=$(wc -l < "$RESULT_FILE" 2>/dev/null | tr -d ' ')
    printf "\r   进度: %d / %d ..." "${done_count:-0}" "$total"
    [ "${done_count:-0}" -ge "$total" ] && break
    sleep 0.5
done
wait
echo -e "\n"

echo "==================== TCP 80 测试结果 (按延迟低到高) ===================="
printf "%-26s | %-20s | %s\n" "机房名称" "测试域名" "TCP 80 平均延迟"
echo "---------------------------------------------------------------------------------------"

sort -n "$RESULT_FILE" | while IFS="|" read -r _key r_name r_domain r_latency; do
    name=$(echo "$r_name"    | xargs)
    domain=$(echo "$r_domain"| xargs)
    lat=$(echo "$r_latency"  | xargs)
    num=$(echo "$lat" | grep -oE '^[0-9]+' | head -n1)

    if [ -z "$num" ] || [ "$num" -ge 9000 ] 2>/dev/null; then
        printf "${RED}%-26s | %-20s | %s${NC}\n" "$name" "$domain" "$lat"
    else
        if   [ "$num" -lt 80  ]; then COLOR=$GREEN
        elif [ "$num" -lt 180 ]; then COLOR=$YELLOW
        elif [ "$num" -lt 280 ]; then COLOR=$PURPLE
        else                          COLOR=$RED
        fi
        printf "${COLOR}%-26s | %-20s | %s${NC}\n" "$name" "$domain" "$lat"
    fi
done

rm -f "$RESULT_FILE"
echo "======================================================================================="
echo -e "颜色: ${GREEN}绿<80ms${NC}  ${YELLOW}黄80-179ms${NC}  ${PURPLE}紫180-279ms${NC}  ${RED}红≥280ms/超时${NC}"