using System.Collections.Generic;
using System.Linq;
using JetBrains.Annotations;
using Newtonsoft.Json.Linq;

namespace WireMock.Matchers
{
    /// <summary>
    /// JsonPartialMatcher
    /// </summary>
    public class JsonPartialMatcher : JsonMatcher
    {
        /// <inheritdoc cref="IMatcher.Name"/>
        public override string Name => "JsonPartialMatcher";

        /// <summary>
        /// Initializes a new instance of the <see cref="JsonPartialMatcher"/> class.
        /// </summary>
        /// <param name="value">The string value to check for equality.</param>
        /// <param name="ignoreCase">Ignore the case from the PropertyName and PropertyValue (string only).</param>
        /// <param name="throwException">Throw an exception when the internal matching fails because of invalid input.</param>
        public JsonPartialMatcher([NotNull] string value, bool ignoreCase = false, bool throwException = false) 
            : base(value, ignoreCase, throwException)
        {
        }

        /// <summary>
        /// Initializes a new instance of the <see cref="JsonPartialMatcher"/> class.
        /// </summary>
        /// <param name="value">The object value to check for equality.</param>
        /// <param name="ignoreCase">Ignore the case from the PropertyName and PropertyValue (string only).</param>
        /// <param name="throwException">Throw an exception when the internal matching fails because of invalid input.</param>
        public JsonPartialMatcher([NotNull] object value, bool ignoreCase = false, bool throwException = false) 
            : base(value, ignoreCase, throwException)
        {
        }

        /// <summary>
        /// Initializes a new instance of the <see cref="JsonPartialMatcher"/> class.
        /// </summary>
        /// <param name="matchBehaviour">The match behaviour.</param>
        /// <param name="value">The value to check for equality.</param>
        /// <param name="ignoreCase">Ignore the case from the PropertyName and PropertyValue (string only).</param>
        /// <param name="throwException">Throw an exception when the internal matching fails because of invalid input.</param>
        public JsonPartialMatcher(MatchBehaviour matchBehaviour, [NotNull] object value, bool ignoreCase = false, bool throwException = false) 
            : base(matchBehaviour, value, ignoreCase, throwException)
        {
        }

        /// <inheritdoc />
        protected override bool IsMatch(JToken value, JToken input)
        {
            if (value == null || value == input)
            {
                return true;
            }

            if (input == null || value.Type != input.Type)
            {
                return false;
            }

            switch (value.Type)
            {
                case JTokenType.Object:
                    var nestedValues = value.ToObject<Dictionary<string, JToken>>();
                    return nestedValues?.Any() != true ||
                           nestedValues.All(pair => IsMatch(pair.Value, input.SelectToken(pair.Key)));

                case JTokenType.Array:
                    var valuesArray = value.ToObject<JToken[]>();
                    var tokenArray = input.ToObject<JToken[]>();

                    if (valuesArray?.Any() != true)
                    {
                        return true;
                    }

                    return tokenArray?.Any() == true &&
                           valuesArray.All(subFilter => tokenArray.Any(subToken => IsMatch(subFilter, subToken)));

                default:
                    return value.ToString() == input.ToString();
            }
        }
    }
}