/// <summary>
/// </summary>
/// <param name="module">
/// </param>
/// <param name="bits">
/// </param>
/// <param name="limit">
/// </param>
/// <param name="readStrings">
/// </param>
/// <returns>
/// </returns>
internal static PdbFunction[] LoadManagedFunctions(string module, BitAccess bits, uint limit, bool readStrings)
{
var mod = StripNamespace(module);
var begin = bits.Position;
var count = 0;
while (bits.Position < limit)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.Position = star;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_GMANPROC:
case SYM.S_LMANPROC:
ManProcSym proc;
bits.ReadUInt32(out proc.parent);
bits.ReadUInt32(out proc.end);
bits.Position = (int)proc.end;
count++;
break;
case SYM.S_END:
bits.Position = stop;
break;
default:
// Console.WriteLine("{0,6}: {1:x2} {2}",
// bits.Position, rec, (SYM)rec);
bits.Position = stop;
break;
}
}
if (count == 0)
{
return null;
}
bits.Position = begin;
var funcs = new PdbFunction[count];
var func = 0;
while (bits.Position < limit)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_GMANPROC:
case SYM.S_LMANPROC:
ManProcSym proc;
var offset = bits.Position;
bits.ReadUInt32(out proc.parent);
bits.ReadUInt32(out proc.end);
bits.ReadUInt32(out proc.next);
bits.ReadUInt32(out proc.len);
bits.ReadUInt32(out proc.dbgStart);
bits.ReadUInt32(out proc.dbgEnd);
bits.ReadUInt32(out proc.token);
bits.ReadUInt32(out proc.off);
bits.ReadUInt16(out proc.seg);
bits.ReadUInt8(out proc.flags);
bits.ReadUInt16(out proc.retReg);
if (readStrings)
{
bits.ReadCString(out proc.name);
}
else
{
bits.SkipCString(out proc.name);
}
// Console.WriteLine("token={0:X8} [{1}::{2}]", proc.token, module, proc.name);
bits.Position = stop;
funcs[func++] = new PdbFunction(module, proc, bits);
break;
default:
{
// throw new PdbDebugException("Unknown SYMREC {0}", (SYM)rec);
bits.Position = stop;
break;
}
}
}
return funcs;
}
/// <summary>
/// </summary>
/// <param name="module">
/// </param>
/// <param name="proc">
/// </param>
/// <param name="bits">
/// </param>
/// <exception cref="PdbDebugException">
/// </exception>
internal PdbFunction(string module, ManProcSym proc, BitAccess bits)
{
this.token = proc.token;
this.module = module;
this.name = proc.name;
this.flags = proc.flags;
this.segment = proc.seg;
this.address = proc.off;
this.length = proc.len;
this.slotToken = 0;
if (proc.seg != 1)
{
throw new PdbDebugException("Segment is {0}, not 1.", proc.seg);
}
if (proc.parent != 0 || proc.next != 0)
{
throw new PdbDebugException("Warning parent={0}, next={1}", proc.parent, proc.next);
}
if (proc.dbgStart != 0 || proc.dbgEnd != 0)
{
throw new PdbDebugException("Warning DBG start={0}, end={1}", proc.dbgStart, proc.dbgEnd);
}
int constantCount;
int scopeCount;
int slotCount;
int usedNamespacesCount;
CountScopesAndSlots(bits, proc.end, out constantCount, out scopeCount, out slotCount, out usedNamespacesCount);
this.scopes = new PdbScope[scopeCount];
var scope = 0;
while (bits.Position < proc.end)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.Position = star;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_OEM:
{
// 0x0404
OemSymbol oem;
bits.ReadGuid(out oem.idOem);
bits.ReadUInt32(out oem.typind);
// internal byte[] rgl; // user data, force 4-byte alignment
if (oem.idOem == msilMetaData)
{
var name = bits.ReadString();
if (name == "MD2")
{
byte version;
bits.ReadUInt8(out version);
if (version == 4)
{
byte count;
bits.ReadUInt8(out count);
bits.Align(4);
while (count-- > 0)
{
this.ReadCustomMetadata(bits);
}
}
}
bits.Position = stop;
break;
}
else
{
throw new PdbDebugException("OEM section: guid={0} ti={1}", oem.idOem, oem.typind);
// bits.Position = stop;
}
}
case SYM.S_BLOCK32:
{
var block = new BlockSym32();
bits.ReadUInt32(out block.parent);
bits.ReadUInt32(out block.end);
bits.ReadUInt32(out block.len);
bits.ReadUInt32(out this.address);
bits.ReadUInt16(out block.seg);
bits.SkipCString(out block.name);
bits.Position = stop;
this.scopes[scope] = new PdbScope(block, bits, out this.slotToken);
bits.Position = (int)block.end;
break;
}
case SYM.S_UNAMESPACE:
bits.Position = stop;
break;
case SYM.S_END:
bits.Position = stop;
break;
default:
{
// throw new PdbDebugException("Unknown SYM: {0}", (SYM)rec);
bits.Position = stop;
break;
}
}
}
if (bits.Position != proc.end)
{
throw new PdbDebugException("Not at S_END");
}
ushort esiz;
ushort erec;
bits.ReadUInt16(out esiz);
bits.ReadUInt16(out erec);
if (erec != (ushort)SYM.S_END)
{
throw new PdbDebugException("Missing S_END");
}
}
/// <summary>
/// </summary>
/// <param name="module">
/// </param>
/// <param name="proc">
/// </param>
/// <param name="bits">
/// </param>
/// <exception cref="PdbDebugException">
/// </exception>
internal PdbFunction(string module, ManProcSym proc, BitAccess bits)
{
this.token = proc.token;
this.module = module;
this.name = proc.name;
this.flags = proc.flags;
this.segment = proc.seg;
this.address = proc.off;
this.length = proc.len;
this.slotToken = 0;
if (proc.seg != 1)
{
throw new PdbDebugException("Segment is {0}, not 1.", proc.seg);
}
if (proc.parent != 0 || proc.next != 0)
{
throw new PdbDebugException("Warning parent={0}, next={1}", proc.parent, proc.next);
}
if (proc.dbgStart != 0 || proc.dbgEnd != 0)
{
throw new PdbDebugException("Warning DBG start={0}, end={1}", proc.dbgStart, proc.dbgEnd);
}
int constantCount;
int scopeCount;
int slotCount;
int usedNamespacesCount;
CountScopesAndSlots(bits, proc.end, out constantCount, out scopeCount, out slotCount, out usedNamespacesCount);
this.scopes = new PdbScope[scopeCount];
var scope = 0;
while (bits.Position < proc.end)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.Position = star;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_OEM:
{
// 0x0404
OemSymbol oem;
bits.ReadGuid(out oem.idOem);
bits.ReadUInt32(out oem.typind);
// internal byte[] rgl; // user data, force 4-byte alignment
if (oem.idOem == msilMetaData)
{
var name = bits.ReadString();
if (name == "MD2")
{
byte version;
bits.ReadUInt8(out version);
if (version == 4)
{
byte count;
bits.ReadUInt8(out count);
bits.Align(4);
while (count-- > 0)
{
this.ReadCustomMetadata(bits);
}
}
}
bits.Position = stop;
break;
}
else
{
throw new PdbDebugException("OEM section: guid={0} ti={1}", oem.idOem, oem.typind);
// bits.Position = stop;
}
}
case SYM.S_BLOCK32:
{
var block = new BlockSym32();
bits.ReadUInt32(out block.parent);
bits.ReadUInt32(out block.end);
bits.ReadUInt32(out block.len);
bits.ReadUInt32(out this.address);
bits.ReadUInt16(out block.seg);
bits.SkipCString(out block.name);
bits.Position = stop;
this.scopes[scope] = new PdbScope(block, bits, out this.slotToken);
bits.Position = (int)block.end;
break;
}
case SYM.S_UNAMESPACE:
bits.Position = stop;
break;
case SYM.S_END:
bits.Position = stop;
break;
default:
{
// throw new PdbDebugException("Unknown SYM: {0}", (SYM)rec);
bits.Position = stop;
break;
}
}
}
if (bits.Position != proc.end)
{
throw new PdbDebugException("Not at S_END");
}
ushort esiz;
ushort erec;
bits.ReadUInt16(out esiz);
bits.ReadUInt16(out erec);
if (erec != (ushort)SYM.S_END)
{
throw new PdbDebugException("Missing S_END");
}
}
/// <summary>
/// </summary>
/// <param name="module">
/// </param>
/// <param name="bits">
/// </param>
/// <param name="limit">
/// </param>
/// <param name="readStrings">
/// </param>
/// <returns>
/// </returns>
internal static PdbFunction[] LoadManagedFunctions(string module, BitAccess bits, uint limit, bool readStrings)
{
var mod = StripNamespace(module);
var begin = bits.Position;
var count = 0;
while (bits.Position < limit)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.Position = star;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_GMANPROC:
case SYM.S_LMANPROC:
ManProcSym proc;
bits.ReadUInt32(out proc.parent);
bits.ReadUInt32(out proc.end);
bits.Position = (int)proc.end;
count++;
break;
case SYM.S_END:
bits.Position = stop;
break;
default:
// Console.WriteLine("{0,6}: {1:x2} {2}",
// bits.Position, rec, (SYM)rec);
bits.Position = stop;
break;
}
}
if (count == 0)
{
return(null);
}
bits.Position = begin;
var funcs = new PdbFunction[count];
var func = 0;
while (bits.Position < limit)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_GMANPROC:
case SYM.S_LMANPROC:
ManProcSym proc;
var offset = bits.Position;
bits.ReadUInt32(out proc.parent);
bits.ReadUInt32(out proc.end);
bits.ReadUInt32(out proc.next);
bits.ReadUInt32(out proc.len);
bits.ReadUInt32(out proc.dbgStart);
bits.ReadUInt32(out proc.dbgEnd);
bits.ReadUInt32(out proc.token);
bits.ReadUInt32(out proc.off);
bits.ReadUInt16(out proc.seg);
bits.ReadUInt8(out proc.flags);
bits.ReadUInt16(out proc.retReg);
if (readStrings)
{
bits.ReadCString(out proc.name);
}
else
{
bits.SkipCString(out proc.name);
}
// Console.WriteLine("token={0:X8} [{1}::{2}]", proc.token, module, proc.name);
bits.Position = stop;
funcs[func++] = new PdbFunction(module, proc, bits);
break;
default:
{
// throw new PdbDebugException("Unknown SYMREC {0}", (SYM)rec);
bits.Position = stop;
break;
}
}
}
return(funcs);
}
/// <summary>
/// </summary>
/// <param name="block">
/// </param>
/// <param name="bits">
/// </param>
/// <param name="typind">
/// </param>
/// <exception cref="PdbException">
/// </exception>
/// <exception cref="Exception">
/// </exception>
internal PdbScope(BlockSym32 block, BitAccess bits, out uint typind)
{
this.segment = block.seg;
this.address = block.off;
this.length = block.len;
typind = 0;
int constantCount;
int scopeCount;
int slotCount;
int namespaceCount;
PdbFunction.CountScopesAndSlots(bits, block.end, out constantCount, out scopeCount, out slotCount, out namespaceCount);
this.constants = new PdbConstant[constantCount];
this.scopes = new PdbScope[scopeCount];
this.slots = new PdbSlot[slotCount];
this.usedNamespaces = new string[namespaceCount];
var constant = 0;
var scope = 0;
var slot = 0;
var usedNs = 0;
while (bits.Position < block.end)
{
ushort siz;
ushort rec;
bits.ReadUInt16(out siz);
var star = bits.Position;
var stop = bits.Position + siz;
bits.Position = star;
bits.ReadUInt16(out rec);
switch ((SYM)rec)
{
case SYM.S_BLOCK32:
{
var sub = new BlockSym32();
bits.ReadUInt32(out sub.parent);
bits.ReadUInt32(out sub.end);
bits.ReadUInt32(out sub.len);
bits.ReadUInt32(out sub.off);
bits.ReadUInt16(out sub.seg);
bits.SkipCString(out sub.name);
bits.Position = stop;
this.scopes[scope++] = new PdbScope(sub, bits, out typind);
break;
}
case SYM.S_MANSLOT:
this.slots[slot++] = new PdbSlot(bits, out typind);
bits.Position = stop;
break;
case SYM.S_UNAMESPACE:
bits.ReadCString(out this.usedNamespaces[usedNs++]);
bits.Position = stop;
break;
case SYM.S_END:
bits.Position = stop;
break;
case SYM.S_MANCONSTANT:
this.constants[constant++] = new PdbConstant(bits);
bits.Position = stop;
break;
default:
throw new PdbException("Unknown SYM in scope {0}", (SYM)rec);
// bits.Position = stop;
}
}
if (bits.Position != block.end)
{
throw new Exception("Not at S_END");
}
ushort esiz;
ushort erec;
bits.ReadUInt16(out esiz);
bits.ReadUInt16(out erec);
if (erec != (ushort)SYM.S_END)
{
throw new Exception("Missing S_END");
}
}