#!/bin/bash
# Name: ipfn
# Version: 1.3.5
# Date: 2026-01-22
# Description: Smart testing for multi-target ports and fixed UUID listing format.

if [ "$(id -u)" -ne 0 ]; then
    exec sudo "$0" "$@"
fi

TABLE_NAME="ipf_wrapper"
VERSION="1.3.5"
PROTO="tcp"
FORCE_FLAG=false
SKIP_TEST=false
QUIET_MODE=false

# --- 1. Utility & Core ---

msg() { [[ "$QUIET_MODE" == false ]] && echo -e "$@"; }

init_nft() {
    nft add table inet "${TABLE_NAME}" 2>/dev/null
    nft add chain inet "${TABLE_NAME}" prerouting { type nat hook prerouting priority -100 \; } 2>/dev/null
    nft add chain inet "${TABLE_NAME}" output { type nat hook output priority -100 \; } 2>/dev/null
    nft add chain inet "${TABLE_NAME}" postrouting { type nat hook postrouting priority 100 \; } 2>/dev/null
    nft add chain inet "${TABLE_NAME}" forward { type filter hook forward priority 0 \; policy accept \; } 2>/dev/null
}

list_rules() {
    [[ "$QUIET_MODE" == true ]] && return
    local highlight_uuid=$1
    init_nft
    msg "Forwarding Rules (ipfn):"
    printf "%-10s %-6s %-20s %-20s %-10s\n" "HANDLE" "PROTO" "LOCAL" "TARGET" "UUID"
    echo "-----------------------------------------------------------------------------------"
    nft -a list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep "dnat" | while read -r line; do
        handle=$(echo "$line" | grep -o 'handle [0-9]*' | awk '{print $2}')
        proto=$(echo "$line" | grep -q "udp" && echo "udp" || echo "tcp")
        target=$(echo "$line" | grep -oE '([0-9.]+|\[[0-9a-fA-F:]+\]):[0-9]+' | head -n 1)
        lport=$(echo "$line" | grep -o 'dport [0-9]*' | awk '{print $2}')
        full_uuid=$(echo "$line" | grep -o 'ipf-id:[a-z0-9-]*' | cut -d':' -f2)
        
        # 表示のズレを修正 (スペース調整)
        if [[ -n "$highlight_uuid" && "$full_uuid" == "$highlight_uuid" ]]; then
            printf "\e[1;36m*%-9s %-6s %-20s %-20s %-10s\e[0m\n" "$handle" "$proto" ":$lport" "$target" "${full_uuid:0:8}"
        else
            printf " %-9s %-6s %-20s %-20s %-10s\n" "$handle" "$proto" ":$lport" "$target" "${full_uuid:0:8}"
        fi
    done
}

get_total_packets() {
    local uuid=$1
    local total=0
    local counts=$(nft list table inet "${TABLE_NAME}" 2>/dev/null | grep "$uuid" | grep -o 'packets [0-9]*' | awk '{print $2}')
    for c in $counts; do total=$((total + c)); done
    echo "$total"
}

test_port_simple() {
    local p=$1
    echo -n "Testing :$p... "
    if nc -z -v -w 2 127.0.0.1 "$p" 2>&1 | grep -iqE "succeeded|connected|open"; then
        echo -e "\e[32mOK\e[0m"
    else
        echo -e "\e[31mFAILED\e[0m"
    fi
}

test_specific_rule() {
    local lp=$1
    local full_id=$2
    local short_id="${full_id#*:}"
    echo -n "Verifying specific rule [${short_id:0:8}] on :$lp... "
    local count_before=$(get_total_packets "$full_id")
    nc -z -v -w 1 127.0.0.1 "$lp" >/dev/null 2>&1
    sleep 0.1
    local count_after=$(get_total_packets "$full_id")
    if (( count_after > count_before )); then
        echo -e "\e[32mPASSED\e[0m (Rule matched)"
    else
        echo -e "\e[31mSKIPPED\e[0m (Blocked by prior rule)"
    fi
}

# --- 2. Deletion & Reset ---

all_clear() {
    if [[ "$FORCE_FLAG" == false ]]; then
        echo -e "\e[33mWarning: This will delete ALL forwarding rules.\e[0m"
        read -p "Are you sure? (y/N): " confirm
        [[ ! "$confirm" =~ ^[yY]$ ]] && exit 0
    fi
    nft delete table inet "${TABLE_NAME}" 2>/dev/null
    init_nft; msg "All rules cleared successfully."; list_rules; exit 0 
}

# --- 3. Main Loop ---

for arg in "$@"; do
    [[ "$arg" =~ q ]] && QUIET_MODE=true && FORCE_FLAG=true && SKIP_TEST=true
    [[ "$arg" =~ f ]] && FORCE_FLAG=true && SKIP_TEST=true
    [[ "$arg" == "-R" ]] && RESET_MODE=true
    [[ "$arg" == "--version" ]] && { echo "ipfn version ${VERSION}"; exit 0; }
