Add more profile events

Source/Engine/Scripting/BinaryModule.cpp

@@ -4,6 +4,7 @@
 #include "ScriptingObject.h"
 #include "Engine/Core/Log.h"
 #include "Engine/Threading/Threading.h"
+#include "Engine/Profiler/ProfilerCPU.h"
 #include "ManagedCLR/MAssembly.h"
 #include "ManagedCLR/MClass.h"
 #include "ManagedCLR/MType.h"
@@ -589,6 +590,7 @@ MMethod* ManagedBinaryModule::FindMethod(MClass* mclass, const ScriptingTypeMeth
 
 void ManagedBinaryModule::OnLoading(MAssembly* assembly)
 {
+    PROFILE_CPU();
     for (ScriptingType& type : Types)
     {
         type.InitRuntime();
@@ -597,6 +599,7 @@ void ManagedBinaryModule::OnLoading(MAssembly* assembly)
 
 void ManagedBinaryModule::OnLoaded(MAssembly* assembly)
 {
+    PROFILE_CPU();
     ASSERT(ClassToTypeIndex.IsEmpty());
 
     const auto& classes = assembly->GetClasses();
@@ -750,6 +753,8 @@ void ManagedBinaryModule::OnLoaded(MAssembly* assembly)
 
 void ManagedBinaryModule::OnUnloading(MAssembly* assembly)
 {
+    PROFILE_CPU();
+
     // Clear managed-only types
     for (int32 i = _firstManagedTypeIndex; i < Types.Count(); i++)
     {

Source/Engine/Scripting/ManagedCLR/MAssembly.Mono.cpp

@@ -17,6 +17,7 @@
 #include "Engine/Scripting/Scripting.h"
 #include "Engine/Platform/StringUtils.h"
 #include "Engine/Platform/File.h"
+#include "Engine/Profiler/ProfilerCPU.h"
 #include "Engine/Threading/Threading.h"
 #include <ThirdParty/mono-2.0/mono/metadata/mono-debug.h>
 #include <ThirdParty/mono-2.0/mono/metadata/assembly.h>
@@ -49,9 +50,10 @@ String MAssembly::ToString() const
 
 bool MAssembly::Load(const String& assemblyPath)
 {
-    // Skip if already loaded
     if (IsLoaded())
         return false;
+    PROFILE_CPU();
+    ZoneText(*assemblyPath, assemblyPath.Length());
 
     // Check file path
     if (!FileSystem::FileExists(assemblyPath))
@@ -83,9 +85,13 @@ bool MAssembly::Load(const String& assemblyPath)
 
 bool MAssembly::Load(MonoImage* monoImage)
 {
-    // Skip if already loaded
     if (IsLoaded())
         return false;
+    PROFILE_CPU();
+#if TRACY_ENABLE
+    const StringAnsiView monoImageName(mono_image_get_name(monoImage));
+    ZoneText(*monoImageName, monoImageName.Length());
+#endif
 
     // Ensure to be unloaded
     Unload();
@@ -114,6 +120,7 @@ void MAssembly::Unload(bool isReloading)
 {
     if (!IsLoaded())
         return;
+    PROFILE_CPU();
 
     Unloading(this);
 
@@ -223,6 +230,11 @@ const MAssembly::ClassesDictionary& MAssembly::GetClasses() const
 {
     if (_hasCachedClasses || !IsLoaded())
         return _classes;
+    PROFILE_CPU();
+#if TRACY_ENABLE
+    const StringAnsiView monoImageName(mono_image_get_name(_monoImage));
+    ZoneText(*monoImageName, monoImageName.Length());
+#endif
     ScopeLock lock(_locker);
     if (_hasCachedClasses)
         return _classes;

Source/Engine/Scripting/ManagedCLR/MCore.Mono.cpp

@@ -342,6 +342,7 @@ static void* OnMonoLinuxDlSym(void* handle, const char* name, char** err, void*
 
 bool MCore::LoadEngine()
 {
+    PROFILE_CPU();
     ASSERT(Globals::MonoPath.IsANSI());
 
 #if 0
@@ -609,16 +610,19 @@ void MCore::ExitThread()
 
 void MCore::GC::Collect()
 {
+    PROFILE_CPU();
     mono_gc_collect(mono_gc_max_generation());
 }
 
 void MCore::GC::Collect(int32 generation)
 {
+    PROFILE_CPU();
     mono_gc_collect(generation);
 }
 
 void MCore::GC::WaitForPendingFinalizers()
 {
+    PROFILE_CPU();
     if (mono_gc_pending_finalizers())
     {
         mono_gc_finalize_notify();

Source/Engine/Scripting/Scripting.cpp

@@ -409,6 +409,7 @@ bool Scripting::LoadBinaryModules(const String& path, const String& projectFolde
 
 bool Scripting::Load()
 {
+    PROFILE_CPU();
     // Note: this action can be called from main thread (due to Mono problems with assemblies actions from other threads)
     ASSERT(IsInMainThread());
 
@@ -472,6 +473,7 @@ bool Scripting::Load()
 
 void Scripting::Release()
 {
+    PROFILE_CPU();
     // Note: this action can be called from main thread (due to Mono problems with assemblies actions from other threads)
     ASSERT(IsInMainThread());
 
@@ -718,7 +720,6 @@ ScriptingObject* Scripting::FindObject(Guid id, MClass* type)
 {
     if (!id.IsValid())
         return nullptr;
-
     PROFILE_CPU();
 
     // Try to map object id
@@ -798,7 +799,6 @@ ScriptingObject* Scripting::FindObject(const MonoObject* managedInstance)
 {
     if (managedInstance == nullptr)
         return nullptr;
-
     PROFILE_CPU();
 
     // TODO: optimize it by reading the unmanagedPtr or _internalId from managed Object property