blob: bd0ee4f552f53e8067716642f5ddc6edf97d09be (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
#include <mono/metadata/profiler.h>
/*
* Bare bones profiler. Compile with:
*
* linux : gcc -shared -o mono-profiler-sample.so sample.c `pkg-config --cflags --libs mono`
* mac : gcc sample.c -o mono-profiler-sample.dylib -Dmono_free=free -lz `pkg-config --cflags mono-2` -undefined suppress -flat_namespace
*
* Install the binary where the dynamic loader can find it. eg /usr/lib etc
* 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;
};
/* called at the end of the program */
static void
sample_shutdown (MonoProfiler *prof)
{
g_print ("total number of calls: %d\n", prof->ncalls);
}
static void
sample_method_enter (MonoProfiler *prof, MonoMethod *method)
{
prof->ncalls++;
}
static void
sample_method_leave (MonoProfiler *prof, MonoMethod *method)
{
}
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_init_sample (const char *desc)
{
MonoProfiler *prof;
prof = g_new0 (MonoProfiler, 1);
MonoProfilerHandle handle = mono_profiler_install (prof);
mono_profiler_set_runtime_shutdown_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);
}
|