done

if [[ "$RESET_MODE" == true ]]; then all_clear; fi
if [[ $# -eq 0 ]]; then list_rules; exit 0; fi

while [[ $# -gt 0 ]]; do
    case "$1" in
        -h|--help) show_help; exit 0 ;;
        -L|-l) list_rules; exit 0 ;;
        -*[d]*)
            h_str=$(echo "$1" | sed -E 's/^-q?d?f?//')
            [[ -z "$h_str" ]] && { h_str="$2"; shift; }
            if [[ "$h_str" == "all" || "$h_str" == "*" ]]; then all_clear; fi
            handles=()
            IFS=',' read -r -a parts <<< "$h_str"
            for part in "${parts[@]}"; do
                if [[ "$part" =~ ^:([0-9]+)$ ]]; then
                    p="${BASH_REMATCH[1]}"
                    for h in $(nft -a list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep "dport $p" | grep -o 'handle [0-9]*' | awk '{print $2}'); do handles+=("$h"); done
                else handles+=("$part"); fi
            done
            for h in "${handles[@]}"; do
                uuid=$(nft -a list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep "handle $h" | grep -o 'ipf-id:[a-z0-9-]*')
                [[ -z "$uuid" ]] && continue
                for c in prerouting output forward postrouting; do
                    nft -a list chain inet "${TABLE_NAME}" "$c" 2>/dev/null | grep "$uuid" | grep -o 'handle [0-9]*' | awk '{print $2}' | while read -r rh; do
                        nft delete rule inet "${TABLE_NAME}" "$c" handle "$rh"
                    done
                done
                msg "Deleted handle $h"
            done
            list_rules; exit 0 ;;
        -t*)
            h_str="${1#-t}"; [[ -z "$h_str" && -n "$2" ]] && { h_str="$2"; shift; }
            tp=""
            # スマート・テストロジック
            if [[ "$h_str" =~ ^:?([0-9]+):?$ ]]; then 
                tp="${BASH_REMATCH[1]}"
            elif [[ -n "$h_str" ]]; then 
                tp=$(nft -a list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep "handle $h_str" | grep -o 'dport [0-9]*' | awk '{print $2}')
            else 
                # 引数なしの場合は一番上のルールのポートを取得
                tp=$(nft -a list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep "dnat" | head -n 1 | grep -o 'dport [0-9]*' | awk '{print $2}')
            fi
            
            [[ -n "$tp" ]] && test_port_simple "$tp" || msg "Error: No active rules found."
            exit 0 ;;
        *)
            if [[ "$1" =~ ^[0-9] ]]; then
                init_nft
                raw="$1"
                if [[ "$raw" =~ ^([0-9]+):([0-9\.]+):([0-9]+)$ ]]; then lp=${BASH_REMATCH[1]}; tip=${BASH_REMATCH[2]}; tp=${BASH_REMATCH[3]}
                elif [[ "$raw" =~ ^([0-9]+):([0-9]+)$ ]]; then lp=${BASH_REMATCH[1]}; tip="127.0.0.1"; tp=${BASH_REMATCH[2]}
                elif [[ "$raw" =~ ^([0-9]+)$ ]]; then lp=${BASH_REMATCH[1]}; tip="127.0.0.1"; tp=${BASH_REMATCH[1]}
                fi
                
                nft list chain inet "${TABLE_NAME}" prerouting 2>/dev/null | grep -q "dport $lp" && multi_mode=true || multi_mode=false
                u_raw=$(cat /proc/sys/kernel/random/uuid); u="ipf-id:$u_raw"; fam="ip"; [[ "$tip" =~ : ]] && fam="ip6"
                
                nft add rule inet "${TABLE_NAME}" prerouting "$PROTO" dport "$lp" counter dnat $fam to "$tip:$tp" comment "\"$u\""
                nft add rule inet "${TABLE_NAME}" output "$PROTO" dport "$lp" counter dnat $fam to "$tip:$tp" comment "\"$u\""
                nft add rule inet "${TABLE_NAME}" forward $fam daddr "$tip" "$PROTO" dport "$tp" ct state new,established,related accept comment "\"$u\""
                nft add rule inet "${TABLE_NAME}" forward $fam saddr "$tip" "$PROTO" sport "$tp" ct state established,related accept comment "\"$u\""
                nft add rule inet "${TABLE_NAME}" forward iifname "lo" accept comment "\"$u\""
                nft add rule inet "${TABLE_NAME}" postrouting $fam daddr "$tip" "$PROTO" dport "$tp" masquerade comment "\"$u\""
                
                list_rules "$u_raw"
                [[ "$multi_mode" == true ]] && msg "\e[33mNote: Port :$lp is now multi-targeted.\e[0m"
                [[ "$SKIP_TEST" == false ]] && { echo ""; test_specific_rule "$lp" "$u"; }
                exit 0
            fi ;;
    esac
    shift
done