#!/bin/bash

# ========================================================
# 甲骨文全球区域 TCP 443 端口延迟测试 (完美修复版)
# 修复点：
#   1. 延迟提取：不再依赖 avg 行数字位置，改用精准字段解析
#   2. 超时兜底：无 -c 参数时改用 nc/bash-tcp 自测，彻底规避 tcping 被强杀
#   3. 去掉错误过滤条件（"failed"/"Unknown" 字符串并非所有版本都有）
#   4. 【新增修复】完美解决 Ubuntu 22.04 等系统无法通过 apt 自动安装 tcping 的问题
# ========================================================

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
        
        # 【核心修复】如果包管理器下载失败，自动从 GitHub 下载 Go 编译的高性能单文件版
        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
            
            # 使用 curl 或 wget 下载
            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
                # 解压出来通常是带有架构名字的文件，我们统一重命名为当前目录下的 ./tcping
                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
    # Linux tcping (apt 版 / cloverstd 版) 风格：-c N
    TCPING_CMD="$TCPING_EXE -c 3"
    TCPING_STYLE="linux"
elif echo "$_help" | grep -qE '\-n[[:space:],]|--number|-t[[:space:]]'; then
    # Windows 移植版 / 某些变体：-n N
    TCPING_CMD="$TCPING_EXE -n 3"
    TCPING_STYLE="win"
else
    # 完全未知版本，后面用 nc 兜底
    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'

# ---------- 区域表 ----------
declare -A regions=(
    ["ap-tokyo-1"]="日本东京"           ["ap-osaka-1"]="日本大阪"
    ["ap-seoul-1"]="韩国首尔"           ["ap-chuncheon-1"]="韩国春川"
    ["ap-singapore-1"]="新加坡"         ["ap-singapore-2"]="新加坡西"
    ["ap-sydney-1"]="澳大利亚悉尼"     ["ap-melbourne-1"]="澳大利亚墨尔本"
    ["ap-mumbai-1"]="印度孟买"          ["ap-hyderabad-1"]="印度海得拉巴"
    ["eu-frankfurt-1"]="德国法兰克福"   ["eu-amsterdam-1"]="荷兰阿姆斯特丹"
    ["uk-london-1"]="英国伦敦"          ["uk-cardiff-1"]="英国卡迪夫"
    ["eu-paris-1"]="法国巴黎"           ["eu-marseille-1"]="法国马赛"
    ["eu-milan-1"]="意大利米兰"         ["eu-zurich-1"]="瑞士苏黎世"
    ["eu-madrid-1"]="西班牙马德里"      ["eu-stockholm-1"]="瑞典斯德哥尔摩"
    ["us-sanjose-1"]="美国圣何塞(美西)" ["us-phoenix-1"]="美国菲尼克斯(美西)"
    ["us-ashburn-1"]="美国阿什本(美东)" ["us-chicago-1"]="美国芝加哥(美中)"
    ["ca-toronto-1"]="加拿大多伦多"     ["ca-montreal-1"]="加拿大蒙特利尔"
    ["sa-saopaulo-1"]="巴西圣保罗"      ["sa-santiago-1"]="智利圣地亚哥"
)

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

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

    # 格式A：min/avg/max = 数字/数字/数字
    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; }

    # 格式B：Average = 数字ms 或 avg=数字ms
    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; }

    # 格式C：逐行 time=数字ms 或 来自 cloverstd 版本的 "Ping statistics" 逐行输出
    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 兜底：连接 PROBE_COUNT 次，用 date +%s%N 计时，取平均
# ========================================================
_nc_avg_ms() {
    local host=$1 port=$2
    local sum=0 ok=0 i

    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 -z -w "$NC_TIMEOUT" "$host" "$port" 2>/dev/null
            local rc=$?
            t1=$(date +%s%N)
            [ $rc -ne 0 ] && continue
            ms=$(( (t1 - t0) / 1000000 ))
        else
            t0=$(date +%s)
            nc -z -w "$NC_TIMEOUT" "$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
    local domain="objectstorage.${id}.oraclecloud.com"
    local port=443
    local avg=""

    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 | %-22s | %-20s | %s ms\n" "$sort_key" "$name" "$id" "$avg" >> "$RESULT_FILE"
    else
        printf "9999999 | %-22s | %-20s | 端口关闭/连接超时\n" "$name" "$id" >> "$RESULT_FILE"
    fi
}

# ---------- 主流程 ----------
echo "========================================================="
echo "   甲骨文全球区域 TCP 443 端口延迟测试中..."
echo "   每节点探测 ${PROBE_COUNT} 次 | 超时 ${NC_TIMEOUT}s"
echo "========================================================="

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

total=${#regions[@]}
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 443 测试结果 (按延迟低到高) ===================="
printf "%-24s | %-20s | %s\n" "区域名称" "区域 Identifier" "TCP 443 平均延迟"
echo "------------------------------------------------------------------------------"

sort -n "$RESULT_FILE" | while IFS="|" read -r _key r_name r_id r_latency; do
    name=$(echo "$r_name"    | xargs)
    rid=$(echo "$r_id"       | 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}%-24s | %-20s | %s${NC}\n" "$name" "$rid" "$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}%-24s | %-20s | %s${NC}\n" "$name" "$rid" "$lat"
    fi
done

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