using System;
using System.Collections;
using System.Collections.Generic;
using System.Diagnostics;
using System.Linq;
using System.Net;
using System.Net.Sockets;
using System.Threading.Tasks;
using Serilog;

namespace Netch.Utils
{
    public static class DnsUtils
    {
        /// <summary>
        ///     缓存
        /// </summary>
        private static readonly Hashtable Cache = new();
        private static readonly Hashtable Cache6 = new();

        public static async Task<IPAddress?> LookupAsync(string hostname, AddressFamily inet = AddressFamily.Unspecified, int timeout = 3000)
        {
            try
            {
                var cacheResult = inet switch
                {
                    AddressFamily.Unspecified => (IPAddress?)(Cache[hostname] ?? Cache6[hostname]),
                    AddressFamily.InterNetwork => (IPAddress?)Cache[hostname],
                    AddressFamily.InterNetworkV6 => (IPAddress?)Cache6[hostname],
                    _ => throw new ArgumentOutOfRangeException()
                };

                if (cacheResult != null)
                    return cacheResult;

                return await LookupNoCacheAsync(hostname, inet, timeout);
            }
            catch (Exception e)
            {
                Log.Verbose(e, "Lookup hostname {Hostname} failed", hostname);
                return null;
            }
        }

        private static async Task<IPAddress?> LookupNoCacheAsync(string hostname, AddressFamily inet = AddressFamily.Unspecified, int timeout = 3000)
        {
            using var task = Dns.GetHostAddressesAsync(hostname);
            using var resTask = await Task.WhenAny(task, Task.Delay(timeout)).ConfigureAwait(false);

            if (resTask == task)
            {
                var addresses = await task;

                var result = addresses.FirstOrDefault(i => inet == AddressFamily.Unspecified || inet == i.AddressFamily);
                if (result == null)
                    return null;

                switch (result.AddressFamily)
                {
                    case AddressFamily.InterNetwork:
                        Cache.Add(hostname, result);
                        break;
                    case AddressFamily.InterNetworkV6:
                        Cache6.Add(hostname, result);
                        break;
                    default:
                        Trace.Assert(false);
                        break;
                }

                return result;
            }

            return null;
        }

        /// <summary>
        ///     查询
        /// </summary>
        /// <param name="hostname">主机名</param>
        /// <returns></returns>
        public static void ClearCache()
        {
            Cache.Clear();
            Cache6.Clear();
        }

        public static IEnumerable<string> Split(string dns)
        {
            return dns.SplitRemoveEmptyEntriesAndTrimEntries(',');
        }

        public static bool TrySplit(string value, out IEnumerable<string> result, ushort maxCount = 0)
        {
            result = Split(value).ToArray();

            return maxCount == 0 || result.Count() <= maxCount && result.All(ip => IPAddress.TryParse(ip, out _));
        }

        public static string Join(IEnumerable<string> dns)
        {
            return string.Join(",", dns);
        }

        public static string AppendPort(string host, ushort port = 53)
        {
            if (!host.Contains(':'))
                return host + $":{port}";

            return host;
        }

        public static string AppendScheme(string value, string scheme = "tcp")
        {
            if (!value.Contains(Uri.SchemeDelimiter))
                return scheme + Uri.SchemeDelimiter + value;

            return value;
        }
    }
}