From: Miles Bader <miles@gnu.ai.mit.edu>
* gnu-nat.c, gnu-nat.h, msg.defs, exc_request.defs, i386gnu-nat.c,
msg_reply.defs, notify.defs, process_reply.defs, reply_mig_hack.awk,
config/nm-gnu.h, config/i386/{i386gnu.mh, i386gnu.mt, nm-gnu.h,
m-i386gnu.h, xm-i386gnu.h}: New files for GNU hurd.
This commit is contained in:
Fred Fish
parent
7b032c5fed
commit
ce0787ef68
17 changed files with 3594 additions and 1 deletions
|
|
@ -168,6 +168,7 @@ environ.c
|
||||||
environ.h
|
environ.h
|
||||||
eval.c
|
eval.c
|
||||||
exec.c
|
exec.c
|
||||||
|
exc_request.defs
|
||||||
expprint.c
|
expprint.c
|
||||||
expression.h
|
expression.h
|
||||||
f-exp.y
|
f-exp.y
|
||||||
|
|
@ -189,6 +190,8 @@ gdbcore.h
|
||||||
gdbserver
|
gdbserver
|
||||||
gdbtypes.c
|
gdbtypes.c
|
||||||
gdbtypes.h
|
gdbtypes.h
|
||||||
|
gnu-nat.c
|
||||||
|
gnu-nat.h
|
||||||
gnu-regex.c
|
gnu-regex.c
|
||||||
gnu-regex.h
|
gnu-regex.h
|
||||||
go32-xdep.c
|
go32-xdep.c
|
||||||
|
|
@ -206,6 +209,7 @@ i386-stub.c
|
||||||
i386-tdep.c
|
i386-tdep.c
|
||||||
i386aix-nat.c
|
i386aix-nat.c
|
||||||
i386b-nat.c
|
i386b-nat.c
|
||||||
|
i386gnu-nat.c
|
||||||
i386ly-tdep.c
|
i386ly-tdep.c
|
||||||
i386m3-nat.c
|
i386m3-nat.c
|
||||||
i386mach-nat.c
|
i386mach-nat.c
|
||||||
|
|
@ -257,11 +261,14 @@ monitor.h
|
||||||
monitor.c
|
monitor.c
|
||||||
mpw-config.in
|
mpw-config.in
|
||||||
mpw-make.sed
|
mpw-make.sed
|
||||||
|
msg.defs
|
||||||
|
msg_reply.defs
|
||||||
news-xdep.c
|
news-xdep.c
|
||||||
nindy-share
|
nindy-share
|
||||||
nindy-tdep.c
|
nindy-tdep.c
|
||||||
nlm
|
nlm
|
||||||
nlmread.c
|
nlmread.c
|
||||||
|
notify.defs
|
||||||
ns32k-tdep.c
|
ns32k-tdep.c
|
||||||
ns32km3-nat.c
|
ns32km3-nat.c
|
||||||
objfiles.c
|
objfiles.c
|
||||||
|
|
@ -274,6 +281,7 @@ parser-defs.h
|
||||||
partial-stab.h
|
partial-stab.h
|
||||||
ppcbug-rom.c
|
ppcbug-rom.c
|
||||||
printcmd.c
|
printcmd.c
|
||||||
|
process_reply.defs
|
||||||
procfs.c
|
procfs.c
|
||||||
ptx4-nat.c
|
ptx4-nat.c
|
||||||
pyr-tdep.c
|
pyr-tdep.c
|
||||||
|
|
@ -306,6 +314,7 @@ remote-vx960.c
|
||||||
remote-vxmips.c
|
remote-vxmips.c
|
||||||
remote-vxsparc.c
|
remote-vxsparc.c
|
||||||
remote.c
|
remote.c
|
||||||
|
reply_mig_hack.awk
|
||||||
rs6000-nat.c
|
rs6000-nat.c
|
||||||
rs6000-tdep.c
|
rs6000-tdep.c
|
||||||
rom68k-rom.c
|
rom68k-rom.c
|
||||||
|
|
|
||||||
|
|
@ -1,4 +1,12 @@
|
||||||
Sun Apr 7 13:32:41 1996 Fred Fish <fnf@rtl.cygnus.com>
|
Sun Apr 7 22:34:29 1996 Fred Fish <fnf@cygnus.com>
|
||||||
|
|
||||||
|
From: Miles Bader <miles@gnu.ai.mit.edu>
|
||||||
|
* gnu-nat.c, gnu-nat.h, msg.defs, exc_request.defs, i386gnu-nat.c,
|
||||||
|
msg_reply.defs, notify.defs, process_reply.defs, reply_mig_hack.awk,
|
||||||
|
config/nm-gnu.h, config/i386/{i386gnu.mh, i386gnu.mt, nm-gnu.h,
|
||||||
|
m-i386gnu.h, xm-i386gnu.h}: New files for GNU hurd.
|
||||||
|
|
||||||
|
Sun Apr 7 13:32:41 1996 Fred Fish <fnf@cygnus.com>
|
||||||
|
|
||||||
* configure.in (case host): Add i386sco5 host.
|
* configure.in (case host): Add i386sco5 host.
|
||||||
* configure: Regenerate.
|
* configure: Regenerate.
|
||||||
|
|
|
||||||
|
|
@ -56,6 +56,7 @@ m68k
|
||||||
m88k
|
m88k
|
||||||
mips
|
mips
|
||||||
nm-empty.h
|
nm-empty.h
|
||||||
|
nm-gnu.h
|
||||||
nm-lynx.h
|
nm-lynx.h
|
||||||
nm-m3.h
|
nm-m3.h
|
||||||
nm-nbsd.h
|
nm-nbsd.h
|
||||||
|
|
|
||||||
|
|
@ -33,6 +33,8 @@ i386aout.mt
|
||||||
i386bsd.mh
|
i386bsd.mh
|
||||||
i386bsd.mt
|
i386bsd.mt
|
||||||
i386dgux.mh
|
i386dgux.mh
|
||||||
|
i386gnu.mh
|
||||||
|
i386gnu.mt
|
||||||
i386lynx.mh
|
i386lynx.mh
|
||||||
i386lynx.mt
|
i386lynx.mt
|
||||||
i386m3.mh
|
i386m3.mh
|
||||||
|
|
@ -59,6 +61,7 @@ nbsd.mt
|
||||||
ncr3000.mh
|
ncr3000.mh
|
||||||
ncr3000.mt
|
ncr3000.mt
|
||||||
nm-fbsd.h
|
nm-fbsd.h
|
||||||
|
nm-gnu.h
|
||||||
nm-i386aix.h
|
nm-i386aix.h
|
||||||
nm-i386bsd.h
|
nm-i386bsd.h
|
||||||
nm-i386lynx.h
|
nm-i386lynx.h
|
||||||
|
|
@ -85,6 +88,7 @@ symmetry.mt
|
||||||
tm-i386.h
|
tm-i386.h
|
||||||
tm-i386aix.h
|
tm-i386aix.h
|
||||||
tm-i386bsd.h
|
tm-i386bsd.h
|
||||||
|
tm-i386gnu.h
|
||||||
tm-i386lynx.h
|
tm-i386lynx.h
|
||||||
tm-i386m3.h
|
tm-i386m3.h
|
||||||
tm-i386mk.h
|
tm-i386mk.h
|
||||||
|
|
@ -104,6 +108,7 @@ cygwin32.mt
|
||||||
xm-go32.h
|
xm-go32.h
|
||||||
xm-i386aix.h
|
xm-i386aix.h
|
||||||
xm-i386bsd.h
|
xm-i386bsd.h
|
||||||
|
xm-i386gnu.h
|
||||||
xm-i386lynx.h
|
xm-i386lynx.h
|
||||||
xm-i386m3.h
|
xm-i386m3.h
|
||||||
xm-i386mach.h
|
xm-i386mach.h
|
||||||
|
|
|
||||||
22
gdb/config/i386/nm-gnu.h
Normal file
22
gdb/config/i386/nm-gnu.h
Normal file
|
|
@ -0,0 +1,22 @@
|
||||||
|
/* Native-dependent definitions for Intel 386 running the GNU Hurd
|
||||||
|
Copyright 1994, 1995 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
|
/* Include the generic hurd definitions. */
|
||||||
|
|
||||||
|
#include "nm-gnu.h"
|
||||||
48
gdb/config/i386/tm-i386gnu.h
Normal file
48
gdb/config/i386/tm-i386gnu.h
Normal file
|
|
@ -0,0 +1,48 @@
|
||||||
|
/* Macro definitions for i386, GNU Hurd
|
||||||
|
Copyright (C) 1992 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
|
/* Include common definitions for gnu systems */
|
||||||
|
#include "nm-gnu.h"
|
||||||
|
|
||||||
|
/* Thread flavors used in re-setting the T bit.
|
||||||
|
* @@ this is also bad for cross debugging.
|
||||||
|
*/
|
||||||
|
#define THREAD_STATE_FLAVOR i386_THREAD_STATE
|
||||||
|
#define THREAD_STATE_SIZE i386_THREAD_STATE_COUNT
|
||||||
|
#define THREAD_STATE_SET_TRACED(state) \
|
||||||
|
((struct i386_thread_state *)state)->efl |= 0x100
|
||||||
|
#define THREAD_STATE_CLEAR_TRACED(state) \
|
||||||
|
((((struct i386_thread_state *)state)->efl &= ~0x100), 1)
|
||||||
|
|
||||||
|
/* we can do it */
|
||||||
|
#define ATTACH_DETACH 1
|
||||||
|
|
||||||
|
/* Sigh. There should be a file for i386 but no sysv stuff in it */
|
||||||
|
#include "i386/tm-i386v.h"
|
||||||
|
|
||||||
|
/* I want to test this float info code. See comment in tm-i386v.h */
|
||||||
|
#undef FLOAT_INFO
|
||||||
|
#define FLOAT_INFO { i386_mach3_float_info (); }
|
||||||
|
|
||||||
|
/* Address of end of stack space.
|
||||||
|
* for MACH, see <machine/vmparam.h>
|
||||||
|
* @@@ I don't know what is in the 5 ints...
|
||||||
|
*/
|
||||||
|
#undef STACK_END_ADDR
|
||||||
|
#define STACK_END_ADDR (0xc0000000-sizeof(int [5]))
|
||||||
23
gdb/config/i386/xm-i386gnu.h
Normal file
23
gdb/config/i386/xm-i386gnu.h
Normal file
|
|
@ -0,0 +1,23 @@
|
||||||
|
/* Definitions to make GDB run on the GNU Hurd on an Intel 386
|
||||||
|
Copyright (C) 1986, 1987, 1989, 1991 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
|
#define HOST_BYTE_ORDER LITTLE_ENDIAN
|
||||||
|
|
||||||
|
/* Do implement the attach and detach commands. */
|
||||||
|
#define ATTACH_DETACH 1
|
||||||
46
gdb/config/nm-gnu.h
Normal file
46
gdb/config/nm-gnu.h
Normal file
|
|
@ -0,0 +1,46 @@
|
||||||
|
/* Common declarations for the GNU Hurd
|
||||||
|
|
||||||
|
Copyright (C) 1995 Free Software Foundation, Inc.
|
||||||
|
|
||||||
|
Written by Miles Bader <miles@gnu.ai.mit.edu>
|
||||||
|
|
||||||
|
The GNU Hurd 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, or (at
|
||||||
|
your option) any later version.
|
||||||
|
|
||||||
|
The GNU Hurd 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., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||||
|
|
||||||
|
#ifndef __NM_GNU_H__
|
||||||
|
#define __NM_GNU_H__
|
||||||
|
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <mach.h>
|
||||||
|
#include <mach/exception.h>
|
||||||
|
|
||||||
|
#include "solib.h" /* Support for shared libraries. */
|
||||||
|
|
||||||
|
#undef target_pid_to_str
|
||||||
|
#define target_pid_to_str(pid) gnu_target_pid_to_str(pid)
|
||||||
|
extern char *gnu_target_pid_to_str (int pid);
|
||||||
|
|
||||||
|
/* Before storing, we need to read all the registers. */
|
||||||
|
#define CHILD_PREPARE_TO_STORE() read_register_bytes (0, NULL, REGISTER_BYTES)
|
||||||
|
|
||||||
|
/* Don't do wait_for_inferior on attach. */
|
||||||
|
#define ATTACH_NO_WAIT
|
||||||
|
|
||||||
|
/* Use SVR4 style shared library support */
|
||||||
|
#define SVR4_SHARED_LIBS
|
||||||
|
#define NO_CORE_OPS
|
||||||
|
|
||||||
|
#define MAINTENANCE_CMDS 1
|
||||||
|
|
||||||
|
#endif /* __NM_GNU_H__ */
|
||||||
51
gdb/exc_request.defs
Normal file
51
gdb/exc_request.defs
Normal file
|
|
@ -0,0 +1,51 @@
|
||||||
|
/*
|
||||||
|
* Mach Operating System
|
||||||
|
* Copyright (c) 1993,1991,1990,1989,1988,1987 Carnegie Mellon University
|
||||||
|
* All Rights Reserved.
|
||||||
|
*
|
||||||
|
* Permission to use, copy, modify and distribute this software and its
|
||||||
|
* documentation is hereby granted, provided that both the copyright
|
||||||
|
* notice and this permission notice appear in all copies of the
|
||||||
|
* software, derivative works or modified versions, and any portions
|
||||||
|
* thereof, and that both notices appear in supporting documentation.
|
||||||
|
*
|
||||||
|
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
|
||||||
|
* CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
|
||||||
|
* ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
|
||||||
|
*
|
||||||
|
* Carnegie Mellon requests users of this software to return to
|
||||||
|
*
|
||||||
|
* Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
|
||||||
|
* School of Computer Science
|
||||||
|
* Carnegie Mellon University
|
||||||
|
* Pittsburgh PA 15213-3890
|
||||||
|
*
|
||||||
|
* any improvements or extensions that they make and grant Carnegie Mellon
|
||||||
|
* the rights to redistribute these changes.
|
||||||
|
*/
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Abstract:
|
||||||
|
* MiG definitions file for Mach exception interface (request half).
|
||||||
|
*/
|
||||||
|
|
||||||
|
subsystem exc 2400;
|
||||||
|
|
||||||
|
#include <mach/std_types.defs>
|
||||||
|
|
||||||
|
#ifdef USERPREFIX
|
||||||
|
userprefix USERPREFIX;
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef SERVERPREFIX
|
||||||
|
serverprefix SERVERPREFIX;
|
||||||
|
#endif
|
||||||
|
|
||||||
|
simpleroutine exception_raise_request (
|
||||||
|
exception_port : mach_port_t;
|
||||||
|
replyport reply : mach_port_send_once_t;
|
||||||
|
thread : mach_port_t;
|
||||||
|
task : mach_port_t;
|
||||||
|
exception : integer_t;
|
||||||
|
code : integer_t;
|
||||||
|
subcode : integer_t);
|
||||||
2814
gdb/gnu-nat.c
Normal file
2814
gdb/gnu-nat.c
Normal file
File diff suppressed because it is too large
Load diff
91
gdb/gnu-nat.h
Normal file
91
gdb/gnu-nat.h
Normal file
|
|
@ -0,0 +1,91 @@
|
||||||
|
/* Common things used by the various *gnu-nat.c files
|
||||||
|
|
||||||
|
Copyright (C) 1995 Free Software Foundation, Inc.
|
||||||
|
|
||||||
|
Written by Miles Bader <miles@gnu.ai.mit.edu>
|
||||||
|
|
||||||
|
The GNU Hurd 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, or (at
|
||||||
|
your option) any later version.
|
||||||
|
|
||||||
|
The GNU Hurd 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., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
||||||
|
|
||||||
|
#ifndef __GNU_NAT_H__
|
||||||
|
#define __GNU_NAT_H__
|
||||||
|
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <mach.h>
|
||||||
|
|
||||||
|
struct inf;
|
||||||
|
|
||||||
|
extern struct inf *current_inferior;
|
||||||
|
|
||||||
|
/* Converts a GDB pid to a struct proc. */
|
||||||
|
struct proc *inf_tid_to_thread (struct inf *inf, int tid);
|
||||||
|
|
||||||
|
/* A proc is either a thread, or the task (there can only be one task proc
|
||||||
|
because it always has the same TID, PROC_TID_TASK). */
|
||||||
|
struct proc
|
||||||
|
{
|
||||||
|
thread_t port; /* The task or thread port. */
|
||||||
|
int tid; /* The GDB pid (actually a thread id). */
|
||||||
|
int num; /* An id number for threads, to print. */
|
||||||
|
|
||||||
|
mach_port_t saved_exc_port; /* The task/thread's real exception port. */
|
||||||
|
mach_port_t exc_port; /* Our replacement, which for. */
|
||||||
|
|
||||||
|
int sc; /* Desired suspend count. */
|
||||||
|
int cur_sc; /* Implemented suspend count. */
|
||||||
|
int run_sc; /* Default sc when the program is running. */
|
||||||
|
int pause_sc; /* Default sc when gdb has control. */
|
||||||
|
int resume_sc; /* Sc resulting form the last resume. */
|
||||||
|
|
||||||
|
thread_state_data_t state; /* Registers, &c. */
|
||||||
|
int state_valid : 1; /* True if STATE is up to date. */
|
||||||
|
int state_changed : 1;
|
||||||
|
|
||||||
|
int aborted : 1; /* True if thread_abort has been called. */
|
||||||
|
|
||||||
|
/* Bit mask of registers fetched by gdb. This is used when we re-fetch
|
||||||
|
STATE after aborting the thread, to detect that gdb may have out-of-date
|
||||||
|
information. */
|
||||||
|
unsigned long fetched_regs;
|
||||||
|
|
||||||
|
struct inf *inf; /* Where we come from. */
|
||||||
|
|
||||||
|
struct proc *next;
|
||||||
|
};
|
||||||
|
|
||||||
|
/* The task has a thread entry with this TID. */
|
||||||
|
#define PROC_TID_TASK (-1)
|
||||||
|
|
||||||
|
#define proc_is_task(proc) ((proc)->tid == PROC_TID_TASK)
|
||||||
|
#define proc_is_thread(proc) ((proc)->tid != PROC_TID_TASK)
|
||||||
|
|
||||||
|
extern int __proc_pid (struct proc *proc);
|
||||||
|
|
||||||
|
extern thread_state_t proc_get_state (struct proc *proc, int will_modify);
|
||||||
|
|
||||||
|
#define proc_debug(_proc, msg, args...) \
|
||||||
|
do { struct proc *__proc = (_proc); \
|
||||||
|
debug ("{proc %d/%d %p}: " msg, \
|
||||||
|
__proc_pid (__proc), __proc->tid, __proc , ##args); } while (0)
|
||||||
|
|
||||||
|
#if MAINTENANCE_CMDS
|
||||||
|
extern int gnu_debug_flag;
|
||||||
|
#define debug(msg, args...) \
|
||||||
|
do { if (gnu_debug_flag) \
|
||||||
|
fprintf (stderr, "%s: " msg "\r\n", __FUNCTION__ , ##args); } while (0)
|
||||||
|
#else
|
||||||
|
#define debug(msg, args...) (void)0
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#endif /* __GNU_NAT_H__ */
|
||||||
348
gdb/i386gnu-nat.c
Normal file
348
gdb/i386gnu-nat.c
Normal file
|
|
@ -0,0 +1,348 @@
|
||||||
|
/* Low level interface to I386 running the GNU Hurd
|
||||||
|
Copyright (C) 1992 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
|
#include "defs.h"
|
||||||
|
#include "inferior.h"
|
||||||
|
#include "floatformat.h"
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
|
||||||
|
#include <mach.h>
|
||||||
|
#include <mach/message.h>
|
||||||
|
#include <mach/exception.h>
|
||||||
|
#include <mach_error.h>
|
||||||
|
|
||||||
|
#include "gnu-nat.h"
|
||||||
|
|
||||||
|
/* Hmmm... Should this not be here?
|
||||||
|
* Now for i386_float_info() target_has_execution
|
||||||
|
*/
|
||||||
|
#include <target.h>
|
||||||
|
|
||||||
|
/* @@@ Should move print_387_status() to i387-tdep.c */
|
||||||
|
extern void print_387_control_word (); /* i387-tdep.h */
|
||||||
|
extern void print_387_status_word ();
|
||||||
|
|
||||||
|
/* Find offsets to thread states at compile time.
|
||||||
|
* If your compiler does not grok this, calculate offsets
|
||||||
|
* offsets yourself and use them (or get a compatible compiler :-)
|
||||||
|
*/
|
||||||
|
|
||||||
|
#define REG_OFFSET(reg) (int)(&((struct i386_thread_state *)0)->reg)
|
||||||
|
|
||||||
|
/* at reg_offset[i] is the offset to the i386_thread_state
|
||||||
|
* location where the gdb registers[i] is stored.
|
||||||
|
*/
|
||||||
|
|
||||||
|
static int reg_offset[] =
|
||||||
|
{
|
||||||
|
REG_OFFSET(eax), REG_OFFSET(ecx), REG_OFFSET(edx), REG_OFFSET(ebx),
|
||||||
|
REG_OFFSET(uesp), REG_OFFSET(ebp), REG_OFFSET(esi), REG_OFFSET(edi),
|
||||||
|
REG_OFFSET(eip), REG_OFFSET(efl), REG_OFFSET(cs), REG_OFFSET(ss),
|
||||||
|
REG_OFFSET(ds), REG_OFFSET(es), REG_OFFSET(fs), REG_OFFSET(gs)
|
||||||
|
};
|
||||||
|
|
||||||
|
#define REG_ADDR(state,regnum) ((char *)(state)+reg_offset[regnum])
|
||||||
|
|
||||||
|
/* Fetch COUNT contiguous registers from thread STATE starting from REGNUM
|
||||||
|
* Caller knows that the regs handled in one transaction are of same size.
|
||||||
|
*/
|
||||||
|
#define FETCH_REGS(state, regnum, count) \
|
||||||
|
memcpy (®isters[REGISTER_BYTE (regnum)], \
|
||||||
|
REG_ADDR (state, regnum), \
|
||||||
|
count * REGISTER_RAW_SIZE (regnum))
|
||||||
|
|
||||||
|
/* Store COUNT contiguous registers to thread STATE starting from REGNUM */
|
||||||
|
#define STORE_REGS(state, regnum, count) \
|
||||||
|
memcpy (REG_ADDR (state, regnum), \
|
||||||
|
®isters[REGISTER_BYTE (regnum)], \
|
||||||
|
count * REGISTER_RAW_SIZE (regnum))
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Fetch inferiors registers for gdb.
|
||||||
|
* REG specifies which (as gdb views it) register, -1 for all.
|
||||||
|
*/
|
||||||
|
void
|
||||||
|
gnu_fetch_registers (int reg)
|
||||||
|
{
|
||||||
|
thread_state_t state;
|
||||||
|
struct proc *thread = inf_tid_to_thread (current_inferior, inferior_pid);
|
||||||
|
|
||||||
|
if (!thread)
|
||||||
|
error ("fetch inferior registers: %d: Invalid thread", inferior_pid);
|
||||||
|
|
||||||
|
state = proc_get_state (thread, 0);
|
||||||
|
|
||||||
|
if (! state)
|
||||||
|
warning ("Couldn't fetch register %s.", reg_names[reg]);
|
||||||
|
else if (reg >= 0)
|
||||||
|
{
|
||||||
|
proc_debug (thread, "fetching register: %s", reg_names[reg]);
|
||||||
|
supply_register (reg, REG_ADDR(state, reg));
|
||||||
|
thread->fetched_regs |= (1 << reg);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
proc_debug (thread, "fetching all registers");
|
||||||
|
for (reg = 0; reg < NUM_REGS; reg++)
|
||||||
|
supply_register (reg, REG_ADDR(state, reg));
|
||||||
|
thread->fetched_regs = ~0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Store our register values back into the inferior.
|
||||||
|
* If REG is -1, do this for all registers.
|
||||||
|
* Otherwise, REG specifies which register
|
||||||
|
*
|
||||||
|
* On mach3 all registers are always saved in one call.
|
||||||
|
*/
|
||||||
|
void
|
||||||
|
gnu_store_registers (reg)
|
||||||
|
int reg;
|
||||||
|
{
|
||||||
|
int was_aborted, was_valid;
|
||||||
|
thread_state_t state;
|
||||||
|
thread_state_data_t old_state;
|
||||||
|
struct proc *thread = inf_tid_to_thread (current_inferior, inferior_pid);
|
||||||
|
|
||||||
|
if (! thread)
|
||||||
|
error ("store inferior registers: %d: Invalid thread", inferior_pid);
|
||||||
|
|
||||||
|
proc_debug (thread, "storing register %s.", reg_names[reg]);
|
||||||
|
|
||||||
|
was_aborted = thread->aborted;
|
||||||
|
was_valid = thread->state_valid;
|
||||||
|
if (! was_aborted && was_valid)
|
||||||
|
bcopy (&thread->state, &old_state, sizeof (old_state));
|
||||||
|
|
||||||
|
state = proc_get_state (thread, 1);
|
||||||
|
|
||||||
|
if (! state)
|
||||||
|
warning ("Couldn't store register %s.", reg_names[reg]);
|
||||||
|
else
|
||||||
|
{
|
||||||
|
if (! was_aborted && was_valid)
|
||||||
|
/* See which registers have changed after aborting the thread. */
|
||||||
|
{
|
||||||
|
int check_reg;
|
||||||
|
for (check_reg = 0; check_reg < NUM_REGS; check_reg++)
|
||||||
|
if ((thread->fetched_regs & (1 << check_reg))
|
||||||
|
&& bcmp (REG_ADDR (&old_state, check_reg),
|
||||||
|
REG_ADDR (state, check_reg),
|
||||||
|
REGISTER_RAW_SIZE (check_reg)))
|
||||||
|
/* Register CHECK_REG has changed! Ack! */
|
||||||
|
{
|
||||||
|
warning ("Register %s changed after thread was aborted.",
|
||||||
|
reg_names [check_reg]);
|
||||||
|
if (reg >= 0 && reg != check_reg)
|
||||||
|
/* Update gdb's copy of the register. */
|
||||||
|
supply_register (check_reg, REG_ADDR (state, check_reg));
|
||||||
|
else
|
||||||
|
warning ("... also writing this register! Suspicious...");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (reg >= 0)
|
||||||
|
{
|
||||||
|
proc_debug (thread, "storing register: %s", reg_names[reg]);
|
||||||
|
STORE_REGS (state, reg, 1);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
proc_debug (thread, "storing all registers");
|
||||||
|
for (reg = 0; reg < NUM_REGS; reg++)
|
||||||
|
STORE_REGS (state, reg, 1);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* jtv@hut.fi: I copied and modified this 387 code from
|
||||||
|
* gdb/i386-xdep.c. Modifications for Mach 3.0.
|
||||||
|
*
|
||||||
|
* i387 status dumper. See also i387-tdep.c
|
||||||
|
*/
|
||||||
|
struct env387
|
||||||
|
{
|
||||||
|
unsigned short control;
|
||||||
|
unsigned short r0;
|
||||||
|
unsigned short status;
|
||||||
|
unsigned short r1;
|
||||||
|
unsigned short tag;
|
||||||
|
unsigned short r2;
|
||||||
|
unsigned long eip;
|
||||||
|
unsigned short code_seg;
|
||||||
|
unsigned short opcode;
|
||||||
|
unsigned long operand;
|
||||||
|
unsigned short operand_seg;
|
||||||
|
unsigned short r3;
|
||||||
|
unsigned char regs[8][10];
|
||||||
|
};
|
||||||
|
/* This routine is machine independent?
|
||||||
|
* Should move it to i387-tdep.c but you need to export struct env387
|
||||||
|
*/
|
||||||
|
static
|
||||||
|
print_387_status (status, ep)
|
||||||
|
unsigned short status;
|
||||||
|
struct env387 *ep;
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
int bothstatus;
|
||||||
|
int top;
|
||||||
|
int fpreg;
|
||||||
|
unsigned char *p;
|
||||||
|
|
||||||
|
bothstatus = ((status != 0) && (ep->status != 0));
|
||||||
|
if (status != 0)
|
||||||
|
{
|
||||||
|
if (bothstatus)
|
||||||
|
printf_unfiltered ("u: ");
|
||||||
|
print_387_status_word (status);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (ep->status != 0)
|
||||||
|
{
|
||||||
|
if (bothstatus)
|
||||||
|
printf_unfiltered ("e: ");
|
||||||
|
print_387_status_word (ep->status);
|
||||||
|
}
|
||||||
|
|
||||||
|
print_387_control_word (ep->control);
|
||||||
|
printf_unfiltered ("last exception: ");
|
||||||
|
printf_unfiltered ("opcode %s; ", local_hex_string(ep->opcode));
|
||||||
|
printf_unfiltered ("pc %s:", local_hex_string(ep->code_seg));
|
||||||
|
printf_unfiltered ("%s; ", local_hex_string(ep->eip));
|
||||||
|
printf_unfiltered ("operand %s", local_hex_string(ep->operand_seg));
|
||||||
|
printf_unfiltered (":%s\n", local_hex_string(ep->operand));
|
||||||
|
|
||||||
|
top = (ep->status >> 11) & 7;
|
||||||
|
|
||||||
|
printf_unfiltered ("regno tag msb lsb value\n");
|
||||||
|
for (fpreg = 7; fpreg >= 0; fpreg--)
|
||||||
|
{
|
||||||
|
double val;
|
||||||
|
|
||||||
|
printf_unfiltered ("%s %d: ", fpreg == top ? "=>" : " ", fpreg);
|
||||||
|
|
||||||
|
switch ((ep->tag >> (fpreg * 2)) & 3)
|
||||||
|
{
|
||||||
|
case 0: printf_unfiltered ("valid "); break;
|
||||||
|
case 1: printf_unfiltered ("zero "); break;
|
||||||
|
case 2: printf_unfiltered ("trap "); break;
|
||||||
|
case 3: printf_unfiltered ("empty "); break;
|
||||||
|
}
|
||||||
|
for (i = 9; i >= 0; i--)
|
||||||
|
printf_unfiltered ("%02x", ep->regs[fpreg][i]);
|
||||||
|
|
||||||
|
floatformat_to_double (&floatformat_i387_ext, (char *)ep->regs[fpreg],
|
||||||
|
&val);
|
||||||
|
printf_unfiltered (" %g\n", val);
|
||||||
|
}
|
||||||
|
if (ep->r0)
|
||||||
|
printf_unfiltered ("warning: reserved0 is %s\n", local_hex_string(ep->r0));
|
||||||
|
if (ep->r1)
|
||||||
|
printf_unfiltered ("warning: reserved1 is %s\n", local_hex_string(ep->r1));
|
||||||
|
if (ep->r2)
|
||||||
|
printf_unfiltered ("warning: reserved2 is %s\n", local_hex_string(ep->r2));
|
||||||
|
if (ep->r3)
|
||||||
|
printf_unfiltered ("warning: reserved3 is %s\n", local_hex_string(ep->r3));
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* values that go into fp_kind (from <i386/fpreg.h>)
|
||||||
|
*/
|
||||||
|
#define FP_NO 0 /* no fp chip, no emulator (no fp support) */
|
||||||
|
#define FP_SW 1 /* no fp chip, using software emulator */
|
||||||
|
#define FP_HW 2 /* chip present bit */
|
||||||
|
#define FP_287 2 /* 80287 chip present */
|
||||||
|
#define FP_387 3 /* 80387 chip present */
|
||||||
|
|
||||||
|
typedef struct fpstate {
|
||||||
|
#if 1
|
||||||
|
unsigned char state[FP_STATE_BYTES]; /* "hardware" state */
|
||||||
|
#else
|
||||||
|
struct env387 state; /* Actually this */
|
||||||
|
#endif
|
||||||
|
int status; /* Duplicate status */
|
||||||
|
} *fpstate_t;
|
||||||
|
|
||||||
|
/* Mach 3 specific routines.
|
||||||
|
*/
|
||||||
|
static int
|
||||||
|
get_i387_state (fstate)
|
||||||
|
struct fpstate *fstate;
|
||||||
|
{
|
||||||
|
error_t err;
|
||||||
|
thread_state_data_t state;
|
||||||
|
unsigned int fsCnt = i386_FLOAT_STATE_COUNT;
|
||||||
|
struct i386_float_state *fsp;
|
||||||
|
struct proc *thread = inf_tid_to_thread (current_inferior, inferior_pid);
|
||||||
|
|
||||||
|
if (!thread)
|
||||||
|
error ("get_i387_state: Invalid thread");
|
||||||
|
|
||||||
|
proc_abort (thread, 0); /* Make sure THREAD's in a reasonable state. */
|
||||||
|
|
||||||
|
err = thread_get_state (thread->port, i386_FLOAT_STATE, state, &fsCnt);
|
||||||
|
if (err)
|
||||||
|
{
|
||||||
|
warning ("Can not get live floating point state: %s",
|
||||||
|
mach_error_string (err));
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
fsp = (struct i386_float_state *)state;
|
||||||
|
/* The 387 chip (also 486 counts) or a software emulator? */
|
||||||
|
if (!fsp->initialized || (fsp->fpkind != FP_387 && fsp->fpkind != FP_SW))
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
/* Clear the target then copy thread's float state there.
|
||||||
|
Make a copy of the status word, for some reason?
|
||||||
|
*/
|
||||||
|
memset (fstate, 0, sizeof (struct fpstate));
|
||||||
|
|
||||||
|
fstate->status = fsp->exc_status;
|
||||||
|
|
||||||
|
memcpy (fstate->state, (char *)&fsp->hw_state, FP_STATE_BYTES);
|
||||||
|
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* This is called by "info float" command
|
||||||
|
*/
|
||||||
|
void
|
||||||
|
i386_mach3_float_info()
|
||||||
|
{
|
||||||
|
char buf [sizeof (struct fpstate) + 2 * sizeof (int)];
|
||||||
|
int valid = 0;
|
||||||
|
fpstate_t fps;
|
||||||
|
|
||||||
|
if (target_has_execution)
|
||||||
|
valid = get_i387_state (buf);
|
||||||
|
|
||||||
|
if (!valid)
|
||||||
|
{
|
||||||
|
warning ("no floating point status saved");
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
fps = (fpstate_t) buf;
|
||||||
|
|
||||||
|
print_387_status (fps->status, (struct env387 *)fps->state);
|
||||||
|
}
|
||||||
1
gdb/msg.defs
Normal file
1
gdb/msg.defs
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
#include <hurd/msg.defs>
|
||||||
1
gdb/msg_reply.defs
Normal file
1
gdb/msg_reply.defs
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
#include <hurd/msg_reply.defs>
|
||||||
1
gdb/notify.defs
Normal file
1
gdb/notify.defs
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
#include <mach/notify.defs>
|
||||||
1
gdb/process_reply.defs
Normal file
1
gdb/process_reply.defs
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
#include <hurd/process_reply.defs>
|
||||||
123
gdb/reply_mig_hack.awk
Normal file
123
gdb/reply_mig_hack.awk
Normal file
|
|
@ -0,0 +1,123 @@
|
||||||
|
# Reply server mig-output massager
|
||||||
|
#
|
||||||
|
# Copyright (C) 1995 Free Software Foundation, Inc.
|
||||||
|
#
|
||||||
|
# Written by Miles Bader <miles@gnu.ai.mit.edu>
|
||||||
|
#
|
||||||
|
# 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, 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., 675 Mass Ave, Cambridge, MA 02139, USA.
|
||||||
|
#
|
||||||
|
# This awk script hacks the output of mig-generated reply server code
|
||||||
|
# so that it allows replies with just the error-code in them (as this is
|
||||||
|
# how mig returns errors).
|
||||||
|
#
|
||||||
|
# It is highly, highly, dependent on the exact format of mig output. Ick.
|
||||||
|
#
|
||||||
|
|
||||||
|
BEGIN { parse_phase = 0; }
|
||||||
|
|
||||||
|
/^}/ { parse_phase = 0; }
|
||||||
|
|
||||||
|
parse_phase == 0 && /^mig_internal void _X[a-zA-Z0-9_]*_reply/ {
|
||||||
|
# The start of a mig server routine. Reset everything. Note that we only
|
||||||
|
# mess with rpcs that have the suffix `_reply'.
|
||||||
|
num_args = 0;
|
||||||
|
num_checks = 0;
|
||||||
|
parse_phase = 1;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 1 && /^[\t ]*typedef struct/ {
|
||||||
|
# The first structure in the server routine should describe the arguments
|
||||||
|
parse_phase = 2;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 2 {
|
||||||
|
# The message header field in the args structure, which skip.
|
||||||
|
parse_phase = 3;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 3 && /}/ {
|
||||||
|
# The args structure is over.
|
||||||
|
if (num_args > 1)
|
||||||
|
parse_phase = 5;
|
||||||
|
else
|
||||||
|
# There's no extra args that could screw up the normal mechanism for
|
||||||
|
# error returns, so we don't have to insert any new code.
|
||||||
|
parse_phase = 0;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 3 {
|
||||||
|
# The type field for an argument.
|
||||||
|
arg_type_code_name[num_args] = $2;
|
||||||
|
sub (/;$/, "", arg_type_code_name[num_args]) # Get rid of the semi-colon
|
||||||
|
parse_phase = 4;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 4 {
|
||||||
|
# The value field for an argument.
|
||||||
|
arg_name[num_args] = $2;
|
||||||
|
sub (/;$/, "", arg_name[num_args]) # Get rid of the semi-colon
|
||||||
|
arg_type[num_args] = $1;
|
||||||
|
num_args++;
|
||||||
|
parse_phase = 3;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 5 && /^[ \t]*static const mach_msg_type_t/ {
|
||||||
|
# The type check structure for an argument.
|
||||||
|
arg_check_name[num_checks] = $4;
|
||||||
|
num_checks++;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 5 && /^[ \t]*mig_external kern_return_t/ {
|
||||||
|
# The declaration of the user server function for this rpc.
|
||||||
|
user_function_name = $3;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
parse_phase == 5 && /^#if[ \t]TypeCheck/ {
|
||||||
|
# The first args type checking statement; we need to insert our chunk of
|
||||||
|
# code that bypasses all the type checks if this is an error return, after
|
||||||
|
# which we're done until we get to the next function. Handily, the size
|
||||||
|
# of mig's Reply structure is also the size of the alternate Request
|
||||||
|
# structure that we want to check for.
|
||||||
|
print "\tif (In0P->Head.msgh_size == sizeof (Reply)";
|
||||||
|
print "\t && ! (In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX)";
|
||||||
|
print "\t && *(int *)&In0P->" arg_type_code_name[0] " == *(int *)&" arg_check_name[0];
|
||||||
|
print "\t && In0P->" arg_name[0] " != 0)";
|
||||||
|
print "\t /* Error return, only the error code argument is passed. */";
|
||||||
|
print "\t {";
|
||||||
|
# Force the function into a type that only takes the first two args, via
|
||||||
|
# the temp variable SFUN (is there another way to correctly do this cast?).
|
||||||
|
# This is possibly bogus, but easier than supplying bogus values for all
|
||||||
|
# the other args (we can't just pass 0 for them, as they might not be scalar).
|
||||||
|
printf ("\t kern_return_t (*sfun)(mach_port_t");
|
||||||
|
for (i = 0; i < num_args; i++)
|
||||||
|
printf (", %s", arg_type[i]);
|
||||||
|
printf (") = %s;\n", user_function_name);
|
||||||
|
print "\t OutP->RetCode = (*(kern_return_t (*)(mach_port_t, kern_return_t))sfun) (In0P->Head.msgh_request_port, In0P->" arg_name[0] ");";
|
||||||
|
print "\t return;";
|
||||||
|
print "\t }";
|
||||||
|
print "";
|
||||||
|
parse_phase = 0;
|
||||||
|
print; next;
|
||||||
|
}
|
||||||
|
|
||||||
|
{ print; }
|
||||||
Loading…
Add table
Reference in a new issue