package main

import (
	"context"
	"flag"
	"fmt"
	"log"
	"os"
	"os/exec"
	"os/signal"
	"path/filepath"
	"strings"
	"syscall"

	"git.debros.io/DeBros/network/pkg/config"
	"git.debros.io/DeBros/network/pkg/constants"
	"git.debros.io/DeBros/network/pkg/logging"
	"git.debros.io/DeBros/network/pkg/node"
)

func main() {
	var (
		dataDir   = flag.String("data", "", "Data directory (auto-detected if not provided)")
		nodeID    = flag.String("id", "", "Node identifier (for running multiple local nodes)")
		bootstrap = flag.String("bootstrap", "", "Bootstrap peer address (for manual override)")
		role      = flag.String("role", "auto", "Node role: auto|bootstrap|node (auto detects based on config)")
		rqlHTTP   = flag.Int("rqlite-http-port", 5001, "RQLite HTTP API port")
		rqlRaft   = flag.Int("rqlite-raft-port", 7001, "RQLite Raft port")
		help      = flag.Bool("help", false, "Show help")
	)
	flag.Parse()

	if *help {
		flag.Usage()
		return
	}

	// Determine node role
	var isBootstrap bool
	switch strings.ToLower(*role) {
	case "bootstrap":
		isBootstrap = true
	case "node":
		isBootstrap = false
	default:
		// Auto-detect if this is a bootstrap node based on configuration
		isBootstrap = isBootstrapNode()
	}

	// Set default data directory if not provided
	if *dataDir == "" {
		if isBootstrap {
			*dataDir = "./data/bootstrap"
		} else {
			if *nodeID != "" {
				*dataDir = fmt.Sprintf("./data/node-%s", *nodeID)
			} else {
				*dataDir = "./data/node"
			}
		}
	}

	// LibP2P uses port 4001, RQLite uses 5001 (HTTP) and 7001 (Raft)
	port := 4001

	// Create logger with appropriate component type
	var logger *logging.StandardLogger
	var err error
	if isBootstrap {
		logger, err = logging.NewStandardLogger(logging.ComponentBootstrap)
	} else {
		logger, err = logging.NewStandardLogger(logging.ComponentNode)
	}
	if err != nil {
		log.Fatalf("Failed to create logger: %v", err)
	}

	// Load configuration based on node type
	var cfg *config.Config
	if isBootstrap {
		cfg = config.BootstrapConfig()
		logger.Printf("Starting bootstrap node...")
	} else {
		cfg = config.DefaultConfig()
		logger.Printf("Starting regular node...")
	}

	// Set basic configuration
	cfg.Node.DataDir = *dataDir
	cfg.Node.ListenAddresses = []string{
		fmt.Sprintf("/ip4/0.0.0.0/tcp/%d", port),
		fmt.Sprintf("/ip4/0.0.0.0/udp/%d/quic", port),
	}

	// RQLite ports (overridable for local multi-node on one host)
	cfg.Database.RQLitePort = *rqlHTTP
	cfg.Database.RQLiteRaftPort = *rqlRaft

	if isBootstrap {
		// Check if this is the primary bootstrap node (first in list) or secondary
		bootstrapPeers := constants.GetBootstrapPeers()
		isSecondaryBootstrap := false
		if len(bootstrapPeers) > 1 {
			// Check if this machine matches any bootstrap peer other than the first
			for i := 1; i < len(bootstrapPeers); i++ {
				host := parseHostFromMultiaddr(bootstrapPeers[i])
				if host != "" && isLocalIP(host) {
					isSecondaryBootstrap = true
					break
				}
			}
		}

		if isSecondaryBootstrap {
			// Secondary bootstrap nodes join the primary bootstrap
			primaryBootstrapHost := parseHostFromMultiaddr(bootstrapPeers[0])
			cfg.Database.RQLiteJoinAddress = fmt.Sprintf("http://%s:%d", primaryBootstrapHost, *rqlHTTP)
			logger.Printf("Secondary bootstrap node - joining primary bootstrap at: %s", cfg.Database.RQLiteJoinAddress)
		} else {
			// Primary bootstrap node doesn't join anyone - it starts the cluster
			cfg.Database.RQLiteJoinAddress = ""
			logger.Printf("Primary bootstrap node - starting new RQLite cluster")
		}
	} else {
		// Configure bootstrap peers for P2P discovery
		var rqliteJoinAddr string
		if *bootstrap != "" {
			// Use command line bootstrap if provided
			cfg.Discovery.BootstrapPeers = []string{*bootstrap}
			// Extract IP from bootstrap peer for RQLite join
			bootstrapHost := parseHostFromMultiaddr(*bootstrap)
			if bootstrapHost != "" {
				rqliteJoinAddr = fmt.Sprintf("http://%s:%d", bootstrapHost, *rqlHTTP)
				logger.Printf("Using extracted bootstrap host %s for RQLite join", bootstrapHost)
			} else {
				logger.Printf("Warning: Could not extract host from bootstrap peer %s, using localhost fallback", *bootstrap)
				rqliteJoinAddr = fmt.Sprintf("http://localhost:%d", *rqlHTTP) // Use localhost fallback instead
			}
			logger.Printf("Using command line bootstrap peer: %s", *bootstrap)
		} else {
			// Use environment-configured bootstrap peers
			bootstrapPeers := constants.GetBootstrapPeers()
			if len(bootstrapPeers) > 0 {
				cfg.Discovery.BootstrapPeers = bootstrapPeers
				// Use the first bootstrap peer for RQLite join
				bootstrapHost := parseHostFromMultiaddr(bootstrapPeers[0])
				if bootstrapHost != "" {
					rqliteJoinAddr = fmt.Sprintf("http://%s:5001", bootstrapHost)
					logger.Printf("Using extracted bootstrap host %s for RQLite join", bootstrapHost)
				} else {
					logger.Printf("Warning: Could not extract host from bootstrap peer %s", bootstrapPeers[0])
					// Try primary production server as fallback
					rqliteJoinAddr = "http://localhost:5001"
				}
			logger.Printf("Using environment bootstrap peers: %v", bootstrapPeers)
			} else {
				logger.Printf("Warning: No bootstrap peers configured")
				// Default to localhost when no peers configured
				rqliteJoinAddr = "http://localhost:5001"
				logger.Printf("Using localhost fallback for RQLite join")
			}
			
			// Log network connectivity diagnostics
			logger.Printf("=== NETWORK DIAGNOSTICS ===")
			logger.Printf("Target RQLite join address: %s", rqliteJoinAddr)
			runNetworkDiagnostics(rqliteJoinAddr, logger)
		}
		
		// Regular nodes join the bootstrap node's RQLite cluster
		cfg.Database.RQLiteJoinAddress = rqliteJoinAddr
		logger.Printf("Regular node - joining RQLite cluster at: %s", cfg.Database.RQLiteJoinAddress)
	}

	logger.Printf("Data directory: %s", cfg.Node.DataDir)
	logger.Printf("Listen addresses: %v", cfg.Node.ListenAddresses)
	logger.Printf("RQLite HTTP port: %d", cfg.Database.RQLitePort)
	logger.Printf("RQLite Raft port: %d", cfg.Database.RQLiteRaftPort)

	// Create context for graceful shutdown
	ctx, cancel := context.WithCancel(context.Background())
	defer cancel()

	// Start node in a goroutine
	errChan := make(chan error, 1)
	go func() {
		if err := startNode(ctx, cfg, port, isBootstrap, logger); err != nil {
			errChan <- err
		}
	}()

	// Wait for interrupt signal or error
	c := make(chan os.Signal, 1)
	signal.Notify(c, os.Interrupt, syscall.SIGTERM)

	select {
	case err := <-errChan:
		logger.Printf("Failed to start node: %v", err)
		os.Exit(1)
	case <-c:
		logger.Printf("Shutting down node...")
		cancel()
	}
}

