f4f25e4c490cc8d3851f50c7b0bd34d94b29f77c
1 /* Generic support for remote debugging interfaces.
3 Copyright 1993 Free Software Foundation, Inc.
5 This file is part of GDB.
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 2 of the License, or
10 (at your option) any later version.
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.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
21 /* This file actually contains two distinct logical "packages". They
22 are packaged together in this one file because they are typically
25 The first package is an addition to the serial package. The
26 addition provides reading and writing with debugging output and
27 timeouts based on user settable variables. These routines are
28 intended to support serial port based remote backends. These
29 functions are prefixed with sr_.
31 The second package is a collection of more or less generic
32 functions for use by remote backends. They support user settable
33 variables for debugging, retries, and the like.
37 * a pass through mode a la kermit or telnet.
39 * ask remote to change his baud rate.
40 * put generic load here.
50 #include "gdbcore.h" /* for exec_bfd */
51 #include "inferior.h" /* for generic_mourn_inferior */
52 #include "remote-utils.h"
54 struct _sr_settings sr_settings
= {
57 remote-bug.c had "with a timeout of 2, we time out waiting for
58 the prompt after an s-record dump."
60 remote.c had (2): This was 5 seconds, which is a long time to
61 sit and wait. Unless this is going though some terminal server
62 or multiplexer or other form of hairy serial connection, I
63 would think 2 seconds would be plenty.
68 NULL
, /* descriptor */
71 struct gr_settings
*gr_settings
= NULL
;
79 fprintf(stderr
, "Unrecognized arguments: `%s'.\n", junk
);
81 /* FIXME-now: service@host? */
83 error("Usage: target %s <device <speed <debug>>>\n\
84 or target %s <host> <port>\n", proto
, proto
);
89 #define CHECKDONE(p, q) \
101 sr_scan_args(proto
, args
)
110 /* if no args, then nothing to do. */
111 if (args
== NULL
|| *args
== '\0')
114 /* scan off white space. */
115 for (p
= args
; isspace(*p
); ++p
) ;;
117 /* find end of device name. */
118 for (q
= p
; *q
!= '\0' && !isspace(*q
); ++q
) ;;
120 /* check for missing or empty device name. */
122 sr_set_device(savestring(p
, q
- p
));
124 /* look for baud rate. */
125 n
= strtol(q
, &p
, 10);
127 /* check for missing or empty baud rate. */
131 /* look for debug value. */
132 n
= strtol(p
, &q
, 10);
134 /* check for missing or empty debug value. */
138 /* scan off remaining white space. */
139 for (p
= q
; isspace(*p
); ++p
) ;;
141 /* if not end of string, then there's unrecognized junk. */
156 gr_open(args
, from_tty
, gr
)
159 struct gr_settings
*gr
;
161 target_preopen(from_tty
);
162 sr_scan_args(gr
->ops
->to_shortname
, args
);
163 unpush_target(gr
->ops
);
167 gr_set_dcache(dcache_init(gr
->readfunc
, gr
->writefunc
));
169 if (sr_get_desc() != NULL
)
172 sr_set_desc(SERIAL_OPEN (sr_get_device()));
174 perror_with_name((char *) sr_get_device());
176 if (SERIAL_SETBAUDRATE(sr_get_desc(), sr_get_baud_rate()) != 0)
178 SERIAL_CLOSE(sr_get_desc());
179 perror_with_name(sr_get_device());
182 SERIAL_RAW (sr_get_desc());
184 /* If there is something sitting in the buffer we might take it as a
185 response to a command, which would be bad. */
186 SERIAL_FLUSH_INPUT (sr_get_desc ());
188 /* default retries */
189 if (sr_get_retries() == 0)
192 /* default clear breakpoint function */
193 if (gr_settings
->clear_all_breakpoints
== NULL
)
194 gr_settings
->clear_all_breakpoints
= remove_breakpoints
;
197 printf_filtered ("Remote debugging using `%s' at baud rate of %d\n",
198 sr_get_device(), sr_get_baud_rate());
200 push_target(gr
->ops
);
202 gr_clear_all_breakpoints ();
206 /* Read a character from the remote system masking it down to 7 bits
207 and doing all the fancy timeout stuff. */
214 buf
= SERIAL_READCHAR (sr_get_desc(), sr_get_timeout());
216 if (buf
== SERIAL_TIMEOUT
)
217 error ("Timeout reading from remote system.");
219 if (sr_get_debug() > 0)
230 buf
= SERIAL_READCHAR (sr_get_desc(), 0);
231 if (buf
== SERIAL_TIMEOUT
)
233 if (sr_get_debug() > 0)
237 printf ("<empty character poll>");
242 /* Keep discarding input from the remote system, until STRING is found.
243 Let the user break out immediately. */
253 if (sr_readchar () == *p
)
274 if (SERIAL_WRITE (sr_get_desc(), a
, l
) != 0)
275 perror_with_name ("sr_write: Error writing to remote");
277 if (sr_get_debug() > 0)
278 for (i
= 0; i
< l
; i
++)
288 sr_write (s
, strlen (s
));
294 sr_timed_read (buf
, n
)
315 /* Get a hex digit from the remote system & return its value. If
316 ignore_space is nonzero, ignore spaces (not newline, tab, etc). */
319 sr_get_hex_digit (ignore_space
)
327 if (ch
>= '0' && ch
<= '9')
329 else if (ch
>= 'A' && ch
<= 'F')
330 return ch
- 'A' + 10;
331 else if (ch
>= 'a' && ch
<= 'f')
332 return ch
- 'a' + 10;
333 else if (ch
!= ' ' || !ignore_space
)
336 error ("Invalid hex digit from remote system.");
341 /* Get a byte from the remote and put it in *BYT. Accept any number
344 sr_get_hex_byte (byt
)
349 val
= sr_get_hex_digit (1) << 4;
350 val
|= sr_get_hex_digit (0);
354 /* Read a 32-bit hex word from the remote, preceded by a space */
362 for (j
= 0; j
< 8; j
++)
363 val
= (val
<< 4) + sr_get_hex_digit (j
== 0);
367 /* Put a command string, in args, out to the remote. The remote is assumed to
368 be in raw mode, all writing/reading done through desc.
369 Ouput from the remote is placed on the users terminal until the
370 prompt from the remote is seen.
371 FIXME: Can't handle commands that take input. */
374 sr_com (args
, fromtty
)
383 /* Clear all input so only command relative output is displayed */
386 sr_write ("\030", 1);
394 gr_clear_all_breakpoints();
398 SERIAL_CLOSE (sr_get_desc());
406 takes a program previously attached to and detaches it.
407 We better not have left any breakpoints
408 in the program or it'll die when it hits one.
409 Close the open connection to the remote debugger.
410 Use this when you want to detach and do something else
414 gr_detach(args
, from_tty
)
419 error ("Argument given to \"detach\" when remotely debugging.");
422 gr_clear_all_breakpoints ();
426 puts_filtered ("Ending remote debugging.\n");
433 struct target_ops
*ops
;
435 char *file
= "nothing";
438 file
= bfd_get_filename (exec_bfd
);
443 printf_filtered ("\tAttached to DOS asynctsr\n");
445 printf_filtered ("\tAttached to %s at %d baud\n",
446 sr_get_device(), sr_get_baud_rate());
450 printf_filtered ("\tand running program %s\n", file
);
451 printf_filtered ("\tusing the %s protocol.\n", ops
->to_shortname
);
457 gr_clear_all_breakpoints ();
458 unpush_target (gr_get_ops());
459 generic_mourn_inferior ();
468 /* This is called not only when we first attach, but also when the
469 user types "run" after having attached. */
471 gr_create_inferior (execfile
, args
, env
)
479 error ("Can't pass arguments to remote process.");
481 if (execfile
== 0 || exec_bfd
== 0)
482 error ("No exec file specified");
484 entry_pt
= (int) bfd_get_start_address (exec_bfd
);
488 gr_clear_all_breakpoints ();
490 init_wait_for_inferior ();
493 insert_breakpoints (); /* Needed to get correct instruction in cache */
494 proceed (entry_pt
, -1, 0);
497 /* Given a null terminated list of strings LIST, read the input until we find one of
498 them. Return the index of the string found or -1 on error. '?' means match
499 any single character. Note that with the algorithm we use, the initial
500 character of the string cannot recur in the string, or we will not find some
501 cases of the string in the input. If PASSTHROUGH is non-zero, then
502 pass non-matching data on. */
505 gr_multi_scan (list
, passthrough
)
509 char *swallowed
= NULL
; /* holding area */
510 char *swallowed_p
= swallowed
; /* Current position in swallowed. */
518 /* Look through the strings. Count them. Find the largest one so we can
519 allocate a holding area. */
521 for (max_length
= string_count
= i
= 0;
525 int length
= strlen(list
[i
]);
527 if (length
> max_length
)
531 /* if we have no strings, then something is wrong. */
532 if (string_count
== 0)
535 /* otherwise, we will need a holding area big enough to hold almost two
536 copies of our largest string. */
537 swallowed_p
= swallowed
= alloca(max_length
<< 1);
539 /* and a list of pointers to current scan points. */
540 plist
= (char **) alloca (string_count
* sizeof(*plist
));
543 for (i
= 0; i
< string_count
; ++i
)
546 for (ch
= sr_readchar(); /* loop forever */ ; ch
= sr_readchar())
548 QUIT
; /* Let user quit and leave process running */
551 for (i
= 0; i
< string_count
; ++i
)
553 if (ch
== *plist
[i
] || *plist
[i
] == '?')
556 if (*plist
[i
] == '\0')
572 /* Print out any characters which have been swallowed. */
575 for (p
= swallowed
; p
< swallowed_p
; ++p
)
581 swallowed_p
= swallowed
;
590 /* Get ready to modify the registers array. On machines which store
591 individual registers, this doesn't need to do anything. On machines
592 which store all the registers in one fell swoop, this makes sure
593 that registers contains all the registers from the program being
597 gr_prepare_to_store ()
599 /* Do nothing, since we assume we can store individual regs */
602 /* Read a word from remote address ADDR and return it.
603 * This goes through the data cache.
609 return dcache_fetch (gr_get_dcache(), addr
);
612 /* Write a word WORD into remote address ADDR.
613 This goes through the data cache. */
616 gr_store_word (addr
, word
)
620 dcache_poke (gr_get_dcache(), addr
, word
);
624 _initialize_sr_support ()
626 /* FIXME-now: if target is open when baud changes... */
627 add_show_from_set (add_set_cmd ("remotebaud", no_class
,
628 var_zinteger
, (char *)&baud_rate
,
629 "Set baud rate for remote serial I/O.\n\
630 This value is used to set the speed of the serial port when debugging\n\
631 using remote targets.", &setlist
),
634 /* FIXME-now: if target is open... */
635 add_show_from_set (add_set_cmd ("remotedevice", no_class
,
636 var_filename
, (char *)&sr_settings
.device
,
637 "Set device for remote serial I/O.\n\
638 This device is used as the serial port when debugging using remote\n\
639 targets.", &setlist
),
642 add_com ("remote <command>", class_obscure
, sr_com
,
643 "Send a command to the remote monitor.");
This page took 0.041628 seconds and 4 git commands to generate.