X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gdb%2Finflow.c;h=323e79f0221c5fb74fc574d1ffb9451264861adf;hb=a7b7bc0d0e309d4adc19e5508c4dd545fd99226e;hp=19da9960f2cfaa8fc906516adec680fac5b28dbb;hpb=e91b87a36830d061ef87d67be5f309e4d4ed918f;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/inflow.c b/gdb/inflow.c index 19da9960f2..323e79f022 100644 --- a/gdb/inflow.c +++ b/gdb/inflow.c @@ -1,168 +1,285 @@ /* Low level interface to ptrace, for GDB when running under Unix. - Copyright (C) 1986, 1987 Free Software Foundation, Inc. - -GDB is distributed in the hope that it will be useful, but WITHOUT ANY -WARRANTY. No author or distributor accepts responsibility to anyone -for the consequences of using it or for whether it serves any -particular purpose or works at all, unless he says so in writing. -Refer to the GDB General Public License for full details. - -Everyone is granted permission to copy, modify and redistribute GDB, -but only under the conditions described in the GDB General Public -License. A copy of this license is supposed to have been given to you -along with GDB so you can know your rights and responsibilities. It -should be in a file named COPYING. Among other things, the copyright -notice and this notice must be preserved on all copies. - -In other words, go ahead and share GDB, but don't try to stop -anyone else from sharing it farther. Help stamp out software hoarding! -*/ + Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, + 1996, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 + 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 2 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, write to the Free Software + Foundation, Inc., 51 Franklin Street, Fifth Floor, + Boston, MA 02110-1301, USA. */ + #include "defs.h" -#include "param.h" #include "frame.h" #include "inferior.h" +#include "command.h" +#include "serial.h" +#include "terminal.h" +#include "target.h" +#include "gdbthread.h" -#ifdef USG -#include +#include "gdb_string.h" +#include #include -#endif +#include "gdb_select.h" -#include -#include -#include -#include +#include "inflow.h" -#ifdef HAVE_TERMIO -#include -#undef TIOCGETP -#define TIOCGETP TCGETA -#undef TIOCSETN -#define TIOCSETN TCSETA -#undef TIOCSETP -#define TIOCSETP TCSETAF -#define TERMINAL struct termio -#else +#ifdef HAVE_SYS_IOCTL_H #include -#include -#include -#define TERMINAL struct sgttyb #endif -#ifdef SET_STACK_LIMIT_HUGE -#include -#include -extern int original_stack_limit; -#endif /* SET_STACK_LIMIT_HUGE */ +#ifndef O_NOCTTY +#define O_NOCTTY 0 +#endif + +#if defined (SIGIO) && defined (FASYNC) && defined (FD_SET) && defined (F_SETOWN) +static void handle_sigio (int); +#endif -extern int errno; +extern void _initialize_inflow (void); -/* Nonzero if we are debugging an attached outside process - rather than an inferior. */ +static void pass_signal (int); -int attach_flag; +static void kill_command (char *, int); +static void terminal_ours_1 (int); /* Record terminal status separately for debugger and inferior. */ -static TERMINAL sg_inferior; -static TERMINAL sg_ours; +static struct serial *stdin_serial; +/* TTY state for the inferior. We save it whenever the inferior stops, and + restore it when it resumes. */ +static serial_ttystate inferior_ttystate; + +/* Our own tty state, which we restore every time we need to deal with the + terminal. We only set it once, when GDB first starts. The settings of + flags which readline saves and restores and unimportant. */ +static serial_ttystate our_ttystate; + +/* fcntl flags for us and the inferior. Saved and restored just like + {our,inferior}_ttystate. */ static int tflags_inferior; static int tflags_ours; -#ifdef TIOCGETC -static struct tchars tc_inferior; -static struct tchars tc_ours; +#ifdef PROCESS_GROUP_TYPE +/* Process group for us and the inferior. Saved and restored just like + {our,inferior}_ttystate. */ +PROCESS_GROUP_TYPE our_process_group; +PROCESS_GROUP_TYPE inferior_process_group; #endif -#ifdef TIOCGLTC -static struct ltchars ltc_inferior; -static struct ltchars ltc_ours; -#endif /* TIOCGLTC */ +/* While the inferior is running, we want SIGINT and SIGQUIT to go to the + inferior only. If we have job control, that takes care of it. If not, + we save our handlers in these two variables and set SIGINT and SIGQUIT + to SIG_IGN. */ + +static void (*sigint_ours) (); +static void (*sigquit_ours) (); + +/* The name of the tty (from the `tty' command) that we gave to the inferior + when it was last started. */ + +static const char *inferior_thisrun_terminal; + +/* Nonzero if our terminal settings are in effect. Zero if the + inferior's settings are in effect. Ignored if !gdb_has_a_terminal + (). */ + +int terminal_is_ours; -#ifdef TIOCLGET -static int lmode_inferior; -static int lmode_ours; +enum + { + yes, no, have_not_checked + } +gdb_has_a_terminal_flag = have_not_checked; + +/* Does GDB have a terminal (on stdin)? */ +int +gdb_has_a_terminal (void) +{ + switch (gdb_has_a_terminal_flag) + { + case yes: + return 1; + case no: + return 0; + case have_not_checked: + /* Get all the current tty settings (including whether we have a + tty at all!). Can't do this in _initialize_inflow because + serial_fdopen() won't work until the serial_ops_list is + initialized. */ + +#ifdef F_GETFL + tflags_ours = fcntl (0, F_GETFL, 0); #endif -#ifdef TIOCGPGRP -static int pgrp_inferior; -static int pgrp_ours; -#else -static int (*sigint_ours) (); -static int (*sigquit_ours) (); -#endif /* TIOCGPGRP */ + gdb_has_a_terminal_flag = no; + if (stdin_serial != NULL) + { + our_ttystate = serial_get_tty_state (stdin_serial); + + if (our_ttystate != NULL) + { + gdb_has_a_terminal_flag = yes; +#ifdef HAVE_TERMIOS + our_process_group = tcgetpgrp (0); +#endif +#ifdef HAVE_TERMIO + our_process_group = getpgrp (); +#endif +#ifdef HAVE_SGTTY + ioctl (0, TIOCGPGRP, &our_process_group); +#endif + } + } + + return gdb_has_a_terminal_flag == yes; + default: + /* "Can't happen". */ + return 0; + } +} -/* Copy of inferior_io_terminal when inferior was last started. */ -static char *inferior_thisrun_terminal; +/* Macro for printing errors from ioctl operations */ -static void terminal_ours_1 (); +#define OOPSY(what) \ + if (result == -1) \ + fprintf_unfiltered(gdb_stderr, "[%s failed in terminal_inferior: %s]\n", \ + what, safe_strerror (errno)) -/* Nonzero if our terminal settings are in effect. - Zero if the inferior's settings are in effect. */ -static int terminal_is_ours; +static void terminal_ours_1 (int); /* Initialize the terminal settings we record for the inferior, before we actually run the inferior. */ void -terminal_init_inferior () +terminal_init_inferior_with_pgrp (int pgrp) { - if (remote_debugging) - return; - - sg_inferior = sg_ours; - tflags_inferior = tflags_ours; - -#ifdef TIOCGETC - tc_inferior = tc_ours; + if (gdb_has_a_terminal ()) + { + /* We could just as well copy our_ttystate (if we felt like + adding a new function serial_copy_tty_state()). */ + if (inferior_ttystate) + xfree (inferior_ttystate); + inferior_ttystate = serial_get_tty_state (stdin_serial); + +#ifdef PROCESS_GROUP_TYPE + inferior_process_group = pgrp; #endif -#ifdef TIOCGLTC - ltc_inferior = ltc_ours; -#endif + /* Make sure that next time we call terminal_inferior (which will be + before the program runs, as it needs to be), we install the new + process group. */ + terminal_is_ours = 1; + } +} -#ifdef TIOCLGET - lmode_inferior = lmode_ours; -#endif +/* Save the terminal settings again. This is necessary for the TUI + when it switches to TUI or non-TUI mode; curses changes the terminal + and gdb must be able to restore it correctly. */ -#ifdef TIOCGPGRP - pgrp_inferior = inferior_pid; -#endif /* TIOCGPGRP */ +void +terminal_save_ours (void) +{ + if (gdb_has_a_terminal ()) + { + /* We could just as well copy our_ttystate (if we felt like adding + a new function serial_copy_tty_state). */ + if (our_ttystate) + xfree (our_ttystate); + our_ttystate = serial_get_tty_state (stdin_serial); + } +} - terminal_is_ours = 1; +void +terminal_init_inferior (void) +{ +#ifdef PROCESS_GROUP_TYPE + /* This is for Lynx, and should be cleaned up by having Lynx be a separate + debugging target with a version of target_terminal_init_inferior which + passes in the process group to a generic routine which does all the work + (and the non-threaded child_terminal_init_inferior can just pass in + inferior_ptid to the same routine). */ + /* We assume INFERIOR_PID is also the child's process group. */ + terminal_init_inferior_with_pgrp (PIDGET (inferior_ptid)); +#endif /* PROCESS_GROUP_TYPE */ } /* Put the inferior's terminal settings into effect. This is preparation for starting or resuming the inferior. */ void -terminal_inferior () +terminal_inferior (void) { - if (remote_debugging) - return; - - if (terminal_is_ours) /* && inferior_thisrun_terminal == 0) */ + if (gdb_has_a_terminal () && terminal_is_ours + && inferior_ttystate != NULL + && inferior_thisrun_terminal == 0) { - fcntl (0, F_SETFL, tflags_inferior); - fcntl (0, F_SETFL, tflags_inferior); - ioctl (0, TIOCSETN, &sg_inferior); -#ifdef TIOCGETC - ioctl (0, TIOCSETC, &tc_inferior); + int result; + +#ifdef F_GETFL + /* Is there a reason this is being done twice? It happens both + places we use F_SETFL, so I'm inclined to think perhaps there + is some reason, however perverse. Perhaps not though... */ + result = fcntl (0, F_SETFL, tflags_inferior); + result = fcntl (0, F_SETFL, tflags_inferior); + OOPSY ("fcntl F_SETFL"); #endif -#ifdef TIOCGLTC - ioctl (0, TIOCSLTC, <c_inferior); + + /* Because we were careful to not change in or out of raw mode in + terminal_ours, we will not change in our out of raw mode with + this call, so we don't flush any input. */ + result = serial_set_tty_state (stdin_serial, inferior_ttystate); + OOPSY ("setting tty state"); + + if (!job_control) + { + sigint_ours = (void (*)()) signal (SIGINT, SIG_IGN); +#ifdef SIGQUIT + sigquit_ours = (void (*)()) signal (SIGQUIT, SIG_IGN); #endif -#ifdef TIOCLGET - ioctl (0, TIOCLSET, &lmode_inferior); + } + + /* If attach_flag is set, we don't know whether we are sharing a + terminal with the inferior or not. (attaching a process + without a terminal is one case where we do not; attaching a + process which we ran from the same shell as GDB via `&' is + one case where we do, I think (but perhaps this is not + `sharing' in the sense that we need to save and restore tty + state)). I don't know if there is any way to tell whether we + are sharing a terminal. So what we do is to go through all + the saving and restoring of the tty state, but ignore errors + setting the process group, which will happen if we are not + sharing a terminal). */ + + if (job_control) + { +#ifdef HAVE_TERMIOS + result = tcsetpgrp (0, inferior_process_group); + if (!attach_flag) + OOPSY ("tcsetpgrp"); #endif -#ifdef TIOCGPGRP - ioctl (0, TIOCSPGRP, &pgrp_inferior); -#else - sigint_ours = (int (*) ()) signal (SIGINT, SIG_IGN); - sigquit_ours = (int (*) ()) signal (SIGQUIT, SIG_IGN); -#endif /* TIOCGPGRP */ +#ifdef HAVE_SGTTY + result = ioctl (0, TIOCSPGRP, &inferior_process_group); + if (!attach_flag) + OOPSY ("TIOCSPGRP"); +#endif + } + } terminal_is_ours = 0; } @@ -176,11 +293,8 @@ terminal_inferior () should be called to get back to a normal state of affairs. */ void -terminal_ours_for_output () +terminal_ours_for_output (void) { - if (remote_debugging) - return; - terminal_ours_1 (1); } @@ -189,325 +303,474 @@ terminal_ours_for_output () so they can be restored properly later. */ void -terminal_ours () +terminal_ours (void) { - if (remote_debugging) - return; - terminal_ours_1 (0); } +/* output_only is not used, and should not be used unless we introduce + separate terminal_is_ours and terminal_is_ours_for_output + flags. */ + static void -terminal_ours_1 (output_only) - int output_only; +terminal_ours_1 (int output_only) { -#ifdef TIOCGPGRP - /* Ignore this signal since it will happen when we try to set the pgrp. */ - int (*osigttou) (); -#endif /* TIOCGPGRP */ + /* Checking inferior_thisrun_terminal is necessary so that + if GDB is running in the background, it won't block trying + to do the ioctl()'s below. Checking gdb_has_a_terminal + avoids attempting all the ioctl's when running in batch. */ + if (inferior_thisrun_terminal != 0 || gdb_has_a_terminal () == 0) + return; - if (!terminal_is_ours) /* && inferior_thisrun_terminal == 0) */ + if (!terminal_is_ours) { - terminal_is_ours = 1; - -#ifdef TIOCGPGRP - osigttou = signal (SIGTTOU, SIG_IGN); - - ioctl (0, TIOCGPGRP, &pgrp_inferior); - ioctl (0, TIOCSPGRP, &pgrp_ours); +#ifdef SIGTTOU + /* Ignore this signal since it will happen when we try to set the + pgrp. */ + void (*osigttou) () = NULL; +#endif + int result; - signal (SIGTTOU, osigttou); -#else - signal (SIGINT, sigint_ours); - signal (SIGQUIT, sigquit_ours); -#endif /* TIOCGPGRP */ + terminal_is_ours = 1; - tflags_inferior = fcntl (0, F_GETFL, 0); - ioctl (0, TIOCGETP, &sg_inferior); +#ifdef SIGTTOU + if (job_control) + osigttou = (void (*)()) signal (SIGTTOU, SIG_IGN); +#endif -#ifdef TIOCGETC - ioctl (0, TIOCGETC, &tc_inferior); + if (inferior_ttystate) + xfree (inferior_ttystate); + inferior_ttystate = serial_get_tty_state (stdin_serial); +#ifdef HAVE_TERMIOS + inferior_process_group = tcgetpgrp (0); #endif -#ifdef TIOCGLTC - ioctl (0, TIOCGLTC, <c_inferior); +#ifdef HAVE_TERMIO + inferior_process_group = getpgrp (); #endif -#ifdef TIOCLGET - ioctl (0, TIOCLGET, &lmode_inferior); +#ifdef HAVE_SGTTY + ioctl (0, TIOCGPGRP, &inferior_process_group); #endif - } -#ifdef HAVE_TERMIO - sg_ours.c_lflag |= ICANON; - if (output_only && !(sg_inferior.c_lflag & ICANON)) - sg_ours.c_lflag &= ~ICANON; -#else /* not HAVE_TERMIO */ - sg_ours.sg_flags &= ~RAW & ~CBREAK; - if (output_only) - sg_ours.sg_flags |= (RAW | CBREAK) & sg_inferior.sg_flags; -#endif /* not HAVE_TERMIO */ + /* Here we used to set ICANON in our ttystate, but I believe this + was an artifact from before when we used readline. Readline sets + the tty state when it needs to. + FIXME-maybe: However, query() expects non-raw mode and doesn't + use readline. Maybe query should use readline (on the other hand, + this only matters for HAVE_SGTTY, not termio or termios, I think). */ + + /* Set tty state to our_ttystate. We don't change in our out of raw + mode, to avoid flushing input. We need to do the same thing + regardless of output_only, because we don't have separate + terminal_is_ours and terminal_is_ours_for_output flags. It's OK, + though, since readline will deal with raw mode when/if it needs to. + */ - fcntl (0, F_SETFL, tflags_ours); - fcntl (0, F_SETFL, tflags_ours); - ioctl (0, TIOCSETN, &sg_ours); + serial_noflush_set_tty_state (stdin_serial, our_ttystate, + inferior_ttystate); -#ifdef TIOCGETC - ioctl (0, TIOCSETC, &tc_ours); + if (job_control) + { +#ifdef HAVE_TERMIOS + result = tcsetpgrp (0, our_process_group); +#if 0 + /* This fails on Ultrix with EINVAL if you run the testsuite + in the background with nohup, and then log out. GDB never + used to check for an error here, so perhaps there are other + such situations as well. */ + if (result == -1) + fprintf_unfiltered (gdb_stderr, "[tcsetpgrp failed in terminal_ours: %s]\n", + safe_strerror (errno)); #endif -#ifdef TIOCGLTC - ioctl (0, TIOCSLTC, <c_ours); +#endif /* termios */ + +#ifdef HAVE_SGTTY + result = ioctl (0, TIOCSPGRP, &our_process_group); #endif -#ifdef TIOCLGET - ioctl (0, TIOCLSET, &lmode_ours); + } + +#ifdef SIGTTOU + if (job_control) + signal (SIGTTOU, osigttou); #endif + if (!job_control) + { + signal (SIGINT, sigint_ours); +#ifdef SIGQUIT + signal (SIGQUIT, sigquit_ours); +#endif + } -#ifdef HAVE_TERMIO - sg_ours.c_lflag |= ICANON; -#else /* not HAVE_TERMIO */ - sg_ours.sg_flags &= ~RAW & ~CBREAK; -#endif /* not HAVE_TERMIO */ +#ifdef F_GETFL + tflags_inferior = fcntl (0, F_GETFL, 0); + + /* Is there a reason this is being done twice? It happens both + places we use F_SETFL, so I'm inclined to think perhaps there + is some reason, however perverse. Perhaps not though... */ + result = fcntl (0, F_SETFL, tflags_ours); + result = fcntl (0, F_SETFL, tflags_ours); +#endif + + result = result; /* lint */ + } } -static void -term_status_command () +void +term_info (char *arg, int from_tty) { - register int i; + target_terminal_info (arg, from_tty); +} - if (remote_debugging) +void +child_terminal_info (char *args, int from_tty) +{ + if (!gdb_has_a_terminal ()) { - printf ("No terminal status when remote debugging.\n"); + printf_filtered (_("This GDB does not control a terminal.\n")); return; } - printf ("Inferior's terminal status (currently saved by GDB):\n"); + printf_filtered (_("Inferior's terminal status (currently saved by GDB):\n")); -#ifdef HAVE_TERMIO + /* First the fcntl flags. */ + { + int flags; - printf ("fcntl flags = 0x%x, c_iflag = 0x%x, c_oflag = 0x%x,\n", - tflags_inferior, sg_inferior.c_iflag, sg_inferior.c_oflag); - printf ("c_cflag = 0x%x, c_lflag = 0x%x, c_line = 0x%x.\n", - sg_inferior.c_cflag, sg_inferior.c_lflag, sg_inferior.c_line); - printf ("c_cc: "); - for (i = 0; (i < NCC); i += 1) - printf ("0x%x ", sg_inferior.c_cc[i]); - printf ("\n"); + flags = tflags_inferior; -#else /* not HAVE_TERMIO */ + printf_filtered ("File descriptor flags = "); - printf ("fcntl flags = 0x%x, sgttyb.sg_flags = 0x%x, owner pid = %d.\n", - tflags_inferior, sg_inferior.sg_flags, pgrp_inferior); +#ifndef O_ACCMODE +#define O_ACCMODE (O_RDONLY | O_WRONLY | O_RDWR) +#endif + /* (O_ACCMODE) parens are to avoid Ultrix header file bug */ + switch (flags & (O_ACCMODE)) + { + case O_RDONLY: + printf_filtered ("O_RDONLY"); + break; + case O_WRONLY: + printf_filtered ("O_WRONLY"); + break; + case O_RDWR: + printf_filtered ("O_RDWR"); + break; + } + flags &= ~(O_ACCMODE); -#endif /* not HAVE_TERMIO */ +#ifdef O_NONBLOCK + if (flags & O_NONBLOCK) + printf_filtered (" | O_NONBLOCK"); + flags &= ~O_NONBLOCK; +#endif -#ifdef TIOCGETC - printf ("tchars: "); - for (i = 0; i < sizeof (struct tchars); i++) - printf ("0x%x ", ((char *)&tc_inferior)[i]); - printf ("\n"); +#if defined (O_NDELAY) + /* If O_NDELAY and O_NONBLOCK are defined to the same thing, we will + print it as O_NONBLOCK, which is good cause that is what POSIX + has, and the flag will already be cleared by the time we get here. */ + if (flags & O_NDELAY) + printf_filtered (" | O_NDELAY"); + flags &= ~O_NDELAY; #endif -#ifdef TIOCGLTC - printf ("ltchars: "); - for (i = 0; i < sizeof (struct ltchars); i++) - printf ("0x%x ", ((char *)<c_inferior)[i]); - printf ("\n"); - ioctl (0, TIOCSLTC, <c_ours); + if (flags & O_APPEND) + printf_filtered (" | O_APPEND"); + flags &= ~O_APPEND; + +#if defined (O_BINARY) + if (flags & O_BINARY) + printf_filtered (" | O_BINARY"); + flags &= ~O_BINARY; #endif -#ifdef TIOCLGET - printf ("lmode: %x\n", lmode_inferior); + if (flags) + printf_filtered (" | 0x%x", flags); + printf_filtered ("\n"); + } + +#ifdef PROCESS_GROUP_TYPE + printf_filtered ("Process group = %d\n", + (int) inferior_process_group); #endif + + serial_print_tty_state (stdin_serial, inferior_ttystate, gdb_stdout); } -static void -new_tty (ttyname) - char *ttyname; +/* NEW_TTY_PREFORK is called before forking a new child process, + so we can record the state of ttys in the child to be formed. + TTYNAME is null if we are to share the terminal with gdb; + or points to a string containing the name of the desired tty. + + NEW_TTY is called in new child processes under Unix, which will + become debugger target processes. This actually switches to + the terminal specified in the NEW_TTY_PREFORK call. */ + +void +new_tty_prefork (const char *ttyname) { - register int tty; - register int fd; + /* Save the name for later, for determining whether we and the child + are sharing a tty. */ + inferior_thisrun_terminal = ttyname; +} +void +new_tty (void) +{ + int tty; + + if (inferior_thisrun_terminal == 0) + return; +#if !defined(__GO32__) && !defined(_WIN32) #ifdef TIOCNOTTY - /* Disconnect the child process from our controlling terminal. */ - tty = open("/dev/tty", O_RDWR); + /* Disconnect the child process from our controlling terminal. On some + systems (SVR4 for example), this may cause a SIGTTOU, so temporarily + ignore SIGTTOU. */ + tty = open ("/dev/tty", O_RDWR); if (tty > 0) { - ioctl(tty, TIOCNOTTY, 0); - close(tty); + void (*osigttou) (); + + osigttou = (void (*)()) signal (SIGTTOU, SIG_IGN); + ioctl (tty, TIOCNOTTY, 0); + close (tty); + signal (SIGTTOU, osigttou); } #endif /* Now open the specified new terminal. */ - - tty = open(ttyname, O_RDWR); + tty = open (inferior_thisrun_terminal, O_RDWR | O_NOCTTY); if (tty == -1) - _exit(1); + { + print_sys_errmsg (inferior_thisrun_terminal, errno); + _exit (1); + } - dup2(tty, 0); - dup2(tty, 1); - dup2(tty, 2); - close(tty); + /* Avoid use of dup2; doesn't exist on all systems. */ + if (tty != 0) + { + close (0); + dup (tty); + } + if (tty != 1) + { + close (1); + dup (tty); + } + if (tty != 2) + { + close (2); + dup (tty); + } + if (tty > 2) + close (tty); +#endif /* !go32 && !win32 */ } -/* Start an inferior process and returns its pid. - ALLARGS is a string containing shell command to run the program. - ENV is the environment vector to pass. */ - -#ifndef SHELL_FILE -#define SHELL_FILE "/bin/sh" -#endif +/* Kill the inferior process. Make us have no inferior. */ -int -create_inferior (allargs, env) - char *allargs; - char **env; +static void +kill_command (char *arg, int from_tty) { - int pid; - char *shell_command; - extern int sys_nerr; - extern char *sys_errlist[]; - extern int errno; - - /* If desired, concat something onto the front of ALLARGS. - SHELL_COMMAND is the result. */ -#ifdef SHELL_COMMAND_CONCAT - shell_command = (char *) alloca (strlen (SHELL_COMMAND_CONCAT) + strlen (allargs) + 1); - strcpy (shell_command, SHELL_COMMAND_CONCAT); - strcat (shell_command, allargs); -#else - shell_command = allargs; -#endif + /* FIXME: This should not really be inferior_ptid (or target_has_execution). + It should be a distinct flag that indicates that a target is active, cuz + some targets don't have processes! */ - /* exec is said to fail if the executable is open. */ - close_exec_file (); + if (ptid_equal (inferior_ptid, null_ptid)) + error (_("The program is not being run.")); + if (!query ("Kill the program being debugged? ")) + error (_("Not confirmed.")); + target_kill (); - pid = fork (); - if (pid < 0) - perror_with_name ("fork"); + init_thread_list (); /* Destroy thread info */ - if (pid == 0) + /* Killing off the inferior can leave us with a core file. If so, + print the state we are left in. */ + if (target_has_stack) { -#ifdef TIOCGPGRP - /* Run inferior in a separate process group. */ - setpgrp (getpid (), getpid ()); -#endif /* TIOCGPGRP */ + printf_filtered (_("In %s,\n"), target_longname); + print_stack_frame (get_selected_frame (NULL), 1, SRC_AND_LOC); + } + bfd_cache_close_all (); +} + +/* Call set_sigint_trap when you need to pass a signal on to an attached + process when handling SIGINT */ -#ifdef SET_STACK_LIMIT_HUGE - /* Reset the stack limit back to what it was. */ - { - struct rlimit rlim; +static void +pass_signal (int signo) +{ +#ifndef _WIN32 + kill (PIDGET (inferior_ptid), SIGINT); +#endif +} - getrlimit (RLIMIT_STACK, &rlim); - rlim.rlim_cur = original_stack_limit; - setrlimit (RLIMIT_STACK, &rlim); - } -#endif /* SET_STACK_LIMIT_HUGE */ +static void (*osig) (); +void +set_sigint_trap (void) +{ + if (attach_flag || inferior_thisrun_terminal) + { + osig = (void (*)()) signal (SIGINT, pass_signal); + } +} - inferior_thisrun_terminal = inferior_io_terminal; - if (inferior_io_terminal != 0) - new_tty (inferior_io_terminal); +void +clear_sigint_trap (void) +{ + if (attach_flag || inferior_thisrun_terminal) + { + signal (SIGINT, osig); + } +} + +#if defined (SIGIO) && defined (FASYNC) && defined (FD_SET) && defined (F_SETOWN) +static void (*old_sigio) (); -/* Not needed on Sun, at least, and loses there - because it clobbers the superior. */ -/*??? signal (SIGQUIT, SIG_DFL); - signal (SIGINT, SIG_DFL); */ +static void +handle_sigio (int signo) +{ + int numfds; + fd_set readfds; - call_ptrace (0); - execle (SHELL_FILE, "sh", "-c", shell_command, 0, env); + signal (SIGIO, handle_sigio); - fprintf (stderr, "Cannot exec %s: %s.\n", SHELL_FILE, - errno < sys_nerr ? sys_errlist[errno] : "unknown error"); - fflush (stderr); - _exit (0177); + FD_ZERO (&readfds); + FD_SET (target_activity_fd, &readfds); + numfds = gdb_select (target_activity_fd + 1, &readfds, NULL, NULL, NULL); + if (numfds >= 0 && FD_ISSET (target_activity_fd, &readfds)) + { +#ifndef _WIN32 + if ((*target_activity_function) ()) + kill (PIDGET (inferior_ptid), SIGINT); +#endif } - return pid; } -/* Kill the inferior process. Make us have no inferior. */ +static int old_fcntl_flags; -static void -kill_command () +void +set_sigio_trap (void) { - if (remote_debugging) - return; - if (inferior_pid == 0) - error ("The program is not being run."); - if (!query ("Kill the inferior process? ")) - error ("Not confirmed."); - kill_inferior (); + if (target_activity_function) + { + old_sigio = (void (*)()) signal (SIGIO, handle_sigio); + fcntl (target_activity_fd, F_SETOWN, getpid ()); + old_fcntl_flags = fcntl (target_activity_fd, F_GETFL, 0); + fcntl (target_activity_fd, F_SETFL, old_fcntl_flags | FASYNC); + } } void -inferior_died () +clear_sigio_trap (void) { - inferior_pid = 0; - attach_flag = 0; - mark_breakpoints_out (); - select_frame ( (FRAME) 0, -1); - reopen_exec_file (); - if (have_core_file_p ()) - set_current_frame ( create_new_frame (read_register (FP_REGNUM), - read_pc ())); + if (target_activity_function) + { + signal (SIGIO, old_sigio); + fcntl (target_activity_fd, F_SETFL, old_fcntl_flags); + } } - -static void -try_writing_regs_command () +#else /* No SIGIO. */ +void +set_sigio_trap (void) { - register int i; - register int value; - extern int errno; + if (target_activity_function) + internal_error (__FILE__, __LINE__, _("failed internal consistency check")); +} - if (inferior_pid == 0) - error ("There is no inferior process now."); +void +clear_sigio_trap (void) +{ + if (target_activity_function) + internal_error (__FILE__, __LINE__, _("failed internal consistency check")); +} +#endif /* No SIGIO. */ + - for (i = 0; ; i += 2) +/* This is here because this is where we figure out whether we (probably) + have job control. Just using job_control only does part of it because + setpgid or setpgrp might not exist on a system without job control. + It might be considered misplaced (on the other hand, process groups and + job control are closely related to ttys). + + For a more clean implementation, in libiberty, put a setpgid which merely + calls setpgrp and a setpgrp which does nothing (any system with job control + will have one or the other). */ +int +gdb_setpgid (void) +{ + int retval = 0; + + if (job_control) { - QUIT; - errno = 0; - value = call_ptrace (3, inferior_pid, i, 0); - call_ptrace (6, inferior_pid, i, value); - if (errno == 0) - { - printf (" Succeeded with address 0x%x; value 0x%x (%d).\n", - i, value, value); - } - else if ((i & 0377) == 0) - printf (" Failed at 0x%x.\n", i); +#if defined (HAVE_TERMIOS) || defined (TIOCGPGRP) +#ifdef HAVE_SETPGID + /* The call setpgid (0, 0) is supposed to work and mean the same + thing as this, but on Ultrix 4.2A it fails with EPERM (and + setpgid (getpid (), getpid ()) succeeds). */ + retval = setpgid (getpid (), getpid ()); +#else +#ifdef HAVE_SETPGRP +#ifdef SETPGRP_VOID + retval = setpgrp (); +#else + retval = setpgrp (getpid (), getpid ()); +#endif +#endif /* HAVE_SETPGRP */ +#endif /* HAVE_SETPGID */ +#endif /* defined (HAVE_TERMIOS) || defined (TIOCGPGRP) */ } + + return retval; } - + +/* Get all the current tty settings (including whether we have a + tty at all!). We can't do this in _initialize_inflow because + serial_fdopen() won't work until the serial_ops_list is + initialized, but we don't want to do it lazily either, so + that we can guarantee stdin_serial is opened if there is + a terminal. */ void -_initialize_inflow () +initialize_stdin_serial (void) { - add_com ("term-status", class_obscure, term_status_command, - "Print info on inferior's saved terminal status."); + stdin_serial = serial_fdopen (0); +} - add_com ("try-writing-regs", class_obscure, try_writing_regs_command, - "Try writing all locations in inferior's system block.\n\ -Report which ones can be written."); +void +_initialize_inflow (void) +{ + add_info ("terminal", term_info, + _("Print inferior's saved terminal status.")); add_com ("kill", class_run, kill_command, - "Kill execution of program being debugged."); + _("Kill execution of program being debugged.")); - inferior_pid = 0; + inferior_ptid = null_ptid; - ioctl (0, TIOCGETP, &sg_ours); - fcntl (0, F_GETFL, tflags_ours); + terminal_is_ours = 1; -#ifdef TIOCGETC - ioctl (0, TIOCGETC, &tc_ours); -#endif -#ifdef TIOCGLTC - ioctl (0, TIOCGLTC, <c_ours); -#endif -#ifdef TIOCLGET - ioctl (0, TIOCLGET, &lmode_ours); -#endif + /* OK, figure out whether we have job control. If neither termios nor + sgtty (i.e. termio or go32), leave job_control 0. */ +#if defined (HAVE_TERMIOS) + /* Do all systems with termios have the POSIX way of identifying job + control? I hope so. */ +#ifdef _POSIX_JOB_CONTROL + job_control = 1; +#else +#ifdef _SC_JOB_CONTROL + job_control = sysconf (_SC_JOB_CONTROL); +#else + job_control = 0; /* have to assume the worst */ +#endif /* _SC_JOB_CONTROL */ +#endif /* _POSIX_JOB_CONTROL */ +#endif /* HAVE_TERMIOS */ + +#ifdef HAVE_SGTTY #ifdef TIOCGPGRP - ioctl (0, TIOCGPGRP, &pgrp_ours); + job_control = 1; +#else + job_control = 0; #endif /* TIOCGPGRP */ - - terminal_is_ours = 1; +#endif /* sgtty */ } -