// isBootstrapNode determines if this should be a bootstrap node
// by checking the local machine's configuration and bootstrap peer list
func isBootstrapNode() bool {
	// Get the bootstrap peer addresses to check if this machine should be a bootstrap
	bootstrapPeers := constants.GetBootstrapPeers()

	// Check if any bootstrap peer is localhost/127.0.0.1 (development)
	// or if we're running on a production bootstrap server
	hostname, _ := os.Hostname()

	for _, peerAddr := range bootstrapPeers {
		// Parse the multiaddr to extract the host
		host := parseHostFromMultiaddr(peerAddr)

		// Check if this is a local bootstrap (development)
		if host == "127.0.0.1" || host == "localhost" {
			return true // In development, assume we're running the bootstrap
		}

		// Check if this is a production bootstrap server by IP
		if host != "" && isLocalIP(host) {
			return true
		}

		// Check if this is a production bootstrap server by hostname
		if hostname != "" && strings.Contains(peerAddr, hostname) {
			return true
		}
	}

	// Default: if no specific match, run as regular node
	return false
}

// parseHostFromMultiaddr extracts the host from a multiaddr
func parseHostFromMultiaddr(multiaddr string) string {
	// Simple parsing for /ip4/host/tcp/port/p2p/peerid format
	parts := strings.Split(multiaddr, "/")

	// Look for ip4/ip6/dns host in the multiaddr
	for i, part := range parts {
		if (part == "ip4" || part == "ip6" || part == "dns" || part == "dns4" || part == "dns6") && i+1 < len(parts) {
			return parts[i+1]
		}
	}
	return ""
}

