[Mono] Add Mono Profiler events into EventPipe. (#55264)

* Add Mono Profiler events into EventPipe.

* Drop callstack on exception_clause profile event.

Needed since instrumentation uses mono_profiler_raise_exception_clause
used without wrapper and that in turn will cause incomplete stacks due
to transitioning into native code without informing unwinder.

* Fix build error.

* Add support to configure MonoVM diagnostics using env variable.

Adding new MONO_DIAGNOSTICS env variable that can include diagnostic
specific configs as well as --diagnostic-ports, meaning that its possible
to use that instead of DOTNET_DiagnosticPorts variable. It also add
variable to set some mono profiler settings needed very early during
startup to get GC alloc as well as exception clause checks.

In order to set needed options early in process, EventPipe component
calls a specific component_init method setting up needed config.

* Fix enable/disable callback registrations based on enable/disable bit mask.

* Add ability to specify callspec for method instrumentation.

Add --diagnostic-mono-profiler-callspec= to accept Mono callspec string.

Split keywords to enable method tracing and instrumentation, enables
ability to start instrumenting (but not emitting events) in one session
and then enable emitting events in later session.

If a callspec is used, instrumentation will be enabled on component init.

* Only init component once when using static component builds.

Author: lateralusX

src/coreclr/scripts/genEventPipe.py

@@ -72,11 +72,19 @@ def generateMethodSignatureWrite(eventName, template, extern, runtimeFlavor):
     sig_pieces.append(")")
     return ''.join(sig_pieces)
 
+def includeProvider(providerName, runtimeFlavor):
+    if runtimeFlavor.coreclr and providerName == "Microsoft-DotNETRuntimeMonoProfiler":
+        return False
+    else:
+        return True
+
 def includeEvent(inclusionList, providerName, eventName):
     if len(inclusionList) == 0:
         return True
     if providerName in inclusionList and eventName in inclusionList[providerName]:
         return True
+    elif providerName in inclusionList and "*" in inclusionList[providerName]:
+        return True
     elif "*" in inclusionList and eventName in inclusionList["*"]:
         return True
     elif "*" in inclusionList and "*" in inclusionList["*"]:
@@ -340,6 +348,10 @@ def generateWriteEventBody(template, providerName, eventName, runtimeFlavor):
             pack_list.append(
                     "    success &= write_buffer_double_t(%s, &buffer, &offset, &size, &fixedBuffer);" %
                     (parameter.name,))
+        elif parameter.winType == "win:Pointer" and runtimeFlavor.mono:
+            pack_list.append(
+                    "    success &= write_buffer_uintptr_t((uintptr_t)%s, &buffer, &offset, &size, &fixedBuffer);" %
+                    (parameter.name,))
         elif runtimeFlavor.mono:
             pack_list.append(
                 "    success &= write_buffer((const uint8_t *)%s, sizeof(%s), &buffer, &offset, &size, &fixedBuffer);" %
@@ -669,16 +681,17 @@ def generateEventPipeHelperFile(etwmanifest, eventpipe_directory, target_cpp, ru
 
             for providerNode in tree.getElementsByTagName('provider'):
                 providerName = providerNode.getAttribute('name')
-                providerPrettyName = providerName.replace("Windows-", '')
-                providerPrettyName = providerPrettyName.replace("Microsoft-", '')
-                providerPrettyName = providerPrettyName.replace('-', '_')
-                if extern: helper.write(
-                    'extern "C" '
-                )
-                helper.write(
-                    "void Init" +
-                    providerPrettyName +
-                    "(void);\n\n")
+                if includeProvider(providerName, runtimeFlavor):
+                    providerPrettyName = providerName.replace("Windows-", '')
+                    providerPrettyName = providerPrettyName.replace("Microsoft-", '')
+                    providerPrettyName = providerPrettyName.replace('-', '_')
+                    if extern: helper.write(
+                        'extern "C" '
+                    )
+                    helper.write(
+                        "void Init" +
+                        providerPrettyName +
+                        "(void);\n\n")
 
             if extern: helper.write(
                 'extern "C" '
@@ -687,10 +700,11 @@ def generateEventPipeHelperFile(etwmanifest, eventpipe_directory, target_cpp, ru
             helper.write("void InitProvidersAndEvents(void)\n{\n")
             for providerNode in tree.getElementsByTagName('provider'):
                 providerName = providerNode.getAttribute('name')
-                providerPrettyName = providerName.replace("Windows-", '')
-                providerPrettyName = providerPrettyName.replace("Microsoft-", '')
-                providerPrettyName = providerPrettyName.replace('-', '_')
-                helper.write("    Init" + providerPrettyName + "();\n")
+                if includeProvider(providerName, runtimeFlavor):
+                    providerPrettyName = providerName.replace("Windows-", '')
+                    providerPrettyName = providerPrettyName.replace("Microsoft-", '')
+                    providerPrettyName = providerPrettyName.replace('-', '_')
+                    helper.write("    Init" + providerPrettyName + "();\n")
             helper.write("}\n")
 
             if runtimeFlavor.coreclr:
@@ -892,6 +906,19 @@ def getMonoEventPipeImplFilePrefix():
     return write_buffer_int32_t (value, buffer, offset, size, fixed_buffer);
 }
 
+static
+inline
+bool
+write_buffer_uintptr_t (
+    uintptr_t value,
+    uint8_t **buffer,
+    size_t *offset,
+    size_t *size,
+    bool *fixed_buffer)
+{
+    return write_buffer ((const uint8_t *)&value, sizeof (uintptr_t), buffer, offset, size, fixed_buffer);
+}
+
 static
 inline
 EventPipeEvent *
@@ -949,6 +976,8 @@ def generateEventPipeImplFiles(
 
     for providerNode in tree.getElementsByTagName('provider'):
         providerName = providerNode.getAttribute('name')
+        if not includeProvider(providerName, runtimeFlavor):
+            continue
 
         providerPrettyName = providerName.replace("Windows-", '')
         providerPrettyName = providerPrettyName.replace("Microsoft-", '')