mirror of https://github.com/icsharpcode/ILSpy.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
325 lines
13 KiB
325 lines
13 KiB
// Copyright (c) 2011-2016 Siegfried Pammer |
|
// |
|
// Permission is hereby granted, free of charge, to any person obtaining a copy of this |
|
// software and associated documentation files (the "Software"), to deal in the Software |
|
// without restriction, including without limitation the rights to use, copy, modify, merge, |
|
// publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons |
|
// to whom the Software is furnished to do so, subject to the following conditions: |
|
// |
|
// The above copyright notice and this permission notice shall be included in all copies or |
|
// substantial portions of the Software. |
|
// |
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, |
|
// INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR |
|
// PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE |
|
// FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR |
|
// OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
|
// DEALINGS IN THE SOFTWARE. |
|
|
|
using System.Linq; |
|
|
|
using ICSharpCode.Decompiler.TypeSystem; |
|
|
|
namespace ICSharpCode.Decompiler.IL.Transforms |
|
{ |
|
public class CachedDelegateInitialization : IBlockTransform |
|
{ |
|
BlockTransformContext context; |
|
|
|
public void Run(Block block, BlockTransformContext context) |
|
{ |
|
this.context = context; |
|
if (!context.Settings.AnonymousMethods) |
|
return; |
|
for (int i = context.IndexOfFirstAlreadyTransformedInstruction - 1; i >= 0; i--) |
|
{ |
|
if (block.Instructions[i] is IfInstruction inst) |
|
{ |
|
if (CachedDelegateInitializationWithField(inst)) |
|
{ |
|
block.Instructions.RemoveAt(i); |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
if (CachedDelegateInitializationWithLocal(inst)) |
|
{ |
|
ILInlining.InlineOneIfPossible(block, i, InliningOptions.Aggressive, context); |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
if (CachedDelegateInitializationRoslynInStaticWithLocal(inst) || CachedDelegateInitializationRoslynWithLocal(inst)) |
|
{ |
|
block.Instructions.RemoveAt(i); |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
if (CachedDelegateInitializationVB(inst)) |
|
{ |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
if (CachedDelegateInitializationVBWithReturn(inst)) |
|
{ |
|
block.Instructions.RemoveAt(i); |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
if (CachedDelegateInitializationVBWithClosure(inst)) |
|
{ |
|
context.IndexOfFirstAlreadyTransformedInstruction = block.Instructions.Count; |
|
continue; |
|
} |
|
} |
|
} |
|
} |
|
|
|
/// <summary> |
|
/// if (comp(ldsfld CachedAnonMethodDelegate == ldnull)) { |
|
/// stsfld CachedAnonMethodDelegate(DelegateConstruction) |
|
/// } |
|
/// ... one usage of CachedAnonMethodDelegate ... |
|
/// => |
|
/// ... one usage of DelegateConstruction ... |
|
/// </summary> |
|
bool CachedDelegateInitializationWithField(IfInstruction inst) |
|
{ |
|
|
|
Block trueInst = inst.TrueInst as Block; |
|
if (trueInst == null || trueInst.Instructions.Count != 1 || !inst.FalseInst.MatchNop()) |
|
return false; |
|
var storeInst = trueInst.Instructions[0]; |
|
if (!inst.Condition.MatchCompEquals(out ILInstruction left, out ILInstruction right) || !left.MatchLdsFld(out IField field) || !right.MatchLdNull()) |
|
return false; |
|
if (!storeInst.MatchStsFld(out IField field2, out ILInstruction value) || !field.Equals(field2) || !field.IsCompilerGeneratedOrIsInCompilerGeneratedClass()) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction(value.UnwrapConv(ConversionKind.Invalid) as NewObj, out _, out _, out _, true)) |
|
return false; |
|
var nextInstruction = inst.Parent.Children.ElementAtOrDefault(inst.ChildIndex + 1); |
|
if (nextInstruction == null) |
|
return false; |
|
var usages = nextInstruction.Descendants.Where(i => i.MatchLdsFld(field)).ToArray(); |
|
if (usages.Length != 1) |
|
return false; |
|
context.Step("CachedDelegateInitializationWithField", inst); |
|
usages[0].ReplaceWith(value); |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// if (comp(ldloc v == ldnull)) { |
|
/// stloc v(DelegateConstruction) |
|
/// } |
|
/// => |
|
/// stloc v(DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationWithLocal(IfInstruction inst) |
|
{ |
|
Block trueInst = inst.TrueInst as Block; |
|
if (trueInst == null || (trueInst.Instructions.Count != 1) || !inst.FalseInst.MatchNop()) |
|
return false; |
|
if (!inst.Condition.MatchCompEquals(out ILInstruction left, out ILInstruction right) || !left.MatchLdLoc(out ILVariable v) || !right.MatchLdNull()) |
|
return false; |
|
var storeInst = trueInst.Instructions.Last(); |
|
if (!storeInst.MatchStLoc(v, out ILInstruction value)) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction(value as NewObj, out _, out _, out _, true)) |
|
return false; |
|
// do not transform if there are other stores/loads of this variable |
|
if (v.StoreCount != 2 || v.StoreInstructions.Count != 2 || v.LoadCount != 2 || v.AddressCount != 0) |
|
return false; |
|
// do not transform if the first assignment is not assigning null: |
|
var otherStore = v.StoreInstructions.OfType<StLoc>().SingleOrDefault(store => store != storeInst); |
|
if (otherStore == null || !otherStore.Value.MatchLdNull() || !(otherStore.Parent is Block)) |
|
return false; |
|
// do not transform if there is no usage directly afterwards |
|
var nextInstruction = inst.Parent.Children.ElementAtOrDefault(inst.ChildIndex + 1); |
|
if (nextInstruction == null) |
|
return false; |
|
var usages = nextInstruction.Descendants.Where(i => i.MatchLdLoc(v)).ToArray(); |
|
if (usages.Length != 1) |
|
return false; |
|
context.Step("CachedDelegateInitializationWithLocal", inst); |
|
((Block)otherStore.Parent).Instructions.Remove(otherStore); |
|
inst.ReplaceWith(storeInst); |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// stloc s(ldobj(ldsflda(CachedAnonMethodDelegate)) |
|
/// if (comp(ldloc s == null)) { |
|
/// stloc s(stobj(ldsflda(CachedAnonMethodDelegate), DelegateConstruction)) |
|
/// } |
|
/// => |
|
/// stloc s(DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationRoslynInStaticWithLocal(IfInstruction inst) |
|
{ |
|
Block trueInst = inst.TrueInst as Block; |
|
if (trueInst == null || (trueInst.Instructions.Count != 1) || !inst.FalseInst.MatchNop()) |
|
return false; |
|
if (!inst.Condition.MatchCompEquals(out ILInstruction left, out ILInstruction right) || !left.MatchLdLoc(out ILVariable s) || !right.MatchLdNull()) |
|
return false; |
|
var storeInst = trueInst.Instructions.Last() as StLoc; |
|
var storeBeforeIf = inst.Parent.Children.ElementAtOrDefault(inst.ChildIndex - 1) as StLoc; |
|
if (storeBeforeIf == null || storeInst == null || storeBeforeIf.Variable != s || storeInst.Variable != s) |
|
return false; |
|
if (!(storeInst.Value is StObj stobj) || !(storeBeforeIf.Value is LdObj ldobj)) |
|
return false; |
|
if (!(stobj.Value is NewObj)) |
|
return false; |
|
if (!stobj.Target.MatchLdsFlda(out var field1) || !ldobj.Target.MatchLdsFlda(out var field2) || !field1.Equals(field2)) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction((NewObj)stobj.Value, out _, out _, out _, true)) |
|
return false; |
|
context.Step("CachedDelegateInitializationRoslynInStaticWithLocal", inst); |
|
storeBeforeIf.Value = stobj.Value; |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// stloc s(ldobj(ldflda(CachedAnonMethodDelegate)) |
|
/// if (comp(ldloc s == null)) { |
|
/// stloc s(stobj(ldflda(CachedAnonMethodDelegate), DelegateConstruction)) |
|
/// } |
|
/// => |
|
/// stloc s(DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationRoslynWithLocal(IfInstruction inst) |
|
{ |
|
Block trueInst = inst.TrueInst as Block; |
|
if (trueInst == null || (trueInst.Instructions.Count != 1) || !inst.FalseInst.MatchNop()) |
|
return false; |
|
if (!inst.Condition.MatchCompEquals(out ILInstruction left, out ILInstruction right) || !left.MatchLdLoc(out ILVariable s) || !right.MatchLdNull()) |
|
return false; |
|
var storeInst = trueInst.Instructions.Last() as StLoc; |
|
var storeBeforeIf = inst.Parent.Children.ElementAtOrDefault(inst.ChildIndex - 1) as StLoc; |
|
if (storeBeforeIf == null || storeInst == null || storeBeforeIf.Variable != s || storeInst.Variable != s) |
|
return false; |
|
if (!(storeInst.Value is StObj stobj) || !(storeBeforeIf.Value is LdObj ldobj)) |
|
return false; |
|
if (!(stobj.Value is NewObj)) |
|
return false; |
|
if (!stobj.Target.MatchLdFlda(out var _, out var field1) || !ldobj.Target.MatchLdFlda(out var __, out var field2) || !field1.Equals(field2)) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction((NewObj)stobj.Value, out _, out _, out _, true)) |
|
return false; |
|
context.Step("CachedDelegateInitializationRoslynWithLocal", inst); |
|
storeBeforeIf.Value = stobj.Value; |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// if (comp.i4(comp.o(ldobj delegateType(ldsflda CachedAnonMethodDelegate) != ldnull) == ldc.i4 0)) Block { |
|
/// stloc s(stobj(ldflda(CachedAnonMethodDelegate), DelegateConstruction)) |
|
/// } else Block { |
|
/// stloc s(ldobj System.Action(ldsflda $I4-1)) |
|
/// } |
|
/// => |
|
/// stloc s(DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationVB(IfInstruction inst) |
|
{ |
|
if (!(inst.TrueInst is Block trueInst && inst.FalseInst is Block falseInst)) |
|
return false; |
|
if (trueInst.Instructions.Count != 1 || falseInst.Instructions.Count != 1) |
|
return false; |
|
if (!(trueInst.Instructions[0].MatchStLoc(out var s, out var trueInitValue) |
|
&& falseInst.Instructions[0].MatchStLoc(s, out var falseInitValue))) |
|
{ |
|
return false; |
|
} |
|
if (s.Kind != VariableKind.StackSlot || s.StoreCount != 2) |
|
return false; |
|
if (!(trueInitValue is StObj stobj) || !(falseInitValue is LdObj ldobj)) |
|
return false; |
|
if (!(stobj.Value is NewObj delegateConstruction)) |
|
return false; |
|
if (!stobj.Target.MatchLdsFlda(out var field1) |
|
|| !ldobj.Target.MatchLdsFlda(out var field2) |
|
|| !field1.Equals(field2)) |
|
{ |
|
return false; |
|
} |
|
if (!inst.Condition.MatchCompEquals(out ILInstruction left, out ILInstruction right) || !right.MatchLdNull()) |
|
return false; |
|
if (!ldobj.Match(left).Success) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction(delegateConstruction, out _, out _, out _, true)) |
|
return false; |
|
context.Step("CachedDelegateInitializationVB", inst); |
|
inst.ReplaceWith(new StLoc(s, delegateConstruction)); |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// if (comp.o(ldsfld CachedAnonMethodDelegate != ldnull)) { |
|
/// leave IL_0005 (ldsfld CachedAnonMethodDelegate) |
|
/// } |
|
/// leave IL_0005 (stsfld CachedAnonMethodDelegate(DelegateConstruction)) |
|
/// => |
|
/// leave IL_0005 (DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationVBWithReturn(IfInstruction inst) |
|
{ |
|
if (!inst.Condition.MatchCompNotEqualsNull(out var arg) || !arg.MatchLdsFld(out var field)) |
|
return false; |
|
if (!inst.FalseInst.MatchNop()) |
|
return false; |
|
if (!inst.TrueInst.MatchReturn(out arg) || !arg.MatchLdsFld(field)) |
|
return false; |
|
var leaveAfterIf = inst.Parent.Children.ElementAtOrDefault(inst.ChildIndex + 1) as Leave; |
|
if (leaveAfterIf is null || !leaveAfterIf.IsLeavingFunction) |
|
return false; |
|
if (!leaveAfterIf.Value.MatchStsFld(out var field2, out var delegateConstruction) || !field.Equals(field2)) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction(delegateConstruction, out _, out _, out _, true)) |
|
return false; |
|
context.Step("CachedDelegateInitializationVBWithReturn", inst); |
|
leaveAfterIf.Value = delegateConstruction; |
|
return true; |
|
} |
|
|
|
/// <summary> |
|
/// if (comp.o(ldobj delegateType(ldflda CachedAnonMethodDelegate(ldloc closure)) != ldnull)) Block { |
|
/// stloc s(ldobj delegateType(ldflda CachedAnonMethodDelegate(ldloc closure))) |
|
/// } else Block { |
|
/// stloc s(stobj delegateType(ldflda CachedAnonMethodDelegate(ldloc closure), DelegateConstruction)) |
|
/// } |
|
/// => |
|
/// stloc s(DelegateConstruction) |
|
/// </summary> |
|
bool CachedDelegateInitializationVBWithClosure(IfInstruction inst) |
|
{ |
|
if (!(inst.TrueInst is Block trueInst && inst.FalseInst is Block falseInst)) |
|
return false; |
|
if (trueInst.Instructions.Count != 1 || falseInst.Instructions.Count != 1) |
|
return false; |
|
if (!(trueInst.Instructions[0].MatchStLoc(out var s, out var trueInitValue) |
|
&& falseInst.Instructions[0].MatchStLoc(s, out var falseInitValue))) |
|
{ |
|
return false; |
|
} |
|
if (s.Kind != VariableKind.StackSlot || s.StoreCount != 2) |
|
return false; |
|
if (!(falseInitValue is StObj stobj) || !(trueInitValue is LdObj ldobj)) |
|
return false; |
|
if (!(stobj.Value is NewObj delegateConstruction)) |
|
return false; |
|
if (!stobj.Target.MatchLdFlda(out var target1, out var field1) |
|
|| !ldobj.Target.MatchLdFlda(out var target2, out var field2) |
|
|| !field1.Equals(field2) || !target1.Match(target2).Success) |
|
{ |
|
return false; |
|
} |
|
if (!inst.Condition.MatchCompNotEqualsNull(out ILInstruction left)) |
|
return false; |
|
if (!ldobj.Match(left).Success) |
|
return false; |
|
if (!DelegateConstruction.MatchDelegateConstruction(delegateConstruction, out _, out _, out _, true)) |
|
return false; |
|
context.Step("CachedDelegateInitializationVBWithClosure", inst); |
|
inst.ReplaceWith(new StLoc(s, delegateConstruction)); |
|
return true; |
|
} |
|
} |
|
}
|
|
|