* INFO BREAKPOINTS command
*/
-int
-cl_info_bp_cmd::do_work(class cl_cmdline *cmdline, class cl_console *con)
+//int
+//cl_info_bp_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_info_bp_cmd)
{
int i;
char *s;
- con->printf("Num Type Disp Hit Cnt Address What\n");
- for (i= 0; i < sim->uc->fbrk->count; i++)
+ con->dd_printf("Num Type Disp Hit Cnt Address What\n");
+ for (i= 0; i < uc->fbrk->count; i++)
{
- class cl_brk *fb= (class cl_brk *)(sim->uc->fbrk->at(i));
- s= sim->uc->disass(fb->addr, NULL);
- con->printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", fb->nr,
- "fetch", (fb->perm==brkFIX)?"keep":"del ",
- fb->hit, fb->cnt,
- fb->addr, s);
+ class cl_brk *fb= (class cl_brk *)(uc->fbrk->at(i));
+ s= uc->disass(fb->addr, NULL);
+ con->dd_printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", fb->nr,
+ "fetch", (fb->perm==brkFIX)?"keep":"del ",
+ fb->hit, fb->cnt,
+ fb->addr, s);
free(s);
}
- for (i= 0; i < sim->uc->ebrk->count; i++)
+ for (i= 0; i < uc->ebrk->count; i++)
{
- class cl_ev_brk *eb= (class cl_ev_brk *)(sim->uc->ebrk->at(i));
- con->printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", eb->nr,
- "event", (eb->perm==brkFIX)?"keep":"del ",
- eb->hit, eb->cnt,
- eb->addr, eb->id);
+ class cl_ev_brk *eb= (class cl_ev_brk *)(uc->ebrk->at(i));
+ con->dd_printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", eb->nr,
+ "event", (eb->perm==brkFIX)?"keep":"del ",
+ eb->hit, eb->cnt,
+ eb->addr, eb->id);
}
/*t_addr a;
class cl_rom *r= (class cl_rom *)(sim->uc->mem(MEM_ROM));
for (a= 0; a < sim->uc->get_mem_size(MEM_ROM); a++)
{
if (r->bp_map->get(a))
- con->printf("0x%06x\n", a);
+ con->dd_printf("0x%06x\n", a);
}*/
return(0);
}
* INFO REGISTERS command
*/
-int
-cl_info_reg_cmd::do_work(class cl_cmdline *cmdline, class cl_console *con)
+//int
+//cl_info_reg_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_info_reg_cmd)
{
- sim->uc->print_regs(con);
+ uc->print_regs(con);
return(0);
}
* INFO HW command
*/
-int
-cl_info_hw_cmd::do_work(class cl_cmdline *cmdline, class cl_console *con)
+//int
+//cl_info_hw_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_info_hw_cmd)
{
+ class cl_hw *hw;
class cl_cmd_arg *params[4]= { cmdline->param(0),
cmdline->param(1),
cmdline->param(2),
cmdline->param(3) };
- char *p0;
- enum hw_cath cath;
- class cl_hw *hw;
- int i= 0;
- if (params[0] == 0)
+ if (cmdline->syntax_match(uc, HW)) {
+ hw= params[0]->value.hw;
+ hw->print_info(con);
+ }
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+
+ return(DD_FALSE);
+}
+
+
+/*
+ * INFO STACK command
+ */
+
+//int
+//cl_info_stack_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_info_stack_cmd)
+{
+ int i;
+
+ cl_stack_op::info_head(con);
+ for (i= uc->stack_ops->count-1; i >= 0; i--)
{
- con->printf("Cathegory missing\n");
- return(0);
+ class cl_stack_op *so= (class cl_stack_op *)(uc->stack_ops->at(i));
+ so->info(con, uc);
}
- p0= (params[0])->get_svalue();
- if (strstr(p0, "t") == p0)
- cath= HW_TIMER;
- else if (strstr(p0, "u") == p0)
- cath= HW_UART;
- else if (strstr(p0, "po") == p0)
- cath= HW_PORT;
- else if (strstr(p0, "pc") == p0)
- cath= HW_PCA;
- else if (strstr(p0, "i") == p0)
- cath= HW_INTERRUPT;
- else if (strstr(p0, "w") == p0)
- cath= HW_WDT;
- else
+ return(DD_FALSE);
+}
+
+
+/*
+ * INFO MMEORY command
+ *----------------------------------------------------------------------------
+ */
+
+COMMAND_DO_WORK_UC(cl_info_memory_cmd)
+{
+ int i;
+
+ con->dd_printf("Memory chips:\n");
+ for (i= 0; i < uc->memchips->count; i++)
{
- con->printf("Unknown cathegory\n");
- return(0);
+ class cl_memory_chip *m= (class cl_memory_chip *)(uc->memchips->at(i));
+ if (m)
+ con->dd_printf(" 0x%06x-0x%06x %8d %s (%d,%s,%s)\n",
+ m->get_start_address(),
+ m->highest_valid_address(),
+ m->get_size(),
+ m->get_name(),
+ m->width, m->data_format, m->addr_format);
}
- if (params[1] == 0)
+ con->dd_printf("Address spaces:\n");
+ for (i= 0; i < uc->address_spaces->count; i++)
{
- // no ID
- hw= sim->uc->get_hw(cath, &i);
- while (hw)
- {
- hw->print_info(con);
- i++;
- hw= sim->uc->get_hw(cath, &i);
- }
+ class cl_address_space *m=
+ (class cl_address_space *)(uc->address_spaces->at(i));
+ if (m)
+ con->dd_printf(" 0x%06x-0x%06x %8d %s (%d,%s,%s)\n",
+ m->get_start_address(),
+ m->highest_valid_address(),
+ m->get_size(),
+ m->get_name(),
+ m->width, m->data_format, m->addr_format);
}
- else
+ con->dd_printf("Address decoders:\n");
+ for (i= 0; i < uc->address_spaces->count; i++)
{
- // ID given
- int id= (params[1])->get_ivalue();
- hw= sim->uc->get_hw(cath, id, &i);
- while (hw)
+ class cl_address_space *m=
+ (class cl_address_space *)(uc->address_spaces->at(i));
+ int j;
+ for (j= 0; j < m->decoders->count; j++)
{
- hw->print_info(con);
- i++;
- hw= sim->uc->get_hw(cath, id, &i);
- }
+ class cl_address_decoder *d=
+ (class cl_address_decoder *)(m->decoders->at(j));
+ con->dd_printf("%2d ", j);
+ if (d->address_space)
+ {
+ con->dd_printf("%s ", d->address_space->get_name("unknown"));
+ con->dd_printf(d->address_space->addr_format, d->as_begin);
+ con->dd_printf(" ");
+ con->dd_printf(d->address_space->addr_format, d->as_end);
+ }
+ else
+ con->dd_printf("x");
+ con->dd_printf(" -> ");
+ if (d->memchip)
+ {
+ con->dd_printf("%s ", d->memchip->get_name("unknown"));
+ con->dd_printf(d->memchip->addr_format, d->chip_begin);
+ }
+ else
+ con->dd_printf("x");
+ con->dd_printf(" %s\n", (d->activated)?"activated":"inactive");
+ }
}
return(0);
}