2004-09-29 Andrew Cagney <cagney@gnu.org>
[platform/upstream/binutils.git] / gdb / inf-child.c
1 /* Default child (native) target interface, for GDB when running under
2    Unix.
3
4    Copyright 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996,
5    1998, 1999, 2000, 2001, 2002, 2004 Free Software Foundation, Inc.
6
7    This file is part of GDB.
8
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
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13
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.
18
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 59 Temple Place - Suite 330,
22    Boston, MA 02111-1307, USA.  */
23
24 #include "defs.h"
25 #include "regcache.h"
26 #include "memattr.h"
27 #include "symtab.h"
28 #include "target.h"
29 #include "inferior.h"
30 #include "gdb_string.h"
31
32 /* Fetch register REGNUM from the inferior.  If REGNUM is -1, do this
33    for all registers.  */
34
35 static void
36 inf_child_fetch_inferior_registers (int regnum)
37 {
38   if (regnum == -1)
39     {
40       for (regnum = 0; regnum < NUM_REGS; regnum++)
41         regcache_raw_supply (current_regcache, regnum, NULL);
42     }
43   else
44     regcache_raw_supply (current_regcache, regnum, NULL);
45 }
46
47 /* Store register REGNUM back into the inferior.  If REGNUM is -1, do
48    this for all registers (including the floating point registers).  */
49
50 static void
51 inf_child_store_inferior_registers (int regnum)
52 {
53 }
54
55 static void
56 inf_child_post_attach (int pid)
57 {
58   /* This version of Unix doesn't require a meaningful "post attach"
59      operation by a debugger.  */
60 }
61
62 /* Get ready to modify the registers array.  On machines which store
63    individual registers, this doesn't need to do anything.  On
64    machines which store all the registers in one fell swoop, this
65    makes sure that registers contains all the registers from the
66    program being debugged.  */
67
68 static void
69 inf_child_prepare_to_store (void)
70 {
71 }
72
73 static void
74 inf_child_open (char *arg, int from_tty)
75 {
76   error ("Use the \"run\" command to start a Unix child process.");
77 }
78
79 static void
80 inf_child_post_startup_inferior (ptid_t ptid)
81 {
82   /* This version of Unix doesn't require a meaningful "post startup
83      inferior" operation by a debugger.  */
84 }
85
86 static void
87 inf_child_acknowledge_created_inferior (int pid)
88 {
89   /* This version of Unix doesn't require a meaningful "acknowledge
90      created inferior" operation by a debugger.  */
91 }
92
93 static int
94 inf_child_insert_fork_catchpoint (int pid)
95 {
96   /* This version of Unix doesn't support notification of fork
97      events.  */
98   return 0;
99 }
100
101 static int
102 inf_child_remove_fork_catchpoint (int pid)
103 {
104   /* This version of Unix doesn't support notification of fork
105      events.  */
106   return 0;
107 }
108
109 static int
110 inf_child_insert_vfork_catchpoint (int pid)
111 {
112   /* This version of Unix doesn't support notification of vfork
113      events.  */
114   return 0;
115 }
116
117 static int
118 inf_child_remove_vfork_catchpoint (int pid)
119 {
120   /* This version of Unix doesn't support notification of vfork
121      events.  */
122   return 0;
123 }
124
125 static int
126 inf_child_follow_fork (int follow_child)
127 {
128   /* This version of Unix doesn't support following fork or vfork
129      events.  */
130   return 0;
131 }
132
133 static int
134 inf_child_insert_exec_catchpoint (int pid)
135 {
136   /* This version of Unix doesn't support notification of exec
137      events.  */
138   return 0;
139 }
140
141 static int
142 inf_child_remove_exec_catchpoint (int pid)
143 {
144   /* This version of Unix doesn't support notification of exec
145      events.  */
146   return 0;
147 }
148
149 static int
150 inf_child_reported_exec_events_per_exec_call (void)
151 {
152   /* This version of Unix doesn't support notification of exec
153      events.  */
154   return 1;
155 }
156
157 static int
158 inf_child_can_run (void)
159 {
160   return 1;
161 }
162
163 static struct symtab_and_line *
164 inf_child_enable_exception_callback (enum exception_event_kind kind,
165                                      int enable)
166 {
167   return (struct symtab_and_line *) NULL;
168 }
169
170 static struct exception_event_record *
171 inf_child_get_current_exception_event (void)
172 {
173   return (struct exception_event_record *) NULL;
174 }
175
176 static char *
177 inf_child_pid_to_exec_file (int pid)
178 {
179   /* This version of Unix doesn't support translation of a process ID
180      to the filename of the executable file.  */
181   return NULL;
182 }
183
184 struct target_ops *
185 inf_child_target (void)
186 {
187   struct target_ops *t = XZALLOC (struct target_ops);
188   t->to_shortname = "child";
189   t->to_longname = "Unix child process";
190   t->to_doc = "Unix child process (started by the \"run\" command).";
191   t->to_open = inf_child_open;
192   t->to_post_attach = inf_child_post_attach;
193   t->to_fetch_registers = inf_child_fetch_inferior_registers;
194   t->to_store_registers = inf_child_store_inferior_registers;
195   t->to_prepare_to_store = inf_child_prepare_to_store;
196   t->to_insert_breakpoint = memory_insert_breakpoint;
197   t->to_remove_breakpoint = memory_remove_breakpoint;
198   t->to_terminal_init = terminal_init_inferior;
199   t->to_terminal_inferior = terminal_inferior;
200   t->to_terminal_ours_for_output = terminal_ours_for_output;
201   t->to_terminal_save_ours = terminal_save_ours;
202   t->to_terminal_ours = terminal_ours;
203   t->to_terminal_info = child_terminal_info;
204   t->to_post_startup_inferior = inf_child_post_startup_inferior;
205   t->to_acknowledge_created_inferior = inf_child_acknowledge_created_inferior;
206   t->to_insert_fork_catchpoint = inf_child_insert_fork_catchpoint;
207   t->to_remove_fork_catchpoint = inf_child_remove_fork_catchpoint;
208   t->to_insert_vfork_catchpoint = inf_child_insert_vfork_catchpoint;
209   t->to_remove_vfork_catchpoint = inf_child_remove_vfork_catchpoint;
210   t->to_follow_fork = inf_child_follow_fork;
211   t->to_insert_exec_catchpoint = inf_child_insert_exec_catchpoint;
212   t->to_remove_exec_catchpoint = inf_child_remove_exec_catchpoint;
213   t->to_reported_exec_events_per_exec_call =
214     inf_child_reported_exec_events_per_exec_call;
215   t->to_can_run = inf_child_can_run;
216   t->to_enable_exception_callback = inf_child_enable_exception_callback;
217   t->to_get_current_exception_event = inf_child_get_current_exception_event;
218   t->to_pid_to_exec_file = inf_child_pid_to_exec_file;
219   t->to_stratum = process_stratum;
220   t->to_has_all_memory = 1;
221   t->to_has_memory = 1;
222   t->to_has_stack = 1;
223   t->to_has_registers = 1;
224   t->to_has_execution = 1;
225   t->to_magic = OPS_MAGIC;
226   return t;
227 }