mcs/class/Mono.Cecil.Mdb/Mono.Cecil.Mdb/MdbReader.cs

   1 //
   2 // MdbReader.cs
   3 //
   4 // Author:
   5 //   Jb Evain (jbevain@gmail.com)
   6 //
   7 // (C) 2006 Jb Evain
   8 //
   9 // Permission is hereby granted, free of charge, to any person obtaining
  10 // a copy of this software and associated documentation files (the
  11 // "Software"), to deal in the Software without restriction, including
  12 // without limitation the rights to use, copy, modify, merge, publish,
  13 // distribute, sublicense, and/or sell copies of the Software, and to
  14 // permit persons to whom the Software is furnished to do so, subject to
  15 // the following conditions:
  16 //
  17 // The above copyright notice and this permission notice shall be
  18 // included in all copies or substantial portions of the Software.
  19 //
  20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  27 //
  28
  29 namespace Mono.Cecil.Mdb {
  30
  31         using System.Collections;
  32
  33         using Mono.Cecil.Cil;
  34
  35         using Mono.CompilerServices.SymbolWriter;
  36
  37         class MdbReader : ISymbolReader {
  38
  39                 MonoSymbolFile m_symFile;
  40                 Hashtable m_documents;
  41                 Hashtable m_scopes;
  42
  43                 public MdbReader (MonoSymbolFile symFile)
  44                 {
  45                         m_symFile = symFile;
  46                         m_documents = new Hashtable ();
  47                         m_scopes = new Hashtable ();
  48                 }
  49
  50                 Instruction GetInstruction (MethodBody body, IDictionary instructions, int offset)
  51                 {
  52                         Instruction instr = (Instruction) instructions [offset];
  53                         if (instr != null)
  54                                 return instr;
  55
  56                         return body.Instructions.Outside;
  57                 }
  58
  59                 public void Read (MethodBody body, IDictionary instructions)
  60                 {
  61                         MethodEntry entry = m_symFile.GetMethodByToken ((int) body.Method.MetadataToken.ToUInt ());
  62                         if (entry == null)
  63                                 return;
  64
  65                         ReadScopes (entry, body, instructions);
  66                         ReadLineNumbers (entry, instructions);
  67                         ReadLocalVariables (entry, body);
  68                 }
  69
  70                 void ReadLocalVariables (MethodEntry entry, MethodBody body)
  71                 {
  72                         LocalVariableEntry[] locals = entry.GetLocals ();
  73                         foreach (LocalVariableEntry loc in locals) {
  74                                 VariableDefinition var = body.Variables [loc.Index];
  75                                 var.Name = loc.Name;
  76
  77                                 Scope scope = m_scopes [loc.BlockIndex] as Scope;
  78                                 if (scope == null)
  79                                         continue;
  80                                 scope.Variables.Add (var);
  81                         }
  82                 }
  83
  84                 void ReadLineNumbers (MethodEntry entry, IDictionary instructions)
  85                 {
  86                         LineNumberTable lnt = entry.GetLineNumberTable ();
  87                         foreach (LineNumberEntry line in lnt.LineNumbers) {
  88                                 Instruction instr = instructions [line.Offset] as Instruction;
  89                                 if (instr == null)
  90                                         continue;
  91
  92                                 Document doc = GetDocument (entry.CompileUnit.SourceFile);
  93                                 instr.SequencePoint = new SequencePoint (doc);
  94                                 instr.SequencePoint.StartLine = line.Row;
  95                                 instr.SequencePoint.EndLine = line.Row;
  96                         }
  97                 }
  98
  99                 Document GetDocument (SourceFileEntry file)
 100                 {
 101                         Document doc = m_documents [file.FileName] as Document;
 102                         if (doc != null)
 103                                 return doc;
 104
 105                         doc = new Document (file.FileName);
 106
 107                         m_documents [file.FileName] = doc;
 108                         return doc;
 109                 }
 110
 111                 void ReadScopes (MethodEntry entry, MethodBody body, IDictionary instructions)
 112                 {
 113                         CodeBlockEntry[] blocks = entry.GetCodeBlocks ();
 114                         foreach (CodeBlockEntry cbe in blocks) {
 115                                 if (cbe.BlockType != CodeBlockEntry.Type.Lexical)
 116                                         continue;
 117
 118                                 Scope s = new Scope ();
 119                                 s.Start = GetInstruction (body, instructions, cbe.StartOffset);
 120                                 s.End = GetInstruction(body, instructions, cbe.EndOffset);
 121                                 m_scopes [entry.Index] = s;
 122
 123                                 if (!AddScope (body, s))
 124                                         body.Scopes.Add (s);
 125                         }
 126                 }
 127
 128                 bool AddScope (IScopeProvider provider, Scope s)
 129                 {
 130                         foreach (Scope scope in provider.Scopes) {
 131                                 if (AddScope (scope, s))
 132                                         return true;
 133
 134                                 if (s.Start.Offset >= scope.Start.Offset && s.End.Offset <= scope.End.Offset) {
 135                                         scope.Scopes.Add (s);
 136                                         return true;
 137                                 }
 138                         }
 139
 140                         return false;
 141                 }
 142
 143                 public void Dispose ()
 144                 {
 145                         m_symFile.Dispose ();
 146                 }
 147         }
 148 }