[profiler] fixes to profiler sample
[mono.git] / samples / profiler / sample.c
index 49af781a55a1001be19f135c4a7e8bf24192f597..a5ee4435ea6843b554b986cf344e6276d833619d 100644 (file)
@@ -2,47 +2,61 @@
 
 /*
  * Bare bones profiler. Compile with:
- * gcc -shared -o mono-profiler-sample.so sample.c `pkg-config --cflags --libs mono`
- * Install the binary where the dynamic loader can find it.
+ * 
+ * linux : gcc -fPIC -shared -o libmono-profiler-sample.so sample.c `pkg-config --cflags --libs mono-2`
+ * mac : gcc sample.c -o mono-profiler-sample.dylib -Dmono_free=free -lz `pkg-config --cflags mono-2` -undefined suppress -flat_namespace  
+ * linux with a custom prefix (e.g. --prefix=/opt/my-mono-build):
+ *     gcc -fPIC -shared -o libmono-profiler-sample.so sample.c `PKG_CONFIG_PATH=/opt/my-mono-build/lib/pkgconfig/ pkg-config --cflags --libs mono-2`
+ *
+ * Install the binary where the dynamic loader can find it. eg /usr/lib etc.
+ * For a custom prefix build, <prefix>/lib would also work.
  * Then run mono with:
  * mono --profile=sample your_application.exe
+ *
+ * Note if you name a profiler with more than 8 characters (eg sample6789) appears to not work
  */
 
 struct _MonoProfiler {
-       int ncalls;
+       unsigned long long ncalls;
 };
 
+static MonoProfiler prof_instance;
+
 /* called at the end of the program */
 static void
 sample_shutdown (MonoProfiler *prof)
 {
-       g_print ("total number of calls: %d\n", prof->ncalls);
+       printf("total number of calls: %llu\n", prof->ncalls);
 }
 
 static void
-sample_method_enter (MonoProfiler *prof, MonoMethod *method)
+sample_method_enter (MonoProfiler *prof, MonoMethod *method, MonoProfilerCallContext *ctx)
 {
        prof->ncalls++;
 }
 
 static void
-sample_method_leave (MonoProfiler *prof, MonoMethod *method)
+sample_method_leave (MonoProfiler *prof, MonoMethod *method, MonoProfilerCallContext *ctx)
+{
+}
+
+static MonoProfilerCallInstrumentationFlags
+sample_instrumentation_filter (MonoProfiler *prof, MonoMethod *method)
 {
+       return MONO_PROFILER_CALL_INSTRUMENTATION_PROLOGUE | MONO_PROFILER_CALL_INSTRUMENTATION_EPILOGUE;
 }
 
 /* the entry point */
 void
-mono_profiler_startup (const char *desc)
+mono_profiler_init_sample (const char *desc)
 {
-       MonoProfiler *prof;
-
-       prof = g_new0 (MonoProfiler, 1);
-
-       mono_profiler_install (prof, sample_shutdown);
-       
-       mono_profiler_install_enter_leave (sample_method_enter, sample_method_leave);
+       MonoProfiler *prof = &prof_instance;
 
-       mono_profiler_set_events (MONO_PROFILE_ENTER_LEAVE);
+       MonoProfilerHandle handle = mono_profiler_create (prof);
+       mono_profiler_set_runtime_shutdown_end_callback (handle, sample_shutdown);
+       mono_profiler_set_call_instrumentation_filter_callback (handle, sample_instrumentation_filter);
+       mono_profiler_set_method_enter_callback (handle, sample_method_enter);
+       mono_profiler_set_method_leave_callback (handle, sample_method_leave);
 }