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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
|
using System.IO;
using System.Collections.Generic;
using System.Text;
namespace Mono.Profiler.Aot {
//
// Write the contents of a .aotprofile
// See mono/profiler/aot.h for a description of the file format
//
public sealed class ProfileWriter : ProfileBase {
Stream stream;
ProfileData data;
int id;
readonly Dictionary<TypeRecord, int> typeIds = new Dictionary<TypeRecord, int> ();
readonly Dictionary<ModuleRecord, int> moduleIds = new Dictionary<ModuleRecord, int> ();
unsafe void WriteInt32 (int intValue)
{
byte* b = (byte*)&intValue;
for (int i = 0; i < 4; i++)
stream.WriteByte (b [i]);
}
void WriteString (string str)
{
var buf = Encoding.UTF8.GetBytes (str);
WriteInt32 (buf.Length);
stream.Write (buf, 0, buf.Length);
}
int AddModule (ModuleRecord m)
{
int mId;
if (moduleIds.TryGetValue (m, out mId))
return mId;
mId = id++;
moduleIds [m] = mId;
WriteRecord (RecordType.IMAGE, mId);
WriteString (m.Name);
WriteString (m.Mvid);
return mId;
}
int AddType (TypeRecord t)
{
int tId;
if (typeIds.TryGetValue (t, out tId))
return tId;
var moduleId = AddModule (t.Module);
int instId = -1;
if (t.GenericInst != null)
instId = AddGenericInstance (t.GenericInst);
tId = id++;
typeIds [t] = tId;
WriteRecord (RecordType.TYPE, tId);
stream.WriteByte ((byte)MonoTypeEnum.MONO_TYPE_CLASS);
WriteInt32 (moduleId);
WriteInt32 (instId);
WriteString (t.Name);
return tId;
}
int AddGenericInstance (GenericInstRecord gi)
{
// add the types first, before we start writing the GINST record
for (int i = 0; i < gi.Types.Length; i++)
AddType (gi.Types [i]);
var gId = id++;
WriteRecord (RecordType.GINST, gId);
WriteInt32 (gi.Types.Length);
for (int i = 0; i < gi.Types.Length; i++)
WriteInt32 (AddType (gi.Types [i]));
return gId;
}
void WriteMethod (MethodRecord m)
{
var typeId = AddType (m.Type);
int instId = -1;
if (m.GenericInst != null)
instId = AddGenericInstance (m.GenericInst);
WriteRecord (RecordType.METHOD, id++);
WriteInt32 (typeId);
WriteInt32 (instId);
WriteInt32 (m.ParamCount);
WriteString (m.Name);
WriteString (m.Signature);
}
void WriteRecord (RecordType rt, int value)
{
stream.WriteByte ((byte)rt);
WriteInt32 (value);
}
public void WriteAllData (Stream s, ProfileData pd)
{
stream = s;
data = pd;
var buf = Encoding.UTF8.GetBytes (MAGIC);
this.stream.Write (buf, 0, buf.Length);
WriteInt32 ((MAJOR_VERSION << 16) | MINOR_VERSION);
foreach (var m in data.Methods)
WriteMethod (m);
// make sure ew have all the types
// sometime the profile contain type, which is not referenced from the methods
foreach (var t in data.Types)
AddType (t);
// just to be complete, do not miss any module too
foreach (var module in data.Modules)
AddModule (module);
WriteRecord (RecordType.NONE, 0);
}
}
}
|
