EightBitNet/MC6809/Profiler.cs
Adrian Conlon c4d52512b2 Add MC6809 profiler (mainly so I can pin down problem printing numbers)
Signed-off-by: Adrian Conlon <Adrian.conlon@gmail.com>
2019-05-07 00:46:30 +01:00

111 lines
3.6 KiB
C#

namespace EightBit
{
using System;
public sealed class Profiler
{
private readonly ulong[] instructionCounts;
private readonly ulong[] addressProfiles;
private readonly ulong[] addressCounts;
private ushort address;
private readonly Bus board;
private readonly MC6809 processor;
private readonly Disassembler disassembler;
public Profiler(Bus board, MC6809 processor, Disassembler disassembler)
{
this.board = board;
this.processor = processor;
this.disassembler = disassembler;
this.instructionCounts = new ulong[0x10000];
this.addressProfiles = new ulong[0x10000];
this.addressCounts = new ulong[0x10000];
}
public event EventHandler<EventArgs> StartingOutput;
public event EventHandler<EventArgs> FinishedOutput;
public event EventHandler<EventArgs> StartingLineOutput;
public event EventHandler<EventArgs> FinishedLineOutput;
public event EventHandler<ProfileLineEventArgs> EmitLine;
public void Enable()
{
this.processor.ExecutingInstruction += this.Processor_ExecutingInstruction;
this.processor.ExecutedInstruction += this.Processor_ExecutedInstruction;
}
public void Generate()
{
this.OnStartingOutput();
try
{
this.EmitProfileInformation();
}
finally
{
this.OnFinishedOutput();
}
}
private void EmitProfileInformation()
{
this.OnStartingLineOutput();
try
{
// For each memory address
for (var i = 0; i < 0x10000; ++i)
{
// If there are any cycles associated
var cycles = this.addressProfiles[i];
if (cycles > 0)
{
var address = (ushort)i;
// Dump a profile/disassembly line
var disassembled = this.disassembler.Disassemble(address);
var output = $"{address:x4}|{disassembled}";
this.OnEmitLine(output, cycles);
}
}
}
finally
{
this.OnFinishedLineOutput();
}
}
private void Processor_ExecutingInstruction(object sender, EventArgs e) => this.address = this.processor.PC.Word;
private void Processor_ExecutedInstruction(object sender, EventArgs e)
{
ushort opcode = this.board.Peek(this.address);
if (opcode == 0x10 || opcode == 0x11)
{
opcode *= 0x100;
opcode += this.board.Peek((ushort)(this.address + 1));
}
this.addressCounts[this.address]++;
this.instructionCounts[opcode]++;
this.addressProfiles[this.address] += (ulong)this.processor.Cycles;
}
private void OnStartingOutput() => this.StartingOutput?.Invoke(this, EventArgs.Empty);
private void OnFinishedOutput() => this.FinishedOutput?.Invoke(this, EventArgs.Empty);
private void OnStartingLineOutput() => this.StartingLineOutput?.Invoke(this, EventArgs.Empty);
private void OnFinishedLineOutput() => this.FinishedLineOutput?.Invoke(this, EventArgs.Empty);
private void OnEmitLine(string source, ulong cycles) => this.EmitLine?.Invoke(this, new ProfileLineEventArgs(source, cycles));
}
}