Commit | Line | Data |
---|---|---|
c906108c | 1 | /* Generic serial interface routines |
4fcf66da | 2 | |
6aba47ca | 3 | Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, |
4c38e0a4 JB |
4 | 2002, 2004, 2005, 2006, 2007, 2008, 2009, 2010 |
5 | Free Software Foundation, Inc. | |
c906108c | 6 | |
c5aa993b | 7 | This file is part of GDB. |
c906108c | 8 | |
c5aa993b JM |
9 | This program is free software; you can redistribute it and/or modify |
10 | it under the terms of the GNU General Public License as published by | |
a9762ec7 | 11 | the Free Software Foundation; either version 3 of the License, or |
c5aa993b | 12 | (at your option) any later version. |
c906108c | 13 | |
c5aa993b JM |
14 | This program is distributed in the hope that it will be useful, |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
c906108c | 18 | |
c5aa993b | 19 | You should have received a copy of the GNU General Public License |
a9762ec7 | 20 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
c906108c SS |
21 | |
22 | #include "defs.h" | |
23 | #include <ctype.h> | |
24 | #include "serial.h" | |
25 | #include "gdb_string.h" | |
26 | #include "gdbcmd.h" | |
27 | ||
c2c6d25f | 28 | extern void _initialize_serial (void); |
392a587b | 29 | |
2acceee2 JM |
30 | /* Is serial being debugged? */ |
31 | ||
32 | static int global_serial_debug_p; | |
33 | ||
c906108c SS |
34 | /* Linked list of serial I/O handlers */ |
35 | ||
36 | static struct serial_ops *serial_ops_list = NULL; | |
37 | ||
38 | /* This is the last serial stream opened. Used by connect command. */ | |
39 | ||
819cc324 | 40 | static struct serial *last_serial_opened = NULL; |
c906108c SS |
41 | |
42 | /* Pointer to list of scb's. */ | |
43 | ||
819cc324 | 44 | static struct serial *scb_base; |
c906108c SS |
45 | |
46 | /* Non-NULL gives filename which contains a recording of the remote session, | |
47 | suitable for playback by gdbserver. */ | |
48 | ||
49 | static char *serial_logfile = NULL; | |
d9fcf2fb | 50 | static struct ui_file *serial_logfp = NULL; |
c906108c | 51 | |
c2c6d25f | 52 | static struct serial_ops *serial_interface_lookup (char *); |
d9fcf2fb | 53 | static void serial_logchar (struct ui_file *stream, int ch_type, int ch, int timeout); |
53904c9e AC |
54 | static const char logbase_hex[] = "hex"; |
55 | static const char logbase_octal[] = "octal"; | |
56 | static const char logbase_ascii[] = "ascii"; | |
57 | static const char *logbase_enums[] = | |
c5aa993b | 58 | {logbase_hex, logbase_octal, logbase_ascii, NULL}; |
53904c9e | 59 | static const char *serial_logbase = logbase_ascii; |
c906108c | 60 | \f |
c5aa993b | 61 | |
c906108c SS |
62 | static int serial_current_type = 0; |
63 | ||
64 | /* Log char CH of type CHTYPE, with TIMEOUT */ | |
65 | ||
66 | /* Define bogus char to represent a BREAK. Should be careful to choose a value | |
67 | that can't be confused with a normal char, or an error code. */ | |
68 | #define SERIAL_BREAK 1235 | |
69 | ||
70 | static void | |
d9fcf2fb | 71 | serial_logchar (struct ui_file *stream, int ch_type, int ch, int timeout) |
c906108c SS |
72 | { |
73 | if (ch_type != serial_current_type) | |
74 | { | |
2acceee2 | 75 | fprintf_unfiltered (stream, "\n%c ", ch_type); |
c906108c SS |
76 | serial_current_type = ch_type; |
77 | } | |
78 | ||
79 | if (serial_logbase != logbase_ascii) | |
2acceee2 | 80 | fputc_unfiltered (' ', stream); |
c906108c SS |
81 | |
82 | switch (ch) | |
83 | { | |
84 | case SERIAL_TIMEOUT: | |
2acceee2 | 85 | fprintf_unfiltered (stream, "<Timeout: %d seconds>", timeout); |
c906108c SS |
86 | return; |
87 | case SERIAL_ERROR: | |
2acceee2 | 88 | fprintf_unfiltered (stream, "<Error: %s>", safe_strerror (errno)); |
c906108c SS |
89 | return; |
90 | case SERIAL_EOF: | |
2acceee2 | 91 | fputs_unfiltered ("<Eof>", stream); |
c906108c SS |
92 | return; |
93 | case SERIAL_BREAK: | |
2acceee2 | 94 | fputs_unfiltered ("<Break>", stream); |
c906108c SS |
95 | return; |
96 | default: | |
97 | if (serial_logbase == logbase_hex) | |
2acceee2 | 98 | fprintf_unfiltered (stream, "%02x", ch & 0xff); |
c906108c | 99 | else if (serial_logbase == logbase_octal) |
2acceee2 | 100 | fprintf_unfiltered (stream, "%03o", ch & 0xff); |
c906108c SS |
101 | else |
102 | switch (ch) | |
103 | { | |
c5aa993b | 104 | case '\\': |
2acceee2 | 105 | fputs_unfiltered ("\\\\", stream); |
c5aa993b JM |
106 | break; |
107 | case '\b': | |
2acceee2 | 108 | fputs_unfiltered ("\\b", stream); |
c5aa993b JM |
109 | break; |
110 | case '\f': | |
2acceee2 | 111 | fputs_unfiltered ("\\f", stream); |
c5aa993b JM |
112 | break; |
113 | case '\n': | |
2acceee2 | 114 | fputs_unfiltered ("\\n", stream); |
c5aa993b JM |
115 | break; |
116 | case '\r': | |
2acceee2 | 117 | fputs_unfiltered ("\\r", stream); |
c5aa993b JM |
118 | break; |
119 | case '\t': | |
2acceee2 | 120 | fputs_unfiltered ("\\t", stream); |
c5aa993b JM |
121 | break; |
122 | case '\v': | |
2acceee2 | 123 | fputs_unfiltered ("\\v", stream); |
c5aa993b JM |
124 | break; |
125 | default: | |
2acceee2 | 126 | fprintf_unfiltered (stream, isprint (ch) ? "%c" : "\\x%02x", ch & 0xFF); |
c5aa993b | 127 | break; |
c906108c SS |
128 | } |
129 | } | |
130 | } | |
131 | ||
132 | void | |
c2c6d25f | 133 | serial_log_command (const char *cmd) |
c906108c SS |
134 | { |
135 | if (!serial_logfp) | |
136 | return; | |
137 | ||
138 | serial_current_type = 'c'; | |
139 | ||
140 | fputs_unfiltered ("\nc ", serial_logfp); | |
141 | fputs_unfiltered (cmd, serial_logfp); | |
142 | ||
143 | /* Make sure that the log file is as up-to-date as possible, | |
144 | in case we are getting ready to dump core or something. */ | |
145 | gdb_flush (serial_logfp); | |
146 | } | |
147 | ||
c2c6d25f | 148 | \f |
c906108c | 149 | static struct serial_ops * |
c2c6d25f | 150 | serial_interface_lookup (char *name) |
c906108c SS |
151 | { |
152 | struct serial_ops *ops; | |
153 | ||
154 | for (ops = serial_ops_list; ops; ops = ops->next) | |
155 | if (strcmp (name, ops->name) == 0) | |
156 | return ops; | |
157 | ||
158 | return NULL; | |
159 | } | |
160 | ||
161 | void | |
c2c6d25f | 162 | serial_add_interface (struct serial_ops *optable) |
c906108c SS |
163 | { |
164 | optable->next = serial_ops_list; | |
165 | serial_ops_list = optable; | |
166 | } | |
167 | ||
168 | /* Open up a device or a network socket, depending upon the syntax of NAME. */ | |
169 | ||
819cc324 | 170 | struct serial * |
c2c6d25f | 171 | serial_open (const char *name) |
c906108c | 172 | { |
819cc324 | 173 | struct serial *scb; |
c906108c | 174 | struct serial_ops *ops; |
c2c6d25f | 175 | const char *open_name = name; |
c906108c SS |
176 | |
177 | for (scb = scb_base; scb; scb = scb->next) | |
178 | if (scb->name && strcmp (scb->name, name) == 0) | |
179 | { | |
180 | scb->refcnt++; | |
181 | return scb; | |
182 | } | |
183 | ||
50a9e2f1 | 184 | if (strcmp (name, "pc") == 0) |
c906108c | 185 | ops = serial_interface_lookup ("pc"); |
c906108c SS |
186 | else if (strncmp (name, "lpt", 3) == 0) |
187 | ops = serial_interface_lookup ("parallel"); | |
43e526b9 | 188 | else if (strncmp (name, "|", 1) == 0) |
c2c6d25f JM |
189 | { |
190 | ops = serial_interface_lookup ("pipe"); | |
8b9e3a15 VP |
191 | /* Discard ``|'' and any space before the command itself. */ |
192 | ++open_name; | |
193 | while (isspace (*open_name)) | |
194 | ++open_name; | |
c2c6d25f | 195 | } |
2821caf1 JB |
196 | /* Check for a colon, suggesting an IP address/port pair. |
197 | Do this *after* checking for all the interesting prefixes. We | |
198 | don't want to constrain the syntax of what can follow them. */ | |
199 | else if (strchr (name, ':')) | |
200 | ops = serial_interface_lookup ("tcp"); | |
c906108c SS |
201 | else |
202 | ops = serial_interface_lookup ("hardwire"); | |
203 | ||
204 | if (!ops) | |
205 | return NULL; | |
206 | ||
65e2f740 | 207 | scb = XMALLOC (struct serial); |
c906108c SS |
208 | |
209 | scb->ops = ops; | |
210 | ||
211 | scb->bufcnt = 0; | |
212 | scb->bufp = scb->buf; | |
65cc4390 | 213 | scb->error_fd = -1; |
c906108c | 214 | |
652aaa24 JK |
215 | /* `...->open (...)' would get expanded by an the open(2) syscall macro. */ |
216 | if ((*scb->ops->open) (scb, open_name)) | |
c906108c | 217 | { |
b8c9b27d | 218 | xfree (scb); |
c906108c SS |
219 | return NULL; |
220 | } | |
221 | ||
4fcf66da | 222 | scb->name = xstrdup (name); |
c906108c SS |
223 | scb->next = scb_base; |
224 | scb->refcnt = 1; | |
2acceee2 JM |
225 | scb->debug_p = 0; |
226 | scb->async_state = 0; | |
c2c6d25f JM |
227 | scb->async_handler = NULL; |
228 | scb->async_context = NULL; | |
c906108c SS |
229 | scb_base = scb; |
230 | ||
231 | last_serial_opened = scb; | |
232 | ||
233 | if (serial_logfile != NULL) | |
234 | { | |
235 | serial_logfp = gdb_fopen (serial_logfile, "w"); | |
236 | if (serial_logfp == NULL) | |
237 | perror_with_name (serial_logfile); | |
238 | } | |
239 | ||
240 | return scb; | |
241 | } | |
242 | ||
0ea3f30e DJ |
243 | /* Return the open serial device for FD, if found, or NULL if FD |
244 | is not already opened. */ | |
245 | ||
246 | struct serial * | |
247 | serial_for_fd (int fd) | |
248 | { | |
249 | struct serial *scb; | |
250 | struct serial_ops *ops; | |
251 | ||
252 | for (scb = scb_base; scb; scb = scb->next) | |
253 | if (scb->fd == fd) | |
254 | return scb; | |
255 | ||
256 | return NULL; | |
257 | } | |
258 | ||
819cc324 | 259 | struct serial * |
c2c6d25f | 260 | serial_fdopen (const int fd) |
c906108c | 261 | { |
819cc324 | 262 | struct serial *scb; |
c906108c SS |
263 | struct serial_ops *ops; |
264 | ||
265 | for (scb = scb_base; scb; scb = scb->next) | |
266 | if (scb->fd == fd) | |
267 | { | |
268 | scb->refcnt++; | |
269 | return scb; | |
270 | } | |
271 | ||
0ea3f30e DJ |
272 | ops = serial_interface_lookup ("terminal"); |
273 | if (!ops) | |
274 | ops = serial_interface_lookup ("hardwire"); | |
c906108c SS |
275 | |
276 | if (!ops) | |
277 | return NULL; | |
278 | ||
0ea3f30e | 279 | scb = XCALLOC (1, struct serial); |
c906108c SS |
280 | |
281 | scb->ops = ops; | |
282 | ||
283 | scb->bufcnt = 0; | |
284 | scb->bufp = scb->buf; | |
285 | ||
286 | scb->fd = fd; | |
287 | ||
288 | scb->name = NULL; | |
289 | scb->next = scb_base; | |
290 | scb->refcnt = 1; | |
2acceee2 JM |
291 | scb->debug_p = 0; |
292 | scb->async_state = 0; | |
c2c6d25f JM |
293 | scb->async_handler = NULL; |
294 | scb->async_context = NULL; | |
c906108c SS |
295 | scb_base = scb; |
296 | ||
297 | last_serial_opened = scb; | |
298 | ||
299 | return scb; | |
300 | } | |
301 | ||
c2c6d25f | 302 | static void |
819cc324 | 303 | do_serial_close (struct serial *scb, int really_close) |
c906108c | 304 | { |
819cc324 | 305 | struct serial *tmp_scb; |
c906108c SS |
306 | |
307 | last_serial_opened = NULL; | |
308 | ||
309 | if (serial_logfp) | |
310 | { | |
311 | fputs_unfiltered ("\nEnd of log\n", serial_logfp); | |
312 | serial_current_type = 0; | |
313 | ||
314 | /* XXX - What if serial_logfp == gdb_stdout or gdb_stderr? */ | |
d9fcf2fb | 315 | ui_file_delete (serial_logfp); |
c906108c SS |
316 | serial_logfp = NULL; |
317 | } | |
318 | ||
319 | /* This is bogus. It's not our fault if you pass us a bad scb...! Rob, you | |
320 | should fix your code instead. */ | |
321 | ||
322 | if (!scb) | |
323 | return; | |
324 | ||
325 | scb->refcnt--; | |
326 | if (scb->refcnt > 0) | |
327 | return; | |
328 | ||
c2c6d25f JM |
329 | /* ensure that the FD has been taken out of async mode */ |
330 | if (scb->async_handler != NULL) | |
331 | serial_async (scb, NULL, NULL); | |
332 | ||
c906108c SS |
333 | if (really_close) |
334 | scb->ops->close (scb); | |
335 | ||
336 | if (scb->name) | |
b8c9b27d | 337 | xfree (scb->name); |
c906108c SS |
338 | |
339 | if (scb_base == scb) | |
340 | scb_base = scb_base->next; | |
341 | else | |
342 | for (tmp_scb = scb_base; tmp_scb; tmp_scb = tmp_scb->next) | |
343 | { | |
344 | if (tmp_scb->next != scb) | |
345 | continue; | |
346 | ||
347 | tmp_scb->next = tmp_scb->next->next; | |
348 | break; | |
349 | } | |
350 | ||
b8c9b27d | 351 | xfree (scb); |
c906108c SS |
352 | } |
353 | ||
c2c6d25f | 354 | void |
819cc324 | 355 | serial_close (struct serial *scb) |
c2c6d25f JM |
356 | { |
357 | do_serial_close (scb, 1); | |
358 | } | |
359 | ||
360 | void | |
819cc324 | 361 | serial_un_fdopen (struct serial *scb) |
c2c6d25f JM |
362 | { |
363 | do_serial_close (scb, 0); | |
364 | } | |
365 | ||
366 | int | |
819cc324 | 367 | serial_readchar (struct serial *scb, int timeout) |
c2c6d25f JM |
368 | { |
369 | int ch; | |
370 | ||
2df3850c JM |
371 | /* FIXME: cagney/1999-10-11: Don't enable this check until the ASYNC |
372 | code is finished. */ | |
2cd58942 | 373 | if (0 && serial_is_async_p (scb) && timeout < 0) |
8e65ff28 | 374 | internal_error (__FILE__, __LINE__, |
e2e0b3e5 | 375 | _("serial_readchar: blocking read in async mode")); |
2df3850c | 376 | |
c2c6d25f JM |
377 | ch = scb->ops->readchar (scb, timeout); |
378 | if (serial_logfp != NULL) | |
379 | { | |
2acceee2 | 380 | serial_logchar (serial_logfp, 'r', ch, timeout); |
c2c6d25f JM |
381 | |
382 | /* Make sure that the log file is as up-to-date as possible, | |
383 | in case we are getting ready to dump core or something. */ | |
384 | gdb_flush (serial_logfp); | |
385 | } | |
2cd58942 | 386 | if (serial_debug_p (scb)) |
2acceee2 JM |
387 | { |
388 | fprintf_unfiltered (gdb_stdlog, "["); | |
389 | serial_logchar (gdb_stdlog, 'r', ch, timeout); | |
390 | fprintf_unfiltered (gdb_stdlog, "]"); | |
391 | gdb_flush (gdb_stdlog); | |
392 | } | |
c2c6d25f JM |
393 | |
394 | return (ch); | |
395 | } | |
396 | ||
397 | int | |
819cc324 | 398 | serial_write (struct serial *scb, const char *str, int len) |
c2c6d25f JM |
399 | { |
400 | if (serial_logfp != NULL) | |
401 | { | |
402 | int count; | |
403 | ||
404 | for (count = 0; count < len; count++) | |
2acceee2 | 405 | serial_logchar (serial_logfp, 'w', str[count] & 0xff, 0); |
c2c6d25f JM |
406 | |
407 | /* Make sure that the log file is as up-to-date as possible, | |
408 | in case we are getting ready to dump core or something. */ | |
409 | gdb_flush (serial_logfp); | |
410 | } | |
411 | ||
412 | return (scb->ops->write (scb, str, len)); | |
413 | } | |
414 | ||
415 | void | |
819cc324 | 416 | serial_printf (struct serial *desc, const char *format,...) |
c2c6d25f JM |
417 | { |
418 | va_list args; | |
419 | char *buf; | |
420 | va_start (args, format); | |
421 | ||
e623b504 | 422 | buf = xstrvprintf (format, args); |
2cd58942 | 423 | serial_write (desc, buf, strlen (buf)); |
c2c6d25f | 424 | |
b8c9b27d | 425 | xfree (buf); |
c2c6d25f JM |
426 | va_end (args); |
427 | } | |
428 | ||
429 | int | |
819cc324 | 430 | serial_drain_output (struct serial *scb) |
c2c6d25f JM |
431 | { |
432 | return scb->ops->drain_output (scb); | |
433 | } | |
434 | ||
435 | int | |
819cc324 | 436 | serial_flush_output (struct serial *scb) |
c2c6d25f JM |
437 | { |
438 | return scb->ops->flush_output (scb); | |
439 | } | |
440 | ||
441 | int | |
819cc324 | 442 | serial_flush_input (struct serial *scb) |
c2c6d25f JM |
443 | { |
444 | return scb->ops->flush_input (scb); | |
445 | } | |
446 | ||
447 | int | |
819cc324 | 448 | serial_send_break (struct serial *scb) |
c2c6d25f JM |
449 | { |
450 | if (serial_logfp != NULL) | |
2acceee2 | 451 | serial_logchar (serial_logfp, 'w', SERIAL_BREAK, 0); |
c2c6d25f JM |
452 | |
453 | return (scb->ops->send_break (scb)); | |
454 | } | |
455 | ||
456 | void | |
819cc324 | 457 | serial_raw (struct serial *scb) |
c2c6d25f JM |
458 | { |
459 | scb->ops->go_raw (scb); | |
460 | } | |
461 | ||
462 | serial_ttystate | |
819cc324 | 463 | serial_get_tty_state (struct serial *scb) |
c2c6d25f JM |
464 | { |
465 | return scb->ops->get_tty_state (scb); | |
466 | } | |
467 | ||
468 | int | |
819cc324 | 469 | serial_set_tty_state (struct serial *scb, serial_ttystate ttystate) |
c2c6d25f JM |
470 | { |
471 | return scb->ops->set_tty_state (scb, ttystate); | |
472 | } | |
473 | ||
474 | void | |
819cc324 | 475 | serial_print_tty_state (struct serial *scb, |
c2c6d25f | 476 | serial_ttystate ttystate, |
d9fcf2fb | 477 | struct ui_file *stream) |
c2c6d25f JM |
478 | { |
479 | scb->ops->print_tty_state (scb, ttystate, stream); | |
480 | } | |
481 | ||
482 | int | |
819cc324 | 483 | serial_noflush_set_tty_state (struct serial *scb, |
c2c6d25f JM |
484 | serial_ttystate new_ttystate, |
485 | serial_ttystate old_ttystate) | |
486 | { | |
487 | return scb->ops->noflush_set_tty_state (scb, new_ttystate, old_ttystate); | |
488 | } | |
489 | ||
490 | int | |
819cc324 | 491 | serial_setbaudrate (struct serial *scb, int rate) |
c2c6d25f JM |
492 | { |
493 | return scb->ops->setbaudrate (scb, rate); | |
494 | } | |
495 | ||
496 | int | |
819cc324 | 497 | serial_setstopbits (struct serial *scb, int num) |
c2c6d25f JM |
498 | { |
499 | return scb->ops->setstopbits (scb, num); | |
500 | } | |
501 | ||
502 | int | |
819cc324 | 503 | serial_can_async_p (struct serial *scb) |
c2c6d25f JM |
504 | { |
505 | return (scb->ops->async != NULL); | |
506 | } | |
507 | ||
508 | int | |
819cc324 | 509 | serial_is_async_p (struct serial *scb) |
c2c6d25f JM |
510 | { |
511 | return (scb->ops->async != NULL) && (scb->async_handler != NULL); | |
512 | } | |
513 | ||
514 | void | |
819cc324 | 515 | serial_async (struct serial *scb, |
c2c6d25f JM |
516 | serial_event_ftype *handler, |
517 | void *context) | |
518 | { | |
05ce04a4 | 519 | int changed = ((scb->async_handler == NULL) != (handler == NULL)); |
c2c6d25f JM |
520 | scb->async_handler = handler; |
521 | scb->async_context = context; | |
05ce04a4 VP |
522 | /* Only change mode if there is a need. */ |
523 | if (changed) | |
524 | scb->ops->async (scb, handler != NULL); | |
c2c6d25f JM |
525 | } |
526 | ||
527 | int | |
819cc324 | 528 | deprecated_serial_fd (struct serial *scb) |
c2c6d25f JM |
529 | { |
530 | /* FIXME: should this output a warning that deprecated code is being | |
531 | called? */ | |
532 | if (scb->fd < 0) | |
533 | { | |
8e65ff28 | 534 | internal_error (__FILE__, __LINE__, |
e2e0b3e5 | 535 | _("serial: FD not valid")); |
c2c6d25f JM |
536 | } |
537 | return scb->fd; /* sigh */ | |
538 | } | |
539 | ||
2acceee2 | 540 | void |
819cc324 | 541 | serial_debug (struct serial *scb, int debug_p) |
2acceee2 JM |
542 | { |
543 | scb->debug_p = debug_p; | |
544 | } | |
545 | ||
546 | int | |
819cc324 | 547 | serial_debug_p (struct serial *scb) |
2acceee2 JM |
548 | { |
549 | return scb->debug_p || global_serial_debug_p; | |
550 | } | |
551 | ||
0ea3f30e DJ |
552 | #ifdef USE_WIN32API |
553 | void | |
554 | serial_wait_handle (struct serial *scb, HANDLE *read, HANDLE *except) | |
555 | { | |
556 | if (scb->ops->wait_handle) | |
557 | scb->ops->wait_handle (scb, read, except); | |
558 | else | |
559 | { | |
560 | *read = (HANDLE) _get_osfhandle (scb->fd); | |
561 | *except = NULL; | |
562 | } | |
563 | } | |
c3e2b812 DJ |
564 | |
565 | void | |
566 | serial_done_wait_handle (struct serial *scb) | |
567 | { | |
568 | if (scb->ops->done_wait_handle) | |
569 | scb->ops->done_wait_handle (scb); | |
570 | } | |
0ea3f30e | 571 | #endif |
2acceee2 | 572 | |
c906108c | 573 | #if 0 |
819cc324 AC |
574 | /* The connect command is #if 0 because I hadn't thought of an elegant |
575 | way to wait for I/O on two `struct serial *'s simultaneously. Two | |
576 | solutions came to mind: | |
c906108c | 577 | |
c5aa993b JM |
578 | 1) Fork, and have have one fork handle the to user direction, |
579 | and have the other hand the to target direction. This | |
580 | obviously won't cut it for MSDOS. | |
c906108c | 581 | |
c5aa993b JM |
582 | 2) Use something like select. This assumes that stdin and |
583 | the target side can both be waited on via the same | |
584 | mechanism. This may not be true for DOS, if GDB is | |
585 | talking to the target via a TCP socket. | |
819cc324 | 586 | -grossman, 8 Jun 93 */ |
c906108c SS |
587 | |
588 | /* Connect the user directly to the remote system. This command acts just like | |
589 | the 'cu' or 'tip' command. Use <CR>~. or <CR>~^D to break out. */ | |
590 | ||
819cc324 | 591 | static struct serial *tty_desc; /* Controlling terminal */ |
c906108c SS |
592 | |
593 | static void | |
c2c6d25f | 594 | cleanup_tty (serial_ttystate ttystate) |
c906108c SS |
595 | { |
596 | printf_unfiltered ("\r\n[Exiting connect mode]\r\n"); | |
2cd58942 | 597 | serial_set_tty_state (tty_desc, ttystate); |
b8c9b27d | 598 | xfree (ttystate); |
2cd58942 | 599 | serial_close (tty_desc); |
c906108c SS |
600 | } |
601 | ||
602 | static void | |
c2c6d25f | 603 | connect_command (char *args, int fromtty) |
c906108c SS |
604 | { |
605 | int c; | |
606 | char cur_esc = 0; | |
607 | serial_ttystate ttystate; | |
819cc324 | 608 | struct serial *port_desc; /* TTY port */ |
c906108c | 609 | |
c5aa993b | 610 | dont_repeat (); |
c906108c SS |
611 | |
612 | if (args) | |
c5aa993b JM |
613 | fprintf_unfiltered (gdb_stderr, "This command takes no args. They have been ignored.\n"); |
614 | ||
615 | printf_unfiltered ("[Entering connect mode. Use ~. or ~^D to escape]\n"); | |
c906108c | 616 | |
2cd58942 | 617 | tty_desc = serial_fdopen (0); |
c906108c SS |
618 | port_desc = last_serial_opened; |
619 | ||
2cd58942 | 620 | ttystate = serial_get_tty_state (tty_desc); |
c906108c | 621 | |
2cd58942 AC |
622 | serial_raw (tty_desc); |
623 | serial_raw (port_desc); | |
c906108c SS |
624 | |
625 | make_cleanup (cleanup_tty, ttystate); | |
626 | ||
627 | while (1) | |
628 | { | |
629 | int mask; | |
630 | ||
2cd58942 | 631 | mask = serial_wait_2 (tty_desc, port_desc, -1); |
c906108c SS |
632 | |
633 | if (mask & 2) | |
634 | { /* tty input */ | |
635 | char cx; | |
636 | ||
637 | while (1) | |
638 | { | |
2cd58942 | 639 | c = serial_readchar (tty_desc, 0); |
c906108c SS |
640 | |
641 | if (c == SERIAL_TIMEOUT) | |
c5aa993b | 642 | break; |
c906108c SS |
643 | |
644 | if (c < 0) | |
e2e0b3e5 | 645 | perror_with_name (_("connect")); |
c906108c SS |
646 | |
647 | cx = c; | |
2cd58942 | 648 | serial_write (port_desc, &cx, 1); |
c906108c SS |
649 | |
650 | switch (cur_esc) | |
651 | { | |
652 | case 0: | |
653 | if (c == '\r') | |
654 | cur_esc = c; | |
655 | break; | |
656 | case '\r': | |
657 | if (c == '~') | |
658 | cur_esc = c; | |
659 | else | |
660 | cur_esc = 0; | |
661 | break; | |
662 | case '~': | |
663 | if (c == '.' || c == '\004') | |
664 | return; | |
665 | else | |
666 | cur_esc = 0; | |
667 | } | |
668 | } | |
669 | } | |
670 | ||
671 | if (mask & 1) | |
672 | { /* Port input */ | |
673 | char cx; | |
674 | ||
675 | while (1) | |
676 | { | |
2cd58942 | 677 | c = serial_readchar (port_desc, 0); |
c906108c SS |
678 | |
679 | if (c == SERIAL_TIMEOUT) | |
c5aa993b | 680 | break; |
c906108c SS |
681 | |
682 | if (c < 0) | |
e2e0b3e5 | 683 | perror_with_name (_("connect")); |
c906108c SS |
684 | |
685 | cx = c; | |
686 | ||
2cd58942 | 687 | serial_write (tty_desc, &cx, 1); |
c906108c SS |
688 | } |
689 | } | |
690 | } | |
691 | } | |
692 | #endif /* 0 */ | |
693 | ||
e3abfe1d AC |
694 | /* Serial set/show framework. */ |
695 | ||
696 | static struct cmd_list_element *serial_set_cmdlist; | |
697 | static struct cmd_list_element *serial_show_cmdlist; | |
698 | ||
699 | static void | |
700 | serial_set_cmd (char *args, int from_tty) | |
701 | { | |
702 | printf_unfiltered ("\"set serial\" must be followed by the name of a command.\n"); | |
703 | help_list (serial_set_cmdlist, "set serial ", -1, gdb_stdout); | |
704 | } | |
705 | ||
706 | static void | |
707 | serial_show_cmd (char *args, int from_tty) | |
708 | { | |
709 | cmd_show_list (serial_show_cmdlist, from_tty, ""); | |
710 | } | |
711 | ||
712 | ||
c906108c | 713 | void |
c2c6d25f | 714 | _initialize_serial (void) |
c906108c SS |
715 | { |
716 | #if 0 | |
1bedd215 AC |
717 | add_com ("connect", class_obscure, connect_command, _("\ |
718 | Connect the terminal directly up to the command monitor.\n\ | |
719 | Use <CR>~. or <CR>~^D to break out.")); | |
c906108c SS |
720 | #endif /* 0 */ |
721 | ||
1bedd215 AC |
722 | add_prefix_cmd ("serial", class_maintenance, serial_set_cmd, _("\ |
723 | Set default serial/parallel port configuration."), | |
e3abfe1d AC |
724 | &serial_set_cmdlist, "set serial ", |
725 | 0/*allow-unknown*/, | |
726 | &setlist); | |
727 | ||
1bedd215 AC |
728 | add_prefix_cmd ("serial", class_maintenance, serial_show_cmd, _("\ |
729 | Show default serial/parallel port configuration."), | |
e3abfe1d AC |
730 | &serial_show_cmdlist, "show serial ", |
731 | 0/*allow-unknown*/, | |
732 | &showlist); | |
733 | ||
f397e303 AC |
734 | add_setshow_filename_cmd ("remotelogfile", no_class, &serial_logfile, _("\ |
735 | Set filename for remote session recording."), _("\ | |
736 | Show filename for remote session recording."), _("\ | |
c906108c | 737 | This file is used to record the remote session for future playback\n\ |
f397e303 AC |
738 | by gdbserver."), |
739 | NULL, | |
740 | NULL, /* FIXME: i18n: */ | |
741 | &setlist, &showlist); | |
c906108c | 742 | |
7ab04401 AC |
743 | add_setshow_enum_cmd ("remotelogbase", no_class, logbase_enums, |
744 | &serial_logbase, _("\ | |
745 | Set numerical base for remote session logging"), _("\ | |
746 | Show numerical base for remote session logging"), NULL, | |
747 | NULL, | |
748 | NULL, /* FIXME: i18n: */ | |
749 | &setlist, &showlist); | |
2acceee2 | 750 | |
85c07804 AC |
751 | add_setshow_zinteger_cmd ("serial", class_maintenance, |
752 | &global_serial_debug_p, _("\ | |
753 | Set serial debugging."), _("\ | |
754 | Show serial debugging."), _("\ | |
755 | When non-zero, serial port debugging is enabled."), | |
756 | NULL, | |
757 | NULL, /* FIXME: i18n: */ | |
758 | &setdebuglist, &showdebuglist); | |
c906108c | 759 | } |