// isLocalIP checks if the given IP address belongs to this machine
func isLocalIP(ip string) bool {
	// Try to run ip command to get local IPs
	if output, err := exec.Command("ip", "addr", "show").Output(); err == nil {
		if strings.Contains(string(output), ip) {
			return true
		}
	}
	
	// Fallback: try hostname -I command
	if output, err := exec.Command("hostname", "-I").Output(); err == nil {
		ips := strings.Fields(strings.TrimSpace(string(output)))
		for _, localIP := range ips {
			if localIP == ip {
				return true
			}
		}
	}
	
	return false
}

func startNode(ctx context.Context, cfg *config.Config, port int, isBootstrap bool, logger *logging.StandardLogger) error {
	// Create and start node using the unified node implementation
	n, err := node.NewNode(cfg)
	if err != nil {
		return fmt.Errorf("failed to create node: %w", err)
	}

	if err := n.Start(ctx); err != nil {
		return fmt.Errorf("failed to start node: %w", err)
	}

	// Save the peer ID to a file for CLI access (especially useful for bootstrap)
	if isBootstrap {
		peerID := n.GetPeerID()
		peerInfoFile := filepath.Join(cfg.Node.DataDir, "peer.info")
		peerMultiaddr := fmt.Sprintf("/ip4/127.0.0.1/tcp/%d/p2p/%s", port, peerID)

		if err := os.WriteFile(peerInfoFile, []byte(peerMultiaddr), 0644); err != nil {
			logger.Printf("Warning: Failed to save peer info: %v", err)
		} else {
			logger.Printf("Peer info saved to: %s", peerInfoFile)
			logger.Printf("Bootstrap multiaddr: %s", peerMultiaddr)
		}
	}

	logger.Printf("Node started successfully")

	// Wait for context cancellation
	<-ctx.Done()

	// Stop node
	return n.Stop()
}

// runNetworkDiagnostics performs network connectivity tests
func runNetworkDiagnostics(rqliteJoinAddr string, logger *logging.StandardLogger) {
	// Extract host and port from the join address
	if !strings.HasPrefix(rqliteJoinAddr, "http://") {
		logger.Printf("Invalid join address format: %s", rqliteJoinAddr)
		return
	}
	
	// Parse URL to extract host:port
	url := strings.TrimPrefix(rqliteJoinAddr, "http://")
	parts := strings.Split(url, ":")
	if len(parts) != 2 {
		logger.Printf("Cannot parse host:port from %s", rqliteJoinAddr)
		return
	}
	
	host := parts[0]
	port := parts[1]
	
	logger.Printf("Testing connectivity to %s:%s", host, port)
	
	// Test 1: Basic connectivity with netcat or telnet
	if output, err := exec.Command("timeout", "5", "nc", "-z", "-v", host, port).CombinedOutput(); err == nil {
		logger.Printf("✅ Port %s:%s is reachable", host, port)
		logger.Printf("netcat output: %s", strings.TrimSpace(string(output)))
	} else {
		logger.Printf("❌ Port %s:%s is NOT reachable", host, port)
		logger.Printf("netcat error: %v", err)
		logger.Printf("netcat output: %s", strings.TrimSpace(string(output)))
	}
	
	// Test 2: HTTP connectivity test
	if output, err := exec.Command("timeout", "5", "curl", "-s", "-o", "/dev/null", "-w", "%{http_code}", rqliteJoinAddr+"/status").Output(); err == nil {
		httpCode := strings.TrimSpace(string(output))
		if httpCode == "200" {
			logger.Printf("✅ HTTP service is responding correctly (status: %s)", httpCode)
		} else {
			logger.Printf("⚠️  HTTP service responded with status: %s", httpCode)
		}
	} else {
		logger.Printf("❌ HTTP request failed: %v", err)
	}
	
	// Test 3: Ping test
	if output, err := exec.Command("ping", "-c", "3", "-W", "2", host).Output(); err == nil {
		lines := strings.Split(string(output), "\n")
		for _, line := range lines {
			if strings.Contains(line, "packet loss") {
				logger.Printf("🏓 Ping result: %s", strings.TrimSpace(line))
				break
			}
		}
	} else {
		logger.Printf("❌ Ping test failed: %v", err)
	}
	
	// Test 4: DNS resolution
	if output, err := exec.Command("nslookup", host).Output(); err == nil {
		logger.Printf("🔍 DNS resolution successful")
		lines := strings.Split(string(output), "\n")
		for _, line := range lines {
			if strings.Contains(line, "Address:") && !strings.Contains(line, "#53") {
				logger.Printf("DNS result: %s", strings.TrimSpace(line))
			}
		}
	} else {
		logger.Printf("❌ DNS resolution failed: %v", err)
	}
	
	logger.Printf("=== END DIAGNOSTICS ===")
}