1 /* Generic support for remote debugging interfaces.
3 Copyright 1993, 1994, 1998 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., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
22 /* This file actually contains two distinct logical "packages". They
23 are packaged together in this one file because they are typically
26 The first package is an addition to the serial package. The
27 addition provides reading and writing with debugging output and
28 timeouts based on user settable variables. These routines are
29 intended to support serial port based remote backends. These
30 functions are prefixed with sr_.
32 The second package is a collection of more or less generic
33 functions for use by remote backends. They support user settable
34 variables for debugging, retries, and the like.
38 * a pass through mode a la kermit or telnet.
40 * ask remote to change his baud rate.
46 #include "gdb_string.h"
50 #include "gdbcore.h" /* for exec_bfd */
51 #include "inferior.h" /* for generic_mourn_inferior */
52 #include "remote-utils.h"
55 void _initialize_sr_support (void);
57 struct _sr_settings sr_settings
=
61 remote-bug.c had "with a timeout of 2, we time out waiting for
62 the prompt after an s-record dump."
64 remote.c had (2): This was 5 seconds, which is a long time to
65 sit and wait. Unless this is going though some terminal server
66 or multiplexer or other form of hairy serial connection, I
67 would think 2 seconds would be plenty.
72 NULL
, /* descriptor */
75 struct gr_settings
*gr_settings
= NULL
;
77 static void usage (char *, char *);
78 static void sr_com (char *, int);
81 usage (char *proto
, char *junk
)
84 fprintf_unfiltered (gdb_stderr
, "Unrecognized arguments: `%s'.\n", junk
);
86 error ("Usage: target %s [DEVICE [SPEED [DEBUG]]]\n\
87 where DEVICE is the name of a device or HOST:PORT", proto
, proto
);
92 #define CHECKDONE(p, q) \
104 sr_scan_args (char *proto
, char *args
)
109 /* if no args, then nothing to do. */
110 if (args
== NULL
|| *args
== '\0')
113 /* scan off white space. */
114 for (p
= args
; isspace (*p
); ++p
);;
116 /* find end of device name. */
117 for (q
= p
; *q
!= '\0' && !isspace (*q
); ++q
);;
119 /* check for missing or empty device name. */
121 sr_set_device (savestring (p
, q
- p
));
123 /* look for baud rate. */
124 n
= strtol (q
, &p
, 10);
126 /* check for missing or empty baud rate. */
130 /* look for debug value. */
131 n
= strtol (p
, &q
, 10);
133 /* check for missing or empty debug value. */
137 /* scan off remaining white space. */
138 for (p
= q
; isspace (*p
); ++p
);;
140 /* if not end of string, then there's unrecognized junk. */
148 gr_generic_checkin (void)
155 gr_open (char *args
, int from_tty
, struct gr_settings
*gr
)
159 target_preopen (from_tty
);
160 sr_scan_args (gr
->ops
->to_shortname
, args
);
161 unpush_target (gr
->ops
);
165 if ((dcache
= gr_get_dcache()) == NULL
)
166 gr_set_dcache (dcache_init (gr
->readfunc
, gr
->writefunc
));
168 dcache_invd (dcache
);
170 if (sr_get_desc () != NULL
)
173 /* If no args are specified, then we use the device specified by a
174 previous command or "set remotedevice". But if there is no
175 device, better stop now, not dump core. */
177 if (sr_get_device () == NULL
)
178 usage (gr
->ops
->to_shortname
, NULL
);
180 sr_set_desc (SERIAL_OPEN (sr_get_device ()));
182 perror_with_name ((char *) sr_get_device ());
186 if (SERIAL_SETBAUDRATE (sr_get_desc (), baud_rate
) != 0)
188 SERIAL_CLOSE (sr_get_desc ());
189 perror_with_name (sr_get_device ());
193 SERIAL_RAW (sr_get_desc ());
195 /* If there is something sitting in the buffer we might take it as a
196 response to a command, which would be bad. */
197 SERIAL_FLUSH_INPUT (sr_get_desc ());
199 /* default retries */
200 if (sr_get_retries () == 0)
203 /* default clear breakpoint function */
204 if (gr_settings
->clear_all_breakpoints
== NULL
)
205 gr_settings
->clear_all_breakpoints
= remove_breakpoints
;
209 printf_filtered ("Remote debugging using `%s'", sr_get_device ());
211 printf_filtered (" at baud rate of %d",
213 printf_filtered ("\n");
216 push_target (gr
->ops
);
218 gr_clear_all_breakpoints ();
222 /* Read a character from the remote system masking it down to 7 bits
223 and doing all the fancy timeout stuff. */
230 buf
= SERIAL_READCHAR (sr_get_desc (), sr_get_timeout ());
232 if (buf
== SERIAL_TIMEOUT
)
233 error ("Timeout reading from remote system.");
235 if (sr_get_debug () > 0)
236 printf_unfiltered ("%c", buf
);
246 buf
= SERIAL_READCHAR (sr_get_desc (), 0);
247 if (buf
== SERIAL_TIMEOUT
)
249 if (sr_get_debug () > 0)
252 printf_unfiltered ("%c", buf
);
254 printf_unfiltered ("<empty character poll>");
260 /* Keep discarding input from the remote system, until STRING is found.
261 Let the user break out immediately. */
263 sr_expect (char *string
)
270 if (sr_readchar () == *p
)
285 sr_write (char *a
, int l
)
289 if (SERIAL_WRITE (sr_get_desc (), a
, l
) != 0)
290 perror_with_name ("sr_write: Error writing to remote");
292 if (sr_get_debug () > 0)
293 for (i
= 0; i
< l
; i
++)
294 printf_unfiltered ("%c", a
[i
]);
300 sr_write_cr (char *s
)
302 sr_write (s
, strlen (s
));
308 sr_timed_read (char *buf
, int n
)
327 /* Get a hex digit from the remote system & return its value. If
328 ignore_space is nonzero, ignore spaces (not newline, tab, etc). */
331 sr_get_hex_digit (int ignore_space
)
338 if (ch
>= '0' && ch
<= '9')
340 else if (ch
>= 'A' && ch
<= 'F')
341 return ch
- 'A' + 10;
342 else if (ch
>= 'a' && ch
<= 'f')
343 return ch
- 'a' + 10;
344 else if (ch
!= ' ' || !ignore_space
)
347 error ("Invalid hex digit from remote system.");
352 /* Get a byte from the remote and put it in *BYT. Accept any number
355 sr_get_hex_byte (char *byt
)
359 val
= sr_get_hex_digit (1) << 4;
360 val
|= sr_get_hex_digit (0);
364 /* Read a 32-bit hex word from the remote, preceded by a space */
366 sr_get_hex_word (void)
372 for (j
= 0; j
< 8; j
++)
373 val
= (val
<< 4) + sr_get_hex_digit (j
== 0);
377 /* Put a command string, in args, out to the remote. The remote is assumed to
378 be in raw mode, all writing/reading done through desc.
379 Ouput from the remote is placed on the users terminal until the
380 prompt from the remote is seen.
381 FIXME: Can't handle commands that take input. */
384 sr_com (char *args
, int fromtty
)
391 /* Clear all input so only command relative output is displayed */
394 sr_write ("\030", 1);
395 registers_changed ();
400 gr_close (int quitting
)
402 gr_clear_all_breakpoints ();
406 SERIAL_CLOSE (sr_get_desc ());
414 takes a program previously attached to and detaches it.
415 We better not have left any breakpoints
416 in the program or it'll die when it hits one.
417 Close the open connection to the remote debugger.
418 Use this when you want to detach and do something else
422 gr_detach (char *args
, int from_tty
)
425 error ("Argument given to \"detach\" when remotely debugging.");
428 gr_clear_all_breakpoints ();
432 puts_filtered ("Ending remote debugging.\n");
438 gr_files_info (struct target_ops
*ops
)
441 printf_filtered ("\tAttached to DOS asynctsr\n");
443 printf_filtered ("\tAttached to %s", sr_get_device ());
445 printf_filtered ("at %d baud", baud_rate
);
446 printf_filtered ("\n");
451 printf_filtered ("\tand running program %s\n",
452 bfd_get_filename (exec_bfd
));
454 printf_filtered ("\tusing the %s protocol.\n", ops
->to_shortname
);
460 gr_clear_all_breakpoints ();
461 unpush_target (gr_get_ops ());
462 generic_mourn_inferior ();
471 /* This is called not only when we first attach, but also when the
472 user types "run" after having attached. */
474 gr_create_inferior (char *execfile
, char *args
, char **env
)
479 error ("Can't pass arguments to remote process.");
481 if (execfile
== 0 || exec_bfd
== 0)
482 error ("No executable 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 (char *list
[], int passthrough
)
507 char *swallowed
= NULL
; /* holding area */
508 char *swallowed_p
= swallowed
; /* Current position in swallowed. */
516 /* Look through the strings. Count them. Find the largest one so we can
517 allocate a holding area. */
519 for (max_length
= string_count
= i
= 0;
523 int length
= strlen (list
[i
]);
525 if (length
> max_length
)
529 /* if we have no strings, then something is wrong. */
530 if (string_count
== 0)
533 /* otherwise, we will need a holding area big enough to hold almost two
534 copies of our largest string. */
535 swallowed_p
= swallowed
= alloca (max_length
<< 1);
537 /* and a list of pointers to current scan points. */
538 plist
= (char **) alloca (string_count
* sizeof (*plist
));
541 for (i
= 0; i
< string_count
; ++i
)
544 for (ch
= sr_readchar (); /* loop forever */ ; ch
= sr_readchar ())
546 QUIT
; /* Let user quit and leave process running */
549 for (i
= 0; i
< string_count
; ++i
)
551 if (ch
== *plist
[i
] || *plist
[i
] == '?')
554 if (*plist
[i
] == '\0')
570 /* Print out any characters which have been swallowed. */
573 for (p
= swallowed
; p
< swallowed_p
; ++p
)
574 fputc_unfiltered (*p
, gdb_stdout
);
576 fputc_unfiltered (ch
, gdb_stdout
);
579 swallowed_p
= swallowed
;
588 /* Get ready to modify the registers array. On machines which store
589 individual registers, this doesn't need to do anything. On machines
590 which store all the registers in one fell swoop, this makes sure
591 that registers contains all the registers from the program being
595 gr_prepare_to_store (void)
597 /* Do nothing, since we assume we can store individual regs */
601 _initialize_sr_support (void)
603 /* FIXME-now: if target is open... */
604 add_show_from_set (add_set_cmd ("remotedevice", no_class
,
605 var_filename
, (char *) &sr_settings
.device
,
606 "Set device for remote serial I/O.\n\
607 This device is used as the serial port when debugging using remote\n\
608 targets.", &setlist
),
611 add_com ("remote <command>", class_obscure
, sr_com
,
612 "Send a command to the remote monitor.");
This page took 0.043577 seconds and 4 git commands to generate.