mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-09 04:21:49 +08:00
7a7adcdf1d
* config/i386/nm-interix.h: New file. * config/i386/interix.mh: New file. * config/i386/interix.mt: New file. * i386-interix-nat.c: New file. * i386-interix-tdep.c: New file.
191 lines
4.8 KiB
C
191 lines
4.8 KiB
C
/* Native-dependent code for Interix running on i386's, for GDB.
|
|
Copyright 2002 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 <sys/procfs.h>
|
|
#include <inferior.h>
|
|
#include <fcntl.h>
|
|
|
|
#include <i386-tdep.h>
|
|
#include "gdb_string.h"
|
|
#include "gdbcore.h"
|
|
#include "gregset.h"
|
|
#include "regcache.h"
|
|
|
|
typedef unsigned long greg_t;
|
|
|
|
/* This is a duplicate of the table in i386-linux-nat.c. */
|
|
|
|
static int regmap[] = {
|
|
EAX, ECX, EDX, EBX,
|
|
UESP, EBP, ESI, EDI,
|
|
EIP, EFL, CS, SS,
|
|
DS, ES, FS, GS,
|
|
};
|
|
|
|
/* Forward declarations. */
|
|
extern void _initialize_core_interix (void);
|
|
extern initialize_file_ftype _initialize_core_interix;
|
|
|
|
/* Given a pointer to a general register set in /proc format (gregset_t *),
|
|
unpack the register contents and supply them as gdb's idea of the current
|
|
register values. */
|
|
|
|
void
|
|
supply_gregset (gregset_t *gregsetp)
|
|
{
|
|
int regi;
|
|
greg_t *regp = (greg_t *) & gregsetp->gregs;
|
|
|
|
for (regi = 0; regi < I386_NUM_GREGS; regi++)
|
|
{
|
|
supply_register (regi, (char *) (regp + regmap[regi]));
|
|
}
|
|
}
|
|
|
|
/* Store GDB's value for REGNO in *GREGSETP. If REGNO is -1, do all
|
|
of them. */
|
|
|
|
void
|
|
fill_gregset (gregset_t *gregsetp, int regno)
|
|
{
|
|
int regi;
|
|
greg_t *regp = (greg_t *) gregsetp->gregs;
|
|
|
|
for (regi = 0; regi < I386_NUM_GREGS; regi++)
|
|
if (regno == -1 || regi == regno)
|
|
regcache_collect (regi, (void *) (regp + regmap[regi]));
|
|
}
|
|
|
|
/* Fill GDB's register file with the floating-point register values in
|
|
*FPREGSETP. */
|
|
|
|
void
|
|
supply_fpregset (fpregset_t *fpregsetp)
|
|
{
|
|
i387_supply_fsave ((char *) fpregsetp);
|
|
}
|
|
|
|
/* Given a pointer to a floating point register set in (fpregset_t *)
|
|
format, update all of the registers from gdb's idea of the current
|
|
floating point register set. */
|
|
|
|
void
|
|
fill_fpregset (fpregset_t *fpregsetp, int regno)
|
|
{
|
|
i387_fill_fsave ((char *) fpregsetp, regno);
|
|
}
|
|
|
|
/* Read the values of either the general register set (WHICH equals 0)
|
|
or the floating point register set (WHICH equals 2) from the core
|
|
file data (pointed to by CORE_REG_SECT), and update gdb's idea of
|
|
their current values. The CORE_REG_SIZE parameter is compared to
|
|
the size of the gregset or fpgregset structures (as appropriate) to
|
|
validate the size of the structure from the core file. The
|
|
REG_ADDR parameter is ignored. */
|
|
|
|
static void
|
|
fetch_core_registers (char *core_reg_sect, unsigned core_reg_size, int which,
|
|
CORE_ADDR reg_addr)
|
|
{
|
|
gdb_gregset_t gregset;
|
|
gdb_fpregset_t fpregset;
|
|
|
|
if (which == 0)
|
|
{
|
|
if (core_reg_size != sizeof (gregset))
|
|
{
|
|
warning ("wrong size gregset struct in core file");
|
|
}
|
|
else
|
|
{
|
|
memcpy ((char *) &gregset, core_reg_sect, sizeof (gregset));
|
|
supply_gregset (&gregset);
|
|
}
|
|
}
|
|
else if (which == 2)
|
|
{
|
|
if (core_reg_size != sizeof (fpregset))
|
|
{
|
|
warning ("wrong size fpregset struct in core file");
|
|
}
|
|
else
|
|
{
|
|
memcpy ((char *) &fpregset, core_reg_sect, sizeof (fpregset));
|
|
supply_fpregset (&fpregset);
|
|
}
|
|
}
|
|
}
|
|
|
|
#include <setjmp.h>
|
|
|
|
static struct core_fns interix_core_fns =
|
|
{
|
|
bfd_target_coff_flavour, /* core_flavour (more or less) */
|
|
default_check_format, /* check_format */
|
|
default_core_sniffer, /* core_sniffer */
|
|
fetch_core_registers, /* core_read_registers */
|
|
NULL /* next */
|
|
};
|
|
|
|
void
|
|
_initialize_core_interix (void)
|
|
{
|
|
add_core_fns (&interix_core_fns);
|
|
}
|
|
|
|
/* We don't have a /proc/pid/file or /proc/pid/exe to read a link from,
|
|
so read it from the same place ps gets the name. */
|
|
|
|
char *
|
|
child_pid_to_exec_file (int pid)
|
|
{
|
|
char *path;
|
|
char *buf;
|
|
int fd, c;
|
|
char *p;
|
|
|
|
xasprintf (&path, "/proc/%d/stat", pid);
|
|
buf = xcalloc (MAXPATHLEN + 1, sizeof (char));
|
|
make_cleanup (xfree, path);
|
|
make_cleanup (xfree, buf);
|
|
|
|
fd = open (path, O_RDONLY);
|
|
|
|
if (fd < 0)
|
|
return NULL;
|
|
|
|
/* Skip over "Argv0\t". */
|
|
lseek (fd, 6, SEEK_SET);
|
|
|
|
c = read (fd, buf, MAXPATHLEN);
|
|
close (fd);
|
|
|
|
if (c < 0)
|
|
return NULL;
|
|
|
|
buf[c] = '\0'; /* Ensure null termination. */
|
|
p = strchr (buf, '\n');
|
|
if (p != NULL)
|
|
*p = '\0';
|
|
|
|
return buf;
|
|
}
|