X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gdb%2Fserial.c;h=a1c3b91c7c2fb89c7ee8765a0d77c316875e5408;hb=4f83758119ddf0f114477760d79bdde7bbc76835;hp=10b37f1a60069d45d0bdb589dc338394e0b1a264;hpb=3e43a32aaa2d78fca10dea6746b820176f39bcc8;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/serial.c b/gdb/serial.c index 10b37f1a60..a1c3b91c7c 100644 --- a/gdb/serial.c +++ b/gdb/serial.c @@ -1,8 +1,6 @@ /* Generic serial interface routines - Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, - 2002, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 - Free Software Foundation, Inc. + Copyright (C) 1992-2020 Free Software Foundation, Inc. This file is part of GDB. @@ -22,47 +20,41 @@ #include "defs.h" #include #include "serial.h" -#include "gdb_string.h" #include "gdbcmd.h" +#include "cli/cli-utils.h" -extern void _initialize_serial (void); +/* Is serial being debugged? */ -/* Is serial being debugged? */ +static unsigned int global_serial_debug_p; -static int global_serial_debug_p; +/* Serial I/O handlers. */ -/* Linked list of serial I/O handlers */ +static std::vector serial_ops_list; -static struct serial_ops *serial_ops_list = NULL; - -/* This is the last serial stream opened. Used by connect command. */ - -static struct serial *last_serial_opened = NULL; - -/* Pointer to list of scb's. */ +/* Pointer to list of scb's. */ static struct serial *scb_base; /* Non-NULL gives filename which contains a recording of the remote session, - suitable for playback by gdbserver. */ + suitable for playback by gdbserver. */ static char *serial_logfile = NULL; static struct ui_file *serial_logfp = NULL; -static struct serial_ops *serial_interface_lookup (const char *); +static const struct serial_ops *serial_interface_lookup (const char *); static void serial_logchar (struct ui_file *stream, int ch_type, int ch, int timeout); static const char logbase_hex[] = "hex"; static const char logbase_octal[] = "octal"; static const char logbase_ascii[] = "ascii"; -static const char *logbase_enums[] = +static const char *const logbase_enums[] = {logbase_hex, logbase_octal, logbase_ascii, NULL}; static const char *serial_logbase = logbase_ascii; static int serial_current_type = 0; -/* Log char CH of type CHTYPE, with TIMEOUT */ +/* Log char CH of type CHTYPE, with TIMEOUT. */ /* Define bogus char to represent a BREAK. Should be careful to choose a value that can't be confused with a normal char, or an error code. */ @@ -132,7 +124,7 @@ serial_logchar (struct ui_file *stream, int ch_type, int ch, int timeout) } void -serial_log_command (const char *cmd) +serial_log_command (struct target_ops *self, const char *cmd) { if (!serial_logfp) return; @@ -143,17 +135,15 @@ serial_log_command (const char *cmd) fputs_unfiltered (cmd, serial_logfp); /* Make sure that the log file is as up-to-date as possible, - in case we are getting ready to dump core or something. */ + in case we are getting ready to dump core or something. */ gdb_flush (serial_logfp); } -static struct serial_ops * +static const struct serial_ops * serial_interface_lookup (const char *name) { - struct serial_ops *ops; - - for (ops = serial_ops_list; ops; ops = ops->next) + for (const serial_ops *ops : serial_ops_list) if (strcmp (name, ops->name) == 0) return ops; @@ -161,39 +151,61 @@ serial_interface_lookup (const char *name) } void -serial_add_interface (struct serial_ops *optable) +serial_add_interface (const struct serial_ops *optable) { - optable->next = serial_ops_list; - serial_ops_list = optable; + serial_ops_list.push_back (optable); } -/* Open up a device or a network socket, depending upon the syntax of NAME. */ +/* Return the open serial device for FD, if found, or NULL if FD is + not already opened. */ struct serial * -serial_open (const char *name) +serial_for_fd (int fd) { struct serial *scb; - struct serial_ops *ops; - const char *open_name = name; for (scb = scb_base; scb; scb = scb->next) - if (scb->name && strcmp (scb->name, name) == 0) - { - scb->refcnt++; - return scb; - } + if (scb->fd == fd) + return scb; + + return NULL; +} + +/* Create a new serial for OPS. */ + +static struct serial * +new_serial (const struct serial_ops *ops) +{ + struct serial *scb; + + scb = XCNEW (struct serial); - if (strcmp (name, "pc") == 0) - ops = serial_interface_lookup ("pc"); - else if (strncmp (name, "lpt", 3) == 0) - ops = serial_interface_lookup ("parallel"); - else if (strncmp (name, "|", 1) == 0) + scb->ops = ops; + + scb->bufp = scb->buf; + scb->error_fd = -1; + scb->refcnt = 1; + + return scb; +} + +static struct serial *serial_open_ops_1 (const struct serial_ops *ops, + const char *open_name); + +/* Open up a device or a network socket, depending upon the syntax of NAME. */ + +struct serial * +serial_open (const char *name) +{ + const struct serial_ops *ops; + const char *open_name = name; + + if (startswith (name, "|")) { ops = serial_interface_lookup ("pipe"); /* Discard ``|'' and any space before the command itself. */ ++open_name; - while (isspace (*open_name)) - ++open_name; + open_name = skip_spaces (open_name); } /* Check for a colon, suggesting an IP address/port pair. Do this *after* checking for all the interesting prefixes. We @@ -201,77 +213,73 @@ serial_open (const char *name) else if (strchr (name, ':')) ops = serial_interface_lookup ("tcp"); else - ops = serial_interface_lookup ("hardwire"); + { +#ifndef USE_WIN32API + /* Check to see if name is a socket. If it is, then treat it + as such. Otherwise assume that it's a character device. */ + struct stat sb; + if (stat (name, &sb) == 0 && (sb.st_mode & S_IFMT) == S_IFSOCK) + ops = serial_interface_lookup ("local"); + else +#endif + ops = serial_interface_lookup ("hardwire"); + } if (!ops) return NULL; - scb = XMALLOC (struct serial); + return serial_open_ops_1 (ops, open_name); +} - scb->ops = ops; +/* Open up a serial for OPS, passing OPEN_NAME to the open method. */ - scb->bufcnt = 0; - scb->bufp = scb->buf; - scb->error_fd = -1; +static struct serial * +serial_open_ops_1 (const struct serial_ops *ops, const char *open_name) +{ + struct serial *scb; - /* `...->open (...)' would get expanded by an the open(2) syscall macro. */ + scb = new_serial (ops); + + /* `...->open (...)' would get expanded by the open(2) syscall macro. */ if ((*scb->ops->open) (scb, open_name)) { xfree (scb); return NULL; } - scb->name = xstrdup (name); + scb->name = open_name != NULL ? xstrdup (open_name) : NULL; scb->next = scb_base; - scb->refcnt = 1; - scb->debug_p = 0; - scb->async_state = 0; - scb->async_handler = NULL; - scb->async_context = NULL; scb_base = scb; - last_serial_opened = scb; - if (serial_logfile != NULL) { - serial_logfp = gdb_fopen (serial_logfile, "w"); - if (serial_logfp == NULL) + stdio_file_up file (new stdio_file ()); + + if (!file->open (serial_logfile, "w")) perror_with_name (serial_logfile); + + serial_logfp = file.release (); } return scb; } -/* Return the open serial device for FD, if found, or NULL if FD - is not already opened. */ +/* See serial.h. */ struct serial * -serial_for_fd (int fd) +serial_open_ops (const struct serial_ops *ops) { - struct serial *scb; - - for (scb = scb_base; scb; scb = scb->next) - if (scb->fd == fd) - return scb; - - return NULL; + return serial_open_ops_1 (ops, NULL); } /* Open a new serial stream using a file handle, using serial interface ops OPS. */ static struct serial * -serial_fdopen_ops (const int fd, struct serial_ops *ops) +serial_fdopen_ops (const int fd, const struct serial_ops *ops) { struct serial *scb; - scb = serial_for_fd (fd); - if (scb) - { - scb->refcnt++; - return scb; - } - if (!ops) { ops = serial_interface_lookup ("terminal"); @@ -282,21 +290,10 @@ serial_fdopen_ops (const int fd, struct serial_ops *ops) if (!ops) return NULL; - scb = XCALLOC (1, struct serial); - - scb->ops = ops; - - scb->bufcnt = 0; - scb->bufp = scb->buf; - scb->error_fd = -1; + scb = new_serial (ops); scb->name = NULL; scb->next = scb_base; - scb->refcnt = 1; - scb->debug_p = 0; - scb->async_state = 0; - scb->async_handler = NULL; - scb->async_context = NULL; scb_base = scb; if ((ops->fdopen) != NULL) @@ -304,8 +301,6 @@ serial_fdopen_ops (const int fd, struct serial_ops *ops) else scb->fd = fd; - last_serial_opened = scb; - return scb; } @@ -320,37 +315,27 @@ do_serial_close (struct serial *scb, int really_close) { struct serial *tmp_scb; - last_serial_opened = NULL; - if (serial_logfp) { fputs_unfiltered ("\nEnd of log\n", serial_logfp); serial_current_type = 0; - /* XXX - What if serial_logfp == gdb_stdout or gdb_stderr? */ - ui_file_delete (serial_logfp); + /* XXX - What if serial_logfp == gdb_stdout or gdb_stderr? */ + delete serial_logfp; serial_logfp = NULL; } -/* This is bogus. It's not our fault if you pass us a bad scb...! Rob, you - should fix your code instead. */ - - if (!scb) - return; - - scb->refcnt--; - if (scb->refcnt > 0) - return; - - /* ensure that the FD has been taken out of async mode */ + /* ensure that the FD has been taken out of async mode. */ if (scb->async_handler != NULL) serial_async (scb, NULL, NULL); if (really_close) scb->ops->close (scb); - if (scb->name) - xfree (scb->name); + xfree (scb->name); + + /* For serial_is_open. */ + scb->bufp = NULL; if (scb_base == scb) scb_base = scb_base->next; @@ -364,7 +349,7 @@ do_serial_close (struct serial *scb, int really_close) break; } - xfree (scb); + serial_unref (scb); } void @@ -379,13 +364,33 @@ serial_un_fdopen (struct serial *scb) do_serial_close (scb, 0); } +int +serial_is_open (struct serial *scb) +{ + return scb->bufp != NULL; +} + +void +serial_ref (struct serial *scb) +{ + scb->refcnt++; +} + +void +serial_unref (struct serial *scb) +{ + --scb->refcnt; + if (scb->refcnt == 0) + xfree (scb); +} + int serial_readchar (struct serial *scb, int timeout) { int ch; /* FIXME: cagney/1999-10-11: Don't enable this check until the ASYNC - code is finished. */ + code is finished. */ if (0 && serial_is_async_p (scb) && timeout < 0) internal_error (__FILE__, __LINE__, _("serial_readchar: blocking read in async mode")); @@ -396,7 +401,7 @@ serial_readchar (struct serial *scb, int timeout) serial_logchar (serial_logfp, 'r', ch, timeout); /* Make sure that the log file is as up-to-date as possible, - in case we are getting ready to dump core or something. */ + in case we are getting ready to dump core or something. */ gdb_flush (serial_logfp); } if (serial_debug_p (scb)) @@ -411,46 +416,46 @@ serial_readchar (struct serial *scb, int timeout) } int -serial_write (struct serial *scb, const char *str, int len) +serial_write (struct serial *scb, const void *buf, size_t count) { if (serial_logfp != NULL) { - int count; + const char *str = (const char *) buf; + size_t c; - for (count = 0; count < len; count++) - serial_logchar (serial_logfp, 'w', str[count] & 0xff, 0); + for (c = 0; c < count; c++) + serial_logchar (serial_logfp, 'w', str[c] & 0xff, 0); /* Make sure that the log file is as up-to-date as possible, - in case we are getting ready to dump core or something. */ + in case we are getting ready to dump core or something. */ gdb_flush (serial_logfp); } if (serial_debug_p (scb)) { - int count; + const char *str = (const char *) buf; + size_t c; - for (count = 0; count < len; count++) + for (c = 0; c < count; c++) { fprintf_unfiltered (gdb_stdlog, "["); - serial_logchar (gdb_stdlog, 'w', str[count] & 0xff, 0); + serial_logchar (gdb_stdlog, 'w', str[c] & 0xff, 0); fprintf_unfiltered (gdb_stdlog, "]"); } gdb_flush (gdb_stdlog); } - return (scb->ops->write (scb, str, len)); + return (scb->ops->write (scb, buf, count)); } void -serial_printf (struct serial *desc, const char *format,...) +serial_printf (struct serial *desc, const char *format, ...) { va_list args; - char *buf; va_start (args, format); - buf = xstrvprintf (format, args); - serial_write (desc, buf, strlen (buf)); + std::string buf = string_vprintf (format, args); + serial_write (desc, buf.c_str (), buf.length ()); - xfree (buf); va_end (args); } @@ -493,6 +498,12 @@ serial_get_tty_state (struct serial *scb) return scb->ops->get_tty_state (scb); } +serial_ttystate +serial_copy_tty_state (struct serial *scb, serial_ttystate ttystate) +{ + return scb->ops->copy_tty_state (scb, ttystate); +} + int serial_set_tty_state (struct serial *scb, serial_ttystate ttystate) { @@ -507,14 +518,6 @@ serial_print_tty_state (struct serial *scb, scb->ops->print_tty_state (scb, ttystate, stream); } -int -serial_noflush_set_tty_state (struct serial *scb, - serial_ttystate new_ttystate, - serial_ttystate old_ttystate) -{ - return scb->ops->noflush_set_tty_state (scb, new_ttystate, old_ttystate); -} - int serial_setbaudrate (struct serial *scb, int rate) { @@ -527,6 +530,14 @@ serial_setstopbits (struct serial *scb, int num) return scb->ops->setstopbits (scb, num); } +/* See serial.h. */ + +int +serial_setparity (struct serial *scb, int parity) +{ + return scb->ops->setparity (scb, parity); +} + int serial_can_async_p (struct serial *scb) { @@ -553,19 +564,6 @@ serial_async (struct serial *scb, scb->ops->async (scb, handler != NULL); } -int -deprecated_serial_fd (struct serial *scb) -{ - /* FIXME: should this output a warning that deprecated code is being - called? */ - if (scb->fd < 0) - { - internal_error (__FILE__, __LINE__, - _("serial: FD not valid")); - } - return scb->fd; /* sigh */ -} - void serial_debug (struct serial *scb, int debug_p) { @@ -602,7 +600,7 @@ serial_done_wait_handle (struct serial *scb) int serial_pipe (struct serial *scbs[2]) { - struct serial_ops *ops; + const struct serial_ops *ops; int fildes[2]; ops = serial_interface_lookup ("pipe"); @@ -620,149 +618,64 @@ serial_pipe (struct serial *scbs[2]) return 0; } -#if 0 -/* The connect command is #if 0 because I hadn't thought of an elegant - way to wait for I/O on two `struct serial *'s simultaneously. Two - solutions came to mind: - - 1) Fork, and have have one fork handle the to user direction, - and have the other hand the to target direction. This - obviously won't cut it for MSDOS. - - 2) Use something like select. This assumes that stdin and - the target side can both be waited on via the same - mechanism. This may not be true for DOS, if GDB is - talking to the target via a TCP socket. - -grossman, 8 Jun 93 */ - -/* Connect the user directly to the remote system. This command acts just like - the 'cu' or 'tip' command. Use ~. or ~^D to break out. */ +/* Serial set/show framework. */ -static struct serial *tty_desc; /* Controlling terminal */ +static struct cmd_list_element *serial_set_cmdlist; +static struct cmd_list_element *serial_show_cmdlist; static void -cleanup_tty (serial_ttystate ttystate) +serial_set_cmd (const char *args, int from_tty) { - printf_unfiltered ("\r\n[Exiting connect mode]\r\n"); - serial_set_tty_state (tty_desc, ttystate); - xfree (ttystate); - serial_close (tty_desc); + printf_unfiltered ("\"set serial\" must be followed " + "by the name of a command.\n"); + help_list (serial_set_cmdlist, "set serial ", all_commands, gdb_stdout); } static void -connect_command (char *args, int fromtty) +serial_show_cmd (const char *args, int from_tty) { - int c; - char cur_esc = 0; - serial_ttystate ttystate; - struct serial *port_desc; /* TTY port */ - - dont_repeat (); - - if (args) - fprintf_unfiltered (gdb_stderr, - "This command takes no args. " - "They have been ignored.\n"); - - printf_unfiltered ("[Entering connect mode. Use ~. or ~^D to escape]\n"); - - tty_desc = serial_fdopen (0); - port_desc = last_serial_opened; - - ttystate = serial_get_tty_state (tty_desc); - - serial_raw (tty_desc); - serial_raw (port_desc); - - make_cleanup (cleanup_tty, ttystate); - - while (1) - { - int mask; - - mask = serial_wait_2 (tty_desc, port_desc, -1); - - if (mask & 2) - { /* tty input */ - char cx; - - while (1) - { - c = serial_readchar (tty_desc, 0); - - if (c == SERIAL_TIMEOUT) - break; - - if (c < 0) - perror_with_name (_("connect")); - - cx = c; - serial_write (port_desc, &cx, 1); - - switch (cur_esc) - { - case 0: - if (c == '\r') - cur_esc = c; - break; - case '\r': - if (c == '~') - cur_esc = c; - else - cur_esc = 0; - break; - case '~': - if (c == '.' || c == '\004') - return; - else - cur_esc = 0; - } - } - } - - if (mask & 1) - { /* Port input */ - char cx; - - while (1) - { - c = serial_readchar (port_desc, 0); - - if (c == SERIAL_TIMEOUT) - break; - - if (c < 0) - perror_with_name (_("connect")); - - cx = c; - - serial_write (tty_desc, &cx, 1); - } - } - } + cmd_show_list (serial_show_cmdlist, from_tty, ""); } -#endif /* 0 */ -/* Serial set/show framework. */ +/* Baud rate specified for talking to serial target systems. Default + is left as -1, so targets can choose their own defaults. */ +/* FIXME: This means that "show serial baud" and gr_files_info can + print -1 or (unsigned int)-1. This is a Bad User Interface. */ -static struct cmd_list_element *serial_set_cmdlist; -static struct cmd_list_element *serial_show_cmdlist; +int baud_rate = -1; static void -serial_set_cmd (char *args, int from_tty) +serial_baud_show_cmd (struct ui_file *file, int from_tty, + struct cmd_list_element *c, const char *value) { - printf_unfiltered ("\"set serial\" must be followed " - "by the name of a command.\n"); - help_list (serial_set_cmdlist, "set serial ", -1, gdb_stdout); + fprintf_filtered (file, _("Baud rate for remote serial I/O is %s.\n"), + value); } +/* Parity for serial port. */ + +int serial_parity = GDBPARITY_NONE; + +static const char parity_none[] = "none"; +static const char parity_odd[] = "odd"; +static const char parity_even[] = "even"; +static const char *const parity_enums[] = + {parity_none, parity_odd, parity_even, NULL}; +static const char *parity = parity_none; + +/* Set serial_parity value. */ + static void -serial_show_cmd (char *args, int from_tty) +set_parity (const char *ignore_args, int from_tty, struct cmd_list_element *c) { - cmd_show_list (serial_show_cmdlist, from_tty, ""); + if (parity == parity_odd) + serial_parity = GDBPARITY_ODD; + else if (parity == parity_even) + serial_parity = GDBPARITY_EVEN; + else + serial_parity = GDBPARITY_NONE; } - void _initialize_serial (void) { @@ -784,6 +697,25 @@ Show default serial/parallel port configuration."), 0/*allow-unknown*/, &showlist); + /* If target is open when baud changes, it doesn't take effect until + the next open (I think, not sure). */ + add_setshow_zinteger_cmd ("baud", no_class, &baud_rate, _("\ +Set baud rate for remote serial I/O."), _("\ +Show baud rate for remote serial I/O."), _("\ +This value is used to set the speed of the serial port when debugging\n\ +using remote targets."), + NULL, + serial_baud_show_cmd, + &serial_set_cmdlist, &serial_show_cmdlist); + + add_setshow_enum_cmd ("parity", no_class, parity_enums, + &parity, _("\ +Set parity for remote serial I/O."), _("\ +Show parity for remote serial I/O."), NULL, + set_parity, + NULL, /* FIXME: i18n: */ + &serial_set_cmdlist, &serial_show_cmdlist); + add_setshow_filename_cmd ("remotelogfile", no_class, &serial_logfile, _("\ Set filename for remote session recording."), _("\ Show filename for remote session recording."), _("\ @@ -795,18 +727,18 @@ by gdbserver."), add_setshow_enum_cmd ("remotelogbase", no_class, logbase_enums, &serial_logbase, _("\ -Set numerical base for remote session logging"), _("\ -Show numerical base for remote session logging"), NULL, +Set numerical base for remote session logging."), _("\ +Show numerical base for remote session logging."), NULL, NULL, NULL, /* FIXME: i18n: */ &setlist, &showlist); - add_setshow_zinteger_cmd ("serial", class_maintenance, - &global_serial_debug_p, _("\ + add_setshow_zuinteger_cmd ("serial", class_maintenance, + &global_serial_debug_p, _("\ Set serial debugging."), _("\ Show serial debugging."), _("\ When non-zero, serial port debugging is enabled."), - NULL, - NULL, /* FIXME: i18n: */ - &setdebuglist, &showdebuglist); + NULL, + NULL, /* FIXME: i18n: */ + &setdebuglist, &showdebuglist); }