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