5 // Lluis Sanchez Gual (lluis@novell.com)
7 // (C) 2005 Novell, Inc. http://www.novell.com
10 // Permission is hereby granted, free of charge, to any person obtaining
11 // a copy of this software and associated documentation files (the
12 // "Software"), to deal in the Software without restriction, including
13 // without limitation the rights to use, copy, modify, merge, publish,
14 // distribute, sublicense, and/or sell copies of the Software, and to
15 // permit persons to whom the Software is furnished to do so, subject to
16 // the following conditions:
18 // The above copyright notice and this permission notice shall be
19 // included in all copies or substantial portions of the Software.
21 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
22 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
23 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
24 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
25 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
26 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
27 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
32 using System.Reflection;
33 using System.Reflection.Emit;
34 using System.Runtime.CompilerServices;
35 using System.Collections;
37 using System.Diagnostics.SymbolStore;
39 namespace Mono.CompilerServices.SymbolWriter
41 public class SymbolWriterImpl: ISymbolWriter
48 Stack namespaceStack = new Stack ();
51 Hashtable documents = new Hashtable ();
55 delegate Guid GetGuidFunc (ModuleBuilder mb);
56 GetGuidFunc get_guid_func;
58 public SymbolWriterImpl (ModuleBuilder mb)
65 MethodInfo mi = typeof (ModuleBuilder).GetMethod (
67 BindingFlags.Static | BindingFlags.NonPublic);
71 get_guid_func = (GetGuidFunc) System.Delegate.CreateDelegate (
72 typeof (GetGuidFunc), mi);
74 msw.WriteSymbolFile (get_guid_func (mb));
79 public SymbolWriterImpl (Guid guid)
86 msw.WriteSymbolFile (guid);
90 public void CloseMethod ()
99 public void CloseNamespace ()
101 namespaceStack.Pop ();
102 msw.CloseNamespace ();
105 public void CloseScope (int endOffset)
107 msw.CloseScope (endOffset);
110 public ISymbolDocumentWriter DefineDocument (
116 SymbolDocumentWriterImpl doc = (SymbolDocumentWriterImpl) documents [url];
118 SourceFileEntry entry = msw.DefineDocument (url);
119 CompileUnitEntry comp_unit = msw.DefineCompilationUnit (entry);
120 doc = new SymbolDocumentWriterImpl (comp_unit);
121 documents [url] = doc;
126 public void DefineField (
129 FieldAttributes attributes,
131 SymAddressKind addrKind,
138 public void DefineGlobalVariable (
140 FieldAttributes attributes,
142 SymAddressKind addrKind,
149 public void DefineLocalVariable (
151 FieldAttributes attributes,
153 SymAddressKind addrKind,
160 msw.DefineLocalVariable (nextLocalIndex++, name);
163 public void DefineParameter (
165 ParameterAttributes attributes,
167 SymAddressKind addrKind,
174 public void DefineSequencePoints (
175 ISymbolDocumentWriter document,
182 SymbolDocumentWriterImpl doc = (SymbolDocumentWriterImpl) document;
183 SourceFileEntry file = doc != null ? doc.Entry.SourceFile : null;
185 for (int n=0; n<offsets.Length; n++) {
186 if (n > 0 && offsets[n] == offsets[n-1] && lines[n] == lines[n-1] && columns[n] == columns[n-1])
188 msw.MarkSequencePoint (offsets[n], file, lines[n], columns[n], false);
192 public void Initialize (IntPtr emitter, string filename, bool fFullBuild)
194 msw = new MonoSymbolWriter (filename);
197 public void OpenMethod (SymbolToken method)
199 currentToken = method.GetToken ();
202 public void OpenNamespace (string name)
204 NamespaceInfo n = new NamespaceInfo ();
207 namespaceStack.Push (n);
210 public int OpenScope (int startOffset)
212 return msw.OpenScope (startOffset);
215 public void SetMethodSourceRange (
216 ISymbolDocumentWriter startDoc,
219 ISymbolDocumentWriter endDoc,
223 int nsId = GetCurrentNamespace (startDoc);
224 SourceMethodImpl sm = new SourceMethodImpl (methodName, currentToken, nsId);
225 msw.OpenMethod (((ICompileUnit)startDoc).Entry, nsId, sm);
229 public void SetScopeRange (int scopeID, int startOffset, int endOffset)
233 public void SetSymAttribute (SymbolToken parent, string name, byte[] data)
235 // This is a hack! but MonoSymbolWriter needs the method name
236 // and ISymbolWriter does not have any method for providing it
237 if (name == "__name")
238 methodName = System.Text.Encoding.UTF8.GetString (data);
241 public void SetUnderlyingWriter (IntPtr underlyingWriter)
245 public void SetUserEntryPoint (SymbolToken entryMethod)
249 public void UsingNamespace (string fullName)
251 if (namespaceStack.Count == 0) {
255 NamespaceInfo ni = (NamespaceInfo) namespaceStack.Peek ();
256 if (ni.NamespaceID != -1) {
257 NamespaceInfo old = ni;
259 OpenNamespace (old.Name);
260 ni = (NamespaceInfo) namespaceStack.Peek ();
261 ni.UsingClauses = old.UsingClauses;
263 ni.UsingClauses.Add (fullName);
266 int GetCurrentNamespace (ISymbolDocumentWriter doc)
268 if (namespaceStack.Count == 0) {
272 NamespaceInfo ni = (NamespaceInfo) namespaceStack.Peek ();
273 if (ni.NamespaceID == -1)
275 string[] usings = (string[]) ni.UsingClauses.ToArray (typeof(string));
278 if (namespaceStack.Count > 1) {
279 namespaceStack.Pop ();
280 parentId = ((NamespaceInfo) namespaceStack.Peek ()).NamespaceID;
281 namespaceStack.Push (ni);
284 ni.NamespaceID = msw.DefineNamespace (ni.Name, ((ICompileUnit)doc).Entry, usings, parentId);
286 return ni.NamespaceID;
291 class SymbolDocumentWriterImpl: ISymbolDocumentWriter, ISourceFile, ICompileUnit
293 CompileUnitEntry comp_unit;
295 public SymbolDocumentWriterImpl (CompileUnitEntry comp_unit)
297 this.comp_unit = comp_unit;
300 public void SetCheckSum (Guid algorithmId, byte[] checkSum)
304 public void SetSource (byte[] source)
308 SourceFileEntry ISourceFile.Entry {
309 get { return comp_unit.SourceFile; }
312 public CompileUnitEntry Entry {
313 get { return comp_unit; }
317 class SourceMethodImpl: IMethodDef
323 public SourceMethodImpl (string name, int token, int namespaceID)
327 this.namespaceID = namespaceID;
334 public int NamespaceID {
335 get { return namespaceID; }
339 get { return token; }
346 public int NamespaceID;
347 public ArrayList UsingClauses = new ArrayList ();