-/* Convex stuff for GDB.
- Copyright (C) 1990-1991 Free Software Foundation, Inc.
+/* Convex host-dependent code for GDB.
+ Copyright 1990, 1991, 1992 Free Software Foundation, Inc.
This file is part of GDB.
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
-#include <stdio.h>
#include "defs.h"
#include "command.h"
#include "symtab.h"
#include "gdbcmd.h"
-/* Nonzero if we are debugging an attached outside process
- rather than an inferior. */
-
-extern int attach_flag;
-
-
-
static struct type *vector_type ();
static long *read_vector_register ();
static long *read_vector_register_1 ();
static void write_vector_register ();
-static REGISTER_TYPE read_comm_register ();
+static unsigned LONGEST read_comm_register ();
static void write_comm_register ();
static void convex_cont_command ();
static void thread_continue ();
static sig_noop ();
static ptr_cmp ();
-extern char *sys_siglist[];
\f
/* Execute ptrace. Convex V7 replaced ptrace with pattach.
Allow ptrace (0) as a no-op. */
int
call_ptrace (request, pid, procaddr, buf)
- int request, pid, procaddr, buf;
+ int request, pid;
+ PTRACE_ARG3_TYPE procaddr;
+ int buf;
{
if (request == 0)
return;
len -= i;
}
if (errno)
- bzero (myaddr, len);
+ memset (myaddr, '\0', len);
return errno;
}
and started up. We must do a pattach to grab it for debugging.
Also, intercept the CONT command by altering its dispatch address. */
+/* FIXME: This used to be called from a macro CREATE_INFERIOR_HOOK.
+ But now init_trace_fun is in the same place. So re-write this to
+ use the init_trace_fun (making convex a debugging target). */
create_inferior_hook (pid)
int pid;
target_mourn_inferior ();
}
-/* This is used when GDB is exiting. It gives less chance of error.*/
-
-kill_inferior_fast ()
-{
- if (inferior_pid == 0)
- return;
- ioctl (inferior_fd, PIXTERMINATE, 0);
- wait (0);
-}
-
/* Read vector register REG, and return a pointer to the value. */
static long *
ps.pi_thread = inferior_thread;
ioctl (inferior_fd, PIXRDVREGS, &ps);
if (errno)
- bzero (&vector_registers, sizeof vector_registers);
+ memset (&vector_registers, '\0', sizeof vector_registers);
}
else if (corechan >= 0)
{
static void
write_vector_register (reg, element, val)
int reg, element;
- REGISTER_TYPE val;
+ unsigned LONGEST val;
{
if (have_inferior_p ())
{
/* Return the contents of communication register NUM. */
-static REGISTER_TYPE
+static unsigned LONGEST
read_comm_register (num)
int num;
{
static void
write_comm_register (num, val)
int num;
- REGISTER_TYPE val;
+ unsigned LONGEST val;
{
if (have_inferior_p ())
{
select_thread (signal_stack->thread);
+ FIXME: need to convert from host sig.
stop_signal = signal_stack->signo;
stop_sigcode = signal_stack->subsig;
if (thread == inferior_thread)
return;
- bcopy (registers, thread_regs[inferior_thread], REGISTER_BYTES);
+ memcpy (thread_regs[inferior_thread], registers, REGISTER_BYTES);
ps.pi_thread = inferior_thread = thread;
if (have_inferior_p ())
ioctl (inferior_fd, PISETRWTID, &ps);
- bcopy (thread_regs[thread], registers, REGISTER_BYTES);
+ memcpy (registers, thread_regs[thread], REGISTER_BYTES);
}
/* Routine to set or clear a psw bit in the psw and also all psws
make_cleanup (free, filename);
if (have_inferior_p ())
- error ("To look at a core file, you must kill the inferior with \"kill\".");
+ error ("To look at a core file, you must kill the program with \"kill\".");
corechan = open (filename, O_RDONLY, 0);
if (corechan < 0)
perror_with_name (filename);
printf_filtered ("thread %d received signal %d, %s\n",
n, thread_signal[n],
- thread_signal[n] < NSIG
- ? sys_siglist[thread_signal[n]]
- : "(undocumented)");
+ safe_strsignal (thread_signal[n]));
}
/* Select an interesting thread -- also-rans died with SIGKILL,