Dump method flags from Type.GetInterfaces

dump-method-flags-if-FOO.patch

From aef2462e3c0283734e2c2c36f2a3af162df825b0 Mon Sep 17 00:00:00 2001
From: Aleksey Kliger <[email protected]>
Date: Fri, 17 Aug 2018 12:32:24 -0400
Subject: [PATCH] dump some method info if env var FOOF is set

---
 mono/metadata/icall.c | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/mono/metadata/icall.c b/mono/metadata/icall.c
index 1dcbce6a541..32c80e3b42f 100644
--- a/mono/metadata/icall.c
+++ b/mono/metadata/icall.c
@@ -2588,6 +2588,20 @@ ves_icall_RuntimeType_GetInterfaces (MonoReflectionTypeHandle ref_type, MonoErro
 	MonoType *type = MONO_HANDLE_GETVAL (ref_type, type);
 	MonoClass *klass = mono_class_from_mono_type (type);
 
+	if (getenv ("FOOF") != NULL) {
+		gpointer iter = NULL;
+		MonoMethod *m = NULL;
+		while ((m = mono_class_get_methods (klass, &iter))) {
+			const char *method_name = mono_method_get_name (m);
+			guint32 method_flags = mono_method_get_flags (m, NULL);
+			fprintf (stderr, "method: %s, flags: 0x%0x\n", method_name, method_flags);
+			if ((method_flags & METHOD_ATTRIBUTE_MEMBER_ACCESS_MASK) == METHOD_ATTRIBUTE_PUBLIC)
+				fprintf (stderr, " public\n");
+			else if ((method_flags & METHOD_ATTRIBUTE_MEMBER_ACCESS_MASK) == METHOD_ATTRIBUTE_FAMILY)
+				fprintf (stderr, " family\n");
+		}
+	}
+
 	GHashTable *iface_hash = g_hash_table_new (get_interfaces_hash, NULL);
 
 	MonoGenericContext *context = NULL;
-- 
2.18.0

p.cs

using System;

interface U {}

public class B : U {
	protected T foo<T> () {
		Console.WriteLine ("B");
		return default(T);
	}
}


public class Foof {
	public static void Main ()
	{
		var x = typeof(Foof).Assembly.GetType ("B");
		var its = x.GetInterfaces(); /* hacked this icall to dump method info about "x" */

		Console.WriteLine ("ints: ");
		foreach (var i in its) {
			Console.WriteLine (i);
		}
	}
}

I see this output:

method: .ctor, flags: 0x1886
 public
method: foo, flags: 0x84
 family
ints: 
U