Hastlayer-SDK

using Hast.Layer;
using Hast.Transformer.Helpers;
using Hast.Transformer.Models;
using ICSharpCode.Decompiler.CSharp.Syntax;
using ICSharpCode.Decompiler.IL;
using ICSharpCode.Decompiler.Semantics;
using ICSharpCode.Decompiler.TypeSystem;
using System;
using System.Collections.Generic;
using System.Linq;

namespace Hast.Transformer.Services;

/// <summary>
/// Converts instance-level class methods to static methods with an explicit object reference passed in. This is needed
/// so instance methods are easier to transform.
/// </summary>
/// <remarks>
/// <para>
/// The conversion is as following:
///
/// Original method for example:
/// <c>
/// public uint IncreaseNumber(uint increaseBy)
/// {
///     return (this.Number += increaseBy);
/// }
/// </c>
///
/// Will be converted into:
///
/// <c>
/// public static uint IncreaseNumber(MyClass this, uint increaseBy)
/// {
///     return (this.Number += increaseBy);
/// }
/// </c>
///
/// Consumer code will also be altered accordingly.
/// </para>
/// </remarks>
public class InstanceMethodsToStaticConverter : IConverter
{
    public IEnumerable<string> Dependencies { get; } = new[] { nameof(CustomPropertiesToMethodsConverter) };

    public void Convert(
        SyntaxTree syntaxTree,
        IHardwareGenerationConfiguration configuration,
        IKnownTypeLookupTable knownTypeLookupTable) =>
        syntaxTree.AcceptVisitor(new InstanceMethodsToStaticConvertingVisitor(syntaxTree));

    private sealed class InstanceMethodsToStaticConvertingVisitor : DepthFirstAstVisitor
    {
        private readonly SyntaxTree _syntaxTree;

        public InstanceMethodsToStaticConvertingVisitor(SyntaxTree syntaxTree) => _syntaxTree = syntaxTree;

        public override void VisitMethodDeclaration(MethodDeclaration methodDeclaration)
        {
            // Omitting DisplayClasses because those are handled separately.
            if (methodDeclaration.GetFullName().IsDisplayOrClosureClassMemberName()) return;

            base.VisitMethodDeclaration(methodDeclaration);

            var parentType = methodDeclaration.FindFirstParentTypeDeclaration();

            // We only have to deal with instance methods of non-hardware entry point classes.
            if (methodDeclaration.HasModifier(Modifiers.Static) ||
                methodDeclaration.IsHardwareEntryPointMember() ||
                parentType.Members.Any(member => member.IsHardwareEntryPointMember()))
            {
                return;
            }

            var parentTypeResolveResult = parentType.GetResolveResult<TypeResolveResult>();

            var parentAstType = AstType.Create(parentType.GetFullName());
            parentAstType.AddAnnotation(parentTypeResolveResult);

            // Making the method static.
            methodDeclaration.Modifiers |= Modifiers.Static;

            // Adding a "@this" parameter and using that instead of the "this" reference.
            var thisParameter = new ParameterDeclaration(parentAstType, "this")
                .WithAnnotation(VariableHelper.CreateILVariableResolveResult(VariableKind.Parameter, parentTypeResolveResult.Type, "this"));
            if (!methodDeclaration.Parameters.Any())
            {
                methodDeclaration.Parameters.Add(thisParameter);
            }
            else
            {
                methodDeclaration.Parameters.InsertBefore(methodDeclaration.Parameters.First(), thisParameter);
            }

            methodDeclaration.AcceptVisitor(new ThisReferenceChangingVisitor());

            // Changing consumer code of the method to use it as static with the new "@this" parameter.
            _syntaxTree.AcceptVisitor(new MethodCallChangingVisitor(
                parentAstType,
                parentType.GetFullName(),
                methodDeclaration.GetFullName()));
        }

        private sealed class ThisReferenceChangingVisitor : DepthFirstAstVisitor
        {
            public override void VisitThisReferenceExpression(ThisReferenceExpression thisReferenceExpression)
            {
                base.VisitThisReferenceExpression(thisReferenceExpression);

                var thisIdentifierExpression = new IdentifierExpression("this")
                    .WithAnnotation(VariableHelper
                        .CreateILVariableResolveResult(VariableKind.Parameter, thisReferenceExpression.GetActualType(), "this"));
                thisReferenceExpression.ReplaceWith(thisIdentifierExpression);
            }
        }

        private sealed class MethodCallChangingVisitor : DepthFirstAstVisitor
        {
            private readonly AstType _parentAstType;
            private readonly string _methodParentFullName;
            private readonly string _methodFullName;

            public MethodCallChangingVisitor(AstType parentAstType, string methodParentFullName, string methodFullName)
            {
                _parentAstType = parentAstType;
                _methodParentFullName = methodParentFullName;
                _methodFullName = methodFullName;
            }

            public override void VisitInvocationExpression(InvocationExpression invocationExpression)
            {
                base.VisitInvocationExpression(invocationExpression);

                if (invocationExpression.Target is not MemberReferenceExpression targetMemberReference) return;

                var targetType = targetMemberReference.Target.GetActualType();
                var isAffectedMethodCall =
                    (targetMemberReference.Target is ThisReferenceExpression ||
                        (targetType != null &&
                        targetType.GetFullName() == _methodParentFullName))
                    &&
                    targetMemberReference.GetMemberFullName() == _methodFullName;

                if (!isAffectedMethodCall) return;

                var originalTarget = targetMemberReference.Target;
                targetMemberReference.Target.ReplaceWith(new TypeReferenceExpression(_parentAstType.Clone())
                    .WithAnnotation(new TypeResolveResult(_parentAstType.GetActualType())));

                if (!invocationExpression.Arguments.Any())
                {
                    invocationExpression.Arguments.Add(originalTarget);
                }
                else
                {
                    invocationExpression.Arguments.InsertBefore(invocationExpression.Arguments.First(), originalTarget);
                }
            }
        }
    }
}