]>
git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - sim/tic80/sim-calls.c
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
48 sim_open (SIM_OPEN_KIND kind
,
49 host_callback
*callback
,
53 SIM_DESC sd
= sim_state_alloc (kind
, callback
);
55 if (sim_pre_argv_init (sd
, argv
[0]) != SIM_RC_OK
)
58 /* getopt will print the error message so we just have to exit if this fails.
59 FIXME: Hmmm... in the case of gdb we need getopt to call
61 if (sim_parse_args (sd
, argv
) != SIM_RC_OK
)
63 /* Uninstall the modules to avoid memory leaks,
64 file descriptor leaks, etc. */
65 sim_module_uninstall (sd
);
69 /* check for/establish the a reference program image */
70 if (sim_analyze_program (sd
,
71 (STATE_PROG_ARGV (sd
) != NULL
72 ? *STATE_PROG_ARGV (sd
)
76 sim_module_uninstall (sd
);
80 /* establish any remaining configuration options */
81 if (sim_config (sd
) != SIM_RC_OK
)
83 sim_module_uninstall (sd
);
87 if (sim_post_argv_init (sd
) != SIM_RC_OK
)
89 /* Uninstall the modules to avoid memory leaks,
90 file descriptor leaks, etc. */
91 sim_module_uninstall (sd
);
95 #define TIC80_MEM_START 0x2000000
96 #define TIC80_MEM_SIZE 0x100000
98 if (!STATE_MEMOPT_P (sd
))
102 asprintf (&buf
, "memory region 0x%lx,0x%lx",
103 TIC80_MEM_START
, TIC80_MEM_SIZE
);
104 sim_do_command (sd
, buf
);
106 /* interrupt memory */
107 sim_do_command (sd
, "memory region 0x1010000,0x1000");
108 /* some memory at zero */
109 sim_do_command (sd
, "memory region 0,0x100000");
118 sim_close (SIM_DESC sd
, int quitting
)
120 /* Uninstall the modules to avoid memory leaks,
121 file descriptor leaks, etc. */
122 sim_module_uninstall (sd
);
127 sim_read (SIM_DESC sd
, SIM_ADDR mem
, unsigned char *buf
, int length
)
129 return sim_core_read_buffer (sd
, NULL
, sim_core_write_map
,
135 sim_write (SIM_DESC sd
, SIM_ADDR mem
, unsigned char *buf
, int length
)
137 return sim_core_write_buffer (sd
, NULL
, sim_core_write_map
,
142 /* FIXME - these magic numbers need to be moved elsewhere */
144 #define SP_REGNUM 1 /* Contains address of top of stack */
145 #define FP_REGNUM 31 /* Contains address of executing stack frame */
146 #define PC_REGNUM 32 /* Contains program counter (FIXME?) */
147 #define NPC_REGNUM 33 /* Contains the next program counter (FIXME?) */
148 #define A0_REGNUM 34 /* Accumulator register 0 */
149 #define A3_REGNUM 37 /* Accumulator register 1 */
151 #define R0_REGNUM 0 /* General Purpose Register 0 - for sim */
152 #define Rn_REGNUM 31 /* Last General Purpose Register - for sim */
153 #define An_REGNUM A3_REGNUM /* Last Accumulator register - for sim */
156 sim_fetch_register (SIM_DESC sd
, int regnr
, unsigned char *buf
)
158 if (regnr
== R0_REGNUM
)
159 memset (buf
, 0, sizeof (unsigned32
));
160 else if (regnr
> R0_REGNUM
&& regnr
<= Rn_REGNUM
)
161 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->reg
[regnr
- R0_REGNUM
]);
162 else if (regnr
== PC_REGNUM
)
163 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->cia
.ip
);
164 else if (regnr
== NPC_REGNUM
)
165 *(unsigned32
*)buf
= H2T_4 (STATE_CPU (sd
, 0)->cia
.dp
);
166 else if (regnr
>= A0_REGNUM
&& regnr
<= An_REGNUM
)
167 *(unsigned64
*)buf
= H2T_8 (STATE_CPU (sd
, 0)->acc
[regnr
- A0_REGNUM
]);
169 sim_io_error (sd
, "sim_fetch_register - unknown register nr %d", regnr
);
175 sim_store_register (SIM_DESC sd
, int regnr
, unsigned char *buf
)
177 if (regnr
>= R0_REGNUM
&& regnr
<= Rn_REGNUM
)
178 STATE_CPU (sd
, 0)->reg
[regnr
- R0_REGNUM
] = T2H_4 (*(unsigned32
*)buf
);
179 else if (regnr
== PC_REGNUM
)
180 STATE_CPU (sd
, 0)->cia
.ip
= T2H_4 (*(unsigned32
*)buf
);
181 else if (regnr
== NPC_REGNUM
)
182 STATE_CPU (sd
, 0)->cia
.dp
= T2H_4 (*(unsigned32
*)buf
);
183 else if (regnr
>= A0_REGNUM
&& regnr
<= An_REGNUM
)
184 STATE_CPU (sd
, 0)->acc
[regnr
- A0_REGNUM
] = T2H_8 (*(unsigned64
*)buf
);
186 sim_io_error (sd
, "sim_store_register - unknown register nr %d", regnr
);
192 sim_info (SIM_DESC sd
, int verbose
)
198 sim_create_inferior (SIM_DESC sd
,
203 /* clear all registers */
204 memset (&STATE_CPU (sd
, 0)->reg
, 0, sizeof (STATE_CPU (sd
, 0)->reg
));
205 memset (&STATE_CPU (sd
, 0)->acc
, 0, sizeof (STATE_CPU (sd
, 0)->acc
));
206 memset (&STATE_CPU (sd
, 0)->cr
, 0, sizeof (STATE_CPU (sd
, 0)->cr
));
207 STATE_CPU (sd
, 0)->is_user_mode
= 0;
208 memset (&STATE_CPU (sd
, 0)->cia
, 0, sizeof (STATE_CPU (sd
, 0)->cia
));
209 /* initialize any modules */
210 sim_module_init (sd
);
211 /* set the stack-pointer/program counter */
213 STATE_CPU (sd
, 0)->cia
.ip
= bfd_get_start_address (abfd
);
215 STATE_CPU (sd
, 0)->cia
.ip
= 0;
216 STATE_CPU (sd
, 0)->cia
.dp
= (STATE_CPU (sd
, 0)->cia
.ip
217 + sizeof (instruction_word
));
218 STATE_CPU (sd
, 0)->cr
[IE_CR
] |= IE_CR_IE
;
219 STATE_CPU (sd
, 0)->reg
[1] = TIC80_MEM_START
+ TIC80_MEM_SIZE
- 16;
225 sim_do_command (SIM_DESC sd
, char *cmd
)
227 if (sim_args_command (sd
, cmd
) != SIM_RC_OK
)
228 sim_io_eprintf (sd
, "Unknown command `%s'\n", cmd
);