/**
* This function is called after each CPU instruction when debugging is enabled.
*/
void DebugCpu_Check(void)
{
if (bCpuProfiling)
{
Profile_CpuUpdate();
}
if (LOG_TRACE_LEVEL(TRACE_CPU_DISASM))
{
DebugCpu_ShowAddressInfo(M68000_GetPC());
}
if (nCpuActiveCBs)
{
if (BreakCond_MatchCpu())
DebugUI();
}
if (nCpuSteps)
{
nCpuSteps -= 1;
if (nCpuSteps == 0)
DebugUI();
}
}
/**
* This function is called after each CPU instruction when debugging is enabled.
*/
void DebugCpu_Check(void)
{
nCpuInstructions++;
if (bCpuProfiling)
{
Profile_CpuUpdate();
}
if (LOG_TRACE_LEVEL((TRACE_CPU_DISASM|TRACE_CPU_SYMBOLS)))
{
DebugCpu_ShowAddressInfo(M68000_GetPC());
}
if (nCpuActiveCBs)
{
if (BreakCond_MatchCpu())
{
DebugUI(REASON_CPU_BREAKPOINT);
/* make sure we don't decrease step count
* below, before even even getting out of here
*/
if (nCpuSteps)
nCpuSteps++;
}
}
if (nCpuSteps)
{
nCpuSteps--;
if (nCpuSteps == 0)
DebugUI(REASON_CPU_STEPS);
}
if (History_TrackCpu())
{
History_AddCpu();
}
if (ConOutDevice != CONOUT_DEVICE_NONE)
{
Console_Check();
}
}
int main(int argc, const char *argv[])
{
const char *parser_fail[] = {
/* syntax & register name errors */
"",
" = ",
" a0 d0 ",
"gggg=a0",
"=a=b=",
"a0=d0=20",
"a0=d || 0=20",
"a0=d & 0=20",
".w&3=2",
"d0 = %200",
"d0 = \"ICE!BAR",
"pc > $200 :foobar",
"foo().w=bar()",
"(a0.w=d0.l)",
"(a0&3)=20",
"20 = (a0.w)",
"()&=d0",
"d0=().w",
"255 & 3 = (d0) & && 2 = 2",
/* missing options file */
"pc>pc :file no-such-file",
/* size and mask mismatches with numbers */
"d0.w = $ffff0",
"(a0).b & 3 < 100",
/* more than BC_MAX_CONDITIONS_PER_BREAKPOINT conditions */
"1=1 && 2=2 && 3=3 && 4=4 && 5=5",
NULL
};
const char *parser_pass[] = {
/* comparisons with normal numbers + indrect addressing */
" ($200).w > 200 ",
" ($200).w < 200 ",
" (200).w = $200 ",
" (200).w ! $200 ",
/* indirect addressing with registers */
"(a0)=(d0)",
"(d0).w=(a0).b",
/* sizes + multiple conditions + spacing */
"(a0).w&3=(d0)&&d0=1",
" ( a 0 ) . w & 1 = ( d 0 ) & 1 && d 0 = 3 ",
"a0=1 && (d0)&2=(a0).w && ($00ff00).w&1=1",
" ($ff820a).b = 2",
/* variables */
"hbl > 0 && vbl < 2000 && linecycles = 508",
/* options */
"($200).w ! ($200).w :trace",
"($200).w > ($200).w :4 :lock",
"pc>pc :file data/test.ini :once",
NULL
};
/* address breakpoint + expression evalution with register */
char addr_pass[] = "pc + ($200*16/2 & 0xffff)";
const char *match_tests[] = {
"a0 = d0",
"( $200 ) . b > 200", /* byte access to avoid endianess */
"pc < $50000 && pc > $60000",
"pc > $50000 && pc < $54000",
#define FAILING_BC_TEST_MATCHES 4
"pc > $50000 && pc < $60000",
"( $200 ) . b > ( 200 ) . b",
"d0 = d1",
"a0 = pc",
NULL
};
const char *test;
char testidx[2] = "1";
int i, j, tests = 0, errors = 0;
int remaining_matches;
bool use_dsp;
/* first automated tests... */
use_dsp = false;
fprintf(stderr, "\nShould FAIL for CPU:\n");
for (i = 0; (test = parser_fail[i]); i++) {
fprintf(stderr, "-----------------\n- parsing '%s'\n", test);
if (BreakCond_Command(test, use_dsp)) {
fprintf(stderr, "***ERROR***: should have failed\n");
errors++;
}
}
tests += i;
fprintf(stderr, "-----------------\n\n");
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "\nShould PASS for CPU:\n");
for (i = 0; (test = parser_pass[i]); i++) {
fprintf(stderr, "-----------------\n- parsing '%s'\n", test);
if (!BreakCond_Command(test, use_dsp)) {
fprintf(stderr, "***ERROR***: should have passed\n");
errors++;
}
}
tests += i;
fprintf(stderr, "\nAddress PASS test for CPU:\n");
if (!BreakAddr_Command(addr_pass, use_dsp)) {
fprintf(stderr, "***ERROR***: should have passed\n");
errors++;
}
tests += 1;
fprintf(stderr, "-----------------\n\n");
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "\n");
BreakCond_Command(CMD_REMOVE_ALL, use_dsp);
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "-----------------\n");
/* add conditions */
fprintf(stderr, "\nLast one(s) should match, first one(s) shouldn't:\n");
for (i = 0; (test = match_tests[i]); i++) {
fprintf(stderr, "-----------------\n- parsing '%s'\n", test);
if (!BreakCond_Command(test, use_dsp)) {
fprintf(stderr, "***ERROR***: should have passed\n");
errors++;
}
}
tests += i;
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "\n");
/* set up registers etc */
/* fail indirect equality checks with zerod regs */
memset(STRam, 0, sizeof(STRam));
STRam[0] = 1;
/* !match: "( $200 ) > 200"
* match: "( $200 ) . w > ( 200 ) . b"
*/
STRam[0x200] = 100;
STRam[200] = 0x20;
/* match: "d0 = d1" */
SetCpuRegister("d0", 4);
SetCpuRegister("d1", 4);
/* !match: "pc < $50000 && pc > $60000"
* !match: "pc < $50000 && pc > $54000"
* match: "pc > $50000 && pc < $60000"
*/
regs.pc = 0x58000;
/* !match: "d0 = a0"
* match: "pc = a0"
*/
SetCpuRegister("a0", 0x58000);
/* check matches */
while ((i = BreakCond_MatchCpu())) {
fprintf(stderr, "Removing matching CPU breakpoint %d...\n", i);
for (j = 0; (test = match_tests[j]); j++) {
if (BreakCond_MatchCpuExpression(i, test)) {
break;
}
}
if (test) {
if (j < FAILING_BC_TEST_MATCHES) {
fprintf(stderr, "ERROR: breakpoint should not have matched!\n");
errors++;
}
} else {
fprintf(stderr, "WARNING: canonized breakpoint form didn't match\n");
errors++;
}
testidx[0] = '0' + i;
BreakCond_Command(testidx, use_dsp); /* remove given */
}
remaining_matches = BreakCond_BreakPointCount(use_dsp);
if (remaining_matches != FAILING_BC_TEST_MATCHES) {
fprintf(stderr, "ERROR: wrong number of breakpoints left (%d instead of %d)!\n",
remaining_matches, FAILING_BC_TEST_MATCHES);
errors++;
}
fprintf(stderr, "\nOther breakpoints didn't match, removing the rest...\n");
BreakCond_Command(CMD_REMOVE_ALL, use_dsp);
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "-----------------\n");
/* ...last parse cmd line args as DSP breakpoints */
if (argc > 1) {
use_dsp = true;
fprintf(stderr, "\nCommand line DSP breakpoints:\n");
for (argv++; --argc > 0; argv++) {
fprintf(stderr, "-----------------\n- parsing '%s'\n", *argv);
BreakCond_Command(*argv, use_dsp);
}
fprintf(stderr, "-----------------\n\n");
BreakCond_Command("", use_dsp); /* list */
while ((i = BreakCond_MatchDsp())) {
fprintf(stderr, "Removing matching DSP breakpoint.\n");
testidx[0] = '0' + i;
BreakCond_Command(testidx, use_dsp); /* remove given */
}
BreakCond_Command(CMD_REMOVE_ALL, use_dsp);
BreakCond_Command(CMD_LIST, use_dsp);
fprintf(stderr, "-----------------\n");
}
if (errors) {
fprintf(stderr, "\n***Detected %d ERRORs in %d automated tests!***\n\n",
errors, tests);
} else {
fprintf(stderr, "\nFinished without any errors!\n\n");
}
return errors;
}
