package task

import (
	"bufio"
	"log"
	"math/rand"
	"net"
	"os"
	"strconv"
	"strings"
	"time"
)

const defaultInputFile = "ip.txt"

var (
	// IPv6 IP version is 6
	IPv6 = false
	// TestAll test all ip
	TestAll = false
	// IPFile is the filename of IP Rangs
	IPFile = defaultInputFile
)

func randipEndWith(num int) uint8 {
	rand.Seed(time.Now().UnixNano())
	return uint8(rand.Intn(num))
}

func LoadIPRanges() []*net.IPAddr {
	if IPFile == "" {
		IPFile = defaultInputFile
	}
	file, err := os.Open(IPFile)
	if err != nil {
		log.Fatal(err)
	}
	defer file.Close()
	firstIPs := make([]*net.IPAddr, 0)
	scanner := bufio.NewScanner(file)
	// scanner.Split(bufio.ScanLines)
	for scanner.Scan() {
		IPString := scanner.Text()
		// 如果不含有 '/' 则代表不是 IP 段，而是一个单独的 IP，因此需要加上 /32 /128 子网掩码
		if !strings.Contains(IPString, "/") {
			if IPv6 {
				IPString += "/128"
			} else {
				IPString += "/32"
			}
		}
		firstIP, IPRange, err := net.ParseCIDR(IPString)
		// fmt.Println(firstIP)
		// fmt.Println(IPRange)
		if err != nil {
			log.Fatal(err)
		}
		if IPv6 {
			//IPv6
			loadIPv6(IPString, IPRange, firstIP, firstIPs)
			continue
		}
		// IPv4
		minIP, maxIP, mask := getCidrIPRange(IPString) // 获取 IP 最后一段最小值和最大值
		maxIPNum := getCidrHostNum(mask)               // 根据子网掩码获取主机数量
		for IPRange.Contains(firstIP) {
			if TestAll { // 如果是测速全部 IP
				for i := minIP; i <= maxIP; i++ { // 遍历 IP 最后一段最小值到最大值
					firstIP[15] = i
					firstIPCopy := make([]byte, len(firstIP))
					copy(firstIPCopy, firstIP)
					firstIPs = append(firstIPs, &net.IPAddr{IP: firstIPCopy})
				}
			} else { // 随机 IP 的最后一段 0.0.0.X
				firstIP[15] = minIP + randipEndWith(maxIPNum)
				firstIPCopy := make([]byte, len(firstIP))
				copy(firstIPCopy, firstIP)
				firstIPs = append(firstIPs, &net.IPAddr{IP: firstIPCopy})
			}
			firstIP[14]++ // 0.0.(X+1).X
			if firstIP[14] == 0 {
				firstIP[13]++ // 0.(X+1).X.X
				if firstIP[13] == 0 {
					firstIP[12]++ // (X+1).X.X.X
				}
			}
		}

	}
	return firstIPs
}

func loadIPv6(IPString string, IPRange *net.IPNet, firstIP net.IP, firstIPs []*net.IPAddr) {
	var tempIP uint8
	for IPRange.Contains(firstIP) {
		//fmt.Println(firstIP)
		//fmt.Println(firstIP[0], firstIP[1], firstIP[2], firstIP[3], firstIP[4], firstIP[5], firstIP[6], firstIP[7], firstIP[8], firstIP[9], firstIP[10], firstIP[11], firstIP[12], firstIP[13], firstIP[14], firstIP[15])
		if !strings.Contains(IPString, "/128") {
			firstIP[15] = randipEndWith(255) // 随机 IP 的最后一段
			firstIP[14] = randipEndWith(255) // 随机 IP 的最后一段
		}
		firstIPCopy := make([]byte, len(firstIP))
		copy(firstIPCopy, firstIP)
		firstIPs = append(firstIPs, &net.IPAddr{IP: firstIPCopy})
		tempIP = firstIP[13]
		firstIP[13] += randipEndWith(255)
		if firstIP[13] >= tempIP {
			continue
		}
		tempIP = firstIP[12]
		firstIP[12] += randipEndWith(255)
		if firstIP[12] >= tempIP {
			continue
		}
		tempIP = firstIP[11]
		firstIP[11] += randipEndWith(255)
		if firstIP[11] >= tempIP {
			continue
		}
		tempIP = firstIP[10]
		firstIP[10] += randipEndWith(255)
		if firstIP[10] >= tempIP {
			continue
		}
		tempIP = firstIP[9]
		firstIP[9] += randipEndWith(255)
		if firstIP[9] >= tempIP {
			continue
		}
		tempIP = firstIP[8]
		firstIP[8] += randipEndWith(255)
		if firstIP[8] >= tempIP {
			continue
		}
		tempIP = firstIP[7]
		firstIP[7] += randipEndWith(255)
		if firstIP[7] >= tempIP {
			continue
		}
		tempIP = firstIP[6]
		firstIP[6] += randipEndWith(255)
		if firstIP[6] >= tempIP {
			continue
		}
		tempIP = firstIP[5]
		firstIP[5] += randipEndWith(255)
		if firstIP[5] >= tempIP {
			continue
		}
		tempIP = firstIP[4]
		firstIP[4] += randipEndWith(255)
		if firstIP[4] >= tempIP {
			continue
		}
		tempIP = firstIP[3]
		firstIP[3] += randipEndWith(255)
		if firstIP[3] >= tempIP {
			continue
		}
		tempIP = firstIP[2]
		firstIP[2] += randipEndWith(255)
		if firstIP[2] >= tempIP {
			continue
		}
		tempIP = firstIP[1]
		firstIP[1] += randipEndWith(255)
		if firstIP[1] >= tempIP {
			continue
		}
		tempIP = firstIP[0]
		firstIP[0] += randipEndWith(255)
	}
}

// 根据子网掩码获取主机数量
func getCidrHostNum(maskLen int) int {
	cidrIPNum := int(0)
	if maskLen < 32 {
		var i int = int(32 - maskLen - 1)
		for ; i >= 1; i-- {
			cidrIPNum += 1 << i
		}
		cidrIPNum += 2
	} else {
		cidrIPNum = 1
	}
	if cidrIPNum > 255 {
		cidrIPNum = 255
	}
	return cidrIPNum
}

// 获取 IP 最后一段最小值和最大值、子网掩码
func getCidrIPRange(cidr string) (minIP, maxIP uint8, mask int) {
	ipRange := strings.Split(cidr, "/")
	ipSegs := strings.Split(ipRange[0], ".")
	mask, _ = strconv.Atoi(ipRange[1])
	seg4, _ := strconv.Atoi(ipSegs[3])
	minIP, maxIP = getIPSegRange(uint8(seg4), uint8(32-mask))
	return
}

// 根据输入的基础IP地址和CIDR掩码计算一个IP片段的区间
func getIPSegRange(userSegIP, offset uint8) (uint8, uint8) {
	var ipSegMax uint8 = 255
	netSegIP := ipSegMax << offset
	segMinIP := netSegIP & userSegIP
	segMaxIP := userSegIP&(255<<offset) | ^(255 << offset)
	return segMinIP, segMaxIP
}