mirror of
https://github.com/Zeal-Operating-System/ZealOS.git
synced 2025-06-07 08:14:48 +00:00
Rename dump functions.
Rename `DocDump` to `DocDumpLines`. Rename `DocDm` to `DocDumpMem`. Rename `DocD` to `DocDump`. Rename `Dump` to `FileDump`. Rename `DClus` to `ClusDump`. Rename `DBlk` to `BlkDump`. Rename `RawDm` to `RawDumpMem`. Rename `RawDr` to `RawDumpRegs`. Rename `RawD` to `RawDump`. Rename `Dr` to `DumpRegs`. Rename `Dm` to `DumpMem`. Rename `D` to `Dump`. Rename `Who` to `HashTableDump`. Rename `Da` to `DumpAddress`.
This commit is contained in:
parent
772f3317c5
commit
05be1d0e0c
@ -162,7 +162,7 @@ U8 *CmdLinePrompt()
|
||||
}
|
||||
'>';
|
||||
if (IsDebugMode && IsRaw)
|
||||
RawDr;
|
||||
RawDumpRegs;
|
||||
|
||||
LBts(&Fs->task_flags, TASKf_CMD_LINE_PROMPT);
|
||||
st = StrGet(,, SGF_SHIFT_ESC_EXIT);
|
||||
|
@ -375,7 +375,7 @@ U0 Ui(U8 *buf, U8 **_rip, I64 seg_size=64, I64 *_jmp_dst=NULL, Bool just_ins=FAL
|
||||
if (tmpins->opcode[i] != rip[i])
|
||||
{
|
||||
// ST_ERR_ST "$$HL,0$$\nBAD MATCH SSE check #1! %02X with %02X\n", tmpins->opcode[i], rip[i];
|
||||
// D(tmpins, sizeof(CInst));"$$HL,1$$";
|
||||
// Dump(tmpins, sizeof(CInst));"$$HL,1$$";
|
||||
if (opsize == 32 && seg_size == 64)
|
||||
{
|
||||
tmpins2 = InstEntryFind(rip, 64, seg_size);
|
||||
@ -393,7 +393,7 @@ U0 Ui(U8 *buf, U8 **_rip, I64 seg_size=64, I64 *_jmp_dst=NULL, Bool just_ins=FAL
|
||||
if (tmpins->opcode[i] != rip[i])
|
||||
{
|
||||
// ST_ERR_ST "$$HL,0$$BAD MATCH SSE check #2! %02X with %02X\n", tmpins->opcode[i], rip[i];
|
||||
// D(tmpins, sizeof(CInst));"\n$$HL,1$$";
|
||||
// Dump(tmpins, sizeof(CInst));"\n$$HL,1$$";
|
||||
goto sse_check_fail; // evaluate inst op with RIP. if not identical, not a match.
|
||||
}
|
||||
}
|
||||
|
Binary file not shown.
@ -309,7 +309,7 @@ $FG,5$$TX+CX,"Committee Needed"$$FG$
|
||||
|
||||
* Note: We will never put multiple $LK,"Keyboard Tables",A="FI:::/Kernel/SerialDev/Keyboard.CC"$. Each country must make their own version of ZealOS. The $LK,"Intel Factory ROM",A="FF:::/Doc/Demands.DD,English"$ will have just English. Our $LK,"Charter",A="FI:::/Doc/Charter.DD"$ bans multiple country or architectures in the same version.
|
||||
|
||||
* 12 border chars in screen font codes 0x02-0x0D. $LK,"TextBorder",A="MN:TextBorder"$() $LK,"RawDr",A="MN:RawDr"$() $LK,"::/Demo/Games/CharDemo.CC"$. LineFeed shows-up in $FG,2$<CTRL-m>$FG$ PersonalMenu.
|
||||
* 12 border chars in screen font codes 0x02-0x0D. $LK,"TextBorder",A="MN:TextBorder"$() $LK,"RawDumpRegs",A="MN:RawDumpRegs"$() $LK,"::/Demo/Games/CharDemo.CC"$. LineFeed shows-up in $FG,2$<CTRL-m>$FG$ PersonalMenu.
|
||||
|
||||
* Super-simple high speed serial needs flow control. $FG,2$<CTRL-s>$FG$ and $FG,2$<CTRL-q>$FG$?
|
||||
|
||||
|
@ -4,7 +4,7 @@ Press <CTRL-ALT-c> to break.
|
||||
Rerun Program
|
||||
|
||||
Press <CTRL-ALT-d> to enter Debug.
|
||||
> $LK,"Dr",A="MN:Dr"$; //Dump Registers
|
||||
> $LK,"DumpRegs",A="MN:DumpRegs"$; //Dump Registers
|
||||
> $LK,"G2",A="MN:G2"$; //Cont program
|
||||
|
||||
Press <CTRL-ALT-d> to enter Debug.
|
||||
|
@ -26,7 +26,7 @@ U0 RawAccess(I64 drv_let=0)
|
||||
{
|
||||
blk = I64Get("Block to Read: ", old_offset, 0, bd->max_blk);
|
||||
BlkRead(drive, buf, blk, 1);
|
||||
D(buf, BLK_SIZE);
|
||||
Dump(buf, BLK_SIZE);
|
||||
}
|
||||
catch
|
||||
PutExcept;
|
||||
@ -40,4 +40,4 @@ U0 RawAccess(I64 drv_let=0)
|
||||
RawAccess;
|
||||
|
||||
//See $LK,"BlkRead",A="MN:BlkRead"$(), $LK,"BlkWrite",A="MN:BlkWrite"$(), $LK,"DriveLock",A="MN:DriveLock"$(), $LK,"DriveUnlock",A="MN:DriveUnlock"$()
|
||||
//$LK,"DBlk",A="MN:DBlk"$(), $LK,"DClus",A="MN:DClus"$(), $LK,"BlkDevLock",A="MN:BlkDevLock"$() and $LK,"BlkDevUnlock",A="MN:BlkDevUnlock"$().
|
||||
//$LK,"BlkDump",A="MN:BlkDump"$(), $LK,"ClusDump",A="MN:ClusDump"$(), $LK,"BlkDevLock",A="MN:BlkDevLock"$() and $LK,"BlkDevUnlock",A="MN:BlkDevUnlock"$().
|
||||
|
@ -15,7 +15,7 @@ U0 SerializeTree()
|
||||
"$$GREEN$$***************$$FG$$\n";
|
||||
ptr = DirTreeSerialize(tmpde, &size);
|
||||
DirTreeDel(tmpde);
|
||||
D(ptr, size);
|
||||
Dump(ptr, size);
|
||||
"$$GREEN$$***************:%7d$$FG$$\n", size;
|
||||
tmpde = DirTreeUnserialize(ptr);
|
||||
LineRep2(DocPut, tmpde); //We don't have $LK,"CDirEntry",A="MN:CDirEntry"$.fullname
|
||||
|
@ -13,7 +13,7 @@ Test g1[] = {
|
||||
{30, "Name3"}
|
||||
};
|
||||
|
||||
D(g1, sizeof(g1));
|
||||
Dump(g1, sizeof(g1));
|
||||
"Time 1:%d\n", g1[1].time;
|
||||
|
||||
U0 Main1()
|
||||
@ -23,7 +23,7 @@ U0 Main1()
|
||||
{(tS % 10.0) * 100, "Static2"}, //Dynamic initialization
|
||||
{30, "Static3"}
|
||||
};
|
||||
D(s1, sizeof(s1));
|
||||
Dump(s1, sizeof(s1));
|
||||
"Time 2:%d\n", s1[1].time;
|
||||
}
|
||||
|
||||
@ -54,7 +54,7 @@ Test g2[] = {
|
||||
{30, "name3"}
|
||||
};
|
||||
|
||||
D(g2, sizeof(g2));
|
||||
Dump(g2, sizeof(g2));
|
||||
"Time 3:%d\n", g2[1].time;
|
||||
|
||||
U0 Main2()
|
||||
@ -64,7 +64,7 @@ U0 Main2()
|
||||
{(tS % 10.0) * 100, "static2"}, //No dynamic initialization--converted to const
|
||||
{30, "static3"}
|
||||
};
|
||||
D(s2, sizeof(s2));
|
||||
Dump(s2, sizeof(s2));
|
||||
"Time 4:%d\n", s2[1].time;
|
||||
}
|
||||
|
||||
|
@ -98,14 +98,14 @@ U0 MPRadixSortDemo(I64 dummy=0)
|
||||
MemCopy(arg2, arg1, sizeof(I32) * NUM);
|
||||
QuickSort(arg2, NUM, sizeof(I32), &Compare);
|
||||
"Time:%9.6f\n", tS - t0;
|
||||
D(arg2 + NUM / 4);
|
||||
Dump(arg2 + NUM / 4);
|
||||
|
||||
"$$GREEN$$QuickSortU32$$FG$$\n";
|
||||
t0 = tS;
|
||||
MemCopy(arg2, arg1, sizeof(I32)*NUM);
|
||||
QuickSortU32(arg2, NUM);
|
||||
"Time:%9.6f\n", tS - t0;
|
||||
D(arg2 + NUM / 4);
|
||||
Dump(arg2 + NUM / 4);
|
||||
|
||||
for (i = 0; i < my_mp_count; i++)
|
||||
{
|
||||
@ -140,7 +140,7 @@ U0 MPRadixSortDemo(I64 dummy=0)
|
||||
j += bn[i];
|
||||
}
|
||||
"Time:%9.6f\n", tS - t0;
|
||||
D(arg2 + NUM / 4);
|
||||
Dump(arg2 + NUM / 4);
|
||||
|
||||
Free(arg1);
|
||||
Free(arg2);
|
||||
|
@ -1,4 +1,21 @@
|
||||
$WW,1$$FG,5$$TX+CX,"ChangeLog"$$FG$
|
||||
$IV,1$----11/30/21 13:40:29----$IV,0$
|
||||
* Raised version number to 1.05.
|
||||
* $LK,"R",A="MN:R"$("DocDump", "$LK+PU,"DocDumpLines",A="MN:DocDumpLines"$");
|
||||
* $LK,"R",A="MN:R"$("DocDm", "$LK+PU,"DocDumpMem",A="MN:DocDumpMem"$");
|
||||
* $LK,"R",A="MN:R"$("DocD", "$LK+PU,"DocDump",A="MN:DocDump"$");
|
||||
* $LK,"R",A="MN:R"$("Dump(U8", "$LK+PU,"FileDump",A="MN:FileDump"$(U8");
|
||||
* $LK,"R",A="MN:R"$("DClus", "$LK+PU,"ClusDump",A="MN:ClusDump"$");
|
||||
* $LK,"R",A="MN:R"$("DBlk", "$LK+PU,"BlkDump",A="MN:BlkDump"$");
|
||||
* $LK,"R",A="MN:R"$("RawDm", "$LK+PU,"RawDumpMem",A="MN:RawDumpMem"$");
|
||||
* $LK,"R",A="MN:R"$("RawDr", "$LK+PU,"RawDumpRegs",A="MN:RawDumpRegs"$");
|
||||
* $LK,"R",A="MN:R"$("RawD", "$LK+PU,"RawDump",A="MN:RawDump"$");
|
||||
* $LK,"R",A="MN:R"$("Dr", "$LK+PU,"DumpRegs",A="MN:DumpRegs"$");
|
||||
* $LK,"R",A="MN:R"$("Dm", "$LK+PU,"DumpMem",A="MN:DumpMem"$");
|
||||
* $LK,"R",A="MN:R"$("D(", "$LK+PU,"Dump",A="MN:Dump"$(", "-i");
|
||||
* $LK,"R",A="MN:R"$("Who", "$LK+PU,"HashTableDump",A="MN:HashTableDump"$");
|
||||
* $LK,"R",A="MN:R"$("Da", "$LK+PU,"DumpAddress",A="MN:DumpAddress"$");
|
||||
|
||||
$IV,1$----10/30/21 05:02:51----$IV,0$
|
||||
* Added column headers to Rep functions.
|
||||
* Changed $LK+PU,"ProfRep",A="FF:::/System/Utils/Profiler.CC,ProfSort"$ to sort by hits.
|
||||
@ -128,7 +145,7 @@ $IV,1$----07/23/21 16:30:23----$IV,0$
|
||||
$IV,1$----07/14/21 13:12:34----$IV,0$
|
||||
* Raised version number to 0.08.
|
||||
* Fixed non-writable drive throw when #include with F5 in $LK+PU,"DocPutKey",A="FF:::/System/DolDoc/DocPutKey.CC,SC_F5"$ and when attempting to $LK+PU,"save",A="FF:::/System/DolDoc/DocPutKey.CC,CH_CTRLS"$.
|
||||
* Added top & right borders to $LK+PU,"RawDr",A="FF:::/Kernel/KDebug.CC,RawDr"$.
|
||||
* Added top & right borders to $LK+PU,"RawDumpRegs",A="FF:::/Kernel/KDebug.CC,RawDumpRegs"$.
|
||||
* Improved spacing in some debug commands.
|
||||
* Fixed $LK+PU,"RawPutChar",A="MN:RawPutChar"$ and $LK+PU,"EdLite",A="MN:EdLite"$ tab width.
|
||||
* Fixed $LK+PU,"Ui",A="MN:Ui"$ missing "0x" prefix syntax highlighter bug.
|
||||
@ -377,7 +394,7 @@ $BK,1$* Zenith 1.0 released.$BK,0$
|
||||
* Renamed VGAFlush() -> $LK,"LFBFlush",A="MN:LFBFlush"$().
|
||||
* Updated $LK,"Palette Demo",A="FI:::/Demo/Graphics/Palette.CC"$ to use current palette environment.
|
||||
* Shortened $LK,"CheckPtr",A="MN:CheckPtr"$() and $LK,"CheckCodePtr",A="MN:CheckCodePtr"$(). Even though boolean expressions outside of $HL$if$HL,0$ statements are compiled inefficiently, clarity and low line count is more important.
|
||||
* $LK,"RawDr",A="MN:RawDr"$() is 40 columns off the right of the screen, instead of fixed at column 40.
|
||||
* $LK,"RawDumpRegs",A="MN:RawDumpRegs"$() is 40 columns off the right of the screen, instead of fixed at column 40.
|
||||
* Windows start at $LK,"4/5th the screen height",A="FF:::/Kernel/KTask.CC,text.rows"$ instead of row 13. System task window is $LK,"1/5th the screen height",A="FF:::/StartOS.CC,text.rows"$.
|
||||
* $LK,"R",A="MN:R"$("RLf_VGA", "$LK,"RLf_VESA",A="MN:RLf_VESA"$");
|
||||
* Removed VGA text mode support, and all definitions relating to it, including from the $LK,"kernel config",A="FI:::/Kernel/KConfig.CC"$.
|
||||
|
@ -10,13 +10,13 @@ $WW,1$$FG,5$$TX+CX,"Debugging Overview"$$FG$
|
||||
|
||||
* You can use $LK,"SysLog",A="MN:SysLog"$() to send text to the $LK,"System Task",A="FF:::/Doc/Glossary.DD,System Task"$ window. It works like $LK,"Print",A="MN:Print"$(). You could also use $LK,"RawPrint",A="MN:RawPrint"$().
|
||||
|
||||
* $LK,"D",A="MN:D"$(), $LK,"DocD",A="MN:DocD"$(), $LK,"RawD",A="MN:RawD"$() to do 16 column hex dump mem with numbering from zero. With $LK,"DocD",A="MN:DocD"$ the values are updated continually and you can alter mem by editing.
|
||||
* $LK,"D",A="MN:D"$(), $LK,"DocDump",A="MN:DocDump"$(), $LK,"RawDump",A="MN:RawDump"$() to do 16 column hex dump mem with numbering from zero. With $LK,"DocDump",A="MN:DocDump"$ the values are updated continually and you can alter mem by editing.
|
||||
|
||||
* $LK,"Dm",A="MN:Dm"$(), $LK,"DocDm",A="MN:DocDm"$(), $LK,"RawDm",A="MN:RawDm"$() to do 16 column hex dump mem with addresses showing.
|
||||
* $LK,"DumpMem",A="MN:DumpMem"$(), $LK,"DocDumpMem",A="MN:DocDumpMem"$(), $LK,"RawDumpMem",A="MN:RawDumpMem"$() to do 16 column hex dump mem with addresses showing.
|
||||
|
||||
* $LK,"Da",A="MN:Da"$() to do one column address dump (for stack, etc.) with symbolic addresses.
|
||||
* $LK,"DumpAddress",A="MN:DumpAddress"$() to do one column address dump (for stack, etc.) with symbolic addresses.
|
||||
|
||||
* $LK,"Dr",A="MN:Dr"$() dumps registers. You can display and modify registers in the debugger with variable-like labels, $FG,4$_RAX$FG$, $FG,4$_RBX$FG$, etc.
|
||||
* $LK,"DumpRegs",A="MN:DumpRegs"$() dumps registers. You can display and modify registers in the debugger with variable-like labels, $FG,4$_RAX$FG$, $FG,4$_RBX$FG$, etc.
|
||||
|
||||
* $LK,"ClassRep",A="MN:ClassRep"$() and the dynamic version $LK,"ClassRepD",A="MN:ClassRepD"$() can be used to dump structures.
|
||||
|
||||
|
@ -156,7 +156,7 @@ $ID,2$A left expression arg, $FG,2$LE=<Exp>$FG$, will return a number when click
|
||||
|
||||
See $LK,"PopUpRangeI64",A="MN:PopUpRangeI64"$().
|
||||
$ID,-2$$TR,"HX Hex Edit"$
|
||||
$ID,2$See $LK,"DocD",A="MN:DocD"$().
|
||||
$ID,2$See $LK,"DocDump",A="MN:DocDump"$().
|
||||
$ID,-2$$TR,"TR Tree Widget"$
|
||||
$ID,2$A tree widget is a branch in a collapsable tree. The domain of the branch extends from the first +indent until enough -indents bring it back to where it started. Tree's begin collapsed unless a $FG,2$-C$FG$ flag is present.
|
||||
|
||||
|
@ -69,7 +69,7 @@ $ID,2$Binary executable files have export symbols which are loaded into the symb
|
||||
$ID,-2$$TR,"Why doesn't assert work?"$
|
||||
$ID,2$$FG,2$#assert$FG$ might print a message at COMPILE time, not run time.
|
||||
$ID,-2$$TR,"Why doesn't C++ public work?"$
|
||||
$ID,2$The word $FG,2$public$FG$ in $LK,"CosmiC",A="FI:::/Doc/CosmiC.DD"$ does very little except allow the $LK,"Help & Index",A="FI:::/Doc/HelpIndex.DD"$ and $LK,"Who",A="MN:Who"$() to exclude meaningless symbols. If you wish a full report of public and nonpublic symbols $MA-X+PU,"Click Here",LM="DocMax(1000000);Who;View;\n"$.
|
||||
$ID,2$The word $FG,2$public$FG$ in $LK,"CosmiC",A="FI:::/Doc/CosmiC.DD"$ does very little except allow the $LK,"Help & Index",A="FI:::/Doc/HelpIndex.DD"$ and $LK,"HashTableDump",A="MN:HashTableDump"$() to exclude meaningless symbols. If you wish a full report of public and nonpublic symbols $MA-X+PU,"Click Here",LM="DocMax(1000000);HashTableDump;View;\n"$.
|
||||
$ID,-2$$TR,"How does the debugger do source debugging?"$
|
||||
$ID,2$When compilation takes place, the structures used by the compiler stick around. Data on classes can be accessed. See $LK,"ClassRep",A="MN:ClassRep"$().
|
||||
$ID,-2$$TR,"What is ASCII 5 doing in my text files?"$
|
||||
|
@ -98,7 +98,7 @@ $FG,5$$TX+CX,"Hash Sym Tables"$$FG$
|
||||
|
||||
* $FG,2$Fs->hash_table$FG$ holds user CosmiC symbols and if a symbol is not found, it checks parents. When a duplicate symbol is added to the table, it overshadows the prev symbol. When developing software, typically you include the file at the cmd prompt, make changes and reinclude it. Old symbols are overshadowed but they are still there. Periodically, kill the TASK and start fresh when mem is low. If you wish your applications to free themselves instead of staying in mem, spawn or $LK,"PopUp",A="MN:PopUp"$() a task to run the application and kill it when it's done.
|
||||
|
||||
* To display the contents of a hash table, use the $LK,"Who",A="MN:Who"$() routine or the varients. $LK,"HashDepthRep",A="MN:HashDepthRep"$() gives a histogram of how long the chains are, in case you wish to make hash table sizes bigger.
|
||||
* To display the contents of a hash table, use the $LK,"HashTableDump",A="MN:HashTableDump"$() routine or the varients. $LK,"HashDepthRep",A="MN:HashDepthRep"$() gives a histogram of how long the chains are, in case you wish to make hash table sizes bigger.
|
||||
|
||||
|
||||
|
||||
|
@ -139,7 +139,7 @@ I64 HtmlGen()
|
||||
progress1 = 0;
|
||||
progress1_max = FileCount(FilesFind("::/", FUF_RECURSE));
|
||||
|
||||
DirIndex("::/HTML/", "::/", "Who;");
|
||||
DirIndex("::/HTML/", "::/", "HashTableDump;");
|
||||
|
||||
res = Dir2Html("::/", "::/HTML/");
|
||||
|
||||
|
@ -44,7 +44,7 @@ U0 TCPTest()
|
||||
|
||||
"\n\n";
|
||||
|
||||
Dm(buffer, buffer_size);
|
||||
DumpMem(buffer, buffer_size);
|
||||
|
||||
ClassRep(tcp_globals.bound_socket_tree);
|
||||
|
||||
|
@ -45,7 +45,7 @@ U0 TCPTest()
|
||||
|
||||
"\n\n";
|
||||
|
||||
D(buffer, buffer_size, FALSE);
|
||||
Dump(buffer, buffer_size, FALSE);
|
||||
|
||||
"\n\n";
|
||||
|
||||
|
@ -448,7 +448,7 @@ public U0 PaletteEditor()
|
||||
case CH_CTRLA:
|
||||
PESave(TRUE, c);
|
||||
break;
|
||||
case CH_ESC:
|
||||
case CH_ESC:
|
||||
MemCopy(&gr_temp_palette, gr_palette, sizeof(CBGR24) * COLORS_NUM);
|
||||
keep_palette = TRUE;
|
||||
case CH_SHIFT_ESC:
|
||||
|
@ -192,9 +192,9 @@ U0 CallerRep(U8 **rbp=NULL, CTask *task=NULL)
|
||||
}
|
||||
}
|
||||
|
||||
U0 D(U8 *addr, I64 count=0x80, Bool show_offset=TRUE)
|
||||
U0 Dump(U8 *addr, I64 count=0x80, Bool show_offset=TRUE)
|
||||
{//Dump mem, showing offsets.
|
||||
//See $LK,"DocD",A="MN:DocD"$() for a live dump.
|
||||
//See $LK,"DocDump",A="MN:DocDump"$() for a live dump.
|
||||
I64 i, j, ch;
|
||||
U8 *ptr = addr;
|
||||
|
||||
@ -227,12 +227,12 @@ U0 D(U8 *addr, I64 count=0x80, Bool show_offset=TRUE)
|
||||
}
|
||||
}
|
||||
|
||||
U0 Dm(U8 *addr, I64 count=0x80)
|
||||
U0 DumpMem(U8 *addr, I64 count=0x80)
|
||||
{//Show mem address, not offsets.
|
||||
D(addr, count, FALSE);
|
||||
Dump(addr, count, FALSE);
|
||||
}
|
||||
|
||||
U0 Da(U8 **addr, I64 count=0x10)
|
||||
U0 DumpAddress(U8 **addr, I64 count=0x10)
|
||||
{//Dump mem, showing symbolic addresses.
|
||||
while (count-- > 0)
|
||||
{
|
||||
@ -260,7 +260,7 @@ U0 RawPrint(I64 mS=100, U8 *format, ...)
|
||||
Free(buf);
|
||||
}
|
||||
|
||||
U0 RawD(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
U0 RawDump(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
{//Dumps a block of mem using $LK,"Raw",A="MN:Raw"$
|
||||
//screen output for a fixed length
|
||||
//of time.
|
||||
@ -270,7 +270,7 @@ U0 RawD(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
CLI
|
||||
old_raw = Raw(ON);
|
||||
old_input_filter = LBtr(&Fs->task_flags, TASKf_INPUT_FILTER_TASK);
|
||||
D(addr, count);
|
||||
Dump(addr, count);
|
||||
Busy(mS << 10);
|
||||
POPFD
|
||||
|
||||
@ -278,7 +278,7 @@ U0 RawD(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
Raw(old_raw);
|
||||
}
|
||||
|
||||
U0 RawDm(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
U0 RawDumpMem(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
{//Dumps a block of mem using $LK,"Raw",A="MN:Raw"$
|
||||
//screen output for a fixed length
|
||||
//of time.
|
||||
@ -288,7 +288,7 @@ U0 RawDm(I64 mS=100, U8 *addr, I64 count=0x80)
|
||||
CLI
|
||||
old_raw = Raw(ON);
|
||||
old_input_filter = LBtr(&Fs->task_flags, TASKf_INPUT_FILTER_TASK);
|
||||
Dm(addr, count);
|
||||
DumpMem(addr, count);
|
||||
Busy(mS << 10);
|
||||
POPFD
|
||||
|
||||
@ -322,7 +322,7 @@ I64 *TaskRegAddr(CTask *task, I64 reg_num)
|
||||
|
||||
#define RAWDR_COL (text.cols - 40)
|
||||
|
||||
U0 RawDr(CTask *task=NULL)
|
||||
U0 RawDumpRegs(CTask *task=NULL)
|
||||
{
|
||||
I64 i, j, old_col = text.raw_col;
|
||||
Bool old_raw = Raw(ON);
|
||||
@ -380,7 +380,7 @@ U0 RawDr(CTask *task=NULL)
|
||||
Raw(old_raw);
|
||||
}
|
||||
|
||||
U0 Dr(CTask *task=NULL)
|
||||
U0 DumpRegs(CTask *task=NULL)
|
||||
{//Dump registers
|
||||
I64 i;
|
||||
|
||||
@ -599,14 +599,14 @@ U0 DebugHelp()
|
||||
"The cmd line is basically the same as normal. Here are some common\n"
|
||||
"debugging commands.\n\n"
|
||||
">EdLite(\"FileName\");\t\t\t\t// Edit file.\n"
|
||||
">D(0x100000);\t\t\t\t\t\t// Dump page tables.\n"
|
||||
">Dm(0x100000);\t\t\t\t\t\t// Dump page tables.\n"
|
||||
">Dm(Fs, sizeof(CTask));\t\t\t\t// Dump current task record.\n"
|
||||
">Dump(0x100000);\t\t\t\t\t// Dump page tables.\n"
|
||||
">DumpMem(0x100000);\t\t\t\t\t// Dump page tables.\n"
|
||||
">DumpMem(Fs, sizeof(CTask));\t\t// Dump current task record.\n"
|
||||
">ClassRep(Fs, \"CTask\", 1);\t\t\t// Dump current task record.\n"
|
||||
">ClassRep(Fs,, 1);\t\t\t\t\t// (It knows lastclass.)\n"
|
||||
">CallerRep;\t\t\t\t\t\t\t// Stack trace report.\n"
|
||||
">Da(_RSP);\t\t\t\t\t\t\t// Dump stack.\n"
|
||||
">Dr;\t\t\t\t\t\t\t\t// Dump Registers.\n"
|
||||
">DumpAddress(_RSP);\t\t\t\t\t// Dump stack.\n"
|
||||
">DumpRegs;\t\t\t\t\t\t\t// Dump Registers.\n"
|
||||
">1 + 2 * 3 + &Print;\t\t\t\t// Show calculation res.\n"
|
||||
">*(0x70000)(I64 *) = 0x123456789;\t// Assign value to 0x70000-0x70007.\n"
|
||||
">_RAX = 0x1234;\t\t\t\t\t\t// Set RAX to 0x1234.\n"
|
||||
@ -647,6 +647,7 @@ U0 Debug2()
|
||||
}
|
||||
else
|
||||
debug.panic = TRUE;
|
||||
"\n";
|
||||
old_waiting_message = LBtr(&Fs->task_flags, TASKf_AWAITING_MESSAGE);
|
||||
old_win_inhibit = Fs->win_inhibit;
|
||||
Fs->win_inhibit = WIG_USER_TASK_DEFAULT;
|
||||
|
@ -13,7 +13,7 @@ CTask *sys_winmgr_task,
|
||||
U8 *rev_bits_table; //Table with U8 bits reversed
|
||||
CDate local_time_offset;
|
||||
F64 *pow10_I64,
|
||||
sys_os_version = 1.04;
|
||||
sys_os_version = 1.05;
|
||||
|
||||
CAutoCompleteDictGlobals acd;
|
||||
CAutoCompleteGlobals ac;
|
||||
|
@ -183,10 +183,10 @@ public extern Bool Man(U8 *st, I64 edf_dof_flags=0);
|
||||
|
||||
#help_index "Debugging/Dump"
|
||||
public extern U0 CallerRep(U8 **rbp=NULL, CTask *task=NULL);
|
||||
public extern U0 D( U8 *addr, I64 count=0x80, Bool show_offset=TRUE);
|
||||
public extern U0 Da(U8 **addr, I64 count=0x10);
|
||||
public extern U0 Dm(U8 *addr, I64 count=0x80);
|
||||
public extern U0 Dr( CTask *task=NULL);
|
||||
public extern U0 Dump( U8 *addr, I64 count=0x80, Bool show_offset=TRUE);
|
||||
public extern U0 DumpAddress(U8 **addr, I64 count=0x10);
|
||||
public extern U0 DumpMem(U8 *addr, I64 count=0x80);
|
||||
public extern U0 DumpRegs( CTask *task=NULL);
|
||||
public extern U0 StackRep( CTask *task=NULL);
|
||||
extern I64 *TaskRegAddr(CTask *task, I64 reg_num);
|
||||
|
||||
@ -203,9 +203,9 @@ public extern CHash *FunSegFind(U8 *addr, I64 *_offset);
|
||||
#help_index "Debugging/Raw Output"
|
||||
public extern Bool IsRaw();
|
||||
public extern Bool Raw(Bool val);
|
||||
public extern U0 RawD( I64 mS=100, U8 *addr, I64 count=0x80);
|
||||
public extern U0 RawDm(I64 mS=100, U8 *addr, I64 count=0x80);
|
||||
extern U0 RawDr(CTask *task=NULL);
|
||||
public extern U0 RawDump( I64 mS=100, U8 *addr, I64 count=0x80);
|
||||
public extern U0 RawDumpMem(I64 mS=100, U8 *addr, I64 count=0x80);
|
||||
extern U0 RawDumpRegs(CTask *task=NULL);
|
||||
public extern U0 RawPrint(I64 mS=100, U8 *format, ...);
|
||||
public extern U0 RawPutChar(I64 ch);
|
||||
public extern U0 LFBFlush();
|
||||
|
@ -1815,7 +1815,7 @@ U0 OSTestSuite()
|
||||
}
|
||||
TS("SATARep"); XTalkWait(task, "SATARep;\nSleep(750);\n");
|
||||
TS("HashDepthRep"); XTalkWait(task, "HashDepthRep(sys_task->hash_table);Sleep(750);\n");
|
||||
TS("Who"); XTalkWait(task, "Who;Sleep(750);\n");
|
||||
TS("HashTableDump"); XTalkWait(task, "HashTableDump;Sleep(750);\n");
|
||||
TS("DriveRep"); XTalkWait(task, "DriveRep;Sleep(750);\n");
|
||||
TS("TaskRep"); XTalkWait(task, "TaskRep;Sleep(750);\n");
|
||||
TS("VideoRep"); XTalkWait(task, "VideoRep;Sleep(750);\n");
|
||||
|
Binary file not shown.
@ -1,5 +1,5 @@
|
||||
#help_index "File/Cmd Line (Typically);Cmd Line (Typically)"
|
||||
public U8 *DBlk(I64 blk, Bool write=FALSE)
|
||||
public U8 *BlkDump(I64 blk, Bool write=FALSE)
|
||||
{//Dump disk block. Optionally, write.
|
||||
//If you set write to TRUE, the block will
|
||||
//be written when you press <ESC>.
|
||||
@ -7,7 +7,7 @@ public U8 *DBlk(I64 blk, Bool write=FALSE)
|
||||
U8 *buf = MAlloc(BLK_SIZE);
|
||||
|
||||
BlkRead(Fs->cur_dv, buf, blk, 1);
|
||||
DocD(buf, BLK_SIZE);
|
||||
DocDump(buf, BLK_SIZE);
|
||||
if (write)
|
||||
{
|
||||
"Edit and press <ESC> to write or <SHIFT-ESC>\n";
|
||||
@ -21,7 +21,7 @@ public U8 *DBlk(I64 blk, Bool write=FALSE)
|
||||
return buf;
|
||||
}
|
||||
|
||||
public U8 *DClus(I64 c, Bool write=FALSE, I64 num=0)
|
||||
public U8 *ClusDump(I64 c, Bool write=FALSE, I64 num=0)
|
||||
{//Dump disk cluster. Optionally, write.
|
||||
//If you set write to TRUE, the cluster will
|
||||
//be written when you press <ESC>.
|
||||
@ -32,7 +32,7 @@ public U8 *DClus(I64 c, Bool write=FALSE, I64 num=0)
|
||||
c = ClusNumNext(Fs->cur_dv, c, num);
|
||||
ClusRead(Fs->cur_dv, buf, c, 1);
|
||||
"Clus:%X\n", c;
|
||||
DocD(buf, Fs->cur_dv->spc << BLK_SIZE_BITS);
|
||||
DocDump(buf, Fs->cur_dv->spc << BLK_SIZE_BITS);
|
||||
if (write)
|
||||
{
|
||||
"Edit and press <ESC> to write or <SHIFT-ESC>\n";
|
||||
@ -46,7 +46,7 @@ public U8 *DClus(I64 c, Bool write=FALSE, I64 num=0)
|
||||
return buf;
|
||||
}
|
||||
|
||||
public U8 *Dump(U8 *filename, Bool write=FALSE)
|
||||
public U8 *FileDump(U8 *filename, Bool write=FALSE)
|
||||
{//Dump file. Optionally, write.
|
||||
//If you set write to TRUE, the file will
|
||||
//be written when you press <ESC>.
|
||||
@ -55,7 +55,7 @@ public U8 *Dump(U8 *filename, Bool write=FALSE)
|
||||
|
||||
if (buf = FileRead(filename,&size))
|
||||
{
|
||||
DocD(buf, size);
|
||||
DocDump(buf, size);
|
||||
if (write)
|
||||
{
|
||||
"Edit and press <ESC> to write or <SHIFT-ESC>\n";
|
||||
|
@ -238,7 +238,7 @@ public U0 ClassRep(U8 *_d, U8 *class_name=lastclass, I64 max_depth=2, Bool u8_ch
|
||||
|
||||
if (IsRaw)
|
||||
{
|
||||
DocDump(doc, 100000);
|
||||
DocDumpLines(doc, 100000);
|
||||
DocDel(doc);
|
||||
}
|
||||
}
|
||||
@ -263,7 +263,7 @@ public U0 ClassRepD(U8 *_d, U8 *class_name=lastclass, I64 max_depth=2, Bool u8_c
|
||||
DocRecalc(doc);
|
||||
if (IsRaw)
|
||||
{
|
||||
DocDump(doc, 100000);
|
||||
DocDumpLines(doc, 100000);
|
||||
DocDel(doc);
|
||||
}
|
||||
}
|
||||
|
@ -16,7 +16,7 @@ U0 LoadDocDefines()
|
||||
|
||||
$TR,"LineRep"$
|
||||
$ID,2$DefinePrint("DD_ZEALOS_LOC","95,267");
|
||||
$ID,-2$
|
||||
$ID,-2$
|
||||
DefinePrint("DD_MP_VECT", "%08X", MP_VECT_ADDR);
|
||||
DefinePrint("DD_MP_VECT_END", "%08X", MP_VECT_ADDR + COREAP_16BIT_INIT_END - COREAP_16BIT_INIT - 1);
|
||||
|
||||
|
@ -357,7 +357,7 @@ public Bool DocType(CDoc *doc=NULL, U8 *filename, I64 trailing_new_lines=1)
|
||||
doc2 = DocRead(filename);
|
||||
DocInsDoc(doc, doc2);
|
||||
if (IsRaw)
|
||||
DocDump(doc2, 100000);
|
||||
DocDumpLines(doc2, 100000);
|
||||
DocDel(doc2);
|
||||
res = TRUE;
|
||||
}
|
||||
|
@ -277,7 +277,7 @@ public U0 DocPrintAtomic(CDoc *doc=NULL, U8 *format, ...)
|
||||
Free(buf);
|
||||
}
|
||||
|
||||
U0 DocDump(CDoc *doc, I64 uS_delay=0)
|
||||
U0 DocDumpLines(CDoc *doc, I64 uS_delay=0)
|
||||
{
|
||||
U8 *st;
|
||||
CDocEntry *doc_e, *doc_e2;
|
||||
@ -349,7 +349,7 @@ public CDocEntry *DocPutLine(CDoc *doc=NULL, CDocEntry *doc_e)
|
||||
|
||||
#help_index "Debugging/Dump;DolDoc/Cmd Line (Typically);"\
|
||||
"Cmd Line (Typically);DolDoc/Output;StdOut/DolDoc"
|
||||
public U0 DocDm(U8 *buf, I64 count=0x80)
|
||||
public U0 DocDumpMem(U8 *buf, I64 count=0x80)
|
||||
{//Dump live chunk of mem showing addresses. Can be edited.
|
||||
CDocEntry *doc_e;
|
||||
CDoc *doc = DocPut;
|
||||
@ -363,7 +363,7 @@ public U0 DocDm(U8 *buf, I64 count=0x80)
|
||||
DocUnlock(doc);
|
||||
}
|
||||
|
||||
public U0 DocD(U8 *buf, I64 count=0x80)
|
||||
public U0 DocDump(U8 *buf, I64 count=0x80)
|
||||
{//Dump live chunk of mem showing offsets. Can be edited.
|
||||
CDocEntry *doc_e;
|
||||
CDoc *doc = DocPut;
|
||||
|
@ -15,11 +15,11 @@ extern U0 DocBottom(CDoc *doc=NULL);
|
||||
extern U0 DocCenter(CDoc *doc=NULL, I64 recalc_flags=RECALCt_NORMAL);
|
||||
extern U0 DocClear(CDoc *doc=NULL, Bool clear_holds=FALSE);
|
||||
extern Bool DocCursor(Bool show=OFF, CDoc *doc=NULL);
|
||||
extern U0 DocD(U8 *buf, I64 count=0x80);
|
||||
extern U0 DocDump(U8 *buf, I64 count=0x80);
|
||||
extern U0 DocDataFormat(CDoc *doc, CDocEntry *doc_e, I64 d=DOCM_CANCEL);
|
||||
extern U0 DocDel(CDoc *doc);
|
||||
extern CDoc *DocDisplay(CTask *task=NULL);
|
||||
extern U0 DocDump(CDoc *doc, I64 uS_delay=0);
|
||||
extern U0 DocDumpLines(CDoc *doc, I64 uS_delay=0);
|
||||
extern CDocEntry *DocEntryCopy(CDoc *doc, CDocEntry *doc_e);
|
||||
extern U0 DocEntryDel(CDoc *doc, CDocEntry *doc_e);
|
||||
extern Bool DocForm(U8 *_d, U8 *class_name=lastclass, I64 dof_flags=0, U8 *header=NULL, U8 *footer=NULL);
|
||||
|
@ -166,7 +166,7 @@ I64 HashEntriesCompare3(CWho *h1, CWho *h2)
|
||||
}
|
||||
}
|
||||
|
||||
public U0 Who(U8 *fu_flags=NULL, CHashTable *h=NULL, U8 *idx=NULL, CDoc *doc=NULL)
|
||||
public U0 HashTableDump(U8 *fu_flags=NULL, CHashTable *h=NULL, U8 *idx=NULL, CDoc *doc=NULL)
|
||||
{ //Dump hash symbol table.
|
||||
// "+p" for only public symbols
|
||||
// "+m" to order by number (normally alphabetical)
|
||||
@ -403,7 +403,7 @@ public I64 HashDepthRep(CHashTable *table=NULL)
|
||||
|
||||
public U0 DocHelpIdx(CDoc *doc, U8 *idx)
|
||||
{//Put to doc report for given help idx.
|
||||
Who("+p",, idx, doc);
|
||||
HashTableDump("+p",, idx, doc);
|
||||
}
|
||||
|
||||
public U0 PopUpHelpIndex(U8 *idx, CTask *parent=NULL)
|
||||
|
Loading…
x
Reference in New Issue
Block a user