60659b926e13efa90df2bea64038c231115df145
1 /* This file is part of the program psim.
3 Copyright (C) 1994-1996, Andrew Cagney <cagney@highland.com.au>
4 Copyright (C) 1997, Free Software Foundation
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
23 #include <signal.h> /* FIXME - should be machine dependant version */
29 #include "sim-utils.h"
30 #include "sim-options.h"
45 #define SIM_ADDR unsigned
47 /* Structures used by the simulator, for gdb just have static structures */
49 struct sim_state simulation
= { 0 };
53 sim_open (SIM_OPEN_KIND kind
,
54 host_callback
*callback
,
58 SIM_DESC sd
= &simulation
;
59 STATE_OPEN_KIND (sd
) = kind
;
60 STATE_MAGIC (sd
) = SIM_MAGIC_NUMBER
;
61 STATE_CALLBACK (&simulation
) = callback
;
63 if (sim_pre_argv_init (sd
, argv
[0]) != SIM_RC_OK
)
66 /* getopt will print the error message so we just have to exit if this fails.
67 FIXME: Hmmm... in the case of gdb we need getopt to call
69 if (sim_parse_args (sd
, argv
) != SIM_RC_OK
)
71 /* Uninstall the modules to avoid memory leaks,
72 file descriptor leaks, etc. */
73 sim_module_uninstall (sd
);
77 /* establish the simulator configuration */
78 if (sim_config (sd
, abfd
) != SIM_RC_OK
)
80 sim_module_uninstall (sd
);
84 if (sim_post_argv_init (sd
) != SIM_RC_OK
)
86 /* Uninstall the modules to avoid memory leaks,
87 file descriptor leaks, etc. */
88 sim_module_uninstall (sd
);
92 /* Initialize the main processor */
93 memset (&STATE_CPU (sd
, 0)->reg
, 0, sizeof STATE_CPU (sd
, 0)->reg
);
94 memset (&STATE_CPU (sd
, 0)->acc
, 0, sizeof STATE_CPU (sd
, 0)->acc
);
95 memset (&STATE_CPU (sd
, 0)->cr
, 0, sizeof STATE_CPU (sd
, 0)->cr
);
96 STATE_CPU (sd
, 0)->is_user_mode
= 0;
97 memset (&STATE_CPU (sd
, 0)->cia
, 0, sizeof STATE_CPU (sd
, 0)->cia
);
98 CPU_STATE (STATE_CPU (sd
, 0)) = sd
;
100 #define TIC80_MEM_START 0x2000000
101 #define TIC80_MEM_SIZE 0x100000
103 /* external memory */
107 access_read_write_exec
,
108 0, TIC80_MEM_START
, TIC80_MEM_SIZE
, NULL
, NULL
);
112 access_read_write_exec
,
113 0, 0, TIC80_MEM_SIZE
, NULL
, NULL
);
121 sim_close (SIM_DESC sd
, int quitting
)
123 /* Uninstall the modules to avoid memory leaks,
124 file descriptor leaks, etc. */
125 sim_module_uninstall (sd
);
130 sim_load (SIM_DESC sd
, char *prog
, bfd
*abfd
, int from_tty
)
134 prog_bfd
= sim_load_file (sd
, STATE_MY_NAME (sd
),
137 /* pass NULL for abfd, we always open our own */
139 STATE_OPEN_KIND (sd
) == SIM_OPEN_DEBUG
);
140 if (prog_bfd
== NULL
)
142 sim_analyze_program (sd
, prog_bfd
);
148 sim_kill (SIM_DESC sd
)
154 sim_read (SIM_DESC sd
, SIM_ADDR mem
, unsigned char *buf
, int length
)
156 return sim_core_read_buffer (sd
, NULL
, sim_core_write_map
,
162 sim_write (SIM_DESC sd
, SIM_ADDR mem
, unsigned char *buf
, int length
)
164 return sim_core_write_buffer (sd
, NULL
, sim_core_write_map
,
169 /* FIXME - these magic numbers need to be moved elsewhere */
171 #define SP_REGNUM 1 /* Contains address of top of stack */
172 #define FP_REGNUM 31 /* Contains address of executing stack frame */
173 #define PC_REGNUM 32 /* Contains program counter (FIXME?) */
174 #define NPC_REGNUM 33 /* Contains the next program counter (FIXME?) */
175 #define A0_REGNUM 34 /* Accumulator register 0 */
176 #define A3_REGNUM 37 /* Accumulator register 1 */
178 #define R0_REGNUM 0 /* General Purpose Register 0 - for sim */
179 #define Rn_REGNUM 31 /* Last General Purpose Register - for sim */
180 #define An_REGNUM A3_REGNUM /* Last Accumulator register - for sim */
183 sim_fetch_register (SIM_DESC sd
, int regnr
, unsigned char *buf
)
185 if (regnr
== R0_REGNUM
)
186 memset (buf
, 0, sizeof (unsigned32
));
187 else if (regnr
> R0_REGNUM
&& regnr
<= Rn_REGNUM
)
188 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->reg
[regnr
- R0_REGNUM
]);
189 else if (regnr
== PC_REGNUM
)
190 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->cia
.ip
);
191 else if (regnr
== NPC_REGNUM
)
192 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->cia
.dp
);
193 else if (regnr
>= A0_REGNUM
&& regnr
<= An_REGNUM
)
194 *(unsigned64
*)buf
= H2T_8 (STATE_CPU (sd
, 0)->acc
[regnr
- A0_REGNUM
]);
196 sim_io_error (sd
, "sim_fetch_register - unknown register nr %d", regnr
);
202 sim_store_register (SIM_DESC sd
, int regnr
, unsigned char *buf
)
204 if (regnr
>= R0_REGNUM
&& regnr
<= Rn_REGNUM
)
205 STATE_CPU (sd
, 0)->reg
[regnr
- R0_REGNUM
] = T2H_4 (*(unsigned32
*)buf
);
206 else if (regnr
== PC_REGNUM
)
207 STATE_CPU (sd
, 0)->cia
.ip
= T2H_4 (*(unsigned32
*)buf
);
208 else if (regnr
== NPC_REGNUM
)
209 STATE_CPU (sd
, 0)->cia
.dp
= T2H_4 (*(unsigned32
*)buf
);
210 else if (regnr
>= A0_REGNUM
&& regnr
<= An_REGNUM
)
211 STATE_CPU (sd
, 0)->acc
[regnr
- A0_REGNUM
] = T2H_8 (*(unsigned64
*)buf
);
213 sim_io_error (sd
, "sim_store_register - unknown register nr %d", regnr
);
219 sim_info (SIM_DESC sd
, int verbose
)
225 sim_create_inferior (SIM_DESC sd
,
229 STATE_CPU (sd
, 0)->cia
.ip
= STATE_START_ADDR(sd
);
230 STATE_CPU (sd
, 0)->cia
.dp
= (STATE_START_ADDR(sd
)
231 + sizeof (instruction_word
));
232 STATE_CPU (sd
, 0)->cr
[IE_CR
] |= IE_CR_IE
;
233 STATE_CPU (sd
, 0)->reg
[1] = TIC80_MEM_START
+ TIC80_MEM_SIZE
- 16;
239 sim_do_command (SIM_DESC sd
, char *cmd
)
241 if (sim_args_command (sd
, cmd
) != SIM_RC_OK
)
242 sim_io_eprintf (sd
, "Unknown command `%s'\n", cmd
);
This page took 0.046488 seconds and 3 git commands to generate.