123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530 |
- /* Serial interface for local (hardwired) serial ports on Un*x like systems
- Copyright (C) 1992-2022 Free Software Foundation, Inc.
- This file is part of GDB.
- 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.
- 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.
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
- #include "defs.h"
- #include "serial.h"
- #include "ser-base.h"
- #include "ser-unix.h"
- #include <fcntl.h>
- #include <sys/types.h>
- #include "terminal.h"
- #include <sys/socket.h>
- #include "gdbsupport/gdb_sys_time.h"
- #include "gdbsupport/gdb_select.h"
- #include "gdbcmd.h"
- #include "gdbsupport/filestuff.h"
- #include <termios.h>
- #include "gdbsupport/scoped_ignore_sigttou.h"
- struct hardwire_ttystate
- {
- struct termios termios;
- };
- #ifdef CRTSCTS
- /* Boolean to explicitly enable or disable h/w flow control. */
- static bool serial_hwflow;
- static void
- show_serial_hwflow (struct ui_file *file, int from_tty,
- struct cmd_list_element *c, const char *value)
- {
- gdb_printf (file, _("Hardware flow control is %s.\n"), value);
- }
- #endif
- static int hardwire_open (struct serial *scb, const char *name);
- static void hardwire_raw (struct serial *scb);
- static int rate_to_code (int rate);
- static int hardwire_setbaudrate (struct serial *scb, int rate);
- static int hardwire_setparity (struct serial *scb, int parity);
- static void hardwire_close (struct serial *scb);
- static int get_tty_state (struct serial *scb,
- struct hardwire_ttystate * state);
- static int set_tty_state (struct serial *scb,
- struct hardwire_ttystate * state);
- static serial_ttystate hardwire_get_tty_state (struct serial *scb);
- static int hardwire_set_tty_state (struct serial *scb, serial_ttystate state);
- static void hardwire_print_tty_state (struct serial *, serial_ttystate,
- struct ui_file *);
- static int hardwire_drain_output (struct serial *);
- static int hardwire_flush_output (struct serial *);
- static int hardwire_flush_input (struct serial *);
- static int hardwire_send_break (struct serial *);
- static int hardwire_setstopbits (struct serial *, int);
- /* Open up a real live device for serial I/O. */
- static int
- hardwire_open (struct serial *scb, const char *name)
- {
- scb->fd = gdb_open_cloexec (name, O_RDWR, 0).release ();
- if (scb->fd < 0)
- return -1;
- return 0;
- }
- static int
- get_tty_state (struct serial *scb, struct hardwire_ttystate *state)
- {
- if (tcgetattr (scb->fd, &state->termios) < 0)
- return -1;
- return 0;
- }
- static int
- set_tty_state (struct serial *scb, struct hardwire_ttystate *state)
- {
- if (tcsetattr (scb->fd, TCSANOW, &state->termios) < 0)
- return -1;
- return 0;
- }
- static serial_ttystate
- hardwire_get_tty_state (struct serial *scb)
- {
- struct hardwire_ttystate *state = XNEW (struct hardwire_ttystate);
- if (get_tty_state (scb, state))
- {
- xfree (state);
- return NULL;
- }
- return (serial_ttystate) state;
- }
- static serial_ttystate
- hardwire_copy_tty_state (struct serial *scb, serial_ttystate ttystate)
- {
- struct hardwire_ttystate *state = XNEW (struct hardwire_ttystate);
- *state = *(struct hardwire_ttystate *) ttystate;
- return (serial_ttystate) state;
- }
- static int
- hardwire_set_tty_state (struct serial *scb, serial_ttystate ttystate)
- {
- struct hardwire_ttystate *state;
- state = (struct hardwire_ttystate *) ttystate;
- return set_tty_state (scb, state);
- }
- static void
- hardwire_print_tty_state (struct serial *scb,
- serial_ttystate ttystate,
- struct ui_file *stream)
- {
- struct hardwire_ttystate *state = (struct hardwire_ttystate *) ttystate;
- int i;
- gdb_printf (stream, "c_iflag = 0x%x, c_oflag = 0x%x,\n",
- (int) state->termios.c_iflag,
- (int) state->termios.c_oflag);
- gdb_printf (stream, "c_cflag = 0x%x, c_lflag = 0x%x\n",
- (int) state->termios.c_cflag,
- (int) state->termios.c_lflag);
- #if 0
- /* This not in POSIX, and is not really documented by those systems
- which have it (at least not Sun). */
- gdb_printf (stream, "c_line = 0x%x.\n", state->termios.c_line);
- #endif
- gdb_printf (stream, "c_cc: ");
- for (i = 0; i < NCCS; i += 1)
- gdb_printf (stream, "0x%x ", state->termios.c_cc[i]);
- gdb_printf (stream, "\n");
- }
- /* Wait for the output to drain away, as opposed to flushing
- (discarding) it. */
- static int
- hardwire_drain_output (struct serial *scb)
- {
- /* Ignore SIGTTOU which may occur during the drain. */
- scoped_ignore_sigttou ignore_sigttou;
- return tcdrain (scb->fd);
- }
- static int
- hardwire_flush_output (struct serial *scb)
- {
- return tcflush (scb->fd, TCOFLUSH);
- }
- static int
- hardwire_flush_input (struct serial *scb)
- {
- ser_base_flush_input (scb);
- return tcflush (scb->fd, TCIFLUSH);
- }
- static int
- hardwire_send_break (struct serial *scb)
- {
- return tcsendbreak (scb->fd, 0);
- }
- static void
- hardwire_raw (struct serial *scb)
- {
- struct hardwire_ttystate state;
- if (get_tty_state (scb, &state))
- gdb_printf (gdb_stderr, "get_tty_state failed: %s\n",
- safe_strerror (errno));
- state.termios.c_iflag = 0;
- state.termios.c_oflag = 0;
- state.termios.c_lflag = 0;
- state.termios.c_cflag &= ~CSIZE;
- state.termios.c_cflag |= CLOCAL | CS8;
- #ifdef CRTSCTS
- /* h/w flow control. */
- if (serial_hwflow)
- state.termios.c_cflag |= CRTSCTS;
- else
- state.termios.c_cflag &= ~CRTSCTS;
- #ifdef CRTS_IFLOW
- if (serial_hwflow)
- state.termios.c_cflag |= CRTS_IFLOW;
- else
- state.termios.c_cflag &= ~CRTS_IFLOW;
- #endif
- #endif
- state.termios.c_cc[VMIN] = 0;
- state.termios.c_cc[VTIME] = 0;
- if (set_tty_state (scb, &state))
- gdb_printf (gdb_stderr, "set_tty_state failed: %s\n",
- safe_strerror (errno));
- }
- #ifndef B19200
- #define B19200 EXTA
- #endif
- #ifndef B38400
- #define B38400 EXTB
- #endif
- /* Translate baud rates from integers to damn B_codes. Unix should
- have outgrown this crap years ago, but even POSIX wouldn't buck it. */
- static struct
- {
- int rate;
- int code;
- }
- baudtab[] =
- {
- {
- 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
- }
- ,
- #ifdef B57600
- {
- 57600, B57600
- }
- ,
- #endif
- #ifdef B115200
- {
- 115200, B115200
- }
- ,
- #endif
- #ifdef B230400
- {
- 230400, B230400
- }
- ,
- #endif
- #ifdef B460800
- {
- 460800, B460800
- }
- ,
- #endif
- {
- -1, -1
- }
- ,
- };
- static int
- rate_to_code (int rate)
- {
- int i;
- for (i = 0; baudtab[i].rate != -1; i++)
- {
- /* test for perfect macth. */
- if (rate == baudtab[i].rate)
- return baudtab[i].code;
- else
- {
- /* check if it is in between valid values. */
- if (rate < baudtab[i].rate)
- {
- if (i)
- {
- warning (_("Invalid baud rate %d. "
- "Closest values are %d and %d."),
- rate, baudtab[i - 1].rate, baudtab[i].rate);
- }
- else
- {
- warning (_("Invalid baud rate %d. Minimum value is %d."),
- rate, baudtab[0].rate);
- }
- return -1;
- }
- }
- }
-
- /* The requested speed was too large. */
- warning (_("Invalid baud rate %d. Maximum value is %d."),
- rate, baudtab[i - 1].rate);
- return -1;
- }
- static int
- hardwire_setbaudrate (struct serial *scb, int rate)
- {
- struct hardwire_ttystate state;
- int baud_code = rate_to_code (rate);
-
- if (baud_code < 0)
- {
- /* The baud rate was not valid.
- A warning has already been issued. */
- errno = EINVAL;
- return -1;
- }
- if (get_tty_state (scb, &state))
- return -1;
- cfsetospeed (&state.termios, baud_code);
- cfsetispeed (&state.termios, baud_code);
- return set_tty_state (scb, &state);
- }
- static int
- hardwire_setstopbits (struct serial *scb, int num)
- {
- struct hardwire_ttystate state;
- int newbit;
- if (get_tty_state (scb, &state))
- return -1;
- switch (num)
- {
- case SERIAL_1_STOPBITS:
- newbit = 0;
- break;
- case SERIAL_1_AND_A_HALF_STOPBITS:
- case SERIAL_2_STOPBITS:
- newbit = 1;
- break;
- default:
- return 1;
- }
- if (!newbit)
- state.termios.c_cflag &= ~CSTOPB;
- else
- state.termios.c_cflag |= CSTOPB; /* two bits */
- return set_tty_state (scb, &state);
- }
- /* Implement the "setparity" serial_ops callback. */
- static int
- hardwire_setparity (struct serial *scb, int parity)
- {
- struct hardwire_ttystate state;
- int newparity = 0;
- if (get_tty_state (scb, &state))
- return -1;
- switch (parity)
- {
- case GDBPARITY_NONE:
- newparity = 0;
- break;
- case GDBPARITY_ODD:
- newparity = PARENB | PARODD;
- break;
- case GDBPARITY_EVEN:
- newparity = PARENB;
- break;
- default:
- internal_warning (__FILE__, __LINE__,
- "Incorrect parity value: %d", parity);
- return -1;
- }
- state.termios.c_cflag &= ~(PARENB | PARODD);
- state.termios.c_cflag |= newparity;
- return set_tty_state (scb, &state);
- }
- static void
- hardwire_close (struct serial *scb)
- {
- if (scb->fd < 0)
- return;
- close (scb->fd);
- scb->fd = -1;
- }
- /* The hardwire ops. */
- static const struct serial_ops hardwire_ops =
- {
- "hardwire",
- hardwire_open,
- hardwire_close,
- NULL,
- ser_base_readchar,
- ser_base_write,
- hardwire_flush_output,
- hardwire_flush_input,
- hardwire_send_break,
- hardwire_raw,
- hardwire_get_tty_state,
- hardwire_copy_tty_state,
- hardwire_set_tty_state,
- hardwire_print_tty_state,
- hardwire_setbaudrate,
- hardwire_setstopbits,
- hardwire_setparity,
- hardwire_drain_output,
- ser_base_async,
- ser_unix_read_prim,
- ser_unix_write_prim
- };
- void _initialize_ser_hardwire ();
- void
- _initialize_ser_hardwire ()
- {
- serial_add_interface (&hardwire_ops);
- #ifdef CRTSCTS
- add_setshow_boolean_cmd ("remoteflow", no_class,
- &serial_hwflow, _("\
- Set use of hardware flow control for remote serial I/O."), _("\
- Show use of hardware flow control for remote serial I/O."), _("\
- Enable or disable hardware flow control (RTS/CTS) on the serial port\n\
- when debugging using remote targets."),
- NULL,
- show_serial_hwflow,
- &setlist, &showlist);
- #endif
- }
- int
- ser_unix_read_prim (struct serial *scb, size_t count)
- {
- return read (scb->fd, scb->buf, count);
- }
- int
- ser_unix_write_prim (struct serial *scb, const void *buf, size_t len)
- {
- return write (scb->fd, buf, len);
- }
|