version 0.2.39: fix of arith insts and start of re-structure
[fw/sdcc] / sim / ucsim / cmd.src / info.cc
1 /*
2  * Simulator of microcontrollers (cmd.src/info.cc)
3  *
4  * Copyright (C) 1999,99 Drotos Daniel, Talker Bt.
5  * 
6  * To contact author send email to drdani@mazsola.iit.uni-miskolc.hu
7  *
8  */
9
10 /* This file is part of microcontroller simulator: ucsim.
11
12 UCSIM is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2 of the License, or
15 (at your option) any later version.
16
17 UCSIM is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20 GNU General Public License for more details.
21
22 You should have received a copy of the GNU General Public License
23 along with UCSIM; see the file COPYING.  If not, write to the Free
24 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
25 02111-1307, USA. */
26 /*@1@*/
27
28 #include <stdlib.h>
29 #include "i_string.h"
30
31 // sim.src
32 #include "simcl.h"
33  
34 // local
35 #include "infocl.h"
36
37
38 /*
39  * INFO BREAKPOINTS command
40  */
41
42 int
43 cl_info_bp_cmd::do_work(class cl_sim *sim,
44                         class cl_cmdline *cmdline, class cl_console *con)
45 {
46   int i;
47   char *s;
48
49   con->printf("Num Type       Disp Hit   Cnt   Address  What\n");
50   for (i= 0; i < sim->uc->fbrk->count; i++)
51     {
52       class cl_brk *fb= (class cl_brk *)(sim->uc->fbrk->at(i));
53       s= sim->uc->disass(fb->addr, NULL);
54       con->printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", fb->nr,
55                   "fetch", (fb->perm==brkFIX)?"keep":"del ",
56                   fb->hit, fb->cnt,
57                   fb->addr, s);
58       free(s);
59     }
60   for (i= 0; i < sim->uc->ebrk->count; i++)
61     {
62       class cl_ev_brk *eb= (class cl_ev_brk *)(sim->uc->ebrk->at(i));
63       con->printf("%-3d %-10s %s %-5d %-5d 0x%06x %s\n", eb->nr,
64                   "event", (eb->perm==brkFIX)?"keep":"del ",
65                   eb->hit, eb->cnt,
66                   eb->addr, eb->id);
67     }
68   /*t_addr a;
69   class cl_rom *r= (class cl_rom *)(sim->uc->mem(MEM_ROM));
70   for (a= 0; a < sim->uc->get_mem_size(MEM_ROM); a++)
71     {
72       if (r->bp_map->get(a))
73         con->printf("0x%06x\n", a);
74         }*/
75   return(0);
76 }
77
78
79 /*
80  * INFO REGISTERS command
81  */
82
83 int
84 cl_info_reg_cmd::do_work(class cl_sim *sim,
85                          class cl_cmdline *cmdline, class cl_console *con)
86 {
87   sim->uc->print_regs(con);
88   return(0);
89 }
90
91
92 /*
93  * INFO HW command
94  */
95
96 int
97 cl_info_hw_cmd::do_work(class cl_sim *sim,
98                         class cl_cmdline *cmdline, class cl_console *con)
99 {
100   class cl_hw *hw;
101   class cl_cmd_arg *params[4]= { cmdline->param(0),
102                                  cmdline->param(1),
103                                  cmdline->param(2),
104                                  cmdline->param(3) };
105
106   if (cmdline->syntax_match(sim, HW)) {
107     hw= params[0]->value.hw;
108     hw->print_info(con);
109   }
110   else
111     con->printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
112
113   return(DD_FALSE);
114 }
115
116
117 /* End of cmd.src/info.cc */