Filter.cs

using System;
using System.Linq;
using RT.Json;
using RT.TagSoup;
using RT.Util;

namespace KtaneWeb
{
    internal abstract class KtaneFilter(string readableName, string propName, string fncPropValue)
    {
        public string ReadableName { get; private set; } = readableName;
        public string PropName { get; private set; } = propName;
        public string FncPropValue { get; private set; } = fncPropValue;

        public abstract JsonDict ToJson();
        public abstract object ToHtml(TranslationInfo translation);
        public abstract bool Matches(KtaneModuleInfo module, JsonDict json);

        public static KtaneFilter Slider<TEnum>(string readableName, string propName, Func<KtaneModuleInfo, TEnum> getValue, string fncPropValue) where TEnum : struct => new KtaneFilterOptionsSlider(propName, readableName, typeof(TEnum), mod => getValue(mod), fncPropValue);
        public static KtaneFilter Slider<TEnum>(string readableName, string propName, Func<KtaneModuleInfo, TEnum?> getValue, string fncPropValue) where TEnum : struct => new KtaneFilterOptionsSlider(propName, readableName, typeof(TEnum), mod => getValue(mod), fncPropValue);
        public static KtaneFilter Checkboxes<TEnum>(string readableName, string propName, Func<KtaneModuleInfo, TEnum> getValue, string fncPropValue) where TEnum : struct => new KtaneFilterOptionsCheckboxes(readableName, propName, fncPropValue, typeof(TEnum), mod => getValue(mod));
        public static KtaneFilter Checkboxes<TEnum>(string readableName, string propName, Func<KtaneModuleInfo, TEnum?> getValue, string fncPropValue) where TEnum : struct => new KtaneFilterOptionsCheckboxes(readableName, propName, fncPropValue, typeof(TEnum), mod => getValue(mod));
        public static KtaneFilter Flags<TEnum>(string readableName, string propName, Func<KtaneModuleInfo, TEnum> getValue, string fncPropValue) where TEnum : struct => new KtaneFilterFlags(readableName, propName, fncPropValue, typeof(TEnum), mod => getValue(mod));
    }

    internal abstract class KtaneFilterOptions : KtaneFilter
    {
        public Type EnumType { get; private set; }
        public Func<KtaneModuleInfo, object> GetValue { get; private set; }
        public KtaneFilterOption[] Options { get; private set; }

        public KtaneFilterOptions(string readableName, string propName, string fncPropValue, Type enumType, Func<KtaneModuleInfo, object> getValue)
            : base(readableName, propName, fncPropValue)
        {
            EnumType = enumType ?? throw new ArgumentNullException(nameof(enumType));
            GetValue = getValue ?? throw new ArgumentNullException(nameof(getValue));

            Options = Enum.GetValues(enumType).Cast<Enum>()
                .Select(val => new { Value = val, Attr = val.GetCustomAttribute<KtaneFilterOptionAttribute>() })
                .Where(val => val.Attr != null)
                .Select(inf => new KtaneFilterOption
                {
                    Value = (int) (object) inf.Value,
                    Name = inf.Value.ToString(),
                    TranslationString = inf.Attr.TranslationString,
                    TranslationStringExplain = inf.Value.GetCustomAttribute<EditableHelpAttribute>()?.TranslationString,
                    Accel = inf.Attr.Accel
                })
                .ToArray();
        }
    }

    internal sealed class KtaneFilterOptionsCheckboxes(string readableName, string propName, string fncPropValue, Type enumType, Func<KtaneModuleInfo, object> getValue) : KtaneFilterOptions(readableName, propName, fncPropValue, enumType, getValue)
    {
        public override JsonDict ToJson() => new()
        {
            ["id"] = PropName,
            ["fnc"] = new JsonRaw(FncPropValue),
            ["values"] = Enum.GetValues(EnumType).Cast<Enum>().Select(inf => inf.ToString()).ToJsonList(),
            ["type"] = "checkboxes"
        };
        public override object ToHtml(TranslationInfo translation) => Ut.NewArray<object>(
            new DIV { class_ = "option-group" }._(
                new H4(ReadableName),
                Options.Select(opt => $"filter-{PropName}-{opt.Name}".Apply(id => new DIV(
                    new INPUT { type = itype.checkbox, class_ = "filter", id = id }, " ",
                    new LABEL { for_ = id, accesskey = opt.Accel.NullOr(a => a.ToString().ToLowerInvariant()) }._(opt.Accel == null ? opt.Translate(translation) : opt.Translate(translation).Accel(opt.Accel.Value)))))));

        public override bool Matches(KtaneModuleInfo module, JsonDict json)
        {
            var str = GetValue(module)?.ToString();
            return str == null || (json.ContainsKey(str) && json[str].GetBool()) || json.All(v => !v.Value.GetBool());
        }
    }

    internal sealed class KtaneFilterOptionsSlider(string propName, string readableName, Type enumType, Func<KtaneModuleInfo, object> getValue, string fncPropValue) : KtaneFilterOptions(readableName, propName, fncPropValue, enumType, getValue)
    {
        public override JsonDict ToJson() => new()
        {
            ["id"] = PropName,
            ["fnc"] = new JsonRaw(FncPropValue),
            ["values"] = Enum.GetValues(EnumType).Cast<Enum>().Select(inf => inf.ToString()).ToJsonList(),
            ["type"] = "slider"
        };
        public override object ToHtml(TranslationInfo translation) => Ut.NewArray<object>(
            new DIV { class_ = "option-group" }._(
                new H4(ReadableName),
                new DIV { id = "filter-" + PropName, class_ = "slider" },
                new DIV { id = "filter-label-" + PropName, class_ = "slider-label" }));

        public override bool Matches(KtaneModuleInfo module, JsonDict json)
        {
            var val = GetValue(module);
            if (val == null)
                return true;
            try
            {
                return (int) val >= json["min"].GetInt() && (int) val <= json["max"].GetInt();
            }
            catch (InvalidCastException)
            {
                return false;
            }
        }
    }

    internal sealed class KtaneFilterOption
    {
        public string Name;
        public string TranslationString;
        public string TranslationStringExplain;
        public char? Accel;
        public int Value;

        public string Translate(TranslationInfo translation) => translation.GetFieldValue<string>(TranslationString);
        public string TranslateExplain(TranslationInfo translation) => TranslationStringExplain == null ? null : translation.GetFieldValue<string>(TranslationStringExplain);
    }

    // Filter where a mod may have any number of the available flags
    internal sealed class KtaneFilterFlags(string readableName, string propName, string fncPropValue, Type enumType, Func<KtaneModuleInfo, object> getValue) : KtaneFilterOptions(readableName, propName, fncPropValue, enumType, getValue)
    {
        public override JsonDict ToJson() => new()
        {
            ["id"] = PropName,
            ["fnc"] = new JsonRaw(FncPropValue),
            ["values"] = Enum.GetValues(EnumType).Cast<Enum>().Select(inf => inf.ToString()).ToJsonList(),
            ["type"] = "flags"
        };

        public override object ToHtml(TranslationInfo translation) => new DIV { class_ = "option-group" }._(
            new H4(ReadableName),
            new TABLE(Options.Select(opt => new TR(
                new TH { title = opt.TranslateExplain(translation) }._(opt.Translate(translation)),
                new TD(
                    new INPUT { type = itype.radio, class_ = "filter", name = $"filter-{PropName}-{opt.Name}", id = $"filter-{PropName}-{opt.Name}-y" },
                    new LABEL { for_ = $"filter-{PropName}-{opt.Name}-y" }._(" ", translation.flagYes)),
                new TD(
                    new INPUT { type = itype.radio, class_ = "filter", name = $"filter-{PropName}-{opt.Name}", id = $"filter-{PropName}-{opt.Name}-n" },
                    new LABEL { for_ = $"filter-{PropName}-{opt.Name}-n" }._(" ", translation.flagNo)),
                new TD(
                    new INPUT { type = itype.radio, class_ = "filter", name = $"filter-{PropName}-{opt.Name}", id = $"filter-{PropName}-{opt.Name}-e" },
                    new LABEL { for_ = $"filter-{PropName}-{opt.Name}-e" }._(" ", translation.flagEither))))));

        public override bool Matches(KtaneModuleInfo module, JsonDict json)
        {
            var flags = (int) GetValue(module);
            foreach (var opt in Options)
            {
                var hasFlag = (flags & opt.Value) != 0;
                if (json.ContainsKey(opt.Name) && ((json[opt.Name].GetString() == "y" && !hasFlag) || (json[opt.Name].GetString() == "n" && hasFlag)))
                    return false;
            }
            return true;
        }
    }
}