2006-01-24 06:10:41 +08:00
|
|
|
/* main.c --- main function for stand-alone M32C simulator.
|
|
|
|
|
2009-01-14 18:53:10 +08:00
|
|
|
Copyright (C) 2005, 2007, 2008, 2009 Free Software Foundation, Inc.
|
2006-01-24 06:10:41 +08:00
|
|
|
Contributed by Red Hat, Inc.
|
|
|
|
|
|
|
|
This file is part of the GNU simulators.
|
|
|
|
|
2007-08-24 22:30:15 +08:00
|
|
|
This program 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 3 of the License, or
|
|
|
|
(at your option) any later version.
|
2006-01-24 06:10:41 +08:00
|
|
|
|
2007-08-24 22:30:15 +08:00
|
|
|
This program 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.
|
2006-01-24 06:10:41 +08:00
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
2007-08-24 22:30:15 +08:00
|
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
2006-01-24 06:10:41 +08:00
|
|
|
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <assert.h>
|
|
|
|
#include <setjmp.h>
|
|
|
|
#include <signal.h>
|
|
|
|
|
2008-06-07 03:18:15 +08:00
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/socket.h>
|
|
|
|
#include <netinet/in.h>
|
|
|
|
#include <netinet/tcp.h>
|
|
|
|
|
|
|
|
|
2006-01-24 06:10:41 +08:00
|
|
|
#include "bfd.h"
|
|
|
|
|
|
|
|
#include "cpu.h"
|
|
|
|
#include "mem.h"
|
|
|
|
#include "misc.h"
|
|
|
|
#include "load.h"
|
|
|
|
#include "trace.h"
|
2008-06-07 03:18:15 +08:00
|
|
|
#ifdef TIMER_A
|
|
|
|
#include "int.h"
|
|
|
|
#include "timer_a.h"
|
|
|
|
#endif
|
2006-01-24 06:10:41 +08:00
|
|
|
|
2008-06-07 03:18:15 +08:00
|
|
|
extern int m32c_console_ofd;
|
|
|
|
extern int m32c_console_ifd;
|
|
|
|
|
|
|
|
int m32c_disassemble = 0;
|
2006-01-24 06:10:41 +08:00
|
|
|
static unsigned int cycles = 0;
|
|
|
|
|
|
|
|
static void
|
|
|
|
done (int exit_code)
|
|
|
|
{
|
|
|
|
if (verbose)
|
|
|
|
{
|
|
|
|
stack_heap_stats ();
|
|
|
|
mem_usage_stats ();
|
|
|
|
printf ("insns: %14s\n", comma (cycles));
|
|
|
|
}
|
|
|
|
exit (exit_code);
|
|
|
|
}
|
|
|
|
|
2008-06-07 03:18:15 +08:00
|
|
|
static void
|
|
|
|
setup_tcp_console (char *portname)
|
|
|
|
{
|
|
|
|
int port = atoi (portname);
|
|
|
|
struct sockaddr_in address;
|
|
|
|
int isocket;
|
|
|
|
socklen_t as;
|
|
|
|
unsigned char *a;
|
|
|
|
|
|
|
|
if (port < 1024)
|
|
|
|
{
|
|
|
|
printf ("invalid port number %d\n", port);
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
printf ("waiting for tcp console on port %d\n", port);
|
|
|
|
|
|
|
|
memset (&address, 0, sizeof (address));
|
|
|
|
address.sin_family = AF_INET;
|
|
|
|
address.sin_port = htons (port);
|
|
|
|
|
|
|
|
isocket = socket (AF_INET, SOCK_STREAM, 0);
|
|
|
|
if (isocket < 0)
|
|
|
|
{
|
|
|
|
perror ("socket");
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (bind (isocket, (struct sockaddr *) &address, sizeof (address)))
|
|
|
|
{
|
|
|
|
perror ("bind");
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
listen (isocket, 2);
|
|
|
|
|
|
|
|
printf ("waiting for connection...\n");
|
|
|
|
as = sizeof (address);
|
|
|
|
m32c_console_ifd = accept (isocket, (struct sockaddr *) &address, &as);
|
|
|
|
if (m32c_console_ifd == -1)
|
|
|
|
{
|
|
|
|
perror ("accept");
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
a = (unsigned char *) (&address.sin_addr.s_addr);
|
|
|
|
printf ("connection from %d.%d.%d.%d\n", a[0], a[1], a[2], a[3]);
|
|
|
|
m32c_console_ofd = m32c_console_ifd;
|
|
|
|
}
|
|
|
|
|
2006-01-24 06:10:41 +08:00
|
|
|
int
|
|
|
|
main (int argc, char **argv)
|
|
|
|
{
|
|
|
|
int o;
|
|
|
|
int save_trace;
|
|
|
|
bfd *prog;
|
2008-06-07 03:18:15 +08:00
|
|
|
char *console_port_s = 0;
|
|
|
|
|
|
|
|
setbuf (stdout, 0);
|
|
|
|
|
|
|
|
in_gdb = 0;
|
2006-01-24 06:10:41 +08:00
|
|
|
|
2008-06-17 08:34:37 +08:00
|
|
|
while ((o = getopt (argc, argv, "tc:vdm:C")) != -1)
|
2006-01-24 06:10:41 +08:00
|
|
|
switch (o)
|
|
|
|
{
|
|
|
|
case 't':
|
|
|
|
trace++;
|
|
|
|
break;
|
2008-06-07 03:18:15 +08:00
|
|
|
case 'c':
|
|
|
|
console_port_s = optarg;
|
|
|
|
break;
|
2008-06-17 08:34:37 +08:00
|
|
|
case 'C':
|
|
|
|
m32c_use_raw_console = 1;
|
|
|
|
break;
|
2006-01-24 06:10:41 +08:00
|
|
|
case 'v':
|
|
|
|
verbose++;
|
|
|
|
break;
|
|
|
|
case 'd':
|
2008-06-07 03:18:15 +08:00
|
|
|
m32c_disassemble++;
|
2006-01-24 06:10:41 +08:00
|
|
|
break;
|
|
|
|
case 'm':
|
|
|
|
if (strcmp (optarg, "r8c") == 0 || strcmp (optarg, "m16c") == 0)
|
|
|
|
default_machine = bfd_mach_m16c;
|
|
|
|
else if (strcmp (optarg, "m32cm") == 0
|
|
|
|
|| strcmp (optarg, "m32c") == 0)
|
|
|
|
default_machine = bfd_mach_m32c;
|
|
|
|
else
|
|
|
|
{
|
|
|
|
fprintf (stderr, "Invalid machine: %s\n", optarg);
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
case '?':
|
|
|
|
fprintf (stderr,
|
2008-06-17 08:34:37 +08:00
|
|
|
"usage: run [-v] [-C] [-c port] [-t] [-d] [-m r8c|m16c|m32cm|m32c]"
|
2008-06-07 03:18:15 +08:00
|
|
|
" program\n");
|
2006-01-24 06:10:41 +08:00
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
|
|
|
|
prog = bfd_openr (argv[optind], 0);
|
|
|
|
if (!prog)
|
|
|
|
{
|
|
|
|
fprintf (stderr, "Can't read %s\n", argv[optind]);
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!bfd_check_format (prog, bfd_object))
|
|
|
|
{
|
|
|
|
fprintf (stderr, "%s not a m32c program\n", argv[optind]);
|
|
|
|
exit (1);
|
|
|
|
}
|
|
|
|
|
|
|
|
save_trace = trace;
|
|
|
|
trace = 0;
|
|
|
|
m32c_load (prog);
|
|
|
|
trace = save_trace;
|
|
|
|
|
2008-06-07 03:18:15 +08:00
|
|
|
if (console_port_s)
|
|
|
|
setup_tcp_console (console_port_s);
|
|
|
|
|
|
|
|
sim_disasm_init (prog);
|
2006-01-24 06:10:41 +08:00
|
|
|
|
|
|
|
while (1)
|
|
|
|
{
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
if (trace)
|
|
|
|
printf ("\n");
|
|
|
|
|
2008-06-07 03:18:15 +08:00
|
|
|
if (m32c_disassemble)
|
2006-01-24 06:10:41 +08:00
|
|
|
sim_disasm_one ();
|
|
|
|
|
|
|
|
enable_counting = verbose;
|
|
|
|
cycles++;
|
|
|
|
rc = decode_opcode ();
|
|
|
|
enable_counting = 0;
|
|
|
|
|
|
|
|
if (M32C_HIT_BREAK (rc))
|
|
|
|
done (1);
|
|
|
|
else if (M32C_EXITED (rc))
|
|
|
|
done (M32C_EXIT_STATUS (rc));
|
|
|
|
else
|
|
|
|
assert (M32C_STEPPED (rc));
|
|
|
|
|
|
|
|
trace_register_changes ();
|
2008-06-07 03:18:15 +08:00
|
|
|
|
|
|
|
#ifdef TIMER_A
|
|
|
|
update_timer_a ();
|
|
|
|
#endif
|
2006-01-24 06:10:41 +08:00
|
|
|
}
|
|
|
|
}
|