GNU General Public License for more details.
You should have received a copy of the GNU General Public License
-along with GDB; see the file COPYING. If not, write to
-the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
/* Emulator communication protocol.
#include <sys/file.h>
#include <errno.h>
#include <ctype.h>
-#include <string.h>
#include <setjmp.h>
#include <fcntl.h>
#include "defs.h"
+#include "gdb_string.h"
#include "frame.h"
#include "inferior.h"
#include "target.h"
#include "wait.h"
-#include "terminal.h"
#include "command.h"
#include "remote-utils.h"
-
-#ifdef USG
-#include <sys/types.h>
-#include <sgtty.h>
-#endif
-
-#include <signal.h>
-
-/* External variables referenced. */
-
-extern bfd *exec_bfd;
+#include "gdbcore.h"
+#include "serial.h"
/* Prototypes for local functions */
static void
es1800_prepare_to_store PARAMS ((void));
-static int
-es1800_wait PARAMS ((WAITTYPE *));
+static int es1800_wait PARAMS ((int, struct target_waitstatus *));
-static void
-es1800_resume PARAMS ((int, int, int));
+static void es1800_resume PARAMS ((int, int, enum target_signal));
static void
es1800_detach PARAMS ((char *, int));
/* Local variables */
+/* FIXME: Convert this to use "set remotedebug" instead. */
#define LOG_FILE "es1800.log"
#if defined (LOG_FILE)
static FILE *log_file;
static int kiodebug;
static int timeout = 100;
static char *savename; /* Name of i/o device used */
-static TERMINAL es1800_sg_save; /* Save stty state */
+static serial_ttystate es1800_saved_ttystate;
static int es1800_fc_save; /* Save fcntl state */
/* indicates that the emulator uses 32-bit data-adress (68020-mode)
#define MODE (m68020 ? "M68020" : "M68000" )
#define ES1800_BREAK_VEC (0xf)
-/* Descriptor for I/O to remote machine. Initialize it to -1 so that
+/* Descriptor for I/O to remote machine. Initialize it to NULL so that
es1800_open knows that we don't have a file open when the program
starts. */
-static int es1800_desc = -1;
+static serial_t es1800_desc = NULL;
#define PBUFSIZ 1000
#define HDRLEN sizeof("@.BAAAAAAAA=$VV\r")
}
-/* Called when SIGALRM signal sent due to alarm() timeout.
- Rely on global variables: timeout */
-
-#ifndef HAVE_TERMIO
-
-static void
-es1800_timer ()
-{
- if (kiodebug)
- {
- printf ("es1800_timer called\n");
- }
- alarm (timeout);
-}
-
-#endif /* HAVE_TERMIO */
-
-
/* Open a connection to a remote debugger and push the new target
onto the stack. Check if the emulator is responding and find out
what kind of processor the emulator is connected to.
char *name;
int from_tty;
{
- TERMINAL sg;
char buf[PBUFSIZ];
char *p;
int i, fcflag;
- char baudrate[1024];
m68020 = 0;
{
error_no_arg ("serial port device name");
}
- sprintf(baudrate, "%d", sr_get_baud_rate());
target_preopen (from_tty);
es1800_close (0);
#ifndef DEBUG_STDIN
- es1800_desc = open (name, O_RDWR);
- if (es1800_desc < 0)
+ es1800_desc = SERIAL_OPEN (name);
+ if (es1800_desc == NULL)
{
perror_with_name (name);
}
savename = savestring (name, strlen (name));
- if (ioctl (es1800_desc, TIOCGETP, &sg) == -1)
- {
- perror_with_name (name);
- }
- es1800_sg_save = sg;
+ es1800_saved_ttystate = SERIAL_GET_TTY_STATE (es1800_desc);
- if ((fcflag = fcntl (es1800_desc, F_GETFL, 0)) == -1)
+ if ((fcflag = fcntl (es1800_desc->fd, F_GETFL, 0)) == -1)
{
perror_with_name ("fcntl serial");
}
es1800_fc_save = fcflag;
fcflag = (fcflag & (FREAD | FWRITE)); /* mask out any funny stuff */
- if (fcntl (es1800_desc, F_SETFL, fcflag) == -1)
+ if (fcntl (es1800_desc->fd, F_SETFL, fcflag) == -1)
{
perror_with_name ("fcntl serial");
}
-#ifdef HAVE_TERMIO
- sg.c_cc[VMIN] = 0; /* read with timeout. */
- sg.c_cc[VTIME] = timeout * 10;
- sg.c_lflag &= ~(ICANON | ECHO);
- sg.c_cflag = (sg.c_cflag & ~CBAUD) | damn_b (baudrate);
-#else
- sg.sg_ispeed = damn_b (baudrate);
- sg.sg_ospeed = damn_b (baudrate);
- sg.sg_flags = CBREAK+TANDEM;
-#endif
-
- if ((ioctl (es1800_desc, TIOCSETP, &sg)) == -1)
+ if (baud_rate != -1)
{
- perror ("es1800_open: error in ioctl");
+ if (SERIAL_SETBAUDRATE (es1800_desc, baud_rate))
+ {
+ SERIAL_CLOSE (es1800_desc);
+ perror_with_name (name);
+ }
}
+ SERIAL_RAW (es1800_desc);
+
+ /* If there is something sitting in the buffer we might take it as a
+ response to a command, which would be bad. */
+ SERIAL_FLUSH_INPUT (es1800_desc);
+
#endif /* DEBUG_STDIN */
push_target (&es1800_ops); /* Switch to using remote target now */
printf ("Remote ES1800 debugging using %s\n", name);
}
-#ifndef HAVE_TERMIO
-
-#ifndef NO_SIGINTERRUPT
-
- /* Cause SIGALRM's to make reads fail with EINTR instead of resuming
- the read. */
-
- if (siginterrupt (SIGALRM, 1) != 0)
- {
- perror ("es1800_open: error in siginterrupt");
- }
-
-#endif /* NO_SIGINTERRUPT */
-
- /* Set up read timeout timer. */
-
- if ((void(*)()) signal (SIGALRM, es1800_timer) == (void(*)()) -1)
- {
- perror ("es1800_open: error in signal");
- }
-
-#endif /* HAVE_TERMIO */
-
-
#if defined (LOG_FILE)
log_file = fopen (LOG_FILE, "w");
es1800_close (quitting)
int quitting;
{
- if (es1800_desc >= 0)
+ if (es1800_desc != NULL)
{
printf ("\nClosing connection to emulator...\n");
- ioctl (es1800_desc, TIOCSETP, &es1800_sg_save);
- fcntl (es1800_desc,F_SETFL, es1800_fc_save);
- close (es1800_desc);
- es1800_desc = -1;
+ if (SERIAL_SET_TTY_STATE (es1800_desc, es1800_saved_ttystate) < 0)
+ print_sys_errmsg ("warning: unable to restore tty state", errno);
+ fcntl (es1800_desc->fd, F_SETFL, es1800_fc_save);
+ SERIAL_CLOSE (es1800_desc);
+ es1800_desc = NULL;
}
if (savename != NULL)
{
}
-/* damn_b()
-
- Translate baud rates from integers to damn B_codes. Unix should
- have outgrown this crap years ago, but even POSIX wouldn't buck it.
- rate - the baudrate given as a string
- return value: the baudrate as a B_code */
-
-#ifndef B19200
-# define B19200 EXTA
-#endif
-#ifndef B38400
-# define B38400 EXTB
-#endif
-
-struct
-{
- char *rate,
- damn_b;
-} baudtab[] = {
- {"0", B0},
- {"50", B50},
- {"75", B75},
- {"110", B110},
- {"134", B134},
- {"150", B150},
- {"200", B200},
- {"300", B300},
- {"600", B600},
- {"1200", B1200},
- {"1800", B1800},
- {"2400", B2400},
- {"4800", B4800},
- {"9600", B9600},
- {"19200", B19200},
- {"38400", B38400},
- {0, -1},
-};
-
-static int
-damn_b (rate)
- char *rate;
-{
- int i;
-
- for (i = 0; baudtab[i].rate != 0; i++)
- {
- if (STREQ (rate, baudtab[i].rate))
- {
- return (baudtab[i].damn_b);
- }
- }
- error ("Illegal baudrate");
-}
-
-
/* Attaches to a process on the target side
proc_id - the id of the process to be attached.
from_tty - says whether to be verbose or not */
es1800_resume (pid, step, siggnal)
int pid;
int step;
- int siggnal;
+ enum target_signal siggnal;
{
char buf[PBUFSIZ];
status - */
static int
-es1800_wait (status)
- WAITTYPE *status;
+es1800_wait (pid, status)
+ int pid;
+ struct target_waitstatus *status;
{
unsigned char buf[PBUFSIZ];
int old_timeout = timeout;
- WSETEXIT ((*status), 0);
+ status->kind = TARGET_WAITKIND_EXITED;
+ status->value.integer = 0;
+
timeout = 0; /* Don't time out -- user program is running. */
if (!setjmp (interrupt))
{
getmessage (buf, sizeof(buf));
if (strncmp ( buf, "\r\n* BREAK *", 11) == 0)
{
- WSETSTOP ((*status), SIGTRAP);
+ status->kind = TARGET_WAITKIND_STOPPED;
+ status->value.sig = TARGET_SIGNAL_TRAP;
send_command ("STP"); /* Restore stack and PC and such */
if (m68020)
{
}
if (strncmp (buf, "STP\r\n ", 6) == 0)
{
- WSETSTOP ((*status), SIGTRAP);
+ status->kind = TARGET_WAITKIND_STOPPED;
+ status->value.sig = TARGET_SIGNAL_TRAP;
break;
}
if (buf[strlen (buf) - 2] == 'R')
else
{
printf ("Unexpected stop: \n%s\n", buf);
- WSETSTOP ((*status), SIGQUIT);
+ status->kind = TARGET_WAITKIND_STOPPED;
+ status->value.sig = TARGET_SIGNAL_QUIT;
break;
}
}
old_sigint = signal (SIGINT, es1800_request_quit);
send_command ("STP");
printf (" emulator stopped\n");
- WSETSTOP ((*status), SIGINT);
+ status->kind = TARGET_WAITKIND_STOPPED;
+ status->value.sig = TARGET_SIGNAL_INT;
}
else
{
struct cleanup *old_chain;
int es1800_load_format = 5;
- if (es1800_desc < 0)
+ if (es1800_desc == NULL)
{
printf ("No emulator attached, type emulator-command first\n");
return;
error ("Downloading format not defined\n");
}
- mark_breakpoints_out ();
+ breakpoint_init_inferior ();
inferior_pid = 0;
if (from_tty)
{
/* trap_expected = 0; */
/* insert_step_breakpoint (); FIXME, do we need this? */
- proceed ((CORE_ADDR) entry_pt, -1, 0); /* Let 'er rip... */
+ /* Let 'er rip... */
+ proceed ((CORE_ADDR) entry_pt, TARGET_SIGNAL_DEFAULT, 0);
}
static int
readchar ()
{
- char buf[1];
-
- buf[0] = '\0';
-
-#ifdef HAVE_TERMIO
-
- /* termio does the timeout for us. */
- read (es1800_desc, buf, 1);
+ int ch;
-#else
+ ch = SERIAL_READCHAR (es1800_desc, timeout);
- alarm (timeout);
- while (read (es1800_desc, buf, 1) != 1)
- {
- if (errno == EINTR)
- {
- error ("Timeout reading from remote system.");
- }
- else if (errno != EWOULDBLOCK)
- {
- perror_with_name ("remote read");
- }
- }
- alarm (0);
-#endif
+ /* FIXME: doing an error() here will probably cause trouble, at least if from
+ es1800_wait. */
+ if (ch == SERIAL_TIMEOUT)
+ error ("Timeout reading from remote system.");
+ else if (ch == SERIAL_ERROR)
+ perror_with_name ("remote read");
#if defined (LOG_FILE)
- putc (buf[0] & 0x7f, log_file);
+ putc (ch & 0x7f, log_file);
fflush (log_file);
#endif
- return (buf[0] & 0x7f);
+ return (ch);
}
#endif /* DEBUG_STDIN */
int len;
{
send (string);
- write (es1800_desc, "\r", 1);
+ SERIAL_WRITE (es1800_desc, "\r", 1);
#ifndef DEBUG_STDIN
expect (string, 1);
char *string;
{
send (string);
- write (es1800_desc, "\r", 1);
+ SERIAL_WRITE (es1800_desc, "\r", 1);
#ifndef DEBUG_STDIN
expect (string, 0);
{
fprintf (stderr, "Sending: %s\n", string);
}
- write (es1800_desc, string, strlen (string));
+ SERIAL_WRITE (es1800_desc, string, strlen (string));
}
/* Additional commands */
+#if defined (TIOCGETP) && defined (FNDELAY) && defined (EWOULDBLOCK)
+#define PROVIDE_TRANSPARENT
+#endif
+
+#ifdef PROVIDE_TRANSPARENT
/* Talk directly to the emulator
FIXME, uses busy wait, and is SUNOS (or at least BSD) specific */
int i;
dont_repeat ();
- if (es1800_desc < 0)
+ if (es1800_desc == NULL)
{
printf ("No emulator attached, type emulator-command first\n");
return;
perror_with_name ("ioctl console");
}
- if ((fcflag = fcntl (es1800_desc, F_GETFL, 0)) == -1)
+ if ((fcflag = fcntl (es1800_desc->fd, F_GETFL, 0)) == -1)
{
perror_with_name ("fcntl serial");
}
es1800_fc_save = fcflag;
fcflag = fcflag | FNDELAY;
- if (fcntl (es1800_desc, F_SETFL, fcflag) == -1)
+ if (fcntl (es1800_desc->fd, F_SETFL, fcflag) == -1)
{
perror_with_name ("fcntl serial");
}
{
es1800_buf[es1800_cnt++] = inputbuf[i++];
}
- if ((cc = write (es1800_desc, es1800_buf, es1800_cnt)) == -1)
+ if ((cc = SERIAL_WRITE (es1800_desc, es1800_buf, es1800_cnt)) == -1)
{
- perror_with_name ("FEL! read:");
+ perror_with_name ("FEL! write:");
}
es1800_cnt -= cc;
if (es1800_cnt && cc)
perror_with_name ("FEL! read:");
}
- cc = read (es1800_desc,inputbuf,inputcnt);
+ cc = read (es1800_desc->fd,inputbuf,inputcnt);
if (cc != -1)
{
for (i = 0; i < cc; )
close (console);
- if (fcntl (es1800_desc, F_SETFL, es1800_fc_save) == -1)
+ if (fcntl (es1800_desc->fd, F_SETFL, es1800_fc_save) == -1)
{
perror_with_name ("FEL! fcntl");
}
printf ("\n");
}
+#endif /* PROVIDE_TRANSPARENT */
static void
es1800_init_break (args, from_tty)
/* Define the target subroutine names */
-static struct target_ops es1800_ops =
+struct target_ops es1800_ops =
{
"es1800", /* to_shortname */
/* to_longname */
es1800_create_inferior, /* to_create_inferior */
NULL, /* to_mourn_inferior */
0, /* to_can_run */
- 0, /* notice_signals */
+ 0, /* to_notice_signals */
+ 0, /* to_thread_alive */
+ 0, /* to_stop */
core_stratum, /* to_stratum */
0, /* to_next */
0, /* to_has_all_memory */
/* Define the target subroutine names */
-static struct target_ops es1800_child_ops =
+struct target_ops es1800_child_ops =
{
"es1800_process", /* to_shortname */
/* to_longname */
es1800_mourn_inferior, /* to_mourn_inferior */
0, /* to_can_run */
0, /* notice_signals */
+ 0, /* to_thread_alive */
+ 0, /* to_stop */
process_stratum, /* to_stratum */
0, /* to_next */
1, /* to_has_all_memory */
OPS_MAGIC /* to_magic (always last) */
};
-/* _initialize_es1800 () */
-
void
_initialize_es1800 ()
{
add_target (&es1800_ops);
add_target (&es1800_child_ops);
+#ifdef PROVIDE_TRANSPARENT
add_com ("transparent", class_support, es1800_transparent,
"Start transparent communication with the ES 1800 emulator.");
+#endif /* PROVIDE_TRANSPARENT */
add_com ("init_break", class_support, es1800_init_break,
"Download break routine and initialize break facility on ES 1800");
}