Imported Upstream version 5.0.0.42

Former-commit-id: fd56571888259555122d8a0f58c68838229cea2b

external/linker/tuner/Mono.Tuner/MarkNSObjectsBase.cs

@@ -0,0 +1,149 @@
+//
+// MarkNSObjectsBase.cs
+//
+// Authors:
+//	Jb Evain (jbevain@novell.com)
+//	Sebastien Pouliot  <sebastien@xamarin.com>
+//
+// (C) 2009 Novell, Inc.
+// Copyright (C) 2011 Xamarin, Inc.
+//
+// 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;
+using System.Collections;
+using System.Collections.Generic;
+using System.Linq;
+
+using Mono.Linker;
+using Mono.Linker.Steps;
+
+using Mono.Tuner;
+
+using Mono.Cecil;
+
+namespace Mono.Tuner {
+
+	public abstract class MarkNSObjectsBase : BaseSubStep {
+
+		protected abstract string ExportAttribute { get; }
+
+		public override SubStepTargets Targets {
+			get { return SubStepTargets.Type; }
+		}
+
+		public override void ProcessType (TypeDefinition type)
+		{
+			if (!IsProductType (type)) {
+				Annotations.Mark (type);
+				Annotations.SetPreserve (type, TypePreserve.All);
+			} else
+				PreserveProductType (type);
+		}
+
+		void PreserveProductType (TypeDefinition type)
+		{
+			PreserveIntPtrConstructor (type);
+			PreserveExportedMethods (type);
+		}
+
+		void PreserveExportedMethods (TypeDefinition type)
+		{
+			if (!type.HasMethods)
+				return;
+
+			foreach (var method in type.GetMethods ()) {
+				if (!IsExportedMethod (method))
+					continue;
+
+				if (!IsOverridenInUserCode (method))
+					continue;
+
+				PreserveMethod (type, method);
+			}
+		}
+
+		bool IsOverridenInUserCode (MethodDefinition method)
+		{
+			if (!method.IsVirtual)
+				return false;
+
+			var overrides = Annotations.GetOverrides (method);
+			if (overrides == null || overrides.Count == 0)
+				return false;
+
+			foreach (MethodDefinition @override in overrides)
+				if (!IsProductMethod (@override))
+					return true;
+
+			return false;
+		}
+
+		bool IsExportedMethod (MethodDefinition method)
+		{
+			return HasExportAttribute (method);
+		}
+
+		bool HasExportAttribute (ICustomAttributeProvider provider)
+		{
+			if (!provider.HasCustomAttributes)
+				return false;
+
+			foreach (CustomAttribute attribute in provider.CustomAttributes)
+				if (attribute.AttributeType.FullName == ExportAttribute)
+					return true;
+
+			return false;
+		}
+
+		void PreserveIntPtrConstructor (TypeDefinition type)
+		{
+			if (!type.HasMethods)
+				return;
+
+			foreach (MethodDefinition constructor in type.GetConstructors ()) {
+				if (!constructor.HasParameters)
+					continue;
+
+				if (constructor.Parameters.Count != 1 || constructor.Parameters [0].ParameterType.FullName != "System.IntPtr")
+					continue;
+
+				PreserveMethod (type, constructor);
+				break; // only one .ctor can match this
+			}
+		}
+
+		void PreserveMethod (TypeDefinition type, MethodDefinition method)
+		{
+			Annotations.AddPreservedMethod (type, method);
+		}
+
+		static bool IsProductMethod (MethodDefinition method)
+		{
+			return IsProductType (method.DeclaringType);
+		}
+
+		static bool IsProductType (TypeDefinition type)
+		{
+			return Profile.IsProductAssembly (type.Module.Assembly);
+		}
+	}
+}