110 lines
2.1 KiB
C
110 lines
2.1 KiB
C
|
/* run front end support for W65
|
||
|
|
Copyright (C) 1995 Free Software Foundation, Inc.
|
||
|
|
|
||
|
|
This file is part of W65 SIM
|
||
|
|
|
||
|
|
GNU CC is free software; you can redistribute it and/or modify
|
||
|
|
it under the terms of the GNU General Public License as published by
|
||
|
|
the Free Software Foundation; either version 2, or (at your option)
|
||
|
|
any later version.
|
||
|
|
|
||
|
|
GNU CC is distributed in the hope that it will be useful,
|
||
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
GNU General Public License for more details.
|
||
|
|
|
||
|
|
You should have received a copy of the GNU General Public License
|
||
|
|
along with GNU CC; see the file COPYING. If not, write to
|
||
|
|
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||
|
|
|
||
|
|
|
||
|
|
/* Steve Chamberlain
|
||
|
|
sac@cygnus.com */
|
||
|
|
|
||
|
|
#include <stdio.h>
|
||
|
|
#include "bfd.h"
|
||
|
|
#include "sysdep.h"
|
||
|
|
|
||
|
|
extern printf();
|
||
|
|
|
||
|
|
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 = "";
|
||
|
|
|
||
|
|
for (i = 1; i < ac; i++)
|
||
|
|
{
|
||
|
|
if (strcmp (av[i], "-v") == 0)
|
||
|
|
{
|
||
|
|
verbose = 1;
|
||
|
|
}
|
||
|
|
else if (strcmp (av[i], "-t") == 0)
|
||
|
|
{
|
||
|
|
trace = 1;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
name = av[i];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (verbose)
|
||
|
|
{
|
||
|
|
printf ("run %s\n", name);
|
||
|
|
}
|
||
|
|
abfd = bfd_openr (name, "coff-w65");
|
||
|
|
if (abfd)
|
||
|
|
{
|
||
|
|
|
||
|
|
if (bfd_check_format (abfd, bfd_object))
|
||
|
|
{
|
||
|
|
|
||
|
|
for (s = abfd->sections; s; s = s->next)
|
||
|
|
{
|
||
|
|
unsigned char *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));
|
||
|
|
free (buffer);
|
||
|
|
}
|
||
|
|
|
||
|
|
start_address = bfd_get_start_address (abfd);
|
||
|
|
sim_set_pc (start_address);
|
||
|
|
if (trace)
|
||
|
|
{
|
||
|
|
int done = 0;
|
||
|
|
while (!done)
|
||
|
|
{
|
||
|
|
done = sim_trace ();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
sim_resume (0, 0);
|
||
|
|
}
|
||
|
|
if (verbose)
|
||
|
|
sim_info (printf, 0);
|
||
|
|
|
||
|
|
/* Find out what was in r0 and return that */
|
||
|
|
{
|
||
|
|
unsigned char b[4];
|
||
|
|
sim_fetch_register(0, b);
|
||
|
|
return b[3];
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return 1;
|
||
|
|
}
|