public override Program Load(Address addrLoad)
{
List <ArchiveDirectoryEntry> entries = LoadDiskDirectory();
IArchiveBrowserService abSvc = Services.GetService <IArchiveBrowserService>();
if (abSvc != null)
{
var selectedFile = abSvc.UserSelectFileFromArchive(entries) as D64FileEntry;
if (selectedFile != null)
{
this.program = LoadImage(addrLoad, selectedFile);
return(program);
}
}
var arch = new Mos6502ProcessorArchitecture("mos6502");
var mem = new MemoryArea(Address.Ptr16(0), RawImage);
var segmentMap = new SegmentMap(mem.BaseAddress);
segmentMap.AddSegment(mem, "code", AccessMode.ReadWriteExecute);
return(new Program {
SegmentMap = segmentMap,
Architecture = arch,
Platform = new DefaultPlatform(Services, arch)
});
}
public override ILoadedImage Load(Address?addrLoad)
{
addrLoad ??= PreferredBaseAddress;
List <ArchiveDirectoryEntry> entries = LoadDiskDirectory();
IArchiveBrowserService abSvc = Services.GetService <IArchiveBrowserService>();
if (abSvc != null)
{
if (abSvc.UserSelectFileFromArchive(entries) is D64FileEntry selectedFile)
{
this.program = LoadImage(addrLoad, selectedFile);
return(program);
}
}
var arch = new Mos6502Architecture(Services, "mos6502", new Dictionary <string, object>());
var mem = new ByteMemoryArea(Address.Ptr16(0), RawImage);
var segmentMap = new SegmentMap(mem.BaseAddress);
segmentMap.AddSegment(mem, "code", AccessMode.ReadWriteExecute);
return(new Program
{
SegmentMap = segmentMap,
Architecture = arch,
Platform = new DefaultPlatform(Services, arch)
});
}
public override Program Load(Address addrLoad)
{
BinHexDecoder dec = new BinHexDecoder(new StringReader(Encoding.ASCII.GetString(RawImage)));
IEnumerator <byte> stm = dec.GetBytes().GetEnumerator();
BinHexHeader hdr = LoadBinHexHeader(stm);
byte[] dataFork = LoadFork(hdr.DataForkLength, stm);
byte[] rsrcFork = LoadFork(hdr.ResourceForkLength, stm);
var arch = new M68kArchitecture();
var platform = new MacOSClassic(Services, arch);
if (hdr.FileType == "PACT")
{
Cpt.CompactProArchive archive = new Cpt.CompactProArchive();
List <ArchiveDirectoryEntry> items = archive.Load(new MemoryStream(dataFork));
IArchiveBrowserService abSvc = Services.GetService <IArchiveBrowserService>();
if (abSvc != null)
{
var selectedFile = abSvc.UserSelectFileFromArchive(items);
if (selectedFile != null)
{
var image = selectedFile.GetBytes();
this.rsrcFork = new ResourceFork(image, arch);
this.image = new LoadedImage(addrLoad, image);
this.imageMap = new ImageMap(addrLoad, image.Length);
return(new Program(this.image, this.imageMap, arch, platform));
}
}
}
var li = new LoadedImage(addrLoad, dataFork);
return(new Program(li, li.CreateImageMap(), arch, platform));
}
public override Program Load(Address?addrLoad)
{
addrLoad ??= PreferredBaseAddress;
BinHexDecoder dec = new BinHexDecoder(new StringReader(Encoding.ASCII.GetString(RawImage)));
IEnumerator <byte> stm = dec.GetBytes().GetEnumerator();
BinHexHeader hdr = LoadBinHexHeader(stm);
byte[] dataFork = LoadFork(hdr.DataForkLength, stm);
byte[] rsrcFork = LoadFork(hdr.ResourceForkLength, stm);
var cfgSvc = Services.RequireService <IConfigurationService>();
var arch = cfgSvc.GetArchitecture("m68k") !;
var platform = (MacOSClassic)cfgSvc.GetEnvironment("macOs").Load(Services, arch);
if (hdr.FileType == "PACT")
{
Cpt.CompactProArchive archive = new Cpt.CompactProArchive();
List <ArchiveDirectoryEntry> items = archive.Load(new MemoryStream(dataFork));
IArchiveBrowserService abSvc = Services.GetService <IArchiveBrowserService>();
if (abSvc != null)
{
var selectedFile = abSvc.UserSelectFileFromArchive(items);
if (selectedFile != null)
{
var image = selectedFile.GetBytes();
this.rsrcFork = new ResourceFork(platform, image);
this.bmem = new ByteMemoryArea(addrLoad, image);
this.segmentMap = new SegmentMap(addrLoad);
return(new Program(this.segmentMap, arch, platform));
}
}
}
if (hdr.FileType == "MPST" || hdr.FileType == "APPL")
{
this.bmem = new ByteMemoryArea(addrLoad, rsrcFork);
this.rsrcFork = new ResourceFork(platform, rsrcFork);
this.segmentMap = new SegmentMap(addrLoad);
return(new Program(this.segmentMap, arch, platform));
}
this.bmem = new ByteMemoryArea(addrLoad, dataFork);
return(new Program(
new SegmentMap(bmem.BaseAddress,
new ImageSegment("", bmem, AccessMode.ReadWriteExecute)),
arch,
platform));
}
public override Program Load(Address addrLoad)
{
List <ArchiveDirectoryEntry> entries = LoadDiskDirectory();
IArchiveBrowserService abSvc = Services.GetService <IArchiveBrowserService>();
if (abSvc != null)
{
var selectedFile = abSvc.UserSelectFileFromArchive(entries) as D64FileEntry;
if (selectedFile != null)
{
this.program = LoadImage(addrLoad, selectedFile);
return(program);
}
}
var arch = new Mos6502ProcessorArchitecture();
var image = new LoadedImage(Address.Ptr16(0), RawImage);
return(new Program {
Image = image,
ImageMap = image.CreateImageMap(),
Architecture = arch,
Platform = new DefaultPlatform(Services, arch)
});
}
private void Given_MainFormInteractor()
{
program = CreateFakeProgram();
svcFactory = mr.StrictMock <IServiceFactory>();
archSvc = mr.StrictMock <IArchiveBrowserService>();
dlgFactory = mr.StrictMock <IDialogFactory>();
uiSvc = mr.StrictMock <IDecompilerShellUiService>();
memSvc = mr.StrictMock <ILowLevelViewService>();
disasmSvc = mr.StrictMock <IDisassemblyViewService>();
typeLibSvc = mr.StrictMock <ITypeLibraryLoaderService>();
brSvc = mr.Stub <IProjectBrowserService>();
uiPrefs = mr.StrictMock <IUiPreferencesService>();
fsSvc = mr.StrictMock <IFileSystemService>();
tcHostSvc = mr.StrictMock <ITabControlHostService>();
dcSvc = mr.StrictMock <IDecompilerService>();
srSvc = MockRepository.GenerateMock <ISearchResultService, IWindowPane>();
diagnosticSvc = MockRepository.GenerateMock <IDiagnosticsService, IWindowPane>();
resEditSvc = mr.StrictMock <IResourceEditorService>();
cgvSvc = mr.StrictMock <ICallGraphViewService>();
loader = mr.StrictMock <ILoader>();
vimpSvc = mr.StrictMock <IViewImportsService>();
symLdrSvc = mr.StrictMock <ISymbolLoadingService>();
svcFactory.Stub(s => s.CreateArchiveBrowserService()).Return(archSvc);
svcFactory.Stub(s => s.CreateDecompilerConfiguration()).Return(new FakeDecompilerConfiguration());
svcFactory.Stub(s => s.CreateDiagnosticsService(Arg <ListView> .Is.Anything)).Return(diagnosticSvc);
svcFactory.Stub(s => s.CreateDecompilerService()).Return(dcSvc);
svcFactory.Stub(s => s.CreateDisassemblyViewService()).Return(disasmSvc);
svcFactory.Stub(s => s.CreateMemoryViewService()).Return(memSvc);
svcFactory.Stub(s => s.CreateDecompilerEventListener()).Return(new FakeDecompilerEventListener());
svcFactory.Stub(s => s.CreateInitialPageInteractor()).Return(new FakeInitialPageInteractor());
svcFactory.Stub(s => s.CreateScannedPageInteractor()).Return(new FakeScannedPageInteractor());
svcFactory.Stub(s => s.CreateAnalyzedPageInteractor()).Return(new FakeAnalyzedPageInteractor());
svcFactory.Stub(s => s.CreateFinalPageInteractor()).Return(new FakeFinalPageInteractor());
svcFactory.Stub(s => s.CreateTypeLibraryLoaderService()).Return(typeLibSvc);
svcFactory.Stub(s => s.CreateProjectBrowserService(Arg <ITreeView> .Is.NotNull)).Return(brSvc);
svcFactory.Stub(s => s.CreateUiPreferencesService()).Return(uiPrefs);
svcFactory.Stub(s => s.CreateFileSystemService()).Return(fsSvc);
svcFactory.Stub(s => s.CreateShellUiService(Arg <IMainForm> .Is.NotNull, Arg <DecompilerMenus> .Is.NotNull)).Return(uiSvc);
svcFactory.Stub(s => s.CreateTabControlHost(Arg <TabControl> .Is.NotNull)).Return(tcHostSvc);
svcFactory.Stub(s => s.CreateLoader()).Return(loader);
svcFactory.Stub(s => s.CreateSearchResultService(Arg <ListView> .Is.NotNull)).Return(srSvc);
svcFactory.Stub(s => s.CreateResourceEditorService()).Return(resEditSvc);
svcFactory.Stub(s => s.CreateCallGraphViewService()).Return(cgvSvc);
svcFactory.Stub(s => s.CreateViewImportService()).Return(vimpSvc);
svcFactory.Stub(s => s.CreateSymbolLoadingService()).Return(symLdrSvc);
services.AddService(typeof(IDialogFactory), dlgFactory);
services.AddService(typeof(IServiceFactory), svcFactory);
brSvc.Stub(b => b.Clear());
form = mr.StrictMock <IMainForm>();
var listView = new ListView();
var imagelist = new ImageList();
var tabResults = new TabPage();
var tabDiagnostics = new TabPage();
var tabControl = new TabControl {
TabPages = { tabResults, tabDiagnostics }
};
var toolStrip = new ToolStrip {
};
var statusStrip = new StatusStrip {
Items = { new ToolStripLabel() }
};
var brToolbar = new ToolStrip();
var projectBrowser = mr.Stub <ITreeView>();
form.Stub(f => f.DiagnosticsList).Return(listView);
form.Stub(f => f.ImageList).Return(imagelist);
form.Stub(f => f.Menu).SetPropertyAndIgnoreArgument();
form.Stub(f => f.AddToolbar(null)).IgnoreArguments();
form.Stub(f => f.AddProjectBrowserToolbar(null)).IgnoreArguments();
form.Stub(f => f.Dispose());
form.Stub(f => f.TabControl).Return(tabControl);
form.Stub(f => f.FindResultsPage).Return(tabResults);
form.Stub(f => f.DiagnosticsPage).Return(tabDiagnostics);
form.Stub(f => f.FindResultsList).Return(listView);
form.Stub(f => f.ToolBar).Return(toolStrip);
form.Stub(f => f.ProjectBrowserToolbar).Return(toolStrip);
form.Stub(f => f.ProjectBrowser).Return(projectBrowser);
form.Stub(f => f.StatusStrip).Return(statusStrip);
form.Stub(f => f.AddProjectBrowserToolbar(null)).IgnoreArguments();
form.Stub(f => f.ProjectBrowserToolbar).Return(brToolbar);
form.Stub(f => f.TitleText = "main.exe ").IgnoreArguments();
form.Load += null;
LastCall.IgnoreArguments();
form.Closed += null;
LastCall.IgnoreArguments();
form.ProcessCommandKey += null;
LastCall.IgnoreArguments();
dlgFactory.Stub(d => d.CreateMainForm()).Return(form);
tcHostSvc.Stub(t => t.Attach(Arg <IWindowPane> .Is.NotNull, Arg <TabPage> .Is.NotNull));
tcHostSvc.Stub(t => t.QueryStatus(
Arg <CommandID> .Is.Anything,
Arg <CommandStatus> .Is.Anything,
Arg <CommandText> .Is.Anything)).Return(false);
tcHostSvc.Stub(t => t.Execute(Arg <CommandID> .Is.Anything)).Return(false);
uiSvc.Stub(u => u.DocumentWindows).Return(new List <IWindowFrame>());
}
private void Given_MainFormInteractor()
{
program = CreateFakeProgram();
svcFactory = mr.StrictMock <IServiceFactory>();
archSvc = mr.StrictMock <IArchiveBrowserService>();
dlgFactory = mr.StrictMock <IDialogFactory>();
memSvc = mr.StrictMock <ILowLevelViewService>();
disasmSvc = mr.StrictMock <IDisassemblyViewService>();
typeLibSvc = mr.StrictMock <ITypeLibraryLoaderService>();
brSvc = mr.Stub <IProjectBrowserService>();
uiPrefs = mr.StrictMock <IUiPreferencesService>();
fsSvc = mr.StrictMock <IFileSystemService>();
tcHostSvc = mr.StrictMock <ITabControlHostService>();
dcSvc = mr.StrictMock <IDecompilerService>();
srSvc = MockRepository.GenerateMock <ISearchResultService, IWindowPane>();
diagnosticSvc = MockRepository.GenerateMock <IDiagnosticsService, IWindowPane>();
resEditSvc = mr.StrictMock <IResourceEditorService>();
cgvSvc = mr.StrictMock <ICallGraphViewService>();
loader = mr.StrictMock <ILoader>();
sbSvc = mr.Stub <IStatusBarService>();
vimpSvc = mr.StrictMock <IViewImportsService>();
cvSvc = mr.StrictMock <ICodeViewerService>();
imgSegSvc = mr.StrictMock <ImageSegmentService>();
symLoadSvc = mr.StrictMock <ISymbolLoadingService>();
svcFactory.Stub(s => s.CreateArchiveBrowserService()).Return(archSvc);
svcFactory.Stub(s => s.CreateCodeViewerService()).Return(cvSvc);
svcFactory.Stub(s => s.CreateDecompilerConfiguration()).Return(new FakeDecompilerConfiguration());
svcFactory.Stub(s => s.CreateDiagnosticsService()).Return(diagnosticSvc);
svcFactory.Stub(s => s.CreateDecompilerService()).Return(dcSvc);
svcFactory.Stub(s => s.CreateDisassemblyViewService()).Return(disasmSvc);
svcFactory.Stub(s => s.CreateMemoryViewService()).Return(memSvc);
svcFactory.Stub(s => s.CreateDecompilerEventListener()).Return(new FakeDecompilerEventListener());
svcFactory.Stub(s => s.CreateImageSegmentService()).Return(imgSegSvc);
svcFactory.Stub(s => s.CreateInitialPageInteractor()).Return(new FakeInitialPageInteractor());
svcFactory.Stub(s => s.CreateScannedPageInteractor()).Return(new FakeScannedPageInteractor());
svcFactory.Stub(s => s.CreateTypeLibraryLoaderService()).Return(typeLibSvc);
svcFactory.Stub(s => s.CreateProjectBrowserService()).Return(brSvc);
svcFactory.Stub(s => s.CreateUiPreferencesService()).Return(uiPrefs);
svcFactory.Stub(s => s.CreateFileSystemService()).Return(fsSvc);
svcFactory.Stub(s => s.CreateStatusBarService()).Return(sbSvc);
svcFactory.Stub(s => s.CreateTabControlHost()).Return(tcHostSvc);
svcFactory.Stub(s => s.CreateLoader()).Return(loader);
svcFactory.Stub(s => s.CreateSearchResultService()).Return(srSvc);
svcFactory.Stub(s => s.CreateResourceEditorService()).Return(resEditSvc);
svcFactory.Stub(s => s.CreateCallGraphViewService()).Return(cgvSvc);
svcFactory.Stub(s => s.CreateViewImportService()).Return(vimpSvc);
svcFactory.Stub(s => s.CreateSymbolLoadingService()).Return(symLoadSvc);
services.AddService(typeof(IDialogFactory), dlgFactory);
services.AddService(typeof(IServiceFactory), svcFactory);
brSvc.Stub(b => b.Clear());
form = mr.StrictMock <IMainForm>();
form.Stub(f => f.Dispose());
form.Stub(f => f.UpdateToolbarState());
form.Closed += null;
LastCall.IgnoreArguments();
tcHostSvc.Stub(t => t.QueryStatus(
Arg <CommandID> .Is.Anything,
Arg <CommandStatus> .Is.Anything,
Arg <CommandText> .Is.Anything)).Return(false);
tcHostSvc.Stub(t => t.Execute(Arg <CommandID> .Is.Anything)).Return(false);
uiSvc.Stub(u => u.DocumentWindows).Return(new List <IWindowFrame>());
brSvc.Stub(u => u.ContainsFocus).Return(false);
tcHostSvc.Stub(u => u.ContainsFocus).Return(false);
// We currently don't care about testing the appearance of the Main window text.
// Should this be required, you will need to remove the line below and add an
// appropriate stub/expectation in all the tests below. Good luck with that.
form.Stub(f => f.TitleText = "").IgnoreArguments();
}
