public void Tops10Core(Word18 hiseg, Word18 loseg)
{
const int segments = 1; // Only one seg for tops10
var hiPage = 0U;
var loPage = 0U;
if (hiseg.NZ)
{
hiPage = (hiseg.UI + 1) / (uint)pageSize;
}
if (loseg.NZ)
{
loPage = (loseg.UI + 1) / (uint)pageSize;
}
var hiStart = 400000.Oct() / pageSize;
// Make sure we have a segment
if (coreMemory[0] == null)
{
coreMemory[0] = new Segment(pageSize, EnablePageChangeEvents);
initializeSegment(0, 1);
}
// Get rid of spurious segments
for (var seg = 1; seg < coreMemory.Length; seg++)
{
if (seg <= segments)
{
continue;
}
if (coreMemory[seg] == null)
{
continue;
}
coreMemory[seg].SegmentDestroy(seg);
coreMemory[seg] = null;
}
if (loseg.NZ)
{
preenPages(hiStart, MaxPagesPerSegment, loPage);
}
if (hiseg.NZ)
{
preenPages(0, hiStart - 1, hiPage);
}
}
public Tops10SAVLoader(UserModeCore core, string infile)
{
Core = core;
//ulong pop, fmt;
//ulong lw = 0, hwm = 0;
var hwmPage = 0;
var hw = 0;
var lw = 0;
if (!Core.PageExists(0))
{
Core.NewPage(0);
}
// Eventually call our raw file reader for 36 bit files
var inexe = new StreamReader(infile);
// Read in first word of file
while (!inexe.EndOfStream)
{
var rw = ReadWord(inexe);
var lh = rw.LHW;
var leb = rw.LHW.UL;
if (leb == 0254000.OctU())
{
/*printf("Transfer Address = %o\n",re);*/
Transaddr = rw.RHW;
break;
}
if (((lh & 0400000.Oct18())).NZ)
{
leb |= 37777000000u.OctU();
}
var wordsToRead = -leb.SignE();
var re = Convert.ToInt32(rw.RHW.UL);
if (wordsToRead <= 0)
{
throw new Exception("?T10_LOADER - SAV Not a count! " + rw);
}
//Console.WriteLine("Load %d words at %o\n",-le,re+1);
lw += wordsToRead;
for (var i = 0; i < (wordsToRead); i++)
{
var bodyw = ReadWord(inexe);
var adrs = re + i + 1;
var page = Core.Page(adrs);
assureCoreHwm(page, ref hwmPage);
Core[re + i + 1] = bodyw;
// printf("%o/ %o,,%o %llo\n",re+i+1,lh,rh,blv);
if (re + i + 1 > hw)
{
hw = re + i + 1;
}
}
}
Console.WriteLine("[{0} Words Loaded From {1}]", lw, infile);
inexe.Close();
Console.WriteLine("[End loading {0}]", infile);
if (Transaddr.NZ)
{
Core[0, 0120.Oct18().UI] = new Word36((Word18)0, Transaddr);
}
Transaddr = Core[0, 0120.Oct18().UI].RHW;
Hiseg_floor = 0400000.Oct18();
High_Water = (Word18)hw;
Console.WriteLine("[Loader High-Water-Mark is {0}]", High_Water);
Console.WriteLine("[Transfer address is {0} Hiseg is {1}]", Transaddr,
Hiseg_floor);
}
public Word36 this[Word18 i]
{
get { return(this[(int)i.UI]); }
set { this[(int)i.UI] = value; }
}
