1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
/* front end to the simulator.
Written by Steve Chamberlain of Cygnus Support.
sac@cygnus.com
This file is part of H8/300 sim
THIS SOFTWARE IS NOT COPYRIGHTED
Cygnus offers the following for use in the public domain. Cygnus
makes no warranty with regard to the software or it's performance
and the user accepts the software "AS IS" with all faults.
CYGNUS DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD TO
THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*/
#include "config.h"
#include <varargs.h>
#include <stdio.h>
#include <signal.h>
#ifdef HAVE_STDLIB_H
#include <stdlib.h>
#endif
#include "getopt.h"
#include "bfd.h"
#include "remote-sim.h"
void usage();
extern int optind;
extern char *optarg;
int
main (ac, av)
int ac;
char **av;
{
bfd *abfd;
bfd_vma start_address;
asection *s;
int i;
int verbose = 0;
int trace = 0;
char *name = "";
int sigrc;
enum sim_stop reason;
while ((i = getopt (ac, av, "c:htv")) != EOF)
switch (i)
{
case 'c':
sim_csize (atoi (optarg));
break;
case 'h':
set_h8300h (1);
break;
case 't':
trace = 1;
break;
case 'v':
verbose = 1;
break;
default:
usage();
}
if (ac - optind != 1)
usage();
name = av[ac - 1];
if (verbose)
printf ("run %s\n", name);
abfd = bfd_openr (name, "coff-h8300");
if (! abfd)
{
fprintf (stderr, "%s: unable to open %s\n", av[0], name);
exit (1);
}
if (! bfd_check_format(abfd, bfd_object))
{
fprintf (stderr, "%s: %s is not a valid executable\n", av[0], name);
exit (1);
}
if (abfd->arch_info->mach == bfd_mach_h8300h
/* start-sanitize-h8s */
|| abfd->arch_info->mach == bfd_mach_h8300s
/* end-sanitize-h8s */
)
set_h8300h (1);
for (s = abfd->sections; s; s=s->next)
{
char *buffer;
if (s->flags & SEC_LOAD)
{
buffer = malloc(bfd_section_size(abfd,s));
bfd_get_section_contents(abfd, s, buffer, 0,
bfd_section_size (abfd, s));
sim_write(s->vma, buffer, bfd_section_size (abfd, s));
}
}
start_address = bfd_get_start_address(abfd);
sim_create_inferior (start_address, NULL, NULL);
sim_resume(0,0);
if (verbose)
sim_info (verbose - 1);
sim_stop_reason (&reason, &sigrc);
/* FIXME: this test is insufficient but we can't do much
about it until sim_stop_reason is cleaned up. */
if (sigrc == SIGILL)
abort ();
return 0;
}
/* gdb callback used by simulator */
void
printf_filtered (va_alist)
va_dcl
{
char *msg;
va_list args;
va_start (args);
msg = va_arg (args, char *);
vfprintf (stdout, msg, args);
va_end (args);
}
void
usage()
{
fprintf (stderr, "usage: run [-h] [-t] [-v] [-c csize] program\n");
exit (1);
}
